From c7de829c796978e519984df2f1c8cfcf921a39a4 Mon Sep 17 00:00:00 2001
From: wdenk <wdenk>
Date: Tue, 19 Nov 2002 11:04:11 +0000
Subject: [PATCH] * Patch by Thomas Frieden, 13 Nov 2002: Add code for
AmigaOne board (preliminary merge to U-Boot, still WIP)
* Patch by Jon Diekema, 12 Nov 2002:
- Adding URL for IEEE OUI lookup
- Making the autoboot #defines dependent on CONFIG_AUTOBOOT_KEYED
being defined.
- In the CONFIG_EXTRA_ENV_SETTINGS #define, the root-on-initrd and
root-on-nfs macros are designed to switch how the default boot
method gets defined.
---
CHANGELOG | 12 +
CREDITS | 4 +
MAINTAINERS | 5 +-
Makefile | 3 +
board/MAI/AmigaOneG3SE/AmigaOneG3SE.c | 116 +
board/MAI/AmigaOneG3SE/Makefile | 53 +
board/MAI/AmigaOneG3SE/articiaS.c | 704 +
board/MAI/AmigaOneG3SE/articiaS.h | 143 +
board/MAI/AmigaOneG3SE/articiaS_pci.c | 573 +
board/MAI/AmigaOneG3SE/board_asm_init.S | 157 +
board/MAI/AmigaOneG3SE/cmd_boota.c | 123 +
board/MAI/AmigaOneG3SE/config.mk | 33 +
board/MAI/AmigaOneG3SE/enet.c | 886 ++
board/MAI/AmigaOneG3SE/flash.c | 35 +
board/MAI/AmigaOneG3SE/flash_new.c | 652 +
board/MAI/AmigaOneG3SE/i8259.c | 230 +
board/MAI/AmigaOneG3SE/i8259.h | 56 +
board/MAI/AmigaOneG3SE/interrupts.c | 268 +
board/MAI/AmigaOneG3SE/macros.h | 84 +
board/MAI/AmigaOneG3SE/memio.S | 74 +
board/MAI/AmigaOneG3SE/memio.h | 113 +
board/MAI/AmigaOneG3SE/memory_dump | 30 +
board/MAI/AmigaOneG3SE/nvram.c | 37 +
board/MAI/AmigaOneG3SE/ps2kbd.c | 699 +
board/MAI/AmigaOneG3SE/ps2kbd.h | 41 +
board/MAI/AmigaOneG3SE/serial.c | 247 +
board/MAI/AmigaOneG3SE/short_types.h | 36 +
board/MAI/AmigaOneG3SE/smbus.c | 206 +
board/MAI/AmigaOneG3SE/smbus.h | 22 +
board/MAI/AmigaOneG3SE/start.txt | 201 +
board/MAI/AmigaOneG3SE/todo.txt | 3 +
board/MAI/AmigaOneG3SE/u-boot.lds | 131 +
board/MAI/AmigaOneG3SE/usb_uhci.c | 1179 ++
board/MAI/AmigaOneG3SE/usb_uhci.h | 194 +
board/MAI/AmigaOneG3SE/via686.c | 299 +
board/MAI/AmigaOneG3SE/via686.h | 29 +
board/MAI/AmigaOneG3SE/video.c | 539 +
board/MAI/bios_emulator/bios.c | 335 +
board/MAI/bios_emulator/glue.c | 528 +
board/MAI/bios_emulator/glue.h | 57 +
.../scitech/bin-linux/glibc/dmake | Bin 0 -> 70812 bytes
.../scitech/bin-linux/glibc/k_cp | Bin 0 -> 37612 bytes
.../scitech/bin-linux/glibc/k_echo | Bin 0 -> 11924 bytes
.../scitech/bin-linux/glibc/k_rm | Bin 0 -> 38300 bytes
.../scitech/bin-linux/glibc/makedep | Bin 0 -> 58623 bytes
.../scitech/bin-linux/glibc/nasm | Bin 0 -> 263498 bytes
.../scitech/bin-linux/glibc/ndisasm | Bin 0 -> 100192 bytes
.../scitech/bin-linux/glibc/trans | Bin 0 -> 9244 bytes
.../scitech/bin-linux/libc/dmake | Bin 0 -> 71264 bytes
.../bios_emulator/scitech/bin-linux/libc/nasm | Bin 0 -> 168228 bytes
.../scitech/bin-linux/libc/ndisasm | Bin 0 -> 66888 bytes
.../scitech/bin-linux/libc/trans | Bin 0 -> 8984 bytes
.../bios_emulator/scitech/bin/bc31-d16.bat | 28 +
.../bios_emulator/scitech/bin/bc45-c32.bat | 37 +
.../bios_emulator/scitech/bin/bc45-d16.bat | 32 +
.../bios_emulator/scitech/bin/bc45-d32.bat | 33 +
.../bios_emulator/scitech/bin/bc45-snp.bat | 32 +
.../bios_emulator/scitech/bin/bc45-tnt.bat | 46 +
.../bios_emulator/scitech/bin/bc45-vxd.bat | 32 +
.../bios_emulator/scitech/bin/bc45-w16.bat | 32 +
.../bios_emulator/scitech/bin/bc45-w32.bat | 37 +
.../bios_emulator/scitech/bin/bc50-c32.bat | 40 +
.../bios_emulator/scitech/bin/bc50-d16.bat | 34 +
.../bios_emulator/scitech/bin/bc50-d32.bat | 35 +
.../bios_emulator/scitech/bin/bc50-smx.bat | 35 +
.../bios_emulator/scitech/bin/bc50-snp.bat | 34 +
.../bios_emulator/scitech/bin/bc50-tnt.bat | 48 +
.../bios_emulator/scitech/bin/bc50-vxd.bat | 34 +
.../bios_emulator/scitech/bin/bc50-w16.bat | 34 +
.../bios_emulator/scitech/bin/bc50-w32.bat | 40 +
.../bios_emulator/scitech/bin/bc50-x11.bat | 34 +
.../bios_emulator/scitech/bin/bcb5-c32.bat | 40 +
.../bios_emulator/scitech/bin/bcb5-d16.bat | 34 +
.../bios_emulator/scitech/bin/bcb5-d32.bat | 35 +
.../bios_emulator/scitech/bin/bcb5-smx.bat | 35 +
.../bios_emulator/scitech/bin/bcb5-snp.bat | 34 +
.../bios_emulator/scitech/bin/bcb5-tnt.bat | 48 +
.../bios_emulator/scitech/bin/bcb5-vxd.bat | 34 +
.../bios_emulator/scitech/bin/bcb5-w16.bat | 34 +
.../bios_emulator/scitech/bin/bcb5-w32.bat | 40 +
.../bios_emulator/scitech/bin/bcb5-x11.bat | 34 +
board/MAI/bios_emulator/scitech/bin/build | 22 +
board/MAI/bios_emulator/scitech/bin/build.bat | 4 +
.../bios_emulator/scitech/bin/build_db.bat | 4 +
.../bios_emulator/scitech/bin/build_it.bat | 432 +
board/MAI/bios_emulator/scitech/bin/cddrv.bat | 6 +
board/MAI/bios_emulator/scitech/bin/cdit | 10 +
board/MAI/bios_emulator/scitech/bin/cdit.bat | 5 +
board/MAI/bios_emulator/scitech/bin/djgpp.env | 46 +
.../bios_emulator/scitech/bin/djgpp_db.env | 46 +
.../bios_emulator/scitech/bin/findint3.bat | 1 +
.../MAI/bios_emulator/scitech/bin/gcc-beos.sh | 16 +
.../bios_emulator/scitech/bin/gcc-freebsd.sh | 16 +
.../bios_emulator/scitech/bin/gcc-linux.sh | 19 +
.../bios_emulator/scitech/bin/gcc2-c32.bat | 26 +
.../bios_emulator/scitech/bin/gcc2-dos.bat | 28 +
.../bios_emulator/scitech/bin/gcc2-linux.bat | 26 +
.../bios_emulator/scitech/bin/gcc2-w32.bat | 26 +
.../MAI/bios_emulator/scitech/bin/makelib.bat | 97 +
.../MAI/bios_emulator/scitech/bin/meltobjs.sh | 23 +
board/MAI/bios_emulator/scitech/bin/ntddk.bat | 42 +
board/MAI/bios_emulator/scitech/bin/qnx4.sh | 18 +
board/MAI/bios_emulator/scitech/bin/qnxnto.sh | 21 +
.../scitech/bin/set-vars-beos.sh | 42 +
.../scitech/bin/set-vars-freebsd.sh | 37 +
.../scitech/bin/set-vars-linux.sh | 43 +
.../bios_emulator/scitech/bin/set-vars-qnx.sh | 37 +
.../bios_emulator/scitech/bin/set-vars.bat | 110 +
.../bios_emulator/scitech/bin/vc40-c32.bat | 36 +
.../bios_emulator/scitech/bin/vc40-d16.bat | 27 +
.../bios_emulator/scitech/bin/vc40-drv9x.bat | 21 +
.../bios_emulator/scitech/bin/vc40-drvnt.bat | 18 +
.../bios_emulator/scitech/bin/vc40-snp.bat | 31 +
.../bios_emulator/scitech/bin/vc40-tnt.bat | 42 +
.../bios_emulator/scitech/bin/vc40-w16.bat | 26 +
.../bios_emulator/scitech/bin/vc40-w32.bat | 37 +
.../bios_emulator/scitech/bin/vc40-x11.bat | 20 +
.../bios_emulator/scitech/bin/vc50-c32.bat | 39 +
.../bios_emulator/scitech/bin/vc50-d16.bat | 26 +
.../bios_emulator/scitech/bin/vc50-drv9x.bat | 21 +
.../bios_emulator/scitech/bin/vc50-drvnt.bat | 17 +
.../bios_emulator/scitech/bin/vc50-rtt.bat | 30 +
.../bios_emulator/scitech/bin/vc50-snp.bat | 33 +
.../bios_emulator/scitech/bin/vc50-tnt.bat | 42 +
.../bios_emulator/scitech/bin/vc50-w16.bat | 27 +
.../bios_emulator/scitech/bin/vc50-w32.bat | 39 +
.../bios_emulator/scitech/bin/vc50-x11.bat | 20 +
.../bios_emulator/scitech/bin/vc60-c32.bat | 39 +
.../bios_emulator/scitech/bin/vc60-d16.bat | 26 +
.../bios_emulator/scitech/bin/vc60-drv9x.bat | 21 +
.../bios_emulator/scitech/bin/vc60-drvnt.bat | 17 +
.../bios_emulator/scitech/bin/vc60-drvw2k.bat | 17 +
.../bios_emulator/scitech/bin/vc60-snp.bat | 33 +
.../bios_emulator/scitech/bin/vc60-tnt.bat | 42 +
.../bios_emulator/scitech/bin/vc60-w16.bat | 27 +
.../bios_emulator/scitech/bin/vc60-w32.bat | 39 +
.../bios_emulator/scitech/bin/vc60-x11.bat | 20 +
.../MAI/bios_emulator/scitech/bin/w2kddk.bat | 42 +
.../bios_emulator/scitech/bin/wc10-c32.bat | 34 +
.../bios_emulator/scitech/bin/wc10-d16.bat | 30 +
.../bios_emulator/scitech/bin/wc10-d32.bat | 34 +
.../bios_emulator/scitech/bin/wc10-o16.bat | 31 +
.../bios_emulator/scitech/bin/wc10-o32.bat | 31 +
.../bios_emulator/scitech/bin/wc10-p32.bat | 31 +
.../bios_emulator/scitech/bin/wc10-qnx.bat | 34 +
.../bios_emulator/scitech/bin/wc10-snp.bat | 34 +
.../bios_emulator/scitech/bin/wc10-tnt.bat | 46 +
.../bios_emulator/scitech/bin/wc10-w16.bat | 32 +
.../bios_emulator/scitech/bin/wc10-w32.bat | 34 +
.../bios_emulator/scitech/bin/wc10-x11.bat | 24 +
.../bios_emulator/scitech/bin/wc10ac32.bat | 33 +
.../bios_emulator/scitech/bin/wc10ad16.bat | 29 +
.../bios_emulator/scitech/bin/wc10ad32.bat | 32 +
.../bios_emulator/scitech/bin/wc10ao16.bat | 30 +
.../bios_emulator/scitech/bin/wc10ao32.bat | 30 +
.../bios_emulator/scitech/bin/wc10ap32.bat | 30 +
.../bios_emulator/scitech/bin/wc10asnp.bat | 33 +
.../bios_emulator/scitech/bin/wc10atnt.bat | 45 +
.../bios_emulator/scitech/bin/wc10aw16.bat | 31 +
.../bios_emulator/scitech/bin/wc10aw32.bat | 33 +
.../bios_emulator/scitech/bin/wc11-c32.bat | 40 +
.../bios_emulator/scitech/bin/wc11-d16.bat | 30 +
.../bios_emulator/scitech/bin/wc11-d32.bat | 33 +
.../bios_emulator/scitech/bin/wc11-o16.bat | 31 +
.../bios_emulator/scitech/bin/wc11-o32.bat | 31 +
.../bios_emulator/scitech/bin/wc11-p32.bat | 31 +
.../bios_emulator/scitech/bin/wc11-qnx.bat | 34 +
.../bios_emulator/scitech/bin/wc11-snp.bat | 34 +
.../bios_emulator/scitech/bin/wc11-tnt.bat | 46 +
.../bios_emulator/scitech/bin/wc11-w16.bat | 31 +
.../bios_emulator/scitech/bin/wc11-w32.bat | 40 +
.../bios_emulator/scitech/bin/wc11-x11.bat | 34 +
.../bios_emulator/scitech/bin/win32sdk.bat | 20 +
.../bios_emulator/scitech/include/biosemu.h | 155 +
.../MAI/bios_emulator/scitech/include/event.h | 696 +
.../MAI/bios_emulator/scitech/include/mtrr.h | 72 +
.../bios_emulator/scitech/include/pcilib.h | 414 +
.../bios_emulator/scitech/include/pm_help.h | 167 +
.../bios_emulator/scitech/include/pm_wctl.h | 76 +
.../MAI/bios_emulator/scitech/include/pmapi.h | 1149 ++
.../MAI/bios_emulator/scitech/include/pmimp.h | 194 +
.../MAI/bios_emulator/scitech/include/pmint.h | 211 +
.../bios_emulator/scitech/include/scitech.h | 712 +
.../bios_emulator/scitech/include/scitech.mac | 1321 ++
.../bios_emulator/scitech/include/x86emu.h | 194 +
.../scitech/include/x86emu/fpu_regs.h | 115 +
.../scitech/include/x86emu/regs.h | 331 +
.../scitech/include/x86emu/types.h | 70 +
.../lib/debug/linux/gcc/glibc/readme.txt | 1 +
.../lib/debug/linux/gcc/libc/readme.txt | 1 +
.../lib/release/linux/gcc/glibc/readme.txt | 1 +
.../lib/release/linux/gcc/libc/readme.txt | 1 +
.../bios_emulator/scitech/makedefs/bc16.mk | 137 +
.../MAI/bios_emulator/scitech/makedefs/bc3.mk | 102 +
.../bios_emulator/scitech/makedefs/bc32.mk | 201 +
.../bios_emulator/scitech/makedefs/bcos2.mk | 137 +
.../bios_emulator/scitech/makedefs/cl16.mk | 132 +
.../bios_emulator/scitech/makedefs/cl386.mk | 120 +
.../bios_emulator/scitech/makedefs/common.mk | 181 +
.../MAI/bios_emulator/scitech/makedefs/emx.mk | 194 +
.../scitech/makedefs/gcc_beos.mk | 161 +
.../bios_emulator/scitech/makedefs/gcc_dos.mk | 112 +
.../scitech/makedefs/gcc_freebsd.mk | 174 +
.../scitech/makedefs/gcc_linux.mk | 181 +
.../scitech/makedefs/gcc_win32.mk | 136 +
.../bios_emulator/scitech/makedefs/hc32.mk | 113 +
.../scitech/makedefs/makedefs.prj | Bin 0 -> 9025 bytes
.../bios_emulator/scitech/makedefs/qnx4.mk | 165 +
.../bios_emulator/scitech/makedefs/qnxnto.mk | 157 +
.../scitech/makedefs/rules/bc16.mk | 69 +
.../scitech/makedefs/rules/bc3.mk | 43 +
.../scitech/makedefs/rules/bc32.mk | 151 +
.../scitech/makedefs/rules/bcos2.mk | 70 +
.../scitech/makedefs/rules/cl16.mk | 67 +
.../scitech/makedefs/rules/cl386.mk | 69 +
.../scitech/makedefs/rules/dj32.mk | 47 +
.../scitech/makedefs/rules/emx.mk | 91 +
.../scitech/makedefs/rules/gcc_beos.mk | 48 +
.../scitech/makedefs/rules/gcc_freebsd.mk | 47 +
.../scitech/makedefs/rules/gcc_linux.mk | 94 +
.../scitech/makedefs/rules/gcc_win32.mk | 91 +
.../scitech/makedefs/rules/hc32.mk | 51 +
.../scitech/makedefs/rules/qnx4.mk | 94 +
.../scitech/makedefs/rules/qnxnto.mk | 55 +
.../scitech/makedefs/rules/sc16.mk | 63 +
.../scitech/makedefs/rules/sc32.mk | 69 +
.../scitech/makedefs/rules/va32.mk | 82 +
.../scitech/makedefs/rules/va365.mk | 79 +
.../scitech/makedefs/rules/vc16.mk | 70 +
.../scitech/makedefs/rules/vc32.mk | 122 +
.../scitech/makedefs/rules/wc16.mk | 79 +
.../scitech/makedefs/rules/wc32.mk | 265 +
.../bios_emulator/scitech/makedefs/sc16.mk | 128 +
.../bios_emulator/scitech/makedefs/sc32.mk | 178 +
.../bios_emulator/scitech/makedefs/startup.mk | 162 +
.../bios_emulator/scitech/makedefs/va32.mk | 163 +
.../bios_emulator/scitech/makedefs/va365.mk | 151 +
.../bios_emulator/scitech/makedefs/vc16.mk | 128 +
.../bios_emulator/scitech/makedefs/vc32.mk | 226 +
.../bios_emulator/scitech/makedefs/wc16.mk | 141 +
.../bios_emulator/scitech/makedefs/wc32.mk | 354 +
.../bios_emulator/scitech/src/biosemu/besys.c | 408 +
.../bios_emulator/scitech/src/biosemu/bios.c | 250 +
.../scitech/src/biosemu/biosemu.c | 445 +
.../scitech/src/biosemu/biosemui.h | 79 +
.../scitech/src/biosemu/makefile | 99 +
.../scitech/src/biosemu/makefile.cross | 10 +
.../scitech/src/biosemu/warmboot.c | 569 +
.../scitech/src/common/_aa_imp.asm | 51 +
.../scitech/src/common/_ga_imp.asm | 136 +
.../scitech/src/common/_gatimer.asm | 248 +
.../scitech/src/common/_pm_imp.asm | 195 +
.../bios_emulator/scitech/src/common/aabeos.c | 92 +
.../bios_emulator/scitech/src/common/aados.c | 64 +
.../bios_emulator/scitech/src/common/aalib.c | 225 +
.../scitech/src/common/aalinux.c | 94 +
.../bios_emulator/scitech/src/common/aaos2.c | 124 +
.../bios_emulator/scitech/src/common/aaqnx.c | 95 +
.../bios_emulator/scitech/src/common/aartt.c | 89 +
.../bios_emulator/scitech/src/common/aasmx.c | 83 +
.../bios_emulator/scitech/src/common/aavxd.c | 90 +
.../scitech/src/common/aawin32.c | 264 +
.../bios_emulator/scitech/src/common/agplib.c | 220 +
.../bios_emulator/scitech/src/common/center.c | 123 +
.../scitech/src/common/cmdline.c | 428 +
.../bios_emulator/scitech/src/common/gabeos.c | 146 +
.../bios_emulator/scitech/src/common/gados.c | 136 +
.../bios_emulator/scitech/src/common/galib.c | 269 +
.../scitech/src/common/galinux.c | 148 +
.../scitech/src/common/gantdrv.c | 137 +
.../bios_emulator/scitech/src/common/gaos2.c | 248 +
.../bios_emulator/scitech/src/common/gaqnx.c | 149 +
.../bios_emulator/scitech/src/common/gartt.c | 139 +
.../bios_emulator/scitech/src/common/gasmx.c | 133 +
.../bios_emulator/scitech/src/common/gavxd.c | 137 +
.../scitech/src/common/gawin32.c | 256 +
.../scitech/src/common/gtfcalc.c | 436 +
.../scitech/src/common/libcimp.c | 828 ++
.../bios_emulator/scitech/src/common/makefile | 18 +
.../scitech/src/common/peloader.c | 587 +
.../scitech/src/common/vesavbe.c | 1214 ++
.../scitech/src/pm/beos/cpuinfo.c | 80 +
.../bios_emulator/scitech/src/pm/beos/event.c | 199 +
.../bios_emulator/scitech/src/pm/beos/oshdr.h | 32 +
.../bios_emulator/scitech/src/pm/beos/pm.c | 539 +
.../bios_emulator/scitech/src/pm/beos/vflat.c | 49 +
.../scitech/src/pm/beos/ztimer.c | 111 +
.../scitech/src/pm/codepage/us_eng.c | 285 +
.../MAI/bios_emulator/scitech/src/pm/common.c | 480 +
.../scitech/src/pm/common/_cpuinfo.asm | 600 +
.../scitech/src/pm/common/_dma.asm | 246 +
.../scitech/src/pm/common/_int64.asm | 309 +
.../scitech/src/pm/common/_joy.asm | 230 +
.../scitech/src/pm/common/_mtrr.asm | 272 +
.../scitech/src/pm/common/_pcihelp.asm | 358 +
.../bios_emulator/scitech/src/pm/common/agp.c | 190 +
.../scitech/src/pm/common/keyboard.c | 450 +
.../scitech/src/pm/common/malloc.c | 205 +
.../scitech/src/pm/common/mtrr.c | 867 ++
.../scitech/src/pm/common/pcilib.c | 747 +
.../scitech/src/pm/common/unixio.c | 306 +
.../scitech/src/pm/common/vgastate.c | 377 +
.../bios_emulator/scitech/src/pm/cpuinfo.c | 808 ++
.../MAI/bios_emulator/scitech/src/pm/debug.c | 107 +
.../scitech/src/pm/dos/_event.asm | 194 +
.../scitech/src/pm/dos/_lztimer.asm | 438 +
.../bios_emulator/scitech/src/pm/dos/_pm.asm | 656 +
.../scitech/src/pm/dos/_pmdos.asm | 1105 ++
.../scitech/src/pm/dos/_vflat.asm | 652 +
.../scitech/src/pm/dos/cpuinfo.c | 72 +
.../bios_emulator/scitech/src/pm/dos/event.c | 494 +
.../bios_emulator/scitech/src/pm/dos/oshdr.h | 29 +
.../MAI/bios_emulator/scitech/src/pm/dos/pm.c | 2243 +++
.../bios_emulator/scitech/src/pm/dos/pmdos.c | 1637 +++
.../bios_emulator/scitech/src/pm/dos/vflat.c | 251 +
.../bios_emulator/scitech/src/pm/dos/ztimer.c | 111 +
.../MAI/bios_emulator/scitech/src/pm/event.c | 1115 ++
.../scitech/src/pm/linux/cpuinfo.c | 68 +
.../scitech/src/pm/linux/event.c | 1361 ++
.../scitech/src/pm/linux/event.svga | 1058 ++
.../scitech/src/pm/linux/oshdr.h | 61 +
.../bios_emulator/scitech/src/pm/linux/pm.c | 1810 +++
.../scitech/src/pm/linux/vflat.c | 49 +
.../scitech/src/pm/linux/ztimer.c | 95 +
.../MAI/bios_emulator/scitech/src/pm/makefile | 290 +
.../scitech/src/pm/ntdrv/_irq.asm | 288 +
.../scitech/src/pm/ntdrv/_pm.asm | 281 +
.../scitech/src/pm/ntdrv/cpuinfo.c | 65 +
.../scitech/src/pm/ntdrv/int86.c | 252 +
.../bios_emulator/scitech/src/pm/ntdrv/irq.c | 143 +
.../bios_emulator/scitech/src/pm/ntdrv/mem.c | 519 +
.../scitech/src/pm/ntdrv/oshdr.h | 46 +
.../bios_emulator/scitech/src/pm/ntdrv/pm.c | 934 ++
.../scitech/src/pm/ntdrv/stdio.c | 331 +
.../scitech/src/pm/ntdrv/stdlib.c | 140 +
.../scitech/src/pm/ntdrv/vflat.c | 45 +
.../scitech/src/pm/ntdrv/ztimer.c | 124 +
.../scitech/src/pm/os2/_pmos2.asm | 180 +
.../scitech/src/pm/os2/cpuinfo.c | 66 +
.../bios_emulator/scitech/src/pm/os2/event.c | 566 +
.../bios_emulator/scitech/src/pm/os2/mon.h | 165 +
.../bios_emulator/scitech/src/pm/os2/oshdr.h | 42 +
.../MAI/bios_emulator/scitech/src/pm/os2/pm.c | 2008 +++
.../bios_emulator/scitech/src/pm/os2/vflat.c | 49 +
.../bios_emulator/scitech/src/pm/os2/ztimer.c | 110 +
.../scitech/src/pm/os2pm/event.c | 170 +
.../scitech/src/pm/os2pm/oshdr.h | 36 +
.../MAI/bios_emulator/scitech/src/pm/oshdr.h | 70 +
.../scitech/src/pm/photon/event.c | 268 +
.../scitech/src/pm/photon/oshdr.h | 38 +
board/MAI/bios_emulator/scitech/src/pm/pm.vpw | 43 +
.../bios_emulator/scitech/src/pm/pmcommon.vpj | 45 +
.../bios_emulator/scitech/src/pm/pmdos.vpj | 41 +
.../bios_emulator/scitech/src/pm/pmlinux.vpj | 35 +
.../bios_emulator/scitech/src/pm/pmntdrv.vpj | 39 +
.../bios_emulator/scitech/src/pm/pmqnx.vpj | 35 +
.../bios_emulator/scitech/src/pm/pmvxd.vpj | 34 +
.../bios_emulator/scitech/src/pm/pmwin32.vpj | 35 +
.../scitech/src/pm/qnx/_mtrrqnx.asm | 226 +
.../scitech/src/pm/qnx/cpuinfo.c | 64 +
.../bios_emulator/scitech/src/pm/qnx/event.c | 602 +
.../scitech/src/pm/qnx/mtrrqnx.c | 182 +
.../bios_emulator/scitech/src/pm/qnx/oshdr.h | 103 +
.../MAI/bios_emulator/scitech/src/pm/qnx/pm.c | 891 ++
.../bios_emulator/scitech/src/pm/qnx/vflat.c | 49 +
.../bios_emulator/scitech/src/pm/qnx/ztimer.c | 91 +
.../scitech/src/pm/rttarget/cpuinfo.c | 94 +
.../scitech/src/pm/rttarget/event.c | 287 +
.../scitech/src/pm/rttarget/oshdr.h | 34 +
.../scitech/src/pm/rttarget/pm.c | 701 +
.../scitech/src/pm/rttarget/vflat.c | 48 +
.../scitech/src/pm/rttarget/ztimer.c | 136 +
.../scitech/src/pm/smx/_event.asm | 175 +
.../scitech/src/pm/smx/_lztimer.asm | 58 +
.../bios_emulator/scitech/src/pm/smx/_pm.asm | 448 +
.../scitech/src/pm/smx/_pmsmx.asm | 933 ++
.../scitech/src/pm/smx/_vflat.asm | 652 +
.../scitech/src/pm/smx/cpuinfo.c | 72 +
.../bios_emulator/scitech/src/pm/smx/event.c | 368 +
.../bios_emulator/scitech/src/pm/smx/oshdr.h | 29 +
.../MAI/bios_emulator/scitech/src/pm/smx/pm.c | 1187 ++
.../bios_emulator/scitech/src/pm/smx/pmsmx.c | 471 +
.../bios_emulator/scitech/src/pm/smx/vflat.c | 49 +
.../bios_emulator/scitech/src/pm/smx/ztimer.c | 115 +
.../scitech/src/pm/stub/cpuinfo.c | 79 +
.../bios_emulator/scitech/src/pm/stub/event.c | 199 +
.../bios_emulator/scitech/src/pm/stub/oshdr.h | 33 +
.../bios_emulator/scitech/src/pm/stub/pm.c | 980 ++
.../bios_emulator/scitech/src/pm/stub/vflat.c | 49 +
.../scitech/src/pm/stub/ztimer.c | 111 +
.../scitech/src/pm/tests/altbrk.c | 90 +
.../scitech/src/pm/tests/altcrit.c | 85 +
.../scitech/src/pm/tests/biosptr.c | 92 +
.../scitech/src/pm/tests/block.c | 69 +
.../bios_emulator/scitech/src/pm/tests/brk.c | 78 +
.../scitech/src/pm/tests/callreal.c | 107 +
.../scitech/src/pm/tests/checks.c | 100 +
.../bios_emulator/scitech/src/pm/tests/cpu.c | 46 +
.../scitech/src/pm/tests/critical.c | 70 +
.../scitech/src/pm/tests/getch.c | 501 +
.../scitech/src/pm/tests/isvesa.c | 110 +
.../bios_emulator/scitech/src/pm/tests/key.c | 92 +
.../scitech/src/pm/tests/key15.c | 96 +
.../scitech/src/pm/tests/memtest.c | 106 +
.../scitech/src/pm/tests/mouse.c | 109 +
.../scitech/src/pm/tests/restore.c | 82 +
.../bios_emulator/scitech/src/pm/tests/rtc.c | 92 +
.../bios_emulator/scitech/src/pm/tests/save.c | 70 +
.../scitech/src/pm/tests/showpci.c | 253 +
.../bios_emulator/scitech/src/pm/tests/tick.c | 94 +
.../scitech/src/pm/tests/timerc.c | 87 +
.../scitech/src/pm/tests/timercpp.cpp | 107 +
.../bios_emulator/scitech/src/pm/tests/uswc.c | 311 +
.../scitech/src/pm/tests/vftest.c | 78 +
.../scitech/src/pm/tests/video.c | 200 +
.../scitech/src/pm/vdd/cpuinfo.c | 66 +
.../bios_emulator/scitech/src/pm/vdd/fileio.c | 359 +
.../bios_emulator/scitech/src/pm/vdd/oshdr.h | 29 +
.../MAI/bios_emulator/scitech/src/pm/vdd/pm.c | 1050 ++
.../bios_emulator/scitech/src/pm/vdd/vflat.c | 45 +
.../bios_emulator/scitech/src/pm/vdd/ztimer.c | 103 +
.../bios_emulator/scitech/src/pm/vxd/_pm.asm | 299 +
.../scitech/src/pm/vxd/cpuinfo.c | 66 +
.../bios_emulator/scitech/src/pm/vxd/fileio.c | 305 +
.../bios_emulator/scitech/src/pm/vxd/oshdr.h | 29 +
.../MAI/bios_emulator/scitech/src/pm/vxd/pm.c | 1360 ++
.../bios_emulator/scitech/src/pm/vxd/vflat.c | 45 +
.../bios_emulator/scitech/src/pm/vxd/ztimer.c | 105 +
.../scitech/src/pm/win32/_pmwin32.asm | 78 +
.../scitech/src/pm/win32/cpuinfo.c | 94 +
.../scitech/src/pm/win32/ddraw.c | 583 +
.../scitech/src/pm/win32/event.c | 460 +
.../scitech/src/pm/win32/ntservc.c | 259 +
.../scitech/src/pm/win32/oshdr.h | 80 +
.../bios_emulator/scitech/src/pm/win32/pm.c | 1460 ++
.../scitech/src/pm/win32/vflat.c | 53 +
.../scitech/src/pm/win32/ztimer.c | 136 +
.../bios_emulator/scitech/src/pm/x11/event.c | 307 +
.../bios_emulator/scitech/src/pm/x11/oshdr.h | 38 +
.../scitech/src/pm/z_samples.vpj | 74 +
.../MAI/bios_emulator/scitech/src/pm/ztimer.c | 517 +
.../scitech/src/v86bios/AsmMacros.h | 450 +
.../bios_emulator/scitech/src/v86bios/README | 35 +
.../bios_emulator/scitech/src/v86bios/awk.scr | 15 +
.../bios_emulator/scitech/src/v86bios/cbios.c | 415 +
.../scitech/src/v86bios/command.c | 41 +
.../scitech/src/v86bios/console.c | 104 +
.../bios_emulator/scitech/src/v86bios/debug.h | 62 +
.../scitech/src/v86bios/happy_cards | 76 +
.../bios_emulator/scitech/src/v86bios/hexdump | 3 +
.../bios_emulator/scitech/src/v86bios/int.c | 238 +
.../bios_emulator/scitech/src/v86bios/io.c | 257 +
.../bios_emulator/scitech/src/v86bios/lex.l | 79 +
.../bios_emulator/scitech/src/v86bios/main.c | 616 +
.../scitech/src/v86bios/makefile.linux | 59 +
.../bios_emulator/scitech/src/v86bios/mem.c | 126 +
.../scitech/src/v86bios/parser.y | 498 +
.../bios_emulator/scitech/src/v86bios/pci.c | 903 ++
.../bios_emulator/scitech/src/v86bios/pci.h | 127 +
.../bios_emulator/scitech/src/v86bios/v86.c | 562 +
.../scitech/src/v86bios/v86bios.c | 933 ++
.../scitech/src/v86bios/v86bios.h | 215 +
.../scitech/src/v86bios/working_cards | 7 +
.../scitech/src/v86bios/x86emu.c | 316 +
.../bios_emulator/scitech/src/x86emu/LICENSE | 17 +
.../bios_emulator/scitech/src/x86emu/debug.c | 443 +
.../bios_emulator/scitech/src/x86emu/decode.c | 970 ++
.../bios_emulator/scitech/src/x86emu/fpu.c | 945 ++
.../bios_emulator/scitech/src/x86emu/makefile | 63 +
.../scitech/src/x86emu/makefile.cross | 79 +
.../scitech/src/x86emu/makefile.linux | 81 +
.../bios_emulator/scitech/src/x86emu/ops.c | 11701 ++++++++++++++++
.../bios_emulator/scitech/src/x86emu/ops2.c | 2800 ++++
.../scitech/src/x86emu/prim_ops.c | 2914 ++++
.../bios_emulator/scitech/src/x86emu/sys.c | 658 +
.../scitech/src/x86emu/validate.c | 765 +
.../scitech/src/x86emu/x86emu/debug.h | 210 +
.../scitech/src/x86emu/x86emu/decode.h | 87 +
.../scitech/src/x86emu/x86emu/fpu.h | 61 +
.../scitech/src/x86emu/x86emu/ops.h | 45 +
.../scitech/src/x86emu/x86emu/prim_asm.h | 970 ++
.../scitech/src/x86emu/x86emu/prim_ops.h | 231 +
.../scitech/src/x86emu/x86emu/x86emui.h | 98 +
board/MAI/bios_emulator/x86interface.c | 815 ++
board/MAI/menu/cmd_menu.c | 9 +
board/MAI/menu/menu.c | 66 +
board/MAI/menu/menu.h | 174 +
common/cmd_bootm.c | 11 +
common/cmd_fdc.c | 62 +-
common/cmd_ide.c | 193 +-
common/cmd_nvedit.c | 12 +
common/cmd_pci.c | 2 +-
common/command.c | 11 +
common/console.c | 4 +
common/docecc.c | 2 -
common/env_common.c | 13 +
common/hush.c | 5 -
common/main.c | 35 +
cpu/74xx_7xx/cpu.c | 19 +-
cpu/74xx_7xx/interrupts.c | 2 +-
cpu/74xx_7xx/speed.c | 4 +
cpu/74xx_7xx/traps.c | 21 +
disk/Makefile | 2 +-
disk/part.c | 28 +-
disk/part_amiga.c | 399 +
disk/part_amiga.h | 157 +
disk/part_dos.h | 6 +
disk/part_iso.c | 1 +
disk/part_mac.h | 3 +
doc/README.amigaone | 12 +
drivers/pci.c | 17 +-
drivers/pci_auto.c | 32 +-
examples/syscall.S | 2 +
include/asm-ppc/global_data.h | 3 +
include/cmd_boota.h | 42 +
include/cmd_bsp.h | 110 +-
include/cmd_confdefs.h | 51 +-
include/cmd_menu.h | 42 +
include/common.h | 12 +
include/configs/AmigaOneG3SE.h | 383 +
include/configs/sbc8260.h | 79 +-
include/part.h | 9 +
include/pci.h | 3 +-
include/syscall.h | 7 +-
lib_ppc/board.c | 6 +
net/eth.c | 4 +
rtc/mc146818.c | 10 +-
rtc/mk48t59.c | 18 +
tools/updater/Makefile | 86 +
tools/updater/cmd_flash.c | 431 +
tools/updater/ctype.c | 56 +
tools/updater/dummy.c | 1 +
tools/updater/flash.c | 184 +
tools/updater/flash_hw.c | 660 +
tools/updater/junk | 1 +
tools/updater/ppcstring.S | 216 +
tools/updater/string.c | 340 +
tools/updater/update.c | 67 +
tools/updater/utils.c | 148 +
539 files changed, 118454 insertions(+), 138 deletions(-)
create mode 100644 board/MAI/AmigaOneG3SE/AmigaOneG3SE.c
create mode 100644 board/MAI/AmigaOneG3SE/Makefile
create mode 100644 board/MAI/AmigaOneG3SE/articiaS.c
create mode 100644 board/MAI/AmigaOneG3SE/articiaS.h
create mode 100644 board/MAI/AmigaOneG3SE/articiaS_pci.c
create mode 100644 board/MAI/AmigaOneG3SE/board_asm_init.S
create mode 100644 board/MAI/AmigaOneG3SE/cmd_boota.c
create mode 100644 board/MAI/AmigaOneG3SE/config.mk
create mode 100644 board/MAI/AmigaOneG3SE/enet.c
create mode 100644 board/MAI/AmigaOneG3SE/flash.c
create mode 100644 board/MAI/AmigaOneG3SE/flash_new.c
create mode 100644 board/MAI/AmigaOneG3SE/i8259.c
create mode 100644 board/MAI/AmigaOneG3SE/i8259.h
create mode 100644 board/MAI/AmigaOneG3SE/interrupts.c
create mode 100644 board/MAI/AmigaOneG3SE/macros.h
create mode 100644 board/MAI/AmigaOneG3SE/memio.S
create mode 100644 board/MAI/AmigaOneG3SE/memio.h
create mode 100644 board/MAI/AmigaOneG3SE/memory_dump
create mode 100644 board/MAI/AmigaOneG3SE/nvram.c
create mode 100644 board/MAI/AmigaOneG3SE/ps2kbd.c
create mode 100644 board/MAI/AmigaOneG3SE/ps2kbd.h
create mode 100644 board/MAI/AmigaOneG3SE/serial.c
create mode 100644 board/MAI/AmigaOneG3SE/short_types.h
create mode 100644 board/MAI/AmigaOneG3SE/smbus.c
create mode 100644 board/MAI/AmigaOneG3SE/smbus.h
create mode 100644 board/MAI/AmigaOneG3SE/start.txt
create mode 100644 board/MAI/AmigaOneG3SE/todo.txt
create mode 100644 board/MAI/AmigaOneG3SE/u-boot.lds
create mode 100644 board/MAI/AmigaOneG3SE/usb_uhci.c
create mode 100644 board/MAI/AmigaOneG3SE/usb_uhci.h
create mode 100644 board/MAI/AmigaOneG3SE/via686.c
create mode 100644 board/MAI/AmigaOneG3SE/via686.h
create mode 100644 board/MAI/AmigaOneG3SE/video.c
create mode 100644 board/MAI/bios_emulator/bios.c
create mode 100644 board/MAI/bios_emulator/glue.c
create mode 100644 board/MAI/bios_emulator/glue.h
create mode 100644 board/MAI/bios_emulator/scitech/bin-linux/glibc/dmake
create mode 100644 board/MAI/bios_emulator/scitech/bin-linux/glibc/k_cp
create mode 100644 board/MAI/bios_emulator/scitech/bin-linux/glibc/k_echo
create mode 100644 board/MAI/bios_emulator/scitech/bin-linux/glibc/k_rm
create mode 100644 board/MAI/bios_emulator/scitech/bin-linux/glibc/makedep
create mode 100644 board/MAI/bios_emulator/scitech/bin-linux/glibc/nasm
create mode 100644 board/MAI/bios_emulator/scitech/bin-linux/glibc/ndisasm
create mode 100644 board/MAI/bios_emulator/scitech/bin-linux/glibc/trans
create mode 100644 board/MAI/bios_emulator/scitech/bin-linux/libc/dmake
create mode 100644 board/MAI/bios_emulator/scitech/bin-linux/libc/nasm
create mode 100644 board/MAI/bios_emulator/scitech/bin-linux/libc/ndisasm
create mode 100644 board/MAI/bios_emulator/scitech/bin-linux/libc/trans
create mode 100644 board/MAI/bios_emulator/scitech/bin/bc31-d16.bat
create mode 100644 board/MAI/bios_emulator/scitech/bin/bc45-c32.bat
create mode 100644 board/MAI/bios_emulator/scitech/bin/bc45-d16.bat
create mode 100644 board/MAI/bios_emulator/scitech/bin/bc45-d32.bat
create mode 100644 board/MAI/bios_emulator/scitech/bin/bc45-snp.bat
create mode 100644 board/MAI/bios_emulator/scitech/bin/bc45-tnt.bat
create mode 100644 board/MAI/bios_emulator/scitech/bin/bc45-vxd.bat
create mode 100644 board/MAI/bios_emulator/scitech/bin/bc45-w16.bat
create mode 100644 board/MAI/bios_emulator/scitech/bin/bc45-w32.bat
create mode 100644 board/MAI/bios_emulator/scitech/bin/bc50-c32.bat
create mode 100644 board/MAI/bios_emulator/scitech/bin/bc50-d16.bat
create mode 100644 board/MAI/bios_emulator/scitech/bin/bc50-d32.bat
create mode 100644 board/MAI/bios_emulator/scitech/bin/bc50-smx.bat
create mode 100644 board/MAI/bios_emulator/scitech/bin/bc50-snp.bat
create mode 100644 board/MAI/bios_emulator/scitech/bin/bc50-tnt.bat
create mode 100644 board/MAI/bios_emulator/scitech/bin/bc50-vxd.bat
create mode 100644 board/MAI/bios_emulator/scitech/bin/bc50-w16.bat
create mode 100644 board/MAI/bios_emulator/scitech/bin/bc50-w32.bat
create mode 100644 board/MAI/bios_emulator/scitech/bin/bc50-x11.bat
create mode 100644 board/MAI/bios_emulator/scitech/bin/bcb5-c32.bat
create mode 100644 board/MAI/bios_emulator/scitech/bin/bcb5-d16.bat
create mode 100644 board/MAI/bios_emulator/scitech/bin/bcb5-d32.bat
create mode 100644 board/MAI/bios_emulator/scitech/bin/bcb5-smx.bat
create mode 100644 board/MAI/bios_emulator/scitech/bin/bcb5-snp.bat
create mode 100644 board/MAI/bios_emulator/scitech/bin/bcb5-tnt.bat
create mode 100644 board/MAI/bios_emulator/scitech/bin/bcb5-vxd.bat
create mode 100644 board/MAI/bios_emulator/scitech/bin/bcb5-w16.bat
create mode 100644 board/MAI/bios_emulator/scitech/bin/bcb5-w32.bat
create mode 100644 board/MAI/bios_emulator/scitech/bin/bcb5-x11.bat
create mode 100644 board/MAI/bios_emulator/scitech/bin/build
create mode 100644 board/MAI/bios_emulator/scitech/bin/build.bat
create mode 100644 board/MAI/bios_emulator/scitech/bin/build_db.bat
create mode 100644 board/MAI/bios_emulator/scitech/bin/build_it.bat
create mode 100644 board/MAI/bios_emulator/scitech/bin/cddrv.bat
create mode 100644 board/MAI/bios_emulator/scitech/bin/cdit
create mode 100644 board/MAI/bios_emulator/scitech/bin/cdit.bat
create mode 100644 board/MAI/bios_emulator/scitech/bin/djgpp.env
create mode 100644 board/MAI/bios_emulator/scitech/bin/djgpp_db.env
create mode 100644 board/MAI/bios_emulator/scitech/bin/findint3.bat
create mode 100644 board/MAI/bios_emulator/scitech/bin/gcc-beos.sh
create mode 100644 board/MAI/bios_emulator/scitech/bin/gcc-freebsd.sh
create mode 100644 board/MAI/bios_emulator/scitech/bin/gcc-linux.sh
create mode 100644 board/MAI/bios_emulator/scitech/bin/gcc2-c32.bat
create mode 100644 board/MAI/bios_emulator/scitech/bin/gcc2-dos.bat
create mode 100644 board/MAI/bios_emulator/scitech/bin/gcc2-linux.bat
create mode 100644 board/MAI/bios_emulator/scitech/bin/gcc2-w32.bat
create mode 100644 board/MAI/bios_emulator/scitech/bin/makelib.bat
create mode 100644 board/MAI/bios_emulator/scitech/bin/meltobjs.sh
create mode 100644 board/MAI/bios_emulator/scitech/bin/ntddk.bat
create mode 100644 board/MAI/bios_emulator/scitech/bin/qnx4.sh
create mode 100644 board/MAI/bios_emulator/scitech/bin/qnxnto.sh
create mode 100644 board/MAI/bios_emulator/scitech/bin/set-vars-beos.sh
create mode 100644 board/MAI/bios_emulator/scitech/bin/set-vars-freebsd.sh
create mode 100644 board/MAI/bios_emulator/scitech/bin/set-vars-linux.sh
create mode 100644 board/MAI/bios_emulator/scitech/bin/set-vars-qnx.sh
create mode 100644 board/MAI/bios_emulator/scitech/bin/set-vars.bat
create mode 100644 board/MAI/bios_emulator/scitech/bin/vc40-c32.bat
create mode 100644 board/MAI/bios_emulator/scitech/bin/vc40-d16.bat
create mode 100644 board/MAI/bios_emulator/scitech/bin/vc40-drv9x.bat
create mode 100644 board/MAI/bios_emulator/scitech/bin/vc40-drvnt.bat
create mode 100644 board/MAI/bios_emulator/scitech/bin/vc40-snp.bat
create mode 100644 board/MAI/bios_emulator/scitech/bin/vc40-tnt.bat
create mode 100644 board/MAI/bios_emulator/scitech/bin/vc40-w16.bat
create mode 100644 board/MAI/bios_emulator/scitech/bin/vc40-w32.bat
create mode 100644 board/MAI/bios_emulator/scitech/bin/vc40-x11.bat
create mode 100644 board/MAI/bios_emulator/scitech/bin/vc50-c32.bat
create mode 100644 board/MAI/bios_emulator/scitech/bin/vc50-d16.bat
create mode 100644 board/MAI/bios_emulator/scitech/bin/vc50-drv9x.bat
create mode 100644 board/MAI/bios_emulator/scitech/bin/vc50-drvnt.bat
create mode 100644 board/MAI/bios_emulator/scitech/bin/vc50-rtt.bat
create mode 100644 board/MAI/bios_emulator/scitech/bin/vc50-snp.bat
create mode 100644 board/MAI/bios_emulator/scitech/bin/vc50-tnt.bat
create mode 100644 board/MAI/bios_emulator/scitech/bin/vc50-w16.bat
create mode 100644 board/MAI/bios_emulator/scitech/bin/vc50-w32.bat
create mode 100644 board/MAI/bios_emulator/scitech/bin/vc50-x11.bat
create mode 100644 board/MAI/bios_emulator/scitech/bin/vc60-c32.bat
create mode 100644 board/MAI/bios_emulator/scitech/bin/vc60-d16.bat
create mode 100644 board/MAI/bios_emulator/scitech/bin/vc60-drv9x.bat
create mode 100644 board/MAI/bios_emulator/scitech/bin/vc60-drvnt.bat
create mode 100644 board/MAI/bios_emulator/scitech/bin/vc60-drvw2k.bat
create mode 100644 board/MAI/bios_emulator/scitech/bin/vc60-snp.bat
create mode 100644 board/MAI/bios_emulator/scitech/bin/vc60-tnt.bat
create mode 100644 board/MAI/bios_emulator/scitech/bin/vc60-w16.bat
create mode 100644 board/MAI/bios_emulator/scitech/bin/vc60-w32.bat
create mode 100644 board/MAI/bios_emulator/scitech/bin/vc60-x11.bat
create mode 100644 board/MAI/bios_emulator/scitech/bin/w2kddk.bat
create mode 100644 board/MAI/bios_emulator/scitech/bin/wc10-c32.bat
create mode 100644 board/MAI/bios_emulator/scitech/bin/wc10-d16.bat
create mode 100644 board/MAI/bios_emulator/scitech/bin/wc10-d32.bat
create mode 100644 board/MAI/bios_emulator/scitech/bin/wc10-o16.bat
create mode 100644 board/MAI/bios_emulator/scitech/bin/wc10-o32.bat
create mode 100644 board/MAI/bios_emulator/scitech/bin/wc10-p32.bat
create mode 100644 board/MAI/bios_emulator/scitech/bin/wc10-qnx.bat
create mode 100644 board/MAI/bios_emulator/scitech/bin/wc10-snp.bat
create mode 100644 board/MAI/bios_emulator/scitech/bin/wc10-tnt.bat
create mode 100644 board/MAI/bios_emulator/scitech/bin/wc10-w16.bat
create mode 100644 board/MAI/bios_emulator/scitech/bin/wc10-w32.bat
create mode 100644 board/MAI/bios_emulator/scitech/bin/wc10-x11.bat
create mode 100644 board/MAI/bios_emulator/scitech/bin/wc10ac32.bat
create mode 100644 board/MAI/bios_emulator/scitech/bin/wc10ad16.bat
create mode 100644 board/MAI/bios_emulator/scitech/bin/wc10ad32.bat
create mode 100644 board/MAI/bios_emulator/scitech/bin/wc10ao16.bat
create mode 100644 board/MAI/bios_emulator/scitech/bin/wc10ao32.bat
create mode 100644 board/MAI/bios_emulator/scitech/bin/wc10ap32.bat
create mode 100644 board/MAI/bios_emulator/scitech/bin/wc10asnp.bat
create mode 100644 board/MAI/bios_emulator/scitech/bin/wc10atnt.bat
create mode 100644 board/MAI/bios_emulator/scitech/bin/wc10aw16.bat
create mode 100644 board/MAI/bios_emulator/scitech/bin/wc10aw32.bat
create mode 100644 board/MAI/bios_emulator/scitech/bin/wc11-c32.bat
create mode 100644 board/MAI/bios_emulator/scitech/bin/wc11-d16.bat
create mode 100644 board/MAI/bios_emulator/scitech/bin/wc11-d32.bat
create mode 100644 board/MAI/bios_emulator/scitech/bin/wc11-o16.bat
create mode 100644 board/MAI/bios_emulator/scitech/bin/wc11-o32.bat
create mode 100644 board/MAI/bios_emulator/scitech/bin/wc11-p32.bat
create mode 100644 board/MAI/bios_emulator/scitech/bin/wc11-qnx.bat
create mode 100644 board/MAI/bios_emulator/scitech/bin/wc11-snp.bat
create mode 100644 board/MAI/bios_emulator/scitech/bin/wc11-tnt.bat
create mode 100644 board/MAI/bios_emulator/scitech/bin/wc11-w16.bat
create mode 100644 board/MAI/bios_emulator/scitech/bin/wc11-w32.bat
create mode 100644 board/MAI/bios_emulator/scitech/bin/wc11-x11.bat
create mode 100644 board/MAI/bios_emulator/scitech/bin/win32sdk.bat
create mode 100644 board/MAI/bios_emulator/scitech/include/biosemu.h
create mode 100644 board/MAI/bios_emulator/scitech/include/event.h
create mode 100644 board/MAI/bios_emulator/scitech/include/mtrr.h
create mode 100644 board/MAI/bios_emulator/scitech/include/pcilib.h
create mode 100644 board/MAI/bios_emulator/scitech/include/pm_help.h
create mode 100644 board/MAI/bios_emulator/scitech/include/pm_wctl.h
create mode 100644 board/MAI/bios_emulator/scitech/include/pmapi.h
create mode 100644 board/MAI/bios_emulator/scitech/include/pmimp.h
create mode 100644 board/MAI/bios_emulator/scitech/include/pmint.h
create mode 100644 board/MAI/bios_emulator/scitech/include/scitech.h
create mode 100644 board/MAI/bios_emulator/scitech/include/scitech.mac
create mode 100644 board/MAI/bios_emulator/scitech/include/x86emu.h
create mode 100644 board/MAI/bios_emulator/scitech/include/x86emu/fpu_regs.h
create mode 100644 board/MAI/bios_emulator/scitech/include/x86emu/regs.h
create mode 100644 board/MAI/bios_emulator/scitech/include/x86emu/types.h
create mode 100644 board/MAI/bios_emulator/scitech/lib/debug/linux/gcc/glibc/readme.txt
create mode 100644 board/MAI/bios_emulator/scitech/lib/debug/linux/gcc/libc/readme.txt
create mode 100644 board/MAI/bios_emulator/scitech/lib/release/linux/gcc/glibc/readme.txt
create mode 100644 board/MAI/bios_emulator/scitech/lib/release/linux/gcc/libc/readme.txt
create mode 100644 board/MAI/bios_emulator/scitech/makedefs/bc16.mk
create mode 100644 board/MAI/bios_emulator/scitech/makedefs/bc3.mk
create mode 100644 board/MAI/bios_emulator/scitech/makedefs/bc32.mk
create mode 100644 board/MAI/bios_emulator/scitech/makedefs/bcos2.mk
create mode 100644 board/MAI/bios_emulator/scitech/makedefs/cl16.mk
create mode 100644 board/MAI/bios_emulator/scitech/makedefs/cl386.mk
create mode 100644 board/MAI/bios_emulator/scitech/makedefs/common.mk
create mode 100644 board/MAI/bios_emulator/scitech/makedefs/emx.mk
create mode 100644 board/MAI/bios_emulator/scitech/makedefs/gcc_beos.mk
create mode 100644 board/MAI/bios_emulator/scitech/makedefs/gcc_dos.mk
create mode 100644 board/MAI/bios_emulator/scitech/makedefs/gcc_freebsd.mk
create mode 100644 board/MAI/bios_emulator/scitech/makedefs/gcc_linux.mk
create mode 100644 board/MAI/bios_emulator/scitech/makedefs/gcc_win32.mk
create mode 100644 board/MAI/bios_emulator/scitech/makedefs/hc32.mk
create mode 100644 board/MAI/bios_emulator/scitech/makedefs/makedefs.prj
create mode 100644 board/MAI/bios_emulator/scitech/makedefs/qnx4.mk
create mode 100644 board/MAI/bios_emulator/scitech/makedefs/qnxnto.mk
create mode 100644 board/MAI/bios_emulator/scitech/makedefs/rules/bc16.mk
create mode 100644 board/MAI/bios_emulator/scitech/makedefs/rules/bc3.mk
create mode 100644 board/MAI/bios_emulator/scitech/makedefs/rules/bc32.mk
create mode 100644 board/MAI/bios_emulator/scitech/makedefs/rules/bcos2.mk
create mode 100644 board/MAI/bios_emulator/scitech/makedefs/rules/cl16.mk
create mode 100644 board/MAI/bios_emulator/scitech/makedefs/rules/cl386.mk
create mode 100644 board/MAI/bios_emulator/scitech/makedefs/rules/dj32.mk
create mode 100644 board/MAI/bios_emulator/scitech/makedefs/rules/emx.mk
create mode 100644 board/MAI/bios_emulator/scitech/makedefs/rules/gcc_beos.mk
create mode 100644 board/MAI/bios_emulator/scitech/makedefs/rules/gcc_freebsd.mk
create mode 100644 board/MAI/bios_emulator/scitech/makedefs/rules/gcc_linux.mk
create mode 100644 board/MAI/bios_emulator/scitech/makedefs/rules/gcc_win32.mk
create mode 100644 board/MAI/bios_emulator/scitech/makedefs/rules/hc32.mk
create mode 100644 board/MAI/bios_emulator/scitech/makedefs/rules/qnx4.mk
create mode 100644 board/MAI/bios_emulator/scitech/makedefs/rules/qnxnto.mk
create mode 100644 board/MAI/bios_emulator/scitech/makedefs/rules/sc16.mk
create mode 100644 board/MAI/bios_emulator/scitech/makedefs/rules/sc32.mk
create mode 100644 board/MAI/bios_emulator/scitech/makedefs/rules/va32.mk
create mode 100644 board/MAI/bios_emulator/scitech/makedefs/rules/va365.mk
create mode 100644 board/MAI/bios_emulator/scitech/makedefs/rules/vc16.mk
create mode 100644 board/MAI/bios_emulator/scitech/makedefs/rules/vc32.mk
create mode 100644 board/MAI/bios_emulator/scitech/makedefs/rules/wc16.mk
create mode 100644 board/MAI/bios_emulator/scitech/makedefs/rules/wc32.mk
create mode 100644 board/MAI/bios_emulator/scitech/makedefs/sc16.mk
create mode 100644 board/MAI/bios_emulator/scitech/makedefs/sc32.mk
create mode 100644 board/MAI/bios_emulator/scitech/makedefs/startup.mk
create mode 100644 board/MAI/bios_emulator/scitech/makedefs/va32.mk
create mode 100644 board/MAI/bios_emulator/scitech/makedefs/va365.mk
create mode 100644 board/MAI/bios_emulator/scitech/makedefs/vc16.mk
create mode 100644 board/MAI/bios_emulator/scitech/makedefs/vc32.mk
create mode 100644 board/MAI/bios_emulator/scitech/makedefs/wc16.mk
create mode 100644 board/MAI/bios_emulator/scitech/makedefs/wc32.mk
create mode 100644 board/MAI/bios_emulator/scitech/src/biosemu/besys.c
create mode 100644 board/MAI/bios_emulator/scitech/src/biosemu/bios.c
create mode 100644 board/MAI/bios_emulator/scitech/src/biosemu/biosemu.c
create mode 100644 board/MAI/bios_emulator/scitech/src/biosemu/biosemui.h
create mode 100644 board/MAI/bios_emulator/scitech/src/biosemu/makefile
create mode 100644 board/MAI/bios_emulator/scitech/src/biosemu/makefile.cross
create mode 100644 board/MAI/bios_emulator/scitech/src/biosemu/warmboot.c
create mode 100644 board/MAI/bios_emulator/scitech/src/common/_aa_imp.asm
create mode 100644 board/MAI/bios_emulator/scitech/src/common/_ga_imp.asm
create mode 100644 board/MAI/bios_emulator/scitech/src/common/_gatimer.asm
create mode 100644 board/MAI/bios_emulator/scitech/src/common/_pm_imp.asm
create mode 100644 board/MAI/bios_emulator/scitech/src/common/aabeos.c
create mode 100644 board/MAI/bios_emulator/scitech/src/common/aados.c
create mode 100644 board/MAI/bios_emulator/scitech/src/common/aalib.c
create mode 100644 board/MAI/bios_emulator/scitech/src/common/aalinux.c
create mode 100644 board/MAI/bios_emulator/scitech/src/common/aaos2.c
create mode 100644 board/MAI/bios_emulator/scitech/src/common/aaqnx.c
create mode 100644 board/MAI/bios_emulator/scitech/src/common/aartt.c
create mode 100644 board/MAI/bios_emulator/scitech/src/common/aasmx.c
create mode 100644 board/MAI/bios_emulator/scitech/src/common/aavxd.c
create mode 100644 board/MAI/bios_emulator/scitech/src/common/aawin32.c
create mode 100644 board/MAI/bios_emulator/scitech/src/common/agplib.c
create mode 100644 board/MAI/bios_emulator/scitech/src/common/center.c
create mode 100644 board/MAI/bios_emulator/scitech/src/common/cmdline.c
create mode 100644 board/MAI/bios_emulator/scitech/src/common/gabeos.c
create mode 100644 board/MAI/bios_emulator/scitech/src/common/gados.c
create mode 100644 board/MAI/bios_emulator/scitech/src/common/galib.c
create mode 100644 board/MAI/bios_emulator/scitech/src/common/galinux.c
create mode 100644 board/MAI/bios_emulator/scitech/src/common/gantdrv.c
create mode 100644 board/MAI/bios_emulator/scitech/src/common/gaos2.c
create mode 100644 board/MAI/bios_emulator/scitech/src/common/gaqnx.c
create mode 100644 board/MAI/bios_emulator/scitech/src/common/gartt.c
create mode 100644 board/MAI/bios_emulator/scitech/src/common/gasmx.c
create mode 100644 board/MAI/bios_emulator/scitech/src/common/gavxd.c
create mode 100644 board/MAI/bios_emulator/scitech/src/common/gawin32.c
create mode 100644 board/MAI/bios_emulator/scitech/src/common/gtfcalc.c
create mode 100644 board/MAI/bios_emulator/scitech/src/common/libcimp.c
create mode 100644 board/MAI/bios_emulator/scitech/src/common/makefile
create mode 100644 board/MAI/bios_emulator/scitech/src/common/peloader.c
create mode 100644 board/MAI/bios_emulator/scitech/src/common/vesavbe.c
create mode 100644 board/MAI/bios_emulator/scitech/src/pm/beos/cpuinfo.c
create mode 100644 board/MAI/bios_emulator/scitech/src/pm/beos/event.c
create mode 100644 board/MAI/bios_emulator/scitech/src/pm/beos/oshdr.h
create mode 100644 board/MAI/bios_emulator/scitech/src/pm/beos/pm.c
create mode 100644 board/MAI/bios_emulator/scitech/src/pm/beos/vflat.c
create mode 100644 board/MAI/bios_emulator/scitech/src/pm/beos/ztimer.c
create mode 100644 board/MAI/bios_emulator/scitech/src/pm/codepage/us_eng.c
create mode 100644 board/MAI/bios_emulator/scitech/src/pm/common.c
create mode 100644 board/MAI/bios_emulator/scitech/src/pm/common/_cpuinfo.asm
create mode 100644 board/MAI/bios_emulator/scitech/src/pm/common/_dma.asm
create mode 100644 board/MAI/bios_emulator/scitech/src/pm/common/_int64.asm
create mode 100644 board/MAI/bios_emulator/scitech/src/pm/common/_joy.asm
create mode 100644 board/MAI/bios_emulator/scitech/src/pm/common/_mtrr.asm
create mode 100644 board/MAI/bios_emulator/scitech/src/pm/common/_pcihelp.asm
create mode 100644 board/MAI/bios_emulator/scitech/src/pm/common/agp.c
create mode 100644 board/MAI/bios_emulator/scitech/src/pm/common/keyboard.c
create mode 100644 board/MAI/bios_emulator/scitech/src/pm/common/malloc.c
create mode 100644 board/MAI/bios_emulator/scitech/src/pm/common/mtrr.c
create mode 100644 board/MAI/bios_emulator/scitech/src/pm/common/pcilib.c
create mode 100644 board/MAI/bios_emulator/scitech/src/pm/common/unixio.c
create mode 100644 board/MAI/bios_emulator/scitech/src/pm/common/vgastate.c
create mode 100644 board/MAI/bios_emulator/scitech/src/pm/cpuinfo.c
create mode 100644 board/MAI/bios_emulator/scitech/src/pm/debug.c
create mode 100644 board/MAI/bios_emulator/scitech/src/pm/dos/_event.asm
create mode 100644 board/MAI/bios_emulator/scitech/src/pm/dos/_lztimer.asm
create mode 100644 board/MAI/bios_emulator/scitech/src/pm/dos/_pm.asm
create mode 100644 board/MAI/bios_emulator/scitech/src/pm/dos/_pmdos.asm
create mode 100644 board/MAI/bios_emulator/scitech/src/pm/dos/_vflat.asm
create mode 100644 board/MAI/bios_emulator/scitech/src/pm/dos/cpuinfo.c
create mode 100644 board/MAI/bios_emulator/scitech/src/pm/dos/event.c
create mode 100644 board/MAI/bios_emulator/scitech/src/pm/dos/oshdr.h
create mode 100644 board/MAI/bios_emulator/scitech/src/pm/dos/pm.c
create mode 100644 board/MAI/bios_emulator/scitech/src/pm/dos/pmdos.c
create mode 100644 board/MAI/bios_emulator/scitech/src/pm/dos/vflat.c
create mode 100644 board/MAI/bios_emulator/scitech/src/pm/dos/ztimer.c
create mode 100644 board/MAI/bios_emulator/scitech/src/pm/event.c
create mode 100644 board/MAI/bios_emulator/scitech/src/pm/linux/cpuinfo.c
create mode 100644 board/MAI/bios_emulator/scitech/src/pm/linux/event.c
create mode 100644 board/MAI/bios_emulator/scitech/src/pm/linux/event.svga
create mode 100644 board/MAI/bios_emulator/scitech/src/pm/linux/oshdr.h
create mode 100644 board/MAI/bios_emulator/scitech/src/pm/linux/pm.c
create mode 100644 board/MAI/bios_emulator/scitech/src/pm/linux/vflat.c
create mode 100644 board/MAI/bios_emulator/scitech/src/pm/linux/ztimer.c
create mode 100644 board/MAI/bios_emulator/scitech/src/pm/makefile
create mode 100644 board/MAI/bios_emulator/scitech/src/pm/ntdrv/_irq.asm
create mode 100644 board/MAI/bios_emulator/scitech/src/pm/ntdrv/_pm.asm
create mode 100644 board/MAI/bios_emulator/scitech/src/pm/ntdrv/cpuinfo.c
create mode 100644 board/MAI/bios_emulator/scitech/src/pm/ntdrv/int86.c
create mode 100644 board/MAI/bios_emulator/scitech/src/pm/ntdrv/irq.c
create mode 100644 board/MAI/bios_emulator/scitech/src/pm/ntdrv/mem.c
create mode 100644 board/MAI/bios_emulator/scitech/src/pm/ntdrv/oshdr.h
create mode 100644 board/MAI/bios_emulator/scitech/src/pm/ntdrv/pm.c
create mode 100644 board/MAI/bios_emulator/scitech/src/pm/ntdrv/stdio.c
create mode 100644 board/MAI/bios_emulator/scitech/src/pm/ntdrv/stdlib.c
create mode 100644 board/MAI/bios_emulator/scitech/src/pm/ntdrv/vflat.c
create mode 100644 board/MAI/bios_emulator/scitech/src/pm/ntdrv/ztimer.c
create mode 100644 board/MAI/bios_emulator/scitech/src/pm/os2/_pmos2.asm
create mode 100644 board/MAI/bios_emulator/scitech/src/pm/os2/cpuinfo.c
create mode 100644 board/MAI/bios_emulator/scitech/src/pm/os2/event.c
create mode 100644 board/MAI/bios_emulator/scitech/src/pm/os2/mon.h
create mode 100644 board/MAI/bios_emulator/scitech/src/pm/os2/oshdr.h
create mode 100644 board/MAI/bios_emulator/scitech/src/pm/os2/pm.c
create mode 100644 board/MAI/bios_emulator/scitech/src/pm/os2/vflat.c
create mode 100644 board/MAI/bios_emulator/scitech/src/pm/os2/ztimer.c
create mode 100644 board/MAI/bios_emulator/scitech/src/pm/os2pm/event.c
create mode 100644 board/MAI/bios_emulator/scitech/src/pm/os2pm/oshdr.h
create mode 100644 board/MAI/bios_emulator/scitech/src/pm/oshdr.h
create mode 100644 board/MAI/bios_emulator/scitech/src/pm/photon/event.c
create mode 100644 board/MAI/bios_emulator/scitech/src/pm/photon/oshdr.h
create mode 100644 board/MAI/bios_emulator/scitech/src/pm/pm.vpw
create mode 100644 board/MAI/bios_emulator/scitech/src/pm/pmcommon.vpj
create mode 100644 board/MAI/bios_emulator/scitech/src/pm/pmdos.vpj
create mode 100644 board/MAI/bios_emulator/scitech/src/pm/pmlinux.vpj
create mode 100644 board/MAI/bios_emulator/scitech/src/pm/pmntdrv.vpj
create mode 100644 board/MAI/bios_emulator/scitech/src/pm/pmqnx.vpj
create mode 100644 board/MAI/bios_emulator/scitech/src/pm/pmvxd.vpj
create mode 100644 board/MAI/bios_emulator/scitech/src/pm/pmwin32.vpj
create mode 100644 board/MAI/bios_emulator/scitech/src/pm/qnx/_mtrrqnx.asm
create mode 100644 board/MAI/bios_emulator/scitech/src/pm/qnx/cpuinfo.c
create mode 100644 board/MAI/bios_emulator/scitech/src/pm/qnx/event.c
create mode 100644 board/MAI/bios_emulator/scitech/src/pm/qnx/mtrrqnx.c
create mode 100644 board/MAI/bios_emulator/scitech/src/pm/qnx/oshdr.h
create mode 100644 board/MAI/bios_emulator/scitech/src/pm/qnx/pm.c
create mode 100644 board/MAI/bios_emulator/scitech/src/pm/qnx/vflat.c
create mode 100644 board/MAI/bios_emulator/scitech/src/pm/qnx/ztimer.c
create mode 100644 board/MAI/bios_emulator/scitech/src/pm/rttarget/cpuinfo.c
create mode 100644 board/MAI/bios_emulator/scitech/src/pm/rttarget/event.c
create mode 100644 board/MAI/bios_emulator/scitech/src/pm/rttarget/oshdr.h
create mode 100644 board/MAI/bios_emulator/scitech/src/pm/rttarget/pm.c
create mode 100644 board/MAI/bios_emulator/scitech/src/pm/rttarget/vflat.c
create mode 100644 board/MAI/bios_emulator/scitech/src/pm/rttarget/ztimer.c
create mode 100644 board/MAI/bios_emulator/scitech/src/pm/smx/_event.asm
create mode 100644 board/MAI/bios_emulator/scitech/src/pm/smx/_lztimer.asm
create mode 100644 board/MAI/bios_emulator/scitech/src/pm/smx/_pm.asm
create mode 100644 board/MAI/bios_emulator/scitech/src/pm/smx/_pmsmx.asm
create mode 100644 board/MAI/bios_emulator/scitech/src/pm/smx/_vflat.asm
create mode 100644 board/MAI/bios_emulator/scitech/src/pm/smx/cpuinfo.c
create mode 100644 board/MAI/bios_emulator/scitech/src/pm/smx/event.c
create mode 100644 board/MAI/bios_emulator/scitech/src/pm/smx/oshdr.h
create mode 100644 board/MAI/bios_emulator/scitech/src/pm/smx/pm.c
create mode 100644 board/MAI/bios_emulator/scitech/src/pm/smx/pmsmx.c
create mode 100644 board/MAI/bios_emulator/scitech/src/pm/smx/vflat.c
create mode 100644 board/MAI/bios_emulator/scitech/src/pm/smx/ztimer.c
create mode 100644 board/MAI/bios_emulator/scitech/src/pm/stub/cpuinfo.c
create mode 100644 board/MAI/bios_emulator/scitech/src/pm/stub/event.c
create mode 100644 board/MAI/bios_emulator/scitech/src/pm/stub/oshdr.h
create mode 100644 board/MAI/bios_emulator/scitech/src/pm/stub/pm.c
create mode 100644 board/MAI/bios_emulator/scitech/src/pm/stub/vflat.c
create mode 100644 board/MAI/bios_emulator/scitech/src/pm/stub/ztimer.c
create mode 100644 board/MAI/bios_emulator/scitech/src/pm/tests/altbrk.c
create mode 100644 board/MAI/bios_emulator/scitech/src/pm/tests/altcrit.c
create mode 100644 board/MAI/bios_emulator/scitech/src/pm/tests/biosptr.c
create mode 100644 board/MAI/bios_emulator/scitech/src/pm/tests/block.c
create mode 100644 board/MAI/bios_emulator/scitech/src/pm/tests/brk.c
create mode 100644 board/MAI/bios_emulator/scitech/src/pm/tests/callreal.c
create mode 100644 board/MAI/bios_emulator/scitech/src/pm/tests/checks.c
create mode 100644 board/MAI/bios_emulator/scitech/src/pm/tests/cpu.c
create mode 100644 board/MAI/bios_emulator/scitech/src/pm/tests/critical.c
create mode 100644 board/MAI/bios_emulator/scitech/src/pm/tests/getch.c
create mode 100644 board/MAI/bios_emulator/scitech/src/pm/tests/isvesa.c
create mode 100644 board/MAI/bios_emulator/scitech/src/pm/tests/key.c
create mode 100644 board/MAI/bios_emulator/scitech/src/pm/tests/key15.c
create mode 100644 board/MAI/bios_emulator/scitech/src/pm/tests/memtest.c
create mode 100644 board/MAI/bios_emulator/scitech/src/pm/tests/mouse.c
create mode 100644 board/MAI/bios_emulator/scitech/src/pm/tests/restore.c
create mode 100644 board/MAI/bios_emulator/scitech/src/pm/tests/rtc.c
create mode 100644 board/MAI/bios_emulator/scitech/src/pm/tests/save.c
create mode 100644 board/MAI/bios_emulator/scitech/src/pm/tests/showpci.c
create mode 100644 board/MAI/bios_emulator/scitech/src/pm/tests/tick.c
create mode 100644 board/MAI/bios_emulator/scitech/src/pm/tests/timerc.c
create mode 100644 board/MAI/bios_emulator/scitech/src/pm/tests/timercpp.cpp
create mode 100644 board/MAI/bios_emulator/scitech/src/pm/tests/uswc.c
create mode 100644 board/MAI/bios_emulator/scitech/src/pm/tests/vftest.c
create mode 100644 board/MAI/bios_emulator/scitech/src/pm/tests/video.c
create mode 100644 board/MAI/bios_emulator/scitech/src/pm/vdd/cpuinfo.c
create mode 100644 board/MAI/bios_emulator/scitech/src/pm/vdd/fileio.c
create mode 100644 board/MAI/bios_emulator/scitech/src/pm/vdd/oshdr.h
create mode 100644 board/MAI/bios_emulator/scitech/src/pm/vdd/pm.c
create mode 100644 board/MAI/bios_emulator/scitech/src/pm/vdd/vflat.c
create mode 100644 board/MAI/bios_emulator/scitech/src/pm/vdd/ztimer.c
create mode 100644 board/MAI/bios_emulator/scitech/src/pm/vxd/_pm.asm
create mode 100644 board/MAI/bios_emulator/scitech/src/pm/vxd/cpuinfo.c
create mode 100644 board/MAI/bios_emulator/scitech/src/pm/vxd/fileio.c
create mode 100644 board/MAI/bios_emulator/scitech/src/pm/vxd/oshdr.h
create mode 100644 board/MAI/bios_emulator/scitech/src/pm/vxd/pm.c
create mode 100644 board/MAI/bios_emulator/scitech/src/pm/vxd/vflat.c
create mode 100644 board/MAI/bios_emulator/scitech/src/pm/vxd/ztimer.c
create mode 100644 board/MAI/bios_emulator/scitech/src/pm/win32/_pmwin32.asm
create mode 100644 board/MAI/bios_emulator/scitech/src/pm/win32/cpuinfo.c
create mode 100644 board/MAI/bios_emulator/scitech/src/pm/win32/ddraw.c
create mode 100644 board/MAI/bios_emulator/scitech/src/pm/win32/event.c
create mode 100644 board/MAI/bios_emulator/scitech/src/pm/win32/ntservc.c
create mode 100644 board/MAI/bios_emulator/scitech/src/pm/win32/oshdr.h
create mode 100644 board/MAI/bios_emulator/scitech/src/pm/win32/pm.c
create mode 100644 board/MAI/bios_emulator/scitech/src/pm/win32/vflat.c
create mode 100644 board/MAI/bios_emulator/scitech/src/pm/win32/ztimer.c
create mode 100644 board/MAI/bios_emulator/scitech/src/pm/x11/event.c
create mode 100644 board/MAI/bios_emulator/scitech/src/pm/x11/oshdr.h
create mode 100644 board/MAI/bios_emulator/scitech/src/pm/z_samples.vpj
create mode 100644 board/MAI/bios_emulator/scitech/src/pm/ztimer.c
create mode 100644 board/MAI/bios_emulator/scitech/src/v86bios/AsmMacros.h
create mode 100644 board/MAI/bios_emulator/scitech/src/v86bios/README
create mode 100644 board/MAI/bios_emulator/scitech/src/v86bios/awk.scr
create mode 100644 board/MAI/bios_emulator/scitech/src/v86bios/cbios.c
create mode 100644 board/MAI/bios_emulator/scitech/src/v86bios/command.c
create mode 100644 board/MAI/bios_emulator/scitech/src/v86bios/console.c
create mode 100644 board/MAI/bios_emulator/scitech/src/v86bios/debug.h
create mode 100644 board/MAI/bios_emulator/scitech/src/v86bios/happy_cards
create mode 100644 board/MAI/bios_emulator/scitech/src/v86bios/hexdump
create mode 100644 board/MAI/bios_emulator/scitech/src/v86bios/int.c
create mode 100644 board/MAI/bios_emulator/scitech/src/v86bios/io.c
create mode 100644 board/MAI/bios_emulator/scitech/src/v86bios/lex.l
create mode 100644 board/MAI/bios_emulator/scitech/src/v86bios/main.c
create mode 100644 board/MAI/bios_emulator/scitech/src/v86bios/makefile.linux
create mode 100644 board/MAI/bios_emulator/scitech/src/v86bios/mem.c
create mode 100644 board/MAI/bios_emulator/scitech/src/v86bios/parser.y
create mode 100644 board/MAI/bios_emulator/scitech/src/v86bios/pci.c
create mode 100644 board/MAI/bios_emulator/scitech/src/v86bios/pci.h
create mode 100644 board/MAI/bios_emulator/scitech/src/v86bios/v86.c
create mode 100644 board/MAI/bios_emulator/scitech/src/v86bios/v86bios.c
create mode 100644 board/MAI/bios_emulator/scitech/src/v86bios/v86bios.h
create mode 100644 board/MAI/bios_emulator/scitech/src/v86bios/working_cards
create mode 100644 board/MAI/bios_emulator/scitech/src/v86bios/x86emu.c
create mode 100644 board/MAI/bios_emulator/scitech/src/x86emu/LICENSE
create mode 100644 board/MAI/bios_emulator/scitech/src/x86emu/debug.c
create mode 100644 board/MAI/bios_emulator/scitech/src/x86emu/decode.c
create mode 100644 board/MAI/bios_emulator/scitech/src/x86emu/fpu.c
create mode 100644 board/MAI/bios_emulator/scitech/src/x86emu/makefile
create mode 100644 board/MAI/bios_emulator/scitech/src/x86emu/makefile.cross
create mode 100644 board/MAI/bios_emulator/scitech/src/x86emu/makefile.linux
create mode 100644 board/MAI/bios_emulator/scitech/src/x86emu/ops.c
create mode 100644 board/MAI/bios_emulator/scitech/src/x86emu/ops2.c
create mode 100644 board/MAI/bios_emulator/scitech/src/x86emu/prim_ops.c
create mode 100644 board/MAI/bios_emulator/scitech/src/x86emu/sys.c
create mode 100644 board/MAI/bios_emulator/scitech/src/x86emu/validate.c
create mode 100644 board/MAI/bios_emulator/scitech/src/x86emu/x86emu/debug.h
create mode 100644 board/MAI/bios_emulator/scitech/src/x86emu/x86emu/decode.h
create mode 100644 board/MAI/bios_emulator/scitech/src/x86emu/x86emu/fpu.h
create mode 100644 board/MAI/bios_emulator/scitech/src/x86emu/x86emu/ops.h
create mode 100644 board/MAI/bios_emulator/scitech/src/x86emu/x86emu/prim_asm.h
create mode 100644 board/MAI/bios_emulator/scitech/src/x86emu/x86emu/prim_ops.h
create mode 100644 board/MAI/bios_emulator/scitech/src/x86emu/x86emu/x86emui.h
create mode 100644 board/MAI/bios_emulator/x86interface.c
create mode 100644 board/MAI/menu/cmd_menu.c
create mode 100644 board/MAI/menu/menu.c
create mode 100644 board/MAI/menu/menu.h
create mode 100644 disk/part_amiga.c
create mode 100644 disk/part_amiga.h
create mode 100644 doc/README.amigaone
create mode 100644 include/cmd_boota.h
create mode 100644 include/cmd_menu.h
create mode 100644 include/configs/AmigaOneG3SE.h
create mode 100644 tools/updater/Makefile
create mode 100644 tools/updater/cmd_flash.c
create mode 100644 tools/updater/ctype.c
create mode 100644 tools/updater/dummy.c
create mode 100644 tools/updater/flash.c
create mode 100644 tools/updater/flash_hw.c
create mode 100644 tools/updater/junk
create mode 100644 tools/updater/ppcstring.S
create mode 100644 tools/updater/string.c
create mode 100644 tools/updater/update.c
create mode 100644 tools/updater/utils.c
diff --git a/CHANGELOG b/CHANGELOG
index 35c285db370..5b26e95abb3 100644
--- a/CHANGELOG
+++ b/CHANGELOG
@@ -2,6 +2,18 @@
Changes since for U-Boot 0.1.0:
======================================================================
+* Patch by Thomas Frieden, 13 Nov 2002:
+ Add code for AmigaOne board
+ (preliminary merge to U-Boot, still WIP)
+
+* Patch by Jon Diekema, 12 Nov 2002:
+ - Adding URL for IEEE OUI lookup
+ - Making the autoboot #defines dependent on CONFIG_AUTOBOOT_KEYED
+ being defined.
+ - In the CONFIG_EXTRA_ENV_SETTINGS #define, the root-on-initrd and
+ root-on-nfs macros are designed to switch how the default boot
+ method gets defined.
+
* Patch by Daniel Engström, 13 Nov 2002:
Add support for i386 architecture and AMD SC520 board
diff --git a/CREDITS b/CREDITS
index 0f7d9656e53..d8c2a105326 100644
--- a/CREDITS
+++ b/CREDITS
@@ -92,6 +92,10 @@ E: wg@denx.de
D: Support for Interphase 4539 T1/E1/J1 PMC, PN62, CCM, SCM boards
W: www.denx.de
+N: Thomas Frieden
+E: ThomasF@hyperion-entertainment.com
+D: Support for AmigaOne
+
N: Frank Gottschling
E: fgottschling@eltec.de
D: Support for ELTEC MHPC/BAB7xx/ELPPC boards, cfb-console, i8042, SMI LynxEM
diff --git a/MAINTAINERS b/MAINTAINERS
index c924c654037..969e0f83c3f 100644
--- a/MAINTAINERS
+++ b/MAINTAINERS
@@ -33,7 +33,6 @@ Jerry Van Baren <vanbaren_gerald@si.com>
Oliver Brown <obrown@adventnetworks.com>
- sbc8260 MPC8260
gw8260 MPC8260
Conn Clark <clark@esteem.com>
@@ -91,6 +90,10 @@ Dave Ellis <DGE@sixnetio.com>
SXNI855T MPC8xx
+Thomas Frieden <ThomasF@hyperion-entertainment.com>
+
+ AmigaOneG3SE MPC7xx
+
Frank Gottschling <fgottschling@eltec.de>
MHPC MPC8xx
diff --git a/Makefile b/Makefile
index d3e92f41187..ec2140034c6 100644
--- a/Makefile
+++ b/Makefile
@@ -564,6 +564,9 @@ TQM8260_300MHz_config: unconfig
## 74xx/7xx Systems
#########################################################################
+AmigaOneG3SE_config: unconfig
+ @./mkconfig $(@:_config=) ppc 74xx_7xx AmigaOneG3SE MAI
+
EVB64260_config \
EVB64260_750CX_config: unconfig
@./mkconfig EVB64260 ppc 74xx_7xx evb64260
diff --git a/board/MAI/AmigaOneG3SE/AmigaOneG3SE.c b/board/MAI/AmigaOneG3SE/AmigaOneG3SE.c
new file mode 100644
index 00000000000..0cf5388a433
--- /dev/null
+++ b/board/MAI/AmigaOneG3SE/AmigaOneG3SE.c
@@ -0,0 +1,116 @@
+/*
+ * (C) Copyright 2002
+ * Hyperion Entertainment, ThomasF@hyperion-entertainment.com
+ * Wolfgang Denk, DENX Software Engineering, wd@denx.de.
+ *
+ * See file CREDITS for list of people who contributed to this
+ * project.
+ *
+ * This program is free software; you can redistribute it and/or
+ * modify it under the terms of the GNU General Public License as
+ * published by the Free Software Foundation; either version 2 of
+ * the License, or (at your option) any later version.
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with this program; if not, write to the Free Software
+ * Foundation, Inc., 59 Temple Place, Suite 330, Boston,
+ * MA 02111-1307 USA
+ */
+
+#include <common.h>
+#include <command.h>
+#include <pci.h>
+#include "articiaS.h"
+#include "memio.h"
+#include "via686.h"
+
+__asm(" .globl send_kb \n
+ send_kb: \n
+ lis r9, 0xfe00 \n
+ \n
+ li r4, 0x10 # retries \n
+ mtctr r4 \n
+ \n
+ idle: \n
+ lbz r4, 0x64(r9) \n
+ andi. r4, r4, 0x02 \n
+ bne idle \n
+ \n
+ ready: \n
+ stb r3, 0x60(r9) \n
+ \n
+ check: \n
+ lbz r4, 0x64(r9) \n
+ andi. r4, r4, 0x01 \n
+ beq check \n
+ \n
+ lbz r4, 0x60(r9) \n
+ cmpwi r4, 0xfa \n
+ beq done \n
+ \n
+ bdnz idle \n
+ \n
+ li r3, 0 \n
+ blr \n
+ \n
+ done: \n
+ li r3, 1 \n
+ blr \n
+ \n
+ .globl test_kb \n
+ test_kb: \n
+ mflr r10 \n
+ li r3, 0xed \n
+ bl send_kb \n
+ li r3, 0x01 \n
+ bl send_kb \n
+ mtlr r10 \n
+ blr \n
+");
+
+
+int checkboard (void)
+{
+ printf ("AmigaOneG3SE\n");
+
+ return 1;
+}
+
+long initdram (int board_type)
+{
+ return articiaS_ram_init ();
+}
+
+
+
+void after_reloc (ulong dest_addr)
+{
+ DECLARE_GLOBAL_DATA_PTR;
+
+ board_init_r (gd, dest_addr);
+}
+
+
+int misc_init_r (void)
+{
+ extern pci_dev_t video_dev;
+ extern void drv_video_init (void);
+
+ if (video_dev != ~0)
+ drv_video_init ();
+
+ return (0);
+}
+
+
+void pci_init (void)
+{
+#ifndef CONFIG_RAMBOOT
+ articiaS_pci_init ();
+#endif
+}
diff --git a/board/MAI/AmigaOneG3SE/Makefile b/board/MAI/AmigaOneG3SE/Makefile
new file mode 100644
index 00000000000..727174640a7
--- /dev/null
+++ b/board/MAI/AmigaOneG3SE/Makefile
@@ -0,0 +1,53 @@
+#
+# (C) Copyright 2002
+# Wolfgang Denk, DENX Software Engineering, wd@denx.de.
+#
+# See file CREDITS for list of people who contributed to this
+# project.
+#
+# This program is free software; you can redistribute it and/or
+# modify it under the terms of the GNU General Public License as
+# published by the Free Software Foundation; either version 2 of
+# the License, or (at your option) any later version.
+#
+# This program is distributed in the hope that it will be useful,
+# but WITHOUT ANY WARRANTY; without even the implied warranty of
+# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
+# GNU General Public License for more details.
+#
+# You should have received a copy of the GNU General Public License
+# along with this program; if not, write to the Free Software
+# Foundation, Inc., 59 Temple Place, Suite 330, Boston,
+# MA 02111-1307 USA
+#
+
+include $(TOPDIR)/config.mk
+
+LIB = lib$(BOARD).a
+
+COBJS = $(BOARD).o articiaS.o flash.o serial.o smbus.o articiaS_pci.o \
+ via686.o i8259.o ../bios_emulator/x86interface.o \
+ ../bios_emulator/bios.o ../bios_emulator/glue.o \
+ interrupts.o ps2kbd.o video.o usb_uhci.o enet.o \
+ ../menu/cmd_menu.o cmd_boota.o nvram.o
+
+AOBJS = board_asm_init.o memio.o
+
+OBJS = $(COBJS) $(AOBJS)
+
+## FIXME !!!
+# EMUOBJS = ../bios_emulator/scitech/src/x86emu/*.o
+
+
+$(LIB): .depend $(OBJS) $(EMUOBJS)
+ -rm $(LIB)
+ $(AR) crv $@ $(OBJS) $(EMUOBJS)
+
+#########################################################################
+
+.depend: Makefile $(AOBJS:.o=.S) $(COBJS:.o=.c)
+ $(CC) -M $(CFLAGS) $(AOBJS:.o=.S) $(COBJS:.o=.c) > $@
+
+sinclude .depend
+
+#########################################################################
diff --git a/board/MAI/AmigaOneG3SE/articiaS.c b/board/MAI/AmigaOneG3SE/articiaS.c
new file mode 100644
index 00000000000..af85444f485
--- /dev/null
+++ b/board/MAI/AmigaOneG3SE/articiaS.c
@@ -0,0 +1,704 @@
+/*
+ * (C) Copyright 2002
+ * Hyperion Entertainment, ThomasF@hyperion-entertainment.com
+ *
+ * See file CREDITS for list of people who contributed to this
+ * project.
+ *
+ * This program is free software; you can redistribute it and/or
+ * modify it under the terms of the GNU General Public License as
+ * published by the Free Software Foundation; either version 2 of
+ * the License, or (at your option) any later version.
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with this program; if not, write to the Free Software
+ * Foundation, Inc., 59 Temple Place, Suite 330, Boston,
+ * MA 02111-1307 USA
+ */
+
+#include <common.h>
+#include <pci.h>
+#include <asm/processor.h>
+#include "memio.h"
+#include "articiaS.h"
+#include "smbus.h"
+#include "via686.h"
+
+#undef DEBUG
+
+struct dimm_bank {
+ uint8 used; /* Bank is populated */
+ uint32 rows; /* Number of row addresses */
+ uint32 columns; /* Number of column addresses */
+ uint8 registered; /* SIMM is registered */
+ uint8 ecc; /* SIMM has ecc */
+ uint8 burst_len; /* Supported burst lengths */
+ uint32 cas_lat; /* Supported CAS latencies */
+ uint32 cas_used; /* CAS to use (not set by user) */
+ uint32 trcd; /* RAS to CAS latency */
+ uint32 trp; /* Precharge latency */
+ uint32 tclk_hi; /* SDRAM cycle time (highest CAS latency) */
+ uint32 tclk_2hi; /* SDRAM second highest CAS latency */
+ uint32 size; /* Size of bank in bytes */
+ uint8 auto_refresh; /* Module supports auto refresh */
+ uint32 refresh_time; /* Refresh time (in ns) */
+};
+
+
+/*
+** Based in part on the evb64260 code
+*/
+
+/*
+ * translate ns.ns/10 coding of SPD timing values
+ * into 10 ps unit values
+ */
+static inline unsigned short NS10to10PS (unsigned char spd_byte)
+{
+ unsigned short ns, ns10;
+
+ /* isolate upper nibble */
+ ns = (spd_byte >> 4) & 0x0F;
+ /* isolate lower nibble */
+ ns10 = (spd_byte & 0x0F);
+
+ return (ns * 100 + ns10 * 10);
+}
+
+/*
+ * translate ns coding of SPD timing values
+ * into 10 ps unit values
+ */
+static inline unsigned short NSto10PS (unsigned char spd_byte)
+{
+ return (spd_byte * 100);
+}
+
+
+long detect_sdram (uint8 * rom, int dimmNum, struct dimm_bank *banks)
+{
+ int dimm_address = (dimmNum == 0) ? SM_DIMM0_ADDR : SM_DIMM1_ADDR;
+ uint32 busclock = get_bus_freq (0);
+ uint32 memclock = busclock;
+ uint32 tmemclock = 1000000000 / (memclock / 100);
+ uint32 datawidth;
+
+ if (sm_get_data (rom, dimm_address) == 0) {
+ /* Nothing in slot, make both banks empty */
+ debug ("Slot %d: vacant\n", dimmNum);
+ banks[0].used = 0;
+ banks[1].used = 0;
+ return 0;
+ }
+
+ if (rom[2] != 0x04) {
+ debug ("Slot %d: No SDRAM\n", dimmNum);
+ banks[0].used = 0;
+ banks[1].used = 0;
+ return 0;
+ }
+
+ /* Determine number of banks/rows */
+ if (rom[5] == 1) {
+ banks[0].used = 1;
+ banks[1].used = 0;
+ } else {
+ banks[0].used = 1;
+ banks[1].used = 1;
+ }
+
+ /* Determine number of row addresses */
+ if (rom[3] & 0xf0) {
+ /* Different banks sizes */
+ banks[0].rows = rom[3] & 0x0f;
+ banks[1].rows = (rom[3] & 0xf0) >> 4;
+ } else {
+ /* Equal sized banks */
+ banks[0].rows = rom[3] & 0x0f;
+ banks[1].rows = banks[0].rows;
+ }
+
+ /* Determine number of column addresses */
+ if (rom[4] & 0xf0) {
+ /* Different bank sizes */
+ banks[0].columns = rom[4] & 0x0f;
+ banks[1].columns = (rom[4] & 0xf0) >> 4;
+ } else {
+ banks[0].columns = rom[4] & 0x0f;
+ banks[1].columns = banks[0].columns;
+ }
+
+ /* Check Jedec revision, and modify row/column accordingly */
+ if (rom[62] > 0x10) {
+ if (banks[0].rows <= 3)
+ banks[0].rows += 15;
+ if (banks[1].rows <= 3)
+ banks[1].rows += 15;
+ if (banks[0].columns <= 3)
+ banks[0].columns += 15;
+ if (banks[0].columns <= 3)
+ banks[0].columns += 15;
+ }
+
+ /* Check registered/unregisterd */
+ if (rom[21] & 0x12) {
+ banks[0].registered = 1;
+ banks[1].registered = 1;
+ } else {
+ banks[0].registered = 0;
+ banks[1].registered = 0;
+ }
+
+#ifdef CONFIG_ECC
+ /* Check parity/ECC */
+ banks[0].ecc = (rom[11] == 0x02);
+ banks[1].ecc = (rom[11] == 0x02);
+#endif
+
+ /* Find burst lengths supported */
+ banks[0].burst_len = rom[16] & 0x8f;
+ banks[1].burst_len = rom[16] & 0x8f;
+
+ /* Find possible cas latencies */
+ banks[0].cas_lat = rom[18] & 0x7F;
+ banks[1].cas_lat = rom[18] & 0x7F;
+
+ /* RAS/CAS latency */
+ banks[0].trcd = (NSto10PS (rom[29]) + (tmemclock - 1)) / tmemclock;
+ banks[1].trcd = (NSto10PS (rom[29]) + (tmemclock - 1)) / tmemclock;
+
+ /* Precharge latency */
+ banks[0].trp = (NSto10PS (rom[27]) + (tmemclock - 1)) / tmemclock;
+ banks[1].trp = (NSto10PS (rom[27]) + (tmemclock - 1)) / tmemclock;
+
+ /* highest CAS latency */
+ banks[0].tclk_hi = NS10to10PS (rom[9]);
+ banks[1].tclk_hi = NS10to10PS (rom[9]);
+
+ /* second highest CAS latency */
+ banks[0].tclk_2hi = NS10to10PS (rom[23]);
+ banks[1].tclk_2hi = NS10to10PS (rom[23]);
+
+ /* bank sizes */
+ datawidth = rom[13] & 0x7f;
+ banks[0].size =
+ (1L << (banks[0].rows + banks[0].columns)) *
+ /* FIXME datawidth */ 8 * rom[17];
+ if (rom[13] & 0x80)
+ banks[1].size = 2 * banks[0].size;
+ else
+ banks[1].size = (1L << (banks[1].rows + banks[1].columns)) *
+ /* FIXME datawidth */ 8 * rom[17];
+
+ /* Refresh */
+ if (rom[12] & 0x80) {
+ banks[0].auto_refresh = 1;
+ banks[1].auto_refresh = 1;
+ } else {
+ banks[0].auto_refresh = 0;
+ banks[1].auto_refresh = 0;
+ }
+
+ switch (rom[12] & 0x7f) {
+ case 0:
+ banks[0].refresh_time = (1562500 + (tmemclock - 1)) / tmemclock;
+ banks[1].refresh_time = (1562500 + (tmemclock - 1)) / tmemclock;
+ break;
+ case 1:
+ banks[0].refresh_time = (390600 + (tmemclock - 1)) / tmemclock;
+ banks[1].refresh_time = (390600 + (tmemclock - 1)) / tmemclock;
+ break;
+ case 2:
+ banks[0].refresh_time = (781200 + (tmemclock - 1)) / tmemclock;
+ banks[1].refresh_time = (781200 + (tmemclock - 1)) / tmemclock;
+ break;
+ case 3:
+ banks[0].refresh_time = (3125000 + (tmemclock - 1)) / tmemclock;
+ banks[1].refresh_time = (3125000 + (tmemclock - 1)) / tmemclock;
+ break;
+ case 4:
+ banks[0].refresh_time = (6250000 + (tmemclock - 1)) / tmemclock;
+ banks[1].refresh_time = (6250000 + (tmemclock - 1)) / tmemclock;
+ break;
+ case 5:
+ banks[0].refresh_time = (12500000 + (tmemclock - 1)) / tmemclock;
+ banks[1].refresh_time = (12500000 + (tmemclock - 1)) / tmemclock;
+ break;
+ default:
+ banks[0].refresh_time = 0x100; /* Default of Articia S */
+ banks[1].refresh_time = 0x100;
+ break;
+ }
+
+#ifdef DEBUG
+ printf ("\nInformation for SIMM bank %ld:\n", dimmNum);
+ printf ("Number of banks: %ld\n", banks[0].used + banks[1].used);
+ printf ("Number of row addresses: %ld\n", banks[0].rows);
+ printf ("Number of coumns addresses: %ld\n", banks[0].columns);
+ printf ("SIMM is %sregistered\n",
+ banks[0].registered == 0 ? "not " : "");
+#ifdef CONFIG_ECC
+ printf ("SIMM %s ECC\n",
+ banks[0].ecc == 1 ? "supports" : "doesn't support");
+#endif
+ printf ("Supported burst lenghts: %s %s %s %s %s\n",
+ banks[0].burst_len & 0x08 ? "8" : " ",
+ banks[0].burst_len & 0x04 ? "4" : " ",
+ banks[0].burst_len & 0x02 ? "2" : " ",
+ banks[0].burst_len & 0x01 ? "1" : " ",
+ banks[0].burst_len & 0x80 ? "PAGE" : " ");
+ printf ("Supported CAS latencies: %s %s %s\n",
+ banks[0].cas_lat & 0x04 ? "CAS 3" : " ",
+ banks[0].cas_lat & 0x02 ? "CAS 2" : " ",
+ banks[0].cas_lat & 0x01 ? "CAS 1" : " ");
+ printf ("RAS to CAS latency: %ld\n", banks[0].trcd);
+ printf ("Precharge latency: %ld\n", banks[0].trp);
+ printf ("SDRAM highest CAS latency: %ld\n", banks[0].tclk_hi);
+ printf ("SDRAM 2nd highest CAS latency: %ld\n", banks[0].tclk_2hi);
+ printf ("SDRAM data width: %ld\n", datawidth);
+ printf ("Auto Refresh %ssupported\n",
+ banks[0].auto_refresh ? "" : "not ");
+ printf ("Refresh time: %ld clocks\n", banks[0].refresh_time);
+ if (banks[0].used)
+ printf ("Bank 0 size: %ld MB\n", banks[0].size / 1024 / 1024);
+ if (banks[1].used)
+ printf ("Bank 1 size: %ld MB\n", banks[1].size / 1024 / 1024);
+
+ printf ("\n");
+#endif
+
+ sm_term ();
+ return 1;
+}
+
+void select_cas (struct dimm_bank *banks, uint8 fast)
+{
+ if (!banks[0].used) {
+ banks[0].cas_used = 0;
+ banks[0].cas_used = 0;
+ return;
+ }
+
+ if (fast) {
+ /* Search for fast CAS */
+ uint32 i;
+ uint32 c = 0x01;
+
+ for (i = 1; i < 5; i++) {
+ if (banks[0].cas_lat & c) {
+ banks[0].cas_used = i;
+ banks[1].cas_used = i;
+ debug ("Using CAS %d (fast)\n", i);
+ return;
+ }
+ c <<= 1;
+ }
+
+ /* Default to CAS 3 */
+ banks[0].cas_used = 3;
+ banks[1].cas_used = 3;
+ debug ("Using CAS 3 (fast)\n");
+
+ return;
+ } else {
+ /* Search for slow cas */
+ uint32 i;
+ uint32 c = 0x08;
+
+ for (i = 4; i > 1; i--) {
+ if (banks[0].cas_lat & c) {
+ banks[0].cas_used = i;
+ banks[1].cas_used = i;
+ debug ("Using CAS %d (slow)\n", i);
+ return;
+ }
+ c >>= 1;
+ }
+
+ /* Default to CAS 3 */
+ banks[0].cas_used = 3;
+ banks[1].cas_used = 3;
+ debug ("Using CAS 3 (slow)\n");
+
+ return;
+ }
+
+ banks[0].cas_used = 3;
+ banks[1].cas_used = 3;
+ debug ("Using CAS 3\n");
+
+ return;
+}
+
+uint32 get_reg_setting (uint32 banks, uint32 rows, uint32 columns, uint32 size)
+{
+ uint32 i;
+
+ struct RowColumnSize {
+ uint32 banks;
+ uint32 rows;
+ uint32 columns;
+ uint32 size;
+ uint32 register_value;
+ };
+
+ struct RowColumnSize rcs_map[] = {
+ /* Sbk Radr Cadr MB Value */
+ {1, 11, 8, 8, 0x00840f00},
+ {1, 11, 9, 16, 0x00925f00},
+ {1, 11, 10, 32, 0x00a64f00},
+ {2, 12, 8, 32, 0x00c55f00},
+ {2, 12, 9, 64, 0x00d66f00},
+ {2, 12, 10, 128, 0x00e77f00},
+ {2, 12, 11, 256, 0x00ff8f00},
+ {2, 13, 11, 512, 0x00ff9f00},
+ {0, 0, 0, 0, 0x00000000}
+ };
+
+
+ i = 0;
+
+ while (rcs_map[i].banks != 0) {
+ if (rows == rcs_map[i].rows
+ && columns == rcs_map[i].columns
+ && (size / 1024 / 1024) == rcs_map[i].size)
+ return rcs_map[i].register_value;
+
+ i++;
+ }
+
+ return 0;
+}
+
+uint32 burst_to_len (uint32 support)
+{
+ if (support & 0x80)
+ return 0x7;
+ else if (support & 0x8)
+ return 0x3;
+ else if (support & 0x4)
+ return 0x2;
+ else if (support & 0x2)
+ return 0x1;
+ else if (support & 0x1)
+ return 0x0;
+
+ return 0;
+}
+
+long articiaS_ram_init (void)
+{
+ DECLARE_GLOBAL_DATA_PTR;
+
+ register uint32 i;
+ register uint32 value1;
+ register uint32 value2;
+ uint8 rom[128];
+ uint32 burst_len;
+ uint32 burst_support;
+ uint32 total_ram = 0;
+
+ struct dimm_bank banks[4]; /* FIXME: Move to initram */
+ uint32 busclock = get_bus_freq (0);
+ uint32 memclock = busclock;
+ uint32 reg32;
+ uint32 refresh_clocks;
+ uint8 auto_refresh;
+
+ memset (banks, 0, sizeof (struct dimm_bank) * 4);
+
+ detect_sdram (rom, 0, &banks[0]);
+ detect_sdram (rom, 1, &banks[2]);
+
+ for (i = 0; i < 4; i++) {
+ total_ram = total_ram + (banks[i].used * banks[i].size);
+ }
+
+ pci_write_cfg_long (0, 0, GLOBALINFO0, 0x117430c0);
+ pci_write_cfg_long (0, 0, HBUSACR0, 0x1f0100b0);
+ pci_write_cfg_long (0, 0, SRAM_CR, 0x00f12000); /* Note: Might also try 0x00f10000 (original: 0x00f12000) */
+ pci_write_cfg_byte (0, 0, DRAM_RAS_CTL0, 0x3f);
+ pci_write_cfg_byte (0, 0, DRAM_RAS_CTL1, 0x00); /* was: 0x04); */
+ pci_write_cfg_word (0, 0, DRAM_ECC0, 0x2020); /* was: 0x2400); No ECC yet */
+
+ /* FIXME: Move this stuff to seperate function, like setup_dimm_bank */
+ if (banks[0].used) {
+ value1 = get_reg_setting (banks[0].used + banks[1].used,
+ banks[0].rows, banks[0].columns,
+ banks[0].size);
+ } else {
+ value1 = 0;
+ }
+
+ if (banks[1].used) {
+ value2 = get_reg_setting (banks[0].used + banks[1].used,
+ banks[1].rows, banks[1].columns,
+ banks[1].size);
+ } else {
+ value2 = 0;
+ }
+
+ pci_write_cfg_long (0, 0, DIMM0_B0_SCR0, value1);
+ pci_write_cfg_long (0, 0, DIMM0_B1_SCR0, value2);
+
+ debug ("DIMM0_B0_SCR0 = 0x%08x\n", value1);
+ debug ("DIMM0_B1_SCR0 = 0x%08x\n", value2);
+
+ if (banks[2].used) {
+ value1 = get_reg_setting (banks[2].used + banks[3].used,
+ banks[2].rows, banks[2].columns,
+ banks[2].size);
+ } else {
+ value1 = 0;
+ }
+
+ if (banks[3].used) {
+ value2 = get_reg_setting (banks[2].used + banks[3].used,
+ banks[3].rows, banks[3].columns,
+ banks[3].size);
+ } else {
+ value2 = 0;
+ }
+
+ pci_write_cfg_long (0, 0, DIMM1_B2_SCR0, value1);
+ pci_write_cfg_long (0, 0, DIMM1_B3_SCR0, value2);
+
+ debug ("DIMM0_B2_SCR0 = 0x%08x\n", value1);
+ debug ("DIMM0_B3_SCR0 = 0x%08x\n", value2);
+
+ pci_write_cfg_long (0, 0, DIMM2_B4_SCR0, 0);
+ pci_write_cfg_long (0, 0, DIMM2_B5_SCR0, 0);
+ pci_write_cfg_long (0, 0, DIMM3_B6_SCR0, 0);
+ pci_write_cfg_long (0, 0, DIMM3_B7_SCR0, 0);
+
+ /* Determine timing */
+ select_cas (&banks[0], 0);
+ select_cas (&banks[2], 0);
+
+ /* FIXME: What about write recovery */
+ /* Auto refresh Precharge */
+#if 0
+ reg32 = (0x3 << 13) | (0x7 << 10) | ((banks[0].trp - 2) << 8) |
+ /* Write recovery CAS Latency */
+ (0x1 << 6) | (banks[0].cas_used << 4) |
+ /* RAS/CAS latency */
+ ((banks[0].trcd - 1) << 0);
+
+ reg32 |= ((0x3 << 13) | (0x7 << 10) | ((banks[2].trp - 2) << 8) |
+ (0x1 << 6) | (banks[2].cas_used << 4) |
+ ((banks[2].trcd - 1) << 0)) << 16;
+#else
+ if (100000000 == gd->bus_clk)
+ reg32 = 0x71737173;
+ else
+ reg32 = 0x69736973;
+#endif
+ pci_write_cfg_long (0, 0, DIMM0_TCR0, reg32);
+ debug ("DIMM0_TCR0 = 0x%08x\n", reg32);
+
+ /* Write default in DIMM2/3 (not used on A1) */
+ pci_write_cfg_long (0, 0, DIMM2_TCR0, 0x7d737d73);
+
+
+ /* Determine buffered/unbuffered mode for each SIMM. Uses first bank as reference (second, if present, uses the same) */
+ reg32 = pci_read_cfg_long (0, 0, DRAM_GCR0);
+ reg32 &= 0xFF00FFFF;
+
+#if 0
+ if (banks[0].used && banks[0].registered)
+ reg32 |= 0x1 << 16;
+
+ if (banks[2].used && banks[2].registered)
+ reg32 |= 0x1 << 18;
+#else
+ if (banks[0].registered || banks[2].registered)
+ reg32 |= 0x55 << 16;
+#endif
+ pci_write_cfg_long (0, 0, DRAM_GCR0, reg32);
+ debug ("DRAM_GCR0 = 0x%08x\n", reg32);
+
+ /* Determine refresh */
+ refresh_clocks = 0xffffffff;
+ auto_refresh = 1;
+
+ for (i = 0; i < 4; i++) {
+ if (banks[i].used) {
+ if (banks[i].auto_refresh == 0)
+ auto_refresh = 0;
+ if (banks[i].refresh_time < refresh_clocks)
+ refresh_clocks = banks[i].refresh_time;
+ }
+ }
+
+
+#if 1
+ /* It seems this is suggested by the ArticiaS data book */
+ if (100000000 == gd->bus_clk)
+ refresh_clocks = 1561;
+ else
+ refresh_clocks = 2083;
+#endif
+
+
+ debug ("Refresh set to %ld clocks, auto refresh %s\n",
+ refresh_clocks, auto_refresh ? "on" : "off");
+
+ pci_write_cfg_long (0, 0, DRAM_REFRESH0,
+ (1 << 16) | (1 << 15) | (auto_refresh << 12) |
+ (refresh_clocks));
+ debug ("DRAM_REFRESH0 = 0x%08x\n",
+ (1 << 16) | (1 << 15) | (auto_refresh << 12) |
+ (refresh_clocks));
+
+/* pci_write_cfg_long(0, 0, DRAM_REFRESH0, 0x00019400); */
+
+ /* Set mode registers */
+ /* FIXME: For now, set same burst len for all modules. Dunno if that's necessary */
+ /* Find a common burst len */
+ burst_support = 0xff;
+
+ if (banks[0].used)
+ burst_support = banks[0].burst_len;
+ if (banks[1].used)
+ burst_support = banks[1].burst_len;
+ if (banks[2].used)
+ burst_support = banks[2].burst_len;
+ if (banks[3].used)
+ burst_support = banks[3].burst_len;
+
+ /*
+ ** Mode register:
+ ** Bits Use
+ ** 0-2 Burst len
+ ** 3 Burst type (0 = sequential, 1 = interleave)
+ ** 4-6 CAS latency
+ ** 7-8 Operation mode (0 = default, all others invalid)
+ ** 9 Write burst
+ ** 10-11 Reserved
+ **
+ ** Mode register burst table:
+ ** A2 A1 A0 lenght
+ ** 0 0 0 1
+ ** 0 0 1 2
+ ** 0 1 0 4
+ ** 0 1 1 8
+ ** 1 0 0 invalid
+ ** 1 0 1 invalid
+ ** 1 1 0 invalid
+ ** 1 1 1 page (only valid for non-interleaved)
+ */
+
+ burst_len = burst_to_len (burst_support);
+ burst_len = 2; /* FIXME */
+
+ if (banks[0].used) {
+ pci_write_cfg_word (0, 0, DRAM_PCR0,
+ 0x8000 | burst_len | (banks[0].cas_used << 4));
+ debug ("Mode bank 0: 0x%08x\n",
+ 0x8000 | burst_len | (banks[0].cas_used << 4));
+ } else {
+ /* Seems to be needed to disable the bank */
+ pci_write_cfg_word (0, 0, DRAM_PCR0, 0x0000 | 0x032);
+ }
+
+ if (banks[1].used) {
+ pci_write_cfg_word (0, 0, DRAM_PCR0,
+ 0x9000 | burst_len | (banks[1].cas_used << 4));
+ debug ("Mode bank 1: 0x%08x\n",
+ 0x8000 | burst_len | (banks[1].cas_used << 4));
+ } else {
+ /* Seems to be needed to disable the bank */
+ pci_write_cfg_word (0, 0, DRAM_PCR0, 0x1000 | 0x032);
+ }
+
+
+ if (banks[2].used) {
+ pci_write_cfg_word (0, 0, DRAM_PCR0,
+ 0xa000 | burst_len | (banks[2].cas_used << 4));
+ debug ("Mode bank 2: 0x%08x\n",
+ 0x8000 | burst_len | (banks[2].cas_used << 4));
+ } else {
+ /* Seems to be needed to disable the bank */
+ pci_write_cfg_word (0, 0, DRAM_PCR0, 0x2000 | 0x032);
+ }
+
+
+ if (banks[3].used) {
+ pci_write_cfg_word (0, 0, DRAM_PCR0,
+ 0xb000 | burst_len | (banks[3].cas_used << 4));
+ debug ("Mode bank 3: 0x%08x\n",
+ 0x8000 | burst_len | (banks[3].cas_used << 4));
+ } else {
+ /* Seems to be needed to disable the bank */
+ pci_write_cfg_word (0, 0, DRAM_PCR0, 0x3000 | 0x032);
+ }
+
+
+ pci_write_cfg_word (0, 0, 0xba, 0x00);
+
+ return total_ram;
+}
+
+extern int drv_isa_kbd_init (void);
+
+int last_stage_init (void)
+{
+ drv_isa_kbd_init ();
+ return 0;
+}
+
+int overwrite_console (void)
+{
+ return (0);
+}
+
+#define in_8 read_byte
+#define out_8 write_byte
+
+static __inline__ unsigned long get_msr (void)
+{
+ unsigned long msr;
+
+ asm volatile ("mfmsr %0":"=r" (msr):);
+
+ return msr;
+}
+
+static __inline__ void set_msr (unsigned long msr)
+{
+ asm volatile ("mtmsr %0"::"r" (msr));
+}
+
+int board_pre_init (void)
+{
+ unsigned char c_value = 0;
+ unsigned long msr;
+
+ /* Basic init of PS/2 keyboard (needed for some reason)... */
+ /* Ripped from John's code */
+ while ((in_8 ((unsigned char *) 0xfe000064) & 0x02) != 0);
+ out_8 ((unsigned char *) 0xfe000064, 0xaa);
+ while ((in_8 ((unsigned char *) 0xfe000064) & 0x01) == 0);
+ c_value = in_8 ((unsigned char *) 0xfe000060);
+ while ((in_8 ((unsigned char *) 0xfe000064) & 0x02) != 0);
+ out_8 ((unsigned char *) 0xfe000064, 0xab);
+ while ((in_8 ((unsigned char *) 0xfe000064) & 0x01) == 0);
+ c_value = in_8 ((unsigned char *) 0xfe000060);
+ while ((in_8 ((unsigned char *) 0xfe000064) & 0x02) != 0);
+ out_8 ((unsigned char *) 0xfe000064, 0xae);
+/* while ((in_8((unsigned char *)0xfe000064) & 0x01) == 0); */
+/* c_value = in_8((unsigned char *)0xfe000060); */
+
+ /* Enable FPU */
+ msr = get_msr ();
+ set_msr (msr | MSR_FP);
+
+ via_calibrate_bus_freq ();
+
+ return 0;
+}
diff --git a/board/MAI/AmigaOneG3SE/articiaS.h b/board/MAI/AmigaOneG3SE/articiaS.h
new file mode 100644
index 00000000000..158d70ab8eb
--- /dev/null
+++ b/board/MAI/AmigaOneG3SE/articiaS.h
@@ -0,0 +1,143 @@
+#ifndef ARTICIAS_H
+#define ARTICIAS_H
+
+#include "short_types.h"
+#include <common.h>
+
+#define REG_GROUP 0xF0
+
+/* ArticiaS registers */
+#define GLOBALINFO0 0x50
+#define GLOBALINFO1 0x51
+#define GLOBALINFO2 0x52
+#define GLOBALINFO3 0x53
+#define GLOBALCTL0 0x54
+#define GLOBALCTL1 0x55
+#define NVRAMCTL 0x56
+#define PCI1ACR0 0x58
+#define PCI1ACR1 0x59
+#define PCI1ACR2 0x5a
+#define PCI1ACR3 0x5b
+#define HBUSACR0 0x5c
+#define HBUSACR1 0x5d
+#define HBUSACR2 0x5e
+#define HBUSACR3 0x5f
+#define HOSTINT0 0x68
+#define HOSTINT1 0x69
+#define HOSTINT2 0x6a
+#define HOSTINT3 0x6b
+#define HOSTRBCR 0x70
+#define XDBCR 0x74
+
+#define LBSBCR2 0xd2
+
+
+/* Memory controller */
+
+#define DIMM0_B0_SCR0 0x90
+#define DIMM0_B1_SCR0 0x94
+#define DIMM1_B2_SCR0 0x98
+#define DIMM1_B3_SCR0 0x9c
+#define DIMM2_B4_SCR0 0xa0
+#define DIMM2_B5_SCR0 0xa4
+#define DIMM3_B6_SCR0 0xa8
+#define DIMM3_B7_SCR0 0xac
+
+#define DIMM0_TCR0 0xb0
+#define DIMM1_TCR0 0xb2
+#define DIMM2_TCR0 0xb4
+#define DIMM3_TCR0 0xb6
+
+#define DRAM_REFRESH0 0xb8
+#define DRAM_GCR0 0xc0
+#define DRAM_PCR0 0xc6
+#define DRAM_ECC0 0xc4
+#define SRAM_CR 0xc8
+#define DRAM_RAS_CTL0 0xcc
+#define DRAM_RAS_CTL1 0xcd
+
+/* Bits for REG_GROUP */
+#define REG_GROUP_MULTI (1<<1)
+#define REG_GROUP_SPECIAL (1<<3)
+#define REG_GROUP_DIAG (0x1<<4)
+#define REG_GROUP_POWER (0x2<<4)
+
+
+#define GLOBALINFO0_BO (1<<7)
+
+
+#define GLOBALINFO2_B1ARBITER (1<<6)
+
+
+#define HBUSACR0_CPUAPC (1<<0)
+#define HBUSACR0_NUMREQ_2 (0<<1)
+#define HBUSACR0_NUMREQ_3 (1<<1)
+#define HBUSACR0_NUMREQ_4 (2<<1)
+#define HBUSACR0_NUMREQ_MASK (7<<1)
+#define HBUSACR0_RAW (1<<6)
+#define HBUSACR0_WAIT (1<<7)
+#define HBUSACR0_RESERVED (0x30)
+
+
+#define HBUSACR2_BURST (1<<0)
+#define HBUSACR2_LAT (1<<1)
+
+
+#define HBUSACR3_LMWC_SM (1<<0)
+#define HBUSACR3_LMWC_PCI1 (1<<1)
+#define HBUSACR3_LMWC_PCI0 (1<<2)
+#define HBUSACR3_PMWC_PCI1 (1<<3)
+#define HBUSACR3_PMWC_PCI0 (1<<4)
+#define HBUSACR3_FKH (1<<5)
+#define HBUSACR3_92H_EN (1<<6)
+#define HBUSACR3_60H_64H_EN (1<<7)
+
+
+#define HOSTRBCR_PREFETCH (1<<4)
+
+
+#define XDBCR_HWTOXD (1<<0)
+#define XDBCR_KBTOXD (1<<1)
+#define XDBCR_RTCTOXD (1<<2)
+#define XDBCR_SCALE_1_1 (0x0<<3)
+#define XDBCR_SCALE_2_2 (0x1<<3)
+#define XDBCR_SCALE_3_2 (0x2<<3)
+#define XDBCR_SCALE_4_4 (0x3<<3)
+#define XDBCR_SCALE_5_8 (0x4<<3)
+#define XDBCR_SCALE_6_8 (0x5<<3)
+#define XDBCR_SCALE_8_8 (0x6<<3)
+#define XDBCR_SCALE_0_16 (0x7<<3)
+#define XDBCR_XDPROM (1<<7)
+
+
+#define LBSBCR2_1_RWAC (1<<2)
+
+
+/* PCI controller */
+#define ARTICIAS_PCI_CFGADDR 0xfec00cf8
+#define ARTICIAS_PCI_CFGDATA 0xfee00cfc
+
+#define ARTICIAS_PCI_BUS 0x80000000
+#define ARTICIAS_PCI_MAXSIZE 0x7cffffff
+#define ARTICIAS_PCI_PHYS 0x80000000
+
+#define ARTICIAS_SYS_BUS 0x00000000
+#define ARTICIAS_SYS_MAXSIZE 0x7fffffff
+#define ARTICIAS_SYS_PHYS 0x00000000
+
+#define ARTICIAS_PCIIO_BUS 0x00800000
+#define ARTICIAS_PCIIO_MAXSIZE 0x003fffff
+#define ARTICIAS_PCIIO_PHYS 0xfe800000
+
+#define ARTICIAS_ISAIO_BUS 0x00002000
+#define ARTICIAS_ISAIO_MAXSIZE 0x0000d000
+#define ARTICIAS_ISAIO_PHYS 0xfe002000
+
+
+
+/* Prototypes */
+long articiaS_ram_init(void);
+void articiaS_pci_init(void);
+
+
+#endif
diff --git a/board/MAI/AmigaOneG3SE/articiaS_pci.c b/board/MAI/AmigaOneG3SE/articiaS_pci.c
new file mode 100644
index 00000000000..774c32dd08c
--- /dev/null
+++ b/board/MAI/AmigaOneG3SE/articiaS_pci.c
@@ -0,0 +1,573 @@
+/*
+ * (C) Copyright 2002
+ * Hyperion Entertainment, Hans-JoergF@hyperion-entertainment.com
+ *
+ * See file CREDITS for list of people who contributed to this
+ * project.
+ *
+ * This program is free software; you can redistribute it and/or
+ * modify it under the terms of the GNU General Public License as
+ * published by the Free Software Foundation; either version 2 of
+ * the License, or (at your option) any later version.
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with this program; if not, write to the Free Software
+ * Foundation, Inc., 59 Temple Place, Suite 330, Boston,
+ * MA 02111-1307 USA
+ */
+
+#include <common.h>
+#include <pci.h>
+#include "memio.h"
+#include "articiaS.h"
+
+//#define ARTICIA_PCI_DEBUG
+
+#ifdef ARTICIA_PCI_DEBUG
+#define PRINTF(fmt,args...) printf (fmt ,##args)
+#else
+#define PRINTF(fmt,args...)
+#endif
+
+struct pci_controller articiaS_hose;
+
+long irq_alloc(long wanted);
+
+static pci_dev_t pci_hose_find_class(struct pci_controller *hose, int bus, short find_class, int index);
+static int articiaS_init_vga(void);
+static void pci_cfgfunc_dummy(struct pci_controller *host, pci_dev_t dev, struct pci_config_table *table);
+unsigned char pci_irq_alloc(void);
+
+extern void via_cfgfunc_via686(struct pci_controller * host, pci_dev_t dev, struct pci_config_table *table);
+extern void via_cfgfunc_ide_init(struct pci_controller *host, pci_dev_t dev, struct pci_config_table *table);
+extern void via_init_irq_routing(uint8 []);
+extern void via_init_afterscan(void);
+
+#define cfgfunc_via686 1
+#define cfgfunc_dummy 2
+#define cfgfunc_ide_init 3
+
+static struct pci_config_table config_table[] =
+{
+ {
+ 0x1106, PCI_ANY_ID, PCI_CLASS_BRIDGE_ISA, PCI_ANY_ID, PCI_ANY_ID, PCI_ANY_ID,
+ (void *)cfgfunc_via686, {0, 0, 0}
+ },
+ {
+ 0x1106, PCI_ANY_ID, PCI_ANY_ID, 0,7,4,
+ (void *)cfgfunc_dummy, {0,0,0}
+ },
+ {
+ 0x1106, 0x3068, PCI_ANY_ID, 0, 7, PCI_ANY_ID,
+ (void *)cfgfunc_dummy, {0,0,0}
+ },
+ {
+ 0x1106, PCI_ANY_ID, PCI_ANY_ID, 0,7,1,
+ (void *)cfgfunc_ide_init, {0,0,0}
+ },
+ {
+ 0,
+ }
+};
+
+
+void pci_cfgfunc_dummy(struct pci_controller *host, pci_dev_t dev, struct pci_config_table *table)
+{
+
+
+}
+
+unsigned long irq_penalties[16] =
+{
+ 1000, /* 0:timer */
+ 1000, /* 1:keyboard */
+ 1000, /* 2:cascade */
+ 50, /* 3:serial (COM2) */
+ 50, /* 4:serial (COM1) */
+ 4, /* 5:USB2 */
+ 100, /* 6:floppy */
+ 3, /* 7:parallel */
+ 50, /* 8:AC97/MC97 */
+ 0, /* 9: */
+ 3, /* 10:: */
+ 0, /* 11: */
+ 3, /* 12: USB1 */
+ 0, /* 13: */
+ 100, /* 14: ide0 */
+ 100, /* 15: ide1 */
+};
+
+
+/*
+ * The following defines a hard-coded interrupt mapping for the
+ * know devices on the board.
+ * If a device isn't found here, assumed to be a device that's
+ * plugged into a PCI or AGP slot
+ * NOTE: This table is machine dependant.
+ */
+
+struct pci_irq_fixup_table
+{
+ uint8 bus; /* Bus number */
+ uint8 device; /* Device number */
+ uint8 func; /* Function number */
+ uint8 interrupt; /* Interrupt to use (0xff to disable) */
+};
+
+struct pci_irq_fixup_table fixuptab [] =
+{
+ { 0, 0, 0, 0xff}, /* Articia S host bridge */
+ { 0, 1, 0, 0xff}, /* Articia S AGP bridge */
+// { 0, 6, 0, 0x05}, /* 3COM ethernet */
+ { 0, 7, 0, 0xff}, /* VIA southbridge */
+ { 0, 7, 1, 0x0e}, /* IDE controller in legacy mode */
+// { 0, 7, 2, 0x05}, /* First USB controller */
+// { 0, 7, 3, 0x0c}, /* Second USB controller (shares interrupt with ethernet) */
+ { 0, 7, 4, 0xff}, /* ACPI Power Management */
+// { 0, 7, 5, 0x08}, /* AC97 */
+// { 0, 7, 6, 0x08}, /* MC97 */
+ { 0xff, 0xff, 0xff, 0xff}
+};
+
+
+/*
+ * This table maps IRQ's to PCI interrupts
+ */
+
+uint8 pci_intmap[4] = {0, 0, 0, 0};
+
+/*
+ * Map PCI slots to interrupt routings
+ * This table lists the device number assigned to a card inserted
+ * into the slot, along with a permutation for the slot's IRQ routing.
+ * NOTE: This table is machine dependant.
+ */
+
+struct pci_slot_irq_routing
+{
+ uint8 bus;
+ uint8 device;
+
+ uint8 ints[4];
+};
+
+struct pci_slot_irq_routing amigaone_pci_routing[] =
+{
+ {0, 8, {0, 1, 2, 3}}, /* Slot 1 (left of riser slot) */
+ {0, 9, {1, 2, 3, 0}}, /* Slot 2 (middle slot) */
+ {0, 10, {2, 3, 0, 1}}, /* Slot 3 (leftmost slot) */
+ {1, 0, {1, 0, 2, 3}}, /* AGP slot (only IRQA and IRQB) */
+ {1, 1, {1, 2, 3, 0}}, /* PCI slot on AGP bus */
+ {0, 6, {3, 3, 3, 3}}, /* On board ethernet */
+ {0, 7, {0, 1, 2, 3}}, /* Southbridge */
+ {0xff, 0, {0, 0, 0, 0}}
+};
+
+void articiaS_pci_irq_init(void)
+{
+ char *s;
+
+ s = getenv("pci_irqa");
+ if (s)
+ pci_intmap[0] = simple_strtoul (s, NULL, 10);
+ else
+ pci_intmap[0] = pci_irq_alloc();
+
+ s = getenv("pci_irqb");
+ if (s)
+ pci_intmap[1] = simple_strtoul (s, NULL, 10);
+ else
+ pci_intmap[1] = pci_irq_alloc();
+
+ s = getenv("pci_irqc");
+ if (s)
+ pci_intmap[2] = simple_strtoul (s, NULL, 10);
+ else
+ pci_intmap[2] = pci_irq_alloc();
+
+ s = getenv("pci_irqd");
+ if (s)
+ pci_intmap[3] = simple_strtoul (s, NULL, 10);
+ else
+ pci_intmap[3] = pci_irq_alloc();
+}
+
+
+unsigned char pci_irq_alloc(void)
+{
+ int i;
+ int interrupt = 10;
+ unsigned long min_penalty = 1000;
+
+ /* Search for the minimal penalty, favoring interrupts at the end */
+ for (i = 0; i < 16; i++)
+ {
+ if (irq_penalties[i] <= min_penalty)
+ {
+ interrupt = i;
+ min_penalty = irq_penalties[i];
+ }
+ }
+
+ PRINTF("pci_irq_alloc: Minimal penalty is %ld for %d\n", min_penalty, interrupt);
+
+ irq_penalties[interrupt]++;
+
+ return interrupt;
+}
+
+
+void articiaS_pci_fixup_irq(struct pci_controller *hose, pci_dev_t dev)
+{
+ int8 bus, device, func, pin, line;
+ int i;
+
+ bus = PCI_BUS(dev);
+ device = PCI_DEV(dev);
+ func = PCI_FUNC(dev);
+
+ PRINTF("Fixup irq of %d:%d.%d\n", bus, device, func);
+
+ /* Search for the device in the table */
+ for (i = 0; fixuptab[i].bus != 0xff; i++)
+ {
+ if (bus == fixuptab[i].bus && device == fixuptab[i].device && func == fixuptab[i].func)
+ {
+ /* If the device needs an interrupt, write it */
+ if (fixuptab[i].interrupt != 0xff)
+ {
+ PRINTF("Assigning IRQ %d (fixed)\n", fixuptab[i].interrupt);
+ pci_write_config_byte(dev, PCI_INTERRUPT_LINE, fixuptab[i].interrupt);
+ }
+ else
+ {
+ /* Otherwise, see if it wants an interrupt, and disable it if needed */
+ pci_read_config_byte(dev, PCI_INTERRUPT_PIN, &pin);
+ if (pin)
+ {
+ PRINTF("Disabling IRQ\n");
+ pci_write_config_byte(dev, PCI_INTERRUPT_LINE, 0xff);
+ }
+ }
+
+ return;
+ }
+ }
+
+ /* If we get here, we have another PCI device in a slot... find the appropriate IRQ */
+
+ /* Find matching pin */
+ pci_read_config_byte(dev, PCI_INTERRUPT_PIN, &pin);
+ pin--;
+
+ /* Search for it's map */
+ for (i = 0; amigaone_pci_routing[i].bus != 0xff; i++)
+ {
+ if (bus == amigaone_pci_routing[i].bus && device == amigaone_pci_routing[i].device)
+ {
+ line = pci_intmap[amigaone_pci_routing[i].ints[pin]];
+ PRINTF("Assigning IRQ %d (pin %d)\n", line, pin);
+ pci_write_config_byte(dev, PCI_INTERRUPT_LINE, line);
+ return;
+ }
+ }
+
+ PRINTF("Unkonwn PCI device found\n");
+}
+
+void articiaS_pci_init (void)
+{
+ int i;
+ char *s;
+
+ PRINTF("atriciaS_pci_init\n");
+
+ // Why aren't these relocated??
+ for (i=0; config_table[i].config_device; i++)
+ {
+ switch((int)config_table[i].config_device)
+ {
+ case cfgfunc_via686: config_table[i].config_device = via_cfgfunc_via686; break;
+ case cfgfunc_dummy: config_table[i].config_device = pci_cfgfunc_dummy; break;
+ case cfgfunc_ide_init: config_table[i].config_device = via_cfgfunc_ide_init; break;
+ default: PRINTF("Error: Unknown constant\n");
+ }
+ }
+
+ articiaS_hose.first_busno = 0;
+ articiaS_hose.last_busno = 0xff;
+ articiaS_hose.config_table = config_table;
+ articiaS_hose.fixup_irq = articiaS_pci_fixup_irq;
+
+ articiaS_pci_irq_init();
+
+ /* System memory */
+ pci_set_region(articiaS_hose.regions + 0,
+ ARTICIAS_SYS_BUS,
+ ARTICIAS_SYS_PHYS,
+ ARTICIAS_SYS_MAXSIZE,
+ PCI_REGION_MEM | PCI_REGION_MEMORY);
+
+ /* PCI memory space */
+ pci_set_region(articiaS_hose.regions + 1,
+ ARTICIAS_PCI_BUS,
+ ARTICIAS_PCI_PHYS,
+ ARTICIAS_PCI_MAXSIZE,
+ PCI_REGION_MEM);
+
+ /* PCI io space */
+ pci_set_region(articiaS_hose.regions + 2,
+ ARTICIAS_PCIIO_BUS,
+ ARTICIAS_PCIIO_PHYS,
+ ARTICIAS_PCIIO_MAXSIZE,
+ PCI_REGION_IO);
+
+ /* PCI/ISA io space */
+ pci_set_region(articiaS_hose.regions + 3,
+ ARTICIAS_ISAIO_BUS,
+ ARTICIAS_ISAIO_PHYS,
+ ARTICIAS_ISAIO_MAXSIZE,
+ PCI_REGION_IO);
+
+
+
+ articiaS_hose.region_count = 4;
+
+ pci_setup_indirect(&articiaS_hose, ARTICIAS_PCI_CFGADDR, ARTICIAS_PCI_CFGDATA);
+ PRINTF("Registering articia hose...\n");
+ pci_register_hose(&articiaS_hose);
+ PRINTF("Enabling AGP...\n");
+ pci_write_config_byte(PCI_BDF(0,0,0), 0x58, 0x01);
+ PRINTF("Scanning bus...\n");
+ articiaS_hose.last_busno = pci_hose_scan(&articiaS_hose);
+
+ via_init_irq_routing(pci_intmap);
+
+ PRINTF("After-Scan results:\n");
+ PRINTF("Bus range: %d - %d\n", articiaS_hose.first_busno , articiaS_hose.last_busno);
+
+ via_init_afterscan();
+
+ pci_write_config_byte(PCI_BDF(0,1,0), PCI_INTERRUPT_LINE, 0xFF);
+
+ s = getenv("as_irq");
+ if (s)
+ {
+ pci_write_config_byte(PCI_BDF(0,0,0), PCI_INTERRUPT_LINE, simple_strtoul (s, NULL, 10));
+ }
+
+ s = getenv("x86_run_bios");
+ if (!s || (s && strcmp(s, "on")==0))
+ {
+ if (articiaS_init_vga() == -1)
+ {
+ /* If the VGA didn't init and we have stdout set to VGA, reset to serial */
+/* s = getenv("stdout"); */
+/* if (s && strcmp(s, "vga") == 0) */
+/* { */
+/* setenv("stdout", "serial"); */
+/* } */
+ }
+ }
+ pci_write_config_byte(PCI_BDF(0,1,0), PCI_INTERRUPT_LINE, 0xFF);
+
+}
+
+pci_dev_t pci_hose_find_class(struct pci_controller *hose, int bus, short find_class, int index)
+{
+ unsigned int sub_bus, found_multi=0;
+ unsigned short vendor, class;
+ unsigned char header_type;
+ pci_dev_t dev;
+ u8 c1, c2;
+
+ sub_bus = bus;
+
+ for (dev = PCI_BDF(bus,0,0);
+ dev < PCI_BDF(bus,PCI_MAX_PCI_DEVICES-1,PCI_MAX_PCI_FUNCTIONS-1);
+ dev += PCI_BDF(0,0,1))
+ {
+ if ( dev == PCI_BDF(hose->first_busno,0,0) )
+ continue;
+
+ if (PCI_FUNC(dev) && !found_multi)
+ continue;
+
+ pci_hose_read_config_byte(hose, dev, PCI_HEADER_TYPE, &header_type);
+
+ pci_hose_read_config_word(hose, dev, PCI_VENDOR_ID, &vendor);
+
+ if (vendor != 0xffff && vendor != 0x0000)
+ {
+
+ if (!PCI_FUNC(dev))
+ found_multi = header_type & 0x80;
+ pci_hose_read_config_byte(hose, dev, 0x0B, &c1);
+ pci_hose_read_config_byte(hose, dev, 0x0A, &c2);
+ class = c1<<8 | c2;
+ //printf("At %02x:%02x:%02x: class %x\n",
+ // PCI_BUS(dev), PCI_DEV(dev), PCI_FUNC(dev), class);
+ if (class == find_class)
+ {
+ if (index == 0)
+ return dev;
+ else index--;
+ }
+ }
+ }
+
+ return ~0;
+}
+
+
+/*
+ * For a given bus number, find the bridge on this hose that provides this
+ * bus number. The function scans for bridges and peeks config space offset
+ * 0x19 (PCI_SECONDARY_BUS).
+ */
+pci_dev_t pci_find_bridge_for_bus(struct pci_controller *hose, int busnr)
+{
+ pci_dev_t dev;
+ int bus;
+ unsigned int found_multi=0;
+ unsigned char header_type;
+ unsigned short vendor;
+ unsigned char secondary_bus;
+
+ if (hose == NULL) hose = &articiaS_hose;
+
+ if (busnr < hose->first_busno || busnr > hose->last_busno) return PCI_ANY_ID; // Not in range
+
+ /*
+ * The bridge must be on a lower bus number
+ */
+ for (bus = hose->first_busno; bus < busnr; bus++)
+ {
+ for (dev = PCI_BDF(bus,0,0);
+ dev < PCI_BDF(bus,PCI_MAX_PCI_DEVICES-1,PCI_MAX_PCI_FUNCTIONS-1);
+ dev += PCI_BDF(0,0,1))
+ {
+ if ( dev == PCI_BDF(hose->first_busno,0,0) )
+ continue;
+
+ if (PCI_FUNC(dev) && !found_multi)
+ continue;
+
+ pci_hose_read_config_byte(hose, dev, PCI_HEADER_TYPE, &header_type);
+
+ pci_hose_read_config_word(hose, dev, PCI_VENDOR_ID, &vendor);
+
+ if (vendor != 0xffff && vendor != 0x0000)
+ {
+
+ if (!PCI_FUNC(dev))
+ found_multi = header_type & 0x80;
+ if (header_type == 1) // Bridge device header
+ {
+ pci_hose_read_config_byte(hose, dev, PCI_SECONDARY_BUS, &secondary_bus);
+ if ((int)secondary_bus == busnr) return dev;
+ }
+
+ }
+ }
+ }
+ return PCI_ANY_ID;
+}
+
+static short classes[] =
+{
+ PCI_CLASS_DISPLAY_VGA,
+ PCI_CLASS_DISPLAY_XGA,
+ PCI_CLASS_DISPLAY_3D,
+ PCI_CLASS_DISPLAY_OTHER,
+ ~0
+};
+
+extern int execute_bios(pci_dev_t gr_dev, void *);
+
+pci_dev_t video_dev;
+
+int articiaS_init_vga (void)
+{
+ DECLARE_GLOBAL_DATA_PTR;
+
+ extern void shutdown_bios(void);
+ pci_dev_t dev = ~0;
+ int busnr = 0;
+ int classnr = 0;
+
+ video_dev = PCI_ANY_ID;
+
+ printf("VGA: ");
+
+ PRINTF("Trying to initialize x86 VGA Card(s)\n");
+
+ while (dev == ~0)
+ {
+ PRINTF("Searching for class 0x%x on bus %d\n", classes[classnr], busnr);
+ /* Find the first of this class on this bus */
+ dev = pci_hose_find_class(&articiaS_hose, busnr, classes[classnr], 0);
+ if (dev != ~0) break;
+ busnr++;
+ if (busnr > articiaS_hose.last_busno)
+ {
+ busnr = 0;
+ classnr ++;
+ if (classes[classnr] == ~0)
+ {
+ printf("NOT PRESENT\n");
+ return -1;
+ }
+ }
+ }
+
+ /*
+ * If we get here we have found the first graphics card.
+ * If the bus number is not 0, then it is probably behind a bridge, and the
+ * bridge needs to be told to forward VGA access.
+ */
+
+ if (PCI_BUS(dev) != 0)
+ {
+ pci_dev_t bridge;
+ PRINTF("Behind bridge, looking for bridge\n");
+ bridge = pci_find_bridge_for_bus(&articiaS_hose, PCI_BUS(dev));
+ if (dev != PCI_ANY_ID)
+ {
+ unsigned char agp_control_0;
+ PRINTF("Got the bridge at %02x:%02x:%02x\n",
+ PCI_BUS(bridge), PCI_DEV(bridge), PCI_FUNC(bridge));
+ pci_hose_read_config_byte(&articiaS_hose, bridge, 0x3E, &agp_control_0);
+ agp_control_0 |= 0x18;
+ pci_hose_write_config_byte(&articiaS_hose, bridge, 0x3E, agp_control_0);
+ PRINTF("Configured for VGA forwarding\n");
+ }
+ }
+
+ /*
+ * Now try to run the bios
+ */
+
+ if (execute_bios(dev, gd->relocaddr))
+ {
+ printf("OK\n");
+ video_dev = dev;
+ }
+ else
+ {
+ printf("ERROR\n");
+ }
+
+ PRINTF("Done scanning.\n");
+
+ shutdown_bios();
+
+ if (dev == PCI_ANY_ID) return -1;
+ else return 0;
+
+}
diff --git a/board/MAI/AmigaOneG3SE/board_asm_init.S b/board/MAI/AmigaOneG3SE/board_asm_init.S
new file mode 100644
index 00000000000..a421c5dc435
--- /dev/null
+++ b/board/MAI/AmigaOneG3SE/board_asm_init.S
@@ -0,0 +1,157 @@
+ #include "macros.h"
+
+
+
+#define GLOBALINFO0 0x50
+#define GLOBALINFO0_BO (1<<7)
+#define GLOBALINFO2_B1ARBITER (1<<6)
+#define HBUSACR0 0x5c
+#define HBUSACR2_BURST (1<<0)
+#define HBUSACR2_LAT (1<<1)
+
+#define RECEIVER_HOLDING 0
+#define TRANSMITTER_HOLDING 0
+#define INTERRUPT_ENABLE 1
+#define INTERRUPT_STATUS 2
+#define FIFO_CONTROL 2
+#define LINE_CONTROL 3
+#define MODEM_CONTROL 4
+#define LINE_STATUS 5
+#define MODEM_STATUS 6
+#define SCRATCH_PAD 7
+
+#define DIVISOR_LATCH_LSB 0
+#define DIVISOR_LATCH_MSB 1
+#define PRESCALER_DIVISION 5
+
+#define UART(x) (0x3f8+(x))
+
+#define GLOBALINFO0 0x50
+#define GLOBALINFO0_BO (1<<7)
+#define GLOBALINFO2_B1ARBITER (1<<6)
+#define HBUSACR0 0x5c
+#define HBUSACR2_BURST (1<<0)
+#define HBUSACR2_LAT (1<<1)
+
+#define SUPERIO_1 ((7 << 3) | (0))
+#define SUPERIO_2 ((7 << 3) | (1))
+
+ .globl board_asm_init
+
+board_asm_init:
+ mflr r29
+ /* Set 'Must-set' register */
+ li r3, 0
+ li r4, 0
+ li r5, 0x5e
+ bl pci_read_cfg_byte
+ ori r3, r3, (1<<1)
+ xori r6, r3, (1<<1)
+ li r3, 0
+ bl pci_write_cfg_byte
+
+ li r3, 0
+ li r5, 0x52
+ bl pci_read_cfg_byte
+ ori r6, r3, (1<<6)
+ li r3, 0
+ bl pci_write_cfg_byte
+
+ li r3, 0
+ li r4, 0x08
+ li r5, 0xd2
+ bl pci_read_cfg_byte
+ ori r6, r3, (1<<2)
+ li r3, 0
+ bl pci_write_cfg_byte
+
+
+ /* Do PCI reset */
+/* li r3, 0
+ li r4, 0x38
+ li r5, 0x47
+ bl pci_read_cfg_byte
+ ori r6, r3, 0x01
+ li r3, 0
+ li r4, 0x38
+ li r5, 0x47
+ bl pci_write_cfg_byte*/
+
+
+ /* Enable NVRAM for environment */
+ li r3, 0
+ li r4, 0
+ li r5, 0x56
+ li r6, 0x0B
+ bl pci_write_cfg_byte
+
+
+ /* Init Super-I/O chips */
+
+ siowb 0x40, 0x08
+ siowb 0x41, 0x01
+ siowb 0x45, 0x80
+ siowb 0x46, 0x60
+ siowb 0x47, 0x20
+ siowb 0x48, 0x01
+ siowb 0x4a, 0xc4
+ siowb 0x50, 0x0e
+ siowb 0x51, 0x76
+ siowb 0x52, 0x34
+ siowb 0x54, 0x00
+ siowb 0x55, 0x90
+ siowb 0x56, 0x99
+ siowb 0x57, 0x90
+ siowb 0x85, 0x01
+
+ /* Enable configuration mode for SuperIO */
+ li r3, 0
+ li r4, (7<<3)
+ li r5, 0x85
+ bl pci_read_cfg_byte
+ ori r6, r3, 0x02
+ mr r31, r6
+ li r3,0
+ bl pci_write_cfg_byte
+
+ /* COM1 as 3f8 */
+ outb 0x3f0, 0xe7
+ outb 0x3f1, 0xfe
+
+ /* COM2 as 2f8 */
+ outb 0x3f0, 0xe8
+ outb 0x3f1, 0xeb
+
+ /* Enable */
+ outb 0x3f0, 0xe2
+ inb r3, 0x3f1
+ ori r3, r3, 0x0c
+ outb 0x3f0, 0xe2
+ outbr 0x3f1, r3
+
+ /* Disable configuration mode */
+ li r3, 0
+ li r4, (7<<3)
+ li r5, 0x85
+ mr r6, r31
+ bl pci_write_cfg_byte
+
+ /* Set line control */
+ outb UART(LINE_CONTROL), 0x83
+ outb UART(DIVISOR_LATCH_LSB), 0x0c
+ outb UART(DIVISOR_LATCH_MSB), 0x00
+ outb UART(LINE_CONTROL), 0x3
+
+ mtlr r29
+ blr
+
+
+ .globl new_reset
+ .globl new_reset_end
+new_reset:
+ li r0, 0x100
+ oris r0, r0, 0xFFF0
+ mtlr r0
+ blr
+
+new_reset_end:
\ No newline at end of file
diff --git a/board/MAI/AmigaOneG3SE/cmd_boota.c b/board/MAI/AmigaOneG3SE/cmd_boota.c
new file mode 100644
index 00000000000..140aaff0447
--- /dev/null
+++ b/board/MAI/AmigaOneG3SE/cmd_boota.c
@@ -0,0 +1,123 @@
+#include <common.h>
+#include <command.h>
+#include <cmd_boota.h>
+#include "../disk/part_amiga.h"
+#include <asm/cache.h>
+
+
+#undef BOOTA_DEBUG
+
+#ifdef BOOTA_DEBUG
+#define PRINTF(fmt,args...) printf (fmt ,##args)
+#else
+#define PRINTF(fmt,args...)
+#endif
+
+struct block_header {
+ u32 id;
+ u32 summed_longs;
+ s32 chk_sum;
+};
+
+extern block_dev_desc_t *ide_get_dev (int dev);
+extern struct bootcode_block *get_bootcode (block_dev_desc_t * dev_desc);
+extern int sum_block (struct block_header *header);
+
+struct bootcode_block bblk;
+
+int do_boota (cmd_tbl_t * cmdtp, int flag, int argc, char *argv[])
+{
+ unsigned char *load_address = (unsigned char *) CFG_LOAD_ADDR;
+ unsigned char *base_address;
+ unsigned long offset;
+
+ unsigned long part_number = 0;
+ block_dev_desc_t *boot_disk;
+ char *s;
+ struct bootcode_block *boot_code;
+
+ /* Get parameters */
+
+ switch (argc) {
+ case 2:
+ load_address = (unsigned char *) simple_strtol (argv[1], NULL, 16);
+ part_number = 0;
+ break;
+ case 3:
+ load_address = (unsigned char *) simple_strtol (argv[1], NULL, 16);
+ part_number = simple_strtol (argv[2], NULL, 16);
+ break;
+ }
+
+ base_address = load_address;
+
+ PRINTF ("Loading boot code from disk %d to %p\n", part_number,
+ load_address);
+
+ /* Find the appropriate disk device */
+ boot_disk = ide_get_dev (part_number);
+ if (!boot_disk) {
+ PRINTF ("Unknown disk %d\n", part_number);
+ return 1;
+ }
+
+ /* Find the bootcode block */
+ boot_code = get_bootcode (boot_disk);
+ if (!boot_code) {
+ PRINTF ("Not a bootable disk %d\n", part_number);
+ return 1;
+ }
+
+ /* Only use the offset from the first block */
+ offset = boot_code->load_data[0];
+ memcpy (load_address, &boot_code->load_data[1], 122 * 4);
+ load_address += 122 * 4;
+
+ /* Setup for the loop */
+ bblk.next = boot_code->next;
+ boot_code = &bblk;
+
+ /* Scan the chain, and copy the loader succesively into the destination area */
+ while (0xffffffff != boot_code->next) {
+ PRINTF ("Loading block %d\n", boot_code->next);
+
+ /* Load block */
+ if (1 !=
+ boot_disk->block_read (boot_disk->dev, boot_code->next, 1,
+ (ulong *) & bblk)) {
+ PRINTF ("Read error\n");
+ return 1;
+ }
+
+ /* check sum */
+ if (sum_block ((struct block_header *) (ulong *) & bblk) != 0) {
+ PRINTF ("Checksum error\n");
+ return 1;
+ }
+
+ /* Ok, concatenate it to the already loaded code */
+ memcpy (load_address, boot_code->load_data, 123 * 4);
+ load_address += 123 * 4;
+ }
+
+ printf ("Bootcode loaded to %p (size %d)\n", base_address,
+ load_address - base_address);
+ printf ("Entry point at %p\n", base_address + offset);
+
+ flush_cache (base_address, load_address - base_address);
+
+
+ s = getenv ("autostart");
+ if (s && strcmp (s, "yes") == 0) {
+ DECLARE_GLOBAL_DATA_PTR;
+
+ void (*boot) (bd_t *, char *, block_dev_desc_t *);
+ char *args;
+
+ boot = (void (*)(bd_t *, char *, block_dev_desc_t *)) (base_address + offset);
+ boot (gd->bd, getenv ("amiga_bootargs"), boot_disk);
+ }
+
+
+ return 0;
+}
diff --git a/board/MAI/AmigaOneG3SE/config.mk b/board/MAI/AmigaOneG3SE/config.mk
new file mode 100644
index 00000000000..0537cd977ad
--- /dev/null
+++ b/board/MAI/AmigaOneG3SE/config.mk
@@ -0,0 +1,33 @@
+#
+# (C) Copyright 2002
+# Wolfgang Denk, DENX Software Engineering, wd@denx.de.
+#
+# See file CREDITS for list of people who contributed to this
+# project.
+#
+# This program is free software; you can redistribute it and/or
+# modify it under the terms of the GNU General Public License as
+# published by the Free Software Foundation; either version 2 of
+# the License, or (at your option) any later version.
+#
+# This program is distributed in the hope that it will be useful,
+# but WITHOUT ANY WARRANTY; without even the implied warranty of
+# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
+# GNU General Public License for more details.
+#
+# You should have received a copy of the GNU General Public License
+# along with this program; if not, write to the Free Software
+# Foundation, Inc., 59 Temple Place, Suite 330, Boston,
+# MA 02111-1307 USA
+#
+
+#
+# AmigaOneG3SE boards
+#
+
+X86EMU = -I../bios_emulator/scitech/include -I../bios_emulator/scitech/src/x86emu
+
+TEXT_BASE = 0xfff00000
+
+PLATFORM_CPPFLAGS += -DTEXT_BASE=$(TEXT_BASE) -Wa,-mregnames -DEASTEREGG $(X86EMU) #-DDEBUG
+
diff --git a/board/MAI/AmigaOneG3SE/enet.c b/board/MAI/AmigaOneG3SE/enet.c
new file mode 100644
index 00000000000..0aaa8bf6396
--- /dev/null
+++ b/board/MAI/AmigaOneG3SE/enet.c
@@ -0,0 +1,886 @@
+/*
+ * (C) Copyright 2002
+ * Adam Kowalczyk, ACK Software Controls Inc. akowalczyk@cogeco.ca
+ *
+ * Some portions taken from 3c59x.c Written 1996-1999 by Donald Becker.
+ *
+ * Outline of the program based on eepro100.c which is
+ *
+ * (C) Copyright 2002
+ * Wolfgang Denk, DENX Software Engineering, wd@denx.de.
+ *
+ * This program is free software; you can redistribute it and/or
+ * modify it under the terms of the GNU General Public License as
+ * published by the Free Software Foundation; either version 2 of
+ * the License, or (at your option) any later version.
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with this program; if not, write to the Free Software
+ * Foundation, Inc., 59 Temple Place, Suite 330, Boston,
+ * MA 02111-1307 USA
+ */
+
+#include <common.h>
+#include <malloc.h>
+#include <net.h>
+#include <asm/io.h>
+#include <pci.h>
+
+#include "articiaS.h"
+#include "memio.h"
+
+/* 3Com Ethernet PCI definitions*/
+
+// #define PCI_VENDOR_ID_3COM 0x10B7
+#define PCI_DEVICE_ID_3COM_3C905C 0x9200
+
+/* 3Com Commands, top 5 bits are command and bottom 11 bits are parameters */
+
+#define TotalReset (0<<11)
+#define SelectWindow (1<<11)
+#define StartCoax (2<<11)
+#define RxDisable (3<<11)
+#define RxEnable (4<<11)
+#define RxReset (5<<11)
+#define UpStall (6<<11)
+#define UpUnstall (6<<11)+1
+#define DownStall (6<<11)+2
+#define DownUnstall (6<<11)+3
+#define RxDiscard (8<<11)
+#define TxEnable (9<<11)
+#define TxDisable (10<<11)
+#define TxReset (11<<11)
+#define FakeIntr (12<<11)
+#define AckIntr (13<<11)
+#define SetIntrEnb (14<<11)
+#define SetStatusEnb (15<<11)
+#define SetRxFilter (16<<11)
+#define SetRxThreshold (17<<11)
+#define SetTxThreshold (18<<11)
+#define SetTxStart (19<<11)
+#define StartDMAUp (20<<11)
+#define StartDMADown (20<<11)+1
+#define StatsEnable (21<<11)
+#define StatsDisable (22<<11)
+#define StopCoax (23<<11)
+#define SetFilterBit (25<<11)
+
+/* The SetRxFilter command accepts the following classes */
+
+#define RxStation 1
+#define RxMulticast 2
+#define RxBroadcast 4
+#define RxProm 8
+
+/* 3Com status word defnitions */
+
+#define IntLatch 0x0001
+#define HostError 0x0002
+#define TxComplete 0x0004
+#define TxAvailable 0x0008
+#define RxComplete 0x0010
+#define RxEarly 0x0020
+#define IntReq 0x0040
+#define StatsFull 0x0080
+#define DMADone (1<<8)
+#define DownComplete (1<<9)
+#define UpComplete (1<<10)
+#define DMAInProgress (1<<11) /* DMA controller is still busy.*/
+#define CmdInProgress (1<<12) /* EL3_CMD is still busy.*/
+
+/* Polling Registers */
+
+#define DnPoll 0x2d
+#define UpPoll 0x3d
+
+/* Register window 0 offets */
+
+#define Wn0EepromCmd 10 /* Window 0: EEPROM command register. */
+#define Wn0EepromData 12 /* Window 0: EEPROM results register. */
+#define IntrStatus 0x0E /* Valid in all windows. */
+
+/* Register window 0 EEPROM bits */
+
+#define EEPROM_Read 0x80
+#define EEPROM_WRITE 0x40
+#define EEPROM_ERASE 0xC0
+#define EEPROM_EWENB 0x30 /* Enable erasing/writing for 10 msec. */
+#define EEPROM_EWDIS 0x00 /* Disable EWENB before 10 msec timeout. */
+
+/* EEPROM locations. */
+
+#define PhysAddr01 0
+#define PhysAddr23 1
+#define PhysAddr45 2
+#define ModelID 3
+#define EtherLink3ID 7
+#define IFXcvrIO 8
+#define IRQLine 9
+#define NodeAddr01 10
+#define NodeAddr23 11
+#define NodeAddr45 12
+#define DriverTune 13
+#define Checksum 15
+
+/* Register window 1 offsets, the window used in normal operation */
+
+#define TX_FIFO 0x10
+#define RX_FIFO 0x10
+#define RxErrors 0x14
+#define RxStatus 0x18
+#define Timer 0x1A
+#define TxStatus 0x1B
+#define TxFree 0x1C /* Remaining free bytes in Tx buffer. */
+
+/* Register Window 2 */
+
+#define Wn2_ResetOptions 12
+
+/* Register Window 3: MAC/config bits */
+
+#define Wn3_Config 0 /* Internal Configuration */
+#define Wn3_MAC_Ctrl 6
+#define Wn3_Options 8
+
+#define BFEXT(value, offset, bitcount) \
+ ((((unsigned long)(value)) >> (offset)) & ((1 << (bitcount)) - 1))
+
+#define BFINS(lhs, rhs, offset, bitcount) \
+ (((lhs) & ~((((1 << (bitcount)) - 1)) << (offset))) | \
+ (((rhs) & ((1 << (bitcount)) - 1)) << (offset)))
+
+#define RAM_SIZE(v) BFEXT(v, 0, 3)
+#define RAM_WIDTH(v) BFEXT(v, 3, 1)
+#define RAM_SPEED(v) BFEXT(v, 4, 2)
+#define ROM_SIZE(v) BFEXT(v, 6, 2)
+#define RAM_SPLIT(v) BFEXT(v, 16, 2)
+#define XCVR(v) BFEXT(v, 20, 4)
+#define AUTOSELECT(v) BFEXT(v, 24, 1)
+
+/* Register Window 4: Xcvr/media bits */
+
+#define Wn4_FIFODiag 4
+#define Wn4_NetDiag 6
+#define Wn4_PhysicalMgmt 8
+#define Wn4_Media 10
+
+#define Media_SQE 0x0008 /* Enable SQE error counting for AUI. */
+#define Media_10TP 0x00C0 /* Enable link beat and jabber for 10baseT. */
+#define Media_Lnk 0x0080 /* Enable just link beat for 100TX/100FX. */
+#define Media_LnkBeat 0x0800
+
+/* Register Window 7: Bus Master control */
+
+#define Wn7_MasterAddr 0
+#define Wn7_MasterLen 6
+#define Wn7_MasterStatus 12
+
+/* Boomerang bus master control registers. */
+
+#define PktStatus 0x20
+#define DownListPtr 0x24
+#define FragAddr 0x28
+#define FragLen 0x2c
+#define TxFreeThreshold 0x2f
+#define UpPktStatus 0x30
+#define UpListPtr 0x38
+
+/* The Rx and Tx descriptor lists. */
+
+#define LAST_FRAG 0x80000000 /* Last Addr/Len pair in descriptor. */
+#define DN_COMPLETE 0x00010000 /* This packet has been downloaded */
+
+struct rx_desc_3com {
+ u32 next; /* Last entry points to 0 */
+ u32 status; /* FSH -> Frame Start Header */
+ u32 addr; /* Up to 63 addr/len pairs possible */
+ u32 length; /* Set LAST_FRAG to indicate last pair */
+};
+
+/* Values for the Rx status entry. */
+
+#define RxDComplete 0x00008000
+#define RxDError 0x4000
+#define IPChksumErr (1<<25)
+#define TCPChksumErr (1<<26)
+#define UDPChksumErr (1<<27)
+#define IPChksumValid (1<<29)
+#define TCPChksumValid (1<<30)
+#define UDPChksumValid (1<<31)
+
+struct tx_desc_3com {
+ u32 next; /* Last entry points to 0 */
+ u32 status; /* bits 0:12 length, others see below */
+ u32 addr;
+ u32 length;
+};
+
+/* Values for the Tx status entry. */
+
+#define CRCDisable 0x2000
+#define TxDComplete 0x8000
+#define AddIPChksum 0x02000000
+#define AddTCPChksum 0x04000000
+#define AddUDPChksum 0x08000000
+#define TxIntrUploaded 0x80000000 /* IRQ when in FIFO, but maybe not sent. */
+
+/* XCVR Types */
+
+#define XCVR_10baseT 0
+#define XCVR_AUI 1
+#define XCVR_10baseTOnly 2
+#define XCVR_10base2 3
+#define XCVR_100baseTx 4
+#define XCVR_100baseFx 5
+#define XCVR_MII 6
+#define XCVR_NWAY 8
+#define XCVR_ExtMII 9
+#define XCVR_Default 10 /* I don't think this is correct -> should have been 0x10 if Auto Negotiate */
+
+struct descriptor { /* A generic descriptor. */
+ u32 next; /* Last entry points to 0 */
+ u32 status; /* FSH -> Frame Start Header */
+ u32 addr; /* Up to 63 addr/len pairs possible */
+ u32 length; /* Set LAST_FRAG to indicate last pair */
+};
+
+/* Misc. definitions */
+
+#define NUM_RX_DESC PKTBUFSRX * 10
+#define NUM_TX_DESC 1 /* Number of TX descriptors */
+
+#define TOUT_LOOP 1000000
+
+#define ETH_ALEN 6
+
+#define EL3WINDOW(dev, win_num) ETH_OUTW(dev, SelectWindow + (win_num), EL3_CMD)
+#define EL3_CMD 0x0e
+#define EL3_STATUS 0x0e
+
+
+#undef ETH_DEBUG
+
+#ifdef ETH_DEBUG
+#define PRINTF(fmt,args...) printf (fmt ,##args)
+#else
+#define PRINTF(fmt,args...)
+#endif
+
+
+static struct rx_desc_3com *rx_ring; /* RX descriptor ring */
+static struct tx_desc_3com *tx_ring; /* TX descriptor ring */
+static u8 rx_buffer[NUM_RX_DESC][PKTSIZE_ALIGN]; /* storage for the incoming messages */
+static int rx_next = 0; /* RX descriptor ring pointer */
+static int tx_next = 0; /* TX descriptor ring pointer */
+static int tx_threshold;
+
+static void init_rx_ring(struct eth_device* dev);
+static void purge_tx_ring(struct eth_device* dev);
+
+static void read_hw_addr(struct eth_device* dev, bd_t * bis);
+
+static int eth_3com_init(struct eth_device* dev, bd_t *bis);
+static int eth_3com_send(struct eth_device* dev, volatile void *packet, int length);
+static int eth_3com_recv(struct eth_device* dev);
+static void eth_3com_halt(struct eth_device* dev);
+
+#define io_to_phys(a) pci_io_to_phys((pci_dev_t)dev->priv, a)
+#define phys_to_io(a) pci_phys_to_io((pci_dev_t)dev->priv, a)
+#define mem_to_phys(a) pci_mem_to_phys((pci_dev_t)dev->priv, a)
+#define phys_to_mem(a) pci_phys_to_mem((pci_dev_t)dev->priv, a)
+
+static inline int ETH_INL(struct eth_device* dev, u_long addr)
+{
+ __asm volatile ("eieio");
+ return le32_to_cpu(*(volatile u32 *)io_to_phys(addr + dev->iobase));
+}
+
+static inline int ETH_INW(struct eth_device* dev, u_long addr)
+{
+ __asm volatile ("eieio");
+ return le16_to_cpu(*(volatile u16 *)io_to_phys(addr + dev->iobase));
+}
+
+static inline int ETH_INB(struct eth_device* dev, u_long addr)
+{
+ __asm volatile ("eieio");
+ return *(volatile u8 *)io_to_phys(addr + dev->iobase);
+}
+
+static inline void ETH_OUTB(struct eth_device* dev, int command, u_long addr)
+{
+ *(volatile u8 *)io_to_phys(addr + dev->iobase) = command;
+ __asm volatile ("eieio");
+}
+
+static inline void ETH_OUTW(struct eth_device* dev, int command, u_long addr)
+{
+ *(volatile u16 *)io_to_phys(addr + dev->iobase) = cpu_to_le16(command);
+ __asm volatile ("eieio");
+}
+
+static inline void ETH_OUTL(struct eth_device* dev, int command, u_long addr)
+{
+ *(volatile u32 *)io_to_phys(addr + dev->iobase) = cpu_to_le32(command);
+ __asm volatile ("eieio");
+}
+
+static inline int ETH_STATUS(struct eth_device* dev)
+{
+ __asm volatile ("eieio");
+ return le16_to_cpu(*(volatile u16 *)io_to_phys(EL3_STATUS + dev->iobase));
+}
+
+static inline void ETH_CMD(struct eth_device* dev, int command)
+{
+ *(volatile u16 *)io_to_phys(EL3_CMD + dev->iobase) = cpu_to_le16(command);
+ __asm volatile ("eieio");
+}
+
+/* Command register is always in the same spot in all the register windows */
+/* This function issues a command and waits for it so complete by checking the CmdInProgress bit */
+
+static int issue_and_wait(struct eth_device* dev, int command)
+{
+
+ int i, status;
+
+ ETH_CMD(dev, command);
+ for (i = 0; i < 2000; i++) {
+ status = ETH_STATUS(dev);
+ //printf ("Issue: status 0x%4x.\n", status);
+ if (!(status & CmdInProgress))
+ return 1;
+ }
+
+ /* OK, that didn't work. Do it the slow way. One second */
+ for (i = 0; i < 100000; i++) {
+ status = ETH_STATUS(dev);
+ //printf ("Issue: status 0x%4x.\n", status);
+ return 1;
+ udelay(10);
+ }
+ PRINTF("Ethernet command: 0x%4x did not complete! Status: 0x%4x\n", command, ETH_STATUS(dev) );
+ return 0;
+}
+
+/* Determine network media type and set up 3com accordingly */
+/* I think I'm going to start with something known first like 10baseT */
+
+static int auto_negotiate(struct eth_device* dev)
+{
+ int i;
+
+ EL3WINDOW(dev, 1);
+
+ // Wait for Auto negotiation to complete
+ for (i = 0; i <= 1000; i++)
+ {
+ if (ETH_INW(dev, 2) & 0x04)
+ break;
+ udelay(100);
+
+ if (i == 1000)
+ {
+ PRINTF("Error: Auto negotiation failed\n");
+ return 0;
+ }
+ }
+
+
+
+ return 1;
+}
+
+void eth_interrupt(struct eth_device *dev)
+{
+ u16 status = ETH_STATUS(dev);
+
+ printf("eth0: status = 0x%04x\n", status);
+
+ if (!(status & IntLatch))
+ return;
+
+ if (status & (1<<6))
+ {
+ ETH_CMD(dev, AckIntr | (1<<6));
+ printf("Acknowledged Interrupt command\n");
+ }
+
+ if (status & DownComplete)
+ {
+ ETH_CMD(dev, AckIntr | DownComplete);
+ printf("Acknowledged DownComplete\n");
+ }
+
+ if (status & UpComplete)
+ {
+ ETH_CMD(dev, AckIntr | UpComplete);
+ printf("Acknowledged UpComplete\n");
+ }
+
+ ETH_CMD(dev, AckIntr | IntLatch);
+ printf("Acknowledged IntLatch\n");
+}
+
+int eth_3com_initialize(bd_t *bis)
+{
+ u32 eth_iobase = 0, status;
+ int card_number = 0, ret;
+ struct eth_device* dev;
+ pci_dev_t devno;
+ char *s;
+
+ s = getenv("3com_base");
+
+ /* Find ethernet controller on the PCI bus */
+
+ if ((devno = pci_find_device(PCI_VENDOR_ID_3COM, PCI_DEVICE_ID_3COM_3C905C, 0)) < 0)
+ {
+ PRINTF("Error: Cannot find the ethernet device on the PCI bus\n");
+ goto Done;
+ }
+
+ if (s)
+ {
+ unsigned long base = atoi(s);
+ pci_write_config_dword(devno, PCI_BASE_ADDRESS_0, base | 0x01);
+ }
+
+ ret = pci_read_config_dword(devno, PCI_BASE_ADDRESS_0, ð_iobase);
+ eth_iobase &= ~0xf;
+
+ PRINTF("eth: 3Com Found at Address: 0x%x\n", eth_iobase);
+
+ pci_write_config_dword(devno, PCI_COMMAND, PCI_COMMAND_IO | PCI_COMMAND_MEMORY | PCI_COMMAND_MASTER);
+
+ /* Check if I/O accesses and Bus Mastering are enabled */
+
+ ret = pci_read_config_dword(devno, PCI_COMMAND, &status);
+
+ if (!(status & PCI_COMMAND_IO))
+ {
+ printf("Error: Cannot enable IO access.\n");
+ goto Done;
+ }
+
+ if (!(status & PCI_COMMAND_MEMORY))
+ {
+ printf("Error: Cannot enable MEMORY access.\n");
+ goto Done;
+ }
+
+ if (!(status & PCI_COMMAND_MASTER))
+ {
+ printf("Error: Cannot enable Bus Mastering.\n");
+ goto Done;
+ }
+
+ dev = (struct eth_device*) malloc(sizeof(*dev)); //struct eth_device));
+
+ sprintf(dev->name, "3Com 3c920c#%d", card_number);
+ dev->iobase = eth_iobase;
+ dev->priv = (void*) devno;
+ dev->init = eth_3com_init;
+ dev->halt = eth_3com_halt;
+ dev->send = eth_3com_send;
+ dev->recv = eth_3com_recv;
+
+ eth_register(dev);
+
+/* { */
+/* char interrupt; */
+/* devno = pci_find_device(PCI_VENDOR_ID_3COM, PCI_DEVICE_ID_3COM_3C905C, 0); */
+/* pci_read_config_byte(devno, PCI_INTERRUPT_LINE, &interrupt); */
+
+/* printf("Installing eth0 interrupt handler to %d\n", interrupt); */
+/* irq_install_handler(interrupt, eth_interrupt, dev); */
+/* } */
+
+ card_number++;
+
+ /* Set the latency timer for value */
+ s = getenv("3com_latency");
+ if (s)
+ {
+ ret = pci_write_config_byte(devno, PCI_LATENCY_TIMER, (unsigned char)atoi(s));
+ }
+ else ret = pci_write_config_byte(devno, PCI_LATENCY_TIMER, 0x0a);
+
+ read_hw_addr(dev, bis); /* get the MAC address from Window 2*/
+
+ /* Reset the ethernet controller */
+
+ PRINTF ("Issuing reset command....\n");
+ if (!issue_and_wait(dev, TotalReset))
+ {
+ printf("Error: Cannot reset ethernet controller.\n");
+ goto Done;
+ }
+ else
+ PRINTF ("Ethernet controller reset.\n");
+
+ /* allocate memory for rx and tx rings */
+
+ if(!(rx_ring = memalign(sizeof(struct rx_desc_3com) * NUM_RX_DESC, 16)))
+ {
+ PRINTF ("Cannot allocate memory for RX_RING.....\n");
+ goto Done;
+ }
+
+ if (!(tx_ring = memalign(sizeof(struct tx_desc_3com) * NUM_TX_DESC, 16)))
+ {
+ PRINTF ("Cannot allocate memory for TX_RING.....\n");
+ goto Done;
+ }
+
+Done:
+ return status;
+}
+
+
+static int eth_3com_init(struct eth_device* dev, bd_t *bis)
+{
+ int i, status = 0;
+ int tx_cur, loop;
+ u16 status_enable, intr_enable;
+ struct descriptor *ias_cmd;
+
+ /* Determine what type of network the machine is connected to */
+ /* presently drops the connect to 10Mbps */
+
+ if (!auto_negotiate(dev))
+ {
+ printf("Error: Cannot determine network media.\n");
+ goto Done;
+ }
+
+ issue_and_wait(dev, TxReset);
+ issue_and_wait(dev, RxReset|0x04);
+
+ /* Switch to register set 7 for normal use. */
+ EL3WINDOW(dev, 7);
+
+ /* Initialize Rx and Tx rings */
+
+ init_rx_ring(dev);
+ purge_tx_ring(dev);
+
+ ETH_CMD(dev, SetRxFilter | RxStation | RxBroadcast | RxProm);
+
+ issue_and_wait(dev,SetTxStart|0x07ff);
+
+ /* Below sets which indication bits to be seen. */
+
+ status_enable = SetStatusEnb | HostError | DownComplete | UpComplete | (1<<6);
+ ETH_CMD(dev, status_enable);
+
+ /* Below sets no bits are to cause an interrupt since this is just polling */
+
+ intr_enable = SetIntrEnb;
+// intr_enable = SetIntrEnb | (1<<9) | (1<<10) | (1<<6);
+ ETH_CMD(dev, intr_enable);
+ ETH_OUTB(dev, 127, UpPoll);
+
+ /* Ack all pending events, and set active indicator mask */
+
+ ETH_CMD(dev, AckIntr | IntLatch | TxAvailable | RxEarly | IntReq);
+ ETH_CMD(dev, intr_enable);
+
+ /* Tell the adapter where the RX ring is located */
+
+ issue_and_wait(dev,UpStall); /* Stall and set the UplistPtr */
+ ETH_OUTL(dev, (u32)&rx_ring[rx_next], UpListPtr);
+ ETH_CMD(dev, RxEnable); /* Enable the receiver. */
+ issue_and_wait(dev,UpUnstall);
+
+ /* Send the Individual Address Setup frame */
+
+ tx_cur = tx_next;
+ tx_next = ((tx_next+1) % NUM_TX_DESC);
+
+ ias_cmd = (struct descriptor *)&tx_ring[tx_cur];
+ ias_cmd->status = cpu_to_le32(1<<31); /* set DnIndicate bit. */
+ ias_cmd->next = 0;
+ ias_cmd->addr = cpu_to_le32((u32)&bis->bi_enetaddr[0]);
+ ias_cmd->length = cpu_to_le32(6 | LAST_FRAG);
+
+ /* Tell the adapter where the TX ring is located */
+
+ ETH_CMD(dev, TxEnable); /* Enable transmitter. */
+ issue_and_wait(dev, DownStall); /* Stall and set the DownListPtr. */
+ ETH_OUTL(dev, (u32)&tx_ring[tx_cur], DownListPtr);
+ issue_and_wait(dev, DownUnstall);
+ for (i=0; !(ETH_STATUS(dev) & DownComplete); i++)
+ {
+ if (i >= TOUT_LOOP)
+ {
+ PRINTF("TX Ring status (Init): 0x%4x\n", le32_to_cpu(tx_ring[tx_cur].status));
+ PRINTF("ETH_STATUS: 0x%x\n", ETH_STATUS(dev));
+ goto Done;
+ }
+ }
+ if (ETH_STATUS(dev) & DownComplete) /* If DownLoad Complete ACK the bit */
+ {
+ ETH_CMD(dev, AckIntr | DownComplete); /* acknowledge the indication bit */
+ issue_and_wait(dev, DownStall); /* stall and clear DownListPtr */
+ ETH_OUTL(dev, 0, DownListPtr);
+ issue_and_wait(dev, DownUnstall);
+ }
+ status = 1;
+
+Done:
+ return status;
+}
+
+int eth_3com_send(struct eth_device* dev, volatile void *packet, int length)
+{
+ int i, status = 0;
+ int tx_cur;
+
+ if (length <= 0)
+ {
+ PRINTF("eth: bad packet size: %d\n", length);
+ goto Done;
+ }
+
+ tx_cur = tx_next;
+ tx_next = (tx_next+1) % NUM_TX_DESC;
+
+ tx_ring[tx_cur].status = cpu_to_le32(1<<31); /* set DnIndicate bit */
+ tx_ring[tx_cur].next = 0;
+ tx_ring[tx_cur].addr = cpu_to_le32(((u32) packet));
+ tx_ring[tx_cur].length = cpu_to_le32(length | LAST_FRAG);
+
+ /* Send the packet */
+
+ issue_and_wait(dev, DownStall); /* stall and set the DownListPtr */
+ ETH_OUTL(dev, (u32) &tx_ring[tx_cur], DownListPtr);
+ issue_and_wait(dev, DownUnstall);
+
+ for (i=0; !(ETH_STATUS(dev) & DownComplete); i++)
+ {
+ if (i >= TOUT_LOOP)
+ {
+ PRINTF("TX Ring status (send): 0x%4x\n", le32_to_cpu(tx_ring[tx_cur].status));
+ goto Done;
+ }
+ }
+ if (ETH_STATUS(dev) & DownComplete) /* If DownLoad Complete ACK the bit */
+ {
+ ETH_CMD(dev, AckIntr | DownComplete); /* acknowledge the indication bit */
+ issue_and_wait(dev, DownStall); /* stall and clear DownListPtr */
+ ETH_OUTL(dev, 0, DownListPtr);
+ issue_and_wait(dev, DownUnstall);
+ }
+ status=1;
+ Done:
+ return status;
+}
+
+void PrintPacket (uchar *packet, int length)
+{
+int loop;
+uchar *ptr;
+
+ printf ("Printing packet of length %x.\n\n", length);
+ ptr = packet;
+ for (loop = 1; loop <= length; loop++)
+ {
+ printf ("%2x ", *ptr++);
+ if ((loop % 40)== 0)
+ printf ("\n");
+ }
+}
+
+int eth_3com_recv(struct eth_device* dev)
+{
+ u16 stat = 0;
+ u32 status;
+ int rx_prev, length = 0;
+
+ while (!(ETH_STATUS(dev) & UpComplete)) /* wait on receipt of packet */
+ ;
+
+ status = le32_to_cpu(rx_ring[rx_next].status); /* packet status */
+
+ while (status & (1<<15))
+ {
+ /* A packet has been received */
+
+ if (status & (1<<15))
+ {
+ /* A valid frame received */
+
+ length = le32_to_cpu(rx_ring[rx_next].status) & 0x1fff; /* length is in bits 0 - 12 */
+
+ /* Pass the packet up to the protocol layers */
+
+ NetReceive((uchar *)le32_to_cpu(rx_ring[rx_next].addr), length);
+ rx_ring[rx_next].status = 0; /* clear the status word */
+ ETH_CMD(dev, AckIntr | UpComplete);
+ issue_and_wait(dev, UpUnstall);
+ }
+ else
+ if (stat & HostError)
+ {
+ /* There was an error */
+
+ printf("Rx error status: 0x%4x\n", stat);
+ init_rx_ring(dev);
+ goto Done;
+ }
+
+ rx_prev = rx_next;
+ rx_next = (rx_next + 1) % NUM_RX_DESC;
+ stat = ETH_STATUS(dev); /* register status */
+ status = le32_to_cpu(rx_ring[rx_next].status); /* packet status */
+ }
+
+Done:
+ return length;
+}
+
+void eth_3com_halt(struct eth_device* dev)
+{
+ if (!(dev->iobase))
+ {
+ goto Done;
+ }
+
+ issue_and_wait(dev, DownStall); /* shut down transmit and receive */
+ issue_and_wait(dev, UpStall);
+ issue_and_wait(dev, RxDisable);
+ issue_and_wait(dev, TxDisable);
+
+// free(tx_ring); /* release memory allocated to the DPD and UPD rings */
+// free(rx_ring);
+
+Done:
+ return;
+}
+
+static void init_rx_ring(struct eth_device* dev)
+{
+ int i;
+
+ PRINTF("Initializing rx_ring. rx_buffer = %p\n", rx_buffer);
+ issue_and_wait(dev, UpStall);
+
+ for (i = 0; i < NUM_RX_DESC; i++)
+ {
+ rx_ring[i].next = cpu_to_le32(((u32) &rx_ring[(i+1) % NUM_RX_DESC]));
+ rx_ring[i].status = 0;
+ rx_ring[i].addr = cpu_to_le32(((u32) &rx_buffer[i][0]));
+ rx_ring[i].length = cpu_to_le32(PKTSIZE_ALIGN | LAST_FRAG);
+ }
+ rx_next = 0;
+}
+
+static void purge_tx_ring(struct eth_device* dev)
+{
+ int i;
+
+ PRINTF("Purging tx_ring.\n");
+
+ tx_next = 0;
+
+ for (i = 0; i < NUM_TX_DESC; i++)
+ {
+ tx_ring[i].next = 0;
+ tx_ring[i].status = 0;
+ tx_ring[i].addr = 0;
+ tx_ring[i].length = 0;
+ }
+}
+
+static void read_hw_addr(struct eth_device* dev, bd_t *bis)
+{
+ u8 hw_addr[ETH_ALEN];
+ unsigned int eeprom[0x40];
+ unsigned int checksum = 0;
+ int i, j, timer;
+
+ /* Read the station address from the EEPROM. */
+
+ EL3WINDOW(dev, 0);
+ for (i = 0; i < 0x40; i++)
+ {
+ ETH_OUTW(dev, EEPROM_Read + i, Wn0EepromCmd);
+ /* Pause for at least 162 us. for the read to take place. */
+ for (timer = 10; timer >= 0; timer--)
+ {
+ udelay(162);
+ if ((ETH_INW(dev, Wn0EepromCmd) & 0x8000) == 0)
+ break;
+ }
+ eeprom[i] = ETH_INW(dev, Wn0EepromData);
+ }
+
+ /* Checksum calculation. I'm not sure about this part and there seems to be a bug on the 3com side of things */
+
+ for (i = 0; i < 0x21; i++)
+ checksum ^= eeprom[i];
+ checksum = (checksum ^ (checksum >> 8)) & 0xff;
+
+ if (checksum != 0xbb)
+ printf(" *** INVALID EEPROM CHECKSUM %4.4x *** \n", checksum);
+
+ for (i = 0, j = 0; i < 3; i++)
+ {
+ hw_addr[j++] = (u8)((eeprom[i+10] >> 8) & 0xff);
+ hw_addr[j++] = (u8)(eeprom[i+10] & 0xff);
+ }
+
+ /* MAC Address is in window 2, write value from EEPROM to window 2 */
+
+ EL3WINDOW(dev, 2);
+ for (i = 0; i < 6; i++)
+ ETH_OUTB(dev, hw_addr[i], i);
+
+ for (j = 0; j < ETH_ALEN; j+=2)
+ {
+ hw_addr[j] = (u8)(ETH_INW(dev, j) & 0xff);
+ hw_addr[j+1] = (u8)((ETH_INW(dev, j) >> 8) & 0xff);
+ }
+
+ for (i=0;i<ETH_ALEN;i++)
+ {
+ if (hw_addr[i] != bis->bi_enetaddr[i])
+ {
+/* printf("Warning: HW address don't match:\n"); */
+/* printf("Address in 3Com Window 2 is " */
+/* "%02X:%02X:%02X:%02X:%02X:%02X\n", */
+/* hw_addr[0], hw_addr[1], hw_addr[2], */
+/* hw_addr[3], hw_addr[4], hw_addr[5]); */
+/* printf("Address used by U-Boot is " */
+/* "%02X:%02X:%02X:%02X:%02X:%02X\n", */
+/* bis->bi_enetaddr[0], bis->bi_enetaddr[1], */
+/* bis->bi_enetaddr[2], bis->bi_enetaddr[3], */
+/* bis->bi_enetaddr[4], bis->bi_enetaddr[5]); */
+/* goto Done; */
+ char buffer[256];
+ if (bis->bi_enetaddr[0] == 0 && bis->bi_enetaddr[1] == 0 &&
+ bis->bi_enetaddr[2] == 0 && bis->bi_enetaddr[3] == 0 &&
+ bis->bi_enetaddr[4] == 0 && bis->bi_enetaddr[5] == 0)
+ {
+
+ sprintf(buffer, "%02X:%02X:%02X:%02X:%02X:%02X",
+ hw_addr[0], hw_addr[1], hw_addr[2],
+ hw_addr[3], hw_addr[4], hw_addr[5]);
+ setenv("ethaddr", buffer);
+ }
+ }
+ }
+
+ for(i=0; i<ETH_ALEN; i++) dev->enetaddr[i] = hw_addr[i];
+
+Done:
+ return;
+}
+
diff --git a/board/MAI/AmigaOneG3SE/flash.c b/board/MAI/AmigaOneG3SE/flash.c
new file mode 100644
index 00000000000..409b955fd59
--- /dev/null
+++ b/board/MAI/AmigaOneG3SE/flash.c
@@ -0,0 +1,35 @@
+#include <common.h>
+#include <flash.h>
+
+flash_info_t flash_info[CFG_MAX_FLASH_BANKS];
+
+
+unsigned long flash_init(void)
+{
+ int i;
+
+ for (i = 0; i < CFG_MAX_FLASH_BANKS; i++)
+ {
+ flash_info[i].flash_id = FLASH_UNKNOWN;
+ flash_info[i].sector_count = 0;
+ flash_info[i].size = 0;
+ }
+
+
+ return 1;
+}
+
+int flash_erase(flash_info_t *info, int s_first, int s_last)
+{
+ return 1;
+}
+
+void flash_print_info(flash_info_t *info)
+{
+ printf("No flashrom installed\n");
+}
+
+int write_buff (flash_info_t *info, uchar *src, ulong addr, ulong cnt)
+{
+ return 0;
+}
diff --git a/board/MAI/AmigaOneG3SE/flash_new.c b/board/MAI/AmigaOneG3SE/flash_new.c
new file mode 100644
index 00000000000..6eebeba0f21
--- /dev/null
+++ b/board/MAI/AmigaOneG3SE/flash_new.c
@@ -0,0 +1,652 @@
+/*
+ * (C) Copyright 2001
+ * Josh Huber <huber@mclx.com>, Mission Critical Linux, Inc.
+ *
+ * (C) Copyright 2002
+ * Wolfgang Denk, DENX Software Engineering, wd@denx.de.
+ *
+ * See file CREDITS for list of people who contributed to this
+ * project.
+ *
+ * This program is free software; you can redistribute it and/or
+ * modify it under the terms of the GNU General Public License as
+ * published by the Free Software Foundation; either version 2 of
+ * the License, or (at your option) any later version.
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with this program; if not, write to the Free Software
+ * Foundation, Inc., 59 Temple Place, Suite 330, Boston,
+ * MA 02111-1307 USA
+ */
+
+#include <common.h>
+#include <flash.h>
+#include <asm/io.h>
+#include "memio.h"
+
+/*---------------------------------------------------------------------*/
+#undef DEBUG_FLASH
+//#define DEBUG_FLASH
+
+#ifdef DEBUG_FLASH
+#define DEBUGF(fmt,args...) printf(fmt ,##args)
+#else
+#define DEBUGF(fmt,args...)
+#endif
+/*---------------------------------------------------------------------*/
+
+flash_info_t flash_info[CFG_MAX_FLASH_BANKS];
+
+static ulong flash_get_size (ulong addr, flash_info_t *info);
+static int flash_get_offsets (ulong base, flash_info_t *info);
+static int write_word (flash_info_t *info, ulong dest, ulong data);
+static void flash_reset (ulong addr);
+
+int flash_xd_nest;
+
+static void flash_to_xd(void)
+{
+ unsigned char x;
+
+ flash_xd_nest ++;
+
+ if (flash_xd_nest == 1)
+ {
+ DEBUGF("Flash on XD\n");
+ x = pci_read_cfg_byte(0, 0, 0x74);
+ pci_write_cfg_byte(0, 0, 0x74, x|1);
+ }
+}
+
+static void flash_to_mem(void)
+{
+ unsigned char x;
+
+ flash_xd_nest --;
+
+ if (flash_xd_nest == 0)
+ {
+ DEBUGF("Flash on memory bus\n");
+ x = pci_read_cfg_byte(0, 0, 0x74);
+ pci_write_cfg_byte(0, 0, 0x74, x&0xFE);
+ }
+}
+
+unsigned long flash_init_old(void)
+{
+ int i;
+
+ for (i = 0; i < CFG_MAX_FLASH_BANKS; i++)
+ {
+ flash_info[i].flash_id = FLASH_UNKNOWN;
+ flash_info[i].sector_count = 0;
+ flash_info[i].size = 0;
+ }
+
+
+ return 1;
+}
+
+unsigned long flash_init (void)
+{
+ unsigned int i;
+ unsigned long flash_size = 0;
+
+ flash_xd_nest = 0;
+
+ flash_to_xd();
+
+ /* Init: no FLASHes known */
+ for (i=0; i<CFG_MAX_FLASH_BANKS; ++i) {
+ flash_info[i].flash_id = FLASH_UNKNOWN;
+ flash_info[i].sector_count = 0;
+ flash_info[i].size = 0;
+ }
+
+ DEBUGF("\n## Get flash size @ 0x%08x\n", CFG_FLASH_BASE);
+
+ flash_size = flash_get_size (CFG_FLASH_BASE, flash_info);
+
+ DEBUGF("## Flash bank size: %08lx\n", flash_size);
+
+ if (flash_size) {
+#if CFG_MONITOR_BASE >= CFG_FLASH_BASE && \
+ CFG_MONITOR_BASE < CFG_FLASH_BASE + CFG_FLASH_MAX_SIZE
+ /* monitor protection ON by default */
+ flash_protect(FLAG_PROTECT_SET,
+ CFG_MONITOR_BASE,
+ CFG_MONITOR_BASE + CFG_MONITOR_LEN - 1,
+ &flash_info[0]);
+#endif
+
+#ifdef CFG_ENV_IS_IN_FLASH
+ /* ENV protection ON by default */
+ flash_protect(FLAG_PROTECT_SET,
+ CFG_ENV_ADDR,
+ CFG_ENV_ADDR + CFG_ENV_SECT_SIZE - 1,
+ &flash_info[0]);
+#endif
+
+ } else {
+ puts ("Warning: the BOOT Flash is not initialised !");
+ }
+
+ flash_to_mem();
+
+ return flash_size;
+}
+
+/*
+ * The following code cannot be run from FLASH!
+ */
+static ulong flash_get_size (ulong addr, flash_info_t *info)
+{
+ short i;
+ uchar value;
+ uchar *x = (uchar *)addr;
+
+ flash_to_xd();
+
+ /* Write auto select command: read Manufacturer ID */
+ x[0x0555] = 0xAA;
+ __asm volatile ("sync\n eieio");
+ x[0x02AA] = 0x55;
+ __asm volatile ("sync\n eieio");
+ x[0x0555] = 0x90;
+ __asm volatile ("sync\n eieio");
+
+ value = x[0];
+ __asm volatile ("sync\n eieio");
+
+ DEBUGF("Manuf. ID @ 0x%08lx: 0x%08x\n", (ulong)addr, value);
+
+ switch (value | (value << 16)) {
+ case AMD_MANUFACT:
+ info->flash_id = FLASH_MAN_AMD;
+ break;
+
+ case FUJ_MANUFACT:
+ info->flash_id = FLASH_MAN_FUJ;
+ break;
+
+ case STM_MANUFACT:
+ info->flash_id = FLASH_MAN_STM;
+ break;
+
+ default:
+ info->flash_id = FLASH_UNKNOWN;
+ info->sector_count = 0;
+ info->size = 0;
+ flash_reset (addr);
+ return 0;
+ }
+
+ value = x[1];
+ __asm volatile ("sync\n eieio");
+
+ DEBUGF("Device ID @ 0x%08lx: 0x%08x\n", addr+1, value);
+
+ switch (value) {
+ case AMD_ID_F040B:
+ DEBUGF("Am29F040B\n");
+ info->flash_id += FLASH_AM040;
+ info->sector_count = 8;
+ info->size = 0x00080000;
+ break; /* => 512 kB */
+
+ case AMD_ID_LV040B:
+ DEBUGF("Am29LV040B\n");
+ info->flash_id += FLASH_AM040;
+ info->sector_count = 8;
+ info->size = 0x00080000;
+ break; /* => 512 kB */
+
+ case AMD_ID_LV400T:
+ DEBUGF("Am29LV400T\n");
+ info->flash_id += FLASH_AM400T;
+ info->sector_count = 11;
+ info->size = 0x00100000;
+ break; /* => 1 MB */
+
+ case AMD_ID_LV400B:
+ DEBUGF("Am29LV400B\n");
+ info->flash_id += FLASH_AM400B;
+ info->sector_count = 11;
+ info->size = 0x00100000;
+ break; /* => 1 MB */
+
+ case AMD_ID_LV800T:
+ DEBUGF("Am29LV800T\n");
+ info->flash_id += FLASH_AM800T;
+ info->sector_count = 19;
+ info->size = 0x00200000;
+ break; /* => 2 MB */
+
+ case AMD_ID_LV800B:
+ DEBUGF("Am29LV400B\n");
+ info->flash_id += FLASH_AM800B;
+ info->sector_count = 19;
+ info->size = 0x00200000;
+ break; /* => 2 MB */
+
+ case AMD_ID_LV160T:
+ DEBUGF("Am29LV160T\n");
+ info->flash_id += FLASH_AM160T;
+ info->sector_count = 35;
+ info->size = 0x00400000;
+ break; /* => 4 MB */
+
+ case AMD_ID_LV160B:
+ DEBUGF("Am29LV160B\n");
+ info->flash_id += FLASH_AM160B;
+ info->sector_count = 35;
+ info->size = 0x00400000;
+ break; /* => 4 MB */
+
+ case AMD_ID_LV320T:
+ DEBUGF("Am29LV320T\n");
+ info->flash_id += FLASH_AM320T;
+ info->sector_count = 67;
+ info->size = 0x00800000;
+ break; /* => 8 MB */
+
+#if 0
+ /* Has the same ID as AMD_ID_LV320T, to be fixed */
+ case AMD_ID_LV320B:
+ DEBUGF("Am29LV320B\n");
+ info->flash_id += FLASH_AM320B;
+ info->sector_count = 67;
+ info->size = 0x00800000;
+ break; /* => 8 MB */
+#endif
+
+ case AMD_ID_LV033C:
+ DEBUGF("Am29LV033C\n");
+ info->flash_id += FLASH_AM033C;
+ info->sector_count = 64;
+ info->size = 0x01000000;
+ break; /* => 16Mb */
+
+ case STM_ID_F040B:
+ DEBUGF("M29F040B\n");
+ info->flash_id += FLASH_AM040;
+ info->sector_count = 8;
+ info->size = 0x00080000;
+ break; /* => 512 kB */
+
+ default:
+ info->flash_id = FLASH_UNKNOWN;
+ flash_reset (addr);
+ flash_to_mem();
+ return (0); /* => no or unknown flash */
+
+ }
+
+ if (info->sector_count > CFG_MAX_FLASH_SECT) {
+ printf ("** ERROR: sector count %d > max (%d) **\n",
+ info->sector_count, CFG_MAX_FLASH_SECT);
+ info->sector_count = CFG_MAX_FLASH_SECT;
+ }
+
+ if (! flash_get_offsets (addr, info)) {
+ flash_reset (addr);
+ flash_to_mem();
+ return 0;
+ }
+
+ /* check for protected sectors */
+ for (i = 0; i < info->sector_count; i++) {
+ /* read sector protection at sector address, (A7 .. A0) = 0x02 */
+ /* D0 = 1 if protected */
+ value = in8(info->start[i] + 2);
+ iobarrier_rw();
+ info->protect[i] = (value & 1) != 0;
+ }
+
+ /*
+ * Reset bank to read mode
+ */
+ flash_reset (addr);
+
+ flash_to_mem();
+
+ return (info->size);
+}
+
+static int flash_get_offsets (ulong base, flash_info_t *info)
+{
+ unsigned int i;
+
+ switch (info->flash_id & FLASH_TYPEMASK) {
+ case FLASH_AM040:
+ /* set sector offsets for uniform sector type */
+ for (i = 0; i < info->sector_count; i++) {
+ info->start[i] = base + i * info->size /
+ info->sector_count;
+ }
+ break;
+ default:
+ return 0;
+ }
+
+ return 1;
+}
+
+int flash_erase (flash_info_t *info, int s_first, int s_last)
+{
+ volatile ulong addr = info->start[0];
+ int flag, prot, sect, l_sect;
+ ulong start, now, last;
+
+ flash_to_xd();
+
+ if (s_first < 0 || s_first > s_last) {
+ if (info->flash_id == FLASH_UNKNOWN) {
+ printf ("- missing\n");
+ } else {
+ printf ("- no sectors to erase\n");
+ }
+ flash_to_mem();
+ return 1;
+ }
+
+ if (info->flash_id == FLASH_UNKNOWN) {
+ printf ("Can't erase unknown flash type %08lx - aborted\n",
+ info->flash_id);
+ flash_to_mem();
+ return 1;
+ }
+
+ prot = 0;
+ for (sect=s_first; sect<=s_last; ++sect) {
+ if (info->protect[sect]) {
+ prot++;
+ }
+ }
+
+ if (prot) {
+ printf ("- Warning: %d protected sectors will not be erased!\n",
+ prot);
+ } else {
+ printf ("\n");
+ }
+
+ l_sect = -1;
+
+ /* Disable interrupts which might cause a timeout here */
+ flag = disable_interrupts();
+
+ out8(addr + 0x555, 0xAA);
+ iobarrier_rw();
+ out8(addr + 0x2AA, 0x55);
+ iobarrier_rw();
+ out8(addr + 0x555, 0x80);
+ iobarrier_rw();
+ out8(addr + 0x555, 0xAA);
+ iobarrier_rw();
+ out8(addr + 0x2AA, 0x55);
+ iobarrier_rw();
+
+ /* Start erase on unprotected sectors */
+ for (sect = s_first; sect<=s_last; sect++) {
+ if (info->protect[sect] == 0) { /* not protected */
+ addr = info->start[sect];
+ out8(addr, 0x30);
+ iobarrier_rw();
+ l_sect = sect;
+ }
+ }
+
+ /* re-enable interrupts if necessary */
+ if (flag)
+ enable_interrupts();
+
+ /* wait at least 80us - let's wait 1 ms */
+ udelay (1000);
+
+ /*
+ * We wait for the last triggered sector
+ */
+ if (l_sect < 0)
+ goto DONE;
+
+ start = get_timer (0);
+ last = start;
+ addr = info->start[l_sect];
+
+ DEBUGF ("Start erase timeout: %d\n", CFG_FLASH_ERASE_TOUT);
+
+ while ((in8(addr) & 0x80) != 0x80) {
+ if ((now = get_timer(start)) > CFG_FLASH_ERASE_TOUT) {
+ printf ("Timeout\n");
+ flash_reset (info->start[0]);
+ flash_to_mem();
+ return 1;
+ }
+ /* show that we're waiting */
+ if ((now - last) > 1000) { /* every second */
+ putc ('.');
+ last = now;
+ }
+ iobarrier_rw();
+ }
+
+DONE:
+ /* reset to read mode */
+ flash_reset (info->start[0]);
+ flash_to_mem();
+
+ printf (" done\n");
+ return 0;
+}
+
+/*
+ * Copy memory to flash, returns:
+ * 0 - OK
+ * 1 - write timeout
+ * 2 - Flash not erased
+ */
+int write_buff (flash_info_t *info, uchar *src, ulong addr, ulong cnt)
+{
+ ulong cp, wp, data;
+ int i, l, rc;
+
+ flash_to_xd();
+
+ wp = (addr & ~3); /* get lower word aligned address */
+
+ /*
+ * handle unaligned start bytes
+ */
+ if ((l = addr - wp) != 0) {
+ data = 0;
+ for (i=0, cp=wp; i<l; ++i, ++cp) {
+ data = (data << 8) | (*(uchar *)cp);
+ }
+ for (; i<4 && cnt>0; ++i) {
+ data = (data << 8) | *src++;
+ --cnt;
+ ++cp;
+ }
+ for (; cnt==0 && i<4; ++i, ++cp) {
+ data = (data << 8) | (*(uchar *)cp);
+ }
+
+ if ((rc = write_word(info, wp, data)) != 0) {
+ flash_to_mem();
+ return (rc);
+ }
+ wp += 4;
+ }
+
+ /*
+ * handle word aligned part
+ */
+ while (cnt >= 4) {
+ data = 0;
+ for (i=0; i<4; ++i) {
+ data = (data << 8) | *src++;
+ }
+ if ((rc = write_word(info, wp, data)) != 0) {
+ flash_to_mem();
+ return (rc);
+ }
+ wp += 4;
+ cnt -= 4;
+ }
+
+ if (cnt == 0) {
+ flash_to_mem();
+ return (0);
+ }
+
+ /*
+ * handle unaligned tail bytes
+ */
+ data = 0;
+ for (i=0, cp=wp; i<4 && cnt>0; ++i, ++cp) {
+ data = (data << 8) | *src++;
+ --cnt;
+ }
+ for (; i<4; ++i, ++cp) {
+ data = (data << 8) | (*(uchar *)cp);
+ }
+
+
+ flash_to_mem();
+ return (write_word(info, wp, data));
+}
+
+/*
+ * Write a word to Flash, returns:
+ * 0 - OK
+ * 1 - write timeout
+ * 2 - Flash not erased
+ */
+static int write_word (flash_info_t *info, ulong dest, ulong data)
+{
+ volatile ulong addr = info->start[0];
+ ulong start;
+ int i;
+
+ flash_to_xd();
+
+ /* Check if Flash is (sufficiently) erased */
+ if ((in32(dest) & data) != data) {
+ flash_to_mem();
+ return (2);
+ }
+
+ /* write each byte out */
+ for (i = 0; i < 4; i++) {
+ char *data_ch = (char *)&data;
+ int flag = disable_interrupts();
+
+ out8(addr + 0x555, 0xAA);
+ iobarrier_rw();
+ out8(addr + 0x2AA, 0x55);
+ iobarrier_rw();
+ out8(addr + 0x555, 0xA0);
+ iobarrier_rw();
+ out8(dest+i, data_ch[i]);
+ iobarrier_rw();
+
+ /* re-enable interrupts if necessary */
+ if (flag)
+ enable_interrupts();
+
+ /* data polling for D7 */
+ start = get_timer (0);
+ while ((in8(dest+i) & 0x80) != (data_ch[i] & 0x80)) {
+ if (get_timer(start) > CFG_FLASH_WRITE_TOUT) {
+ flash_reset (addr);
+ flash_to_mem();
+ return (1);
+ }
+ iobarrier_rw();
+ }
+ }
+
+ flash_reset (addr);
+ flash_to_mem();
+ return (0);
+}
+
+/*
+ * Reset bank to read mode
+ */
+static void flash_reset (ulong addr)
+{
+ flash_to_xd();
+ out8(addr, 0xF0); /* reset bank */
+ iobarrier_rw();
+ flash_to_mem();
+}
+
+void flash_print_info (flash_info_t *info)
+{
+ int i;
+
+ if (info->flash_id == FLASH_UNKNOWN) {
+ printf ("missing or unknown FLASH type\n");
+ return;
+ }
+
+ switch (info->flash_id & FLASH_VENDMASK) {
+ case FLASH_MAN_AMD: printf ("AMD "); break;
+ case FLASH_MAN_FUJ: printf ("FUJITSU "); break;
+ case FLASH_MAN_BM: printf ("BRIGHT MICRO "); break;
+ case FLASH_MAN_STM: printf ("SGS THOMSON "); break;
+ default: printf ("Unknown Vendor "); break;
+ }
+
+ switch (info->flash_id & FLASH_TYPEMASK) {
+ case FLASH_AM040: printf ("29F040 or 29LV040 (4 Mbit, uniform sectors)\n");
+ break;
+ case FLASH_AM400B: printf ("AM29LV400B (4 Mbit, bottom boot sect)\n");
+ break;
+ case FLASH_AM400T: printf ("AM29LV400T (4 Mbit, top boot sector)\n");
+ break;
+ case FLASH_AM800B: printf ("AM29LV800B (8 Mbit, bottom boot sect)\n");
+ break;
+ case FLASH_AM800T: printf ("AM29LV800T (8 Mbit, top boot sector)\n");
+ break;
+ case FLASH_AM160B: printf ("AM29LV160B (16 Mbit, bottom boot sect)\n");
+ break;
+ case FLASH_AM160T: printf ("AM29LV160T (16 Mbit, top boot sector)\n");
+ break;
+ case FLASH_AM320B: printf ("AM29LV320B (32 Mbit, bottom boot sect)\n");
+ break;
+ case FLASH_AM320T: printf ("AM29LV320T (32 Mbit, top boot sector)\n");
+ break;
+ default: printf ("Unknown Chip Type\n");
+ break;
+ }
+
+ if (info->size % 0x100000 == 0) {
+ printf (" Size: %ld MB in %d Sectors\n",
+ info->size / 0x100000, info->sector_count);
+ } else if (info->size % 0x400 == 0) {
+ printf (" Size: %ld KB in %d Sectors\n",
+ info->size / 0x400, info->sector_count);
+ } else {
+ printf (" Size: %ld B in %d Sectors\n",
+ info->size, info->sector_count);
+ }
+
+ printf (" Sector Start Addresses:");
+ for (i=0; i<info->sector_count; ++i) {
+ if ((i % 5) == 0)
+ printf ("\n ");
+ printf (" %08lX%s",
+ info->start[i],
+ info->protect[i] ? " (RO)" : " "
+ );
+ }
+ printf ("\n");
+}
diff --git a/board/MAI/AmigaOneG3SE/i8259.c b/board/MAI/AmigaOneG3SE/i8259.c
new file mode 100644
index 00000000000..6cdfc60da40
--- /dev/null
+++ b/board/MAI/AmigaOneG3SE/i8259.c
@@ -0,0 +1,230 @@
+/*
+ * (C) Copyright 2002
+ * John W. Linville, linville@tuxdriver.com
+ *
+ * See file CREDITS for list of people who contributed to this
+ * project.
+ *
+ * This program is free software; you can redistribute it and/or
+ * modify it under the terms of the GNU General Public License as
+ * published by the Free Software Foundation; either version 2 of
+ * the License, or (at your option) any later version.
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with this program; if not, write to the Free Software
+ * Foundation, Inc., 59 Temple Place, Suite 330, Boston,
+ * MA 02111-1307 USA
+ */
+
+#include <common.h>
+#include "i8259.h"
+
+#undef IRQ_DEBUG
+
+#ifdef IRQ_DEBUG
+#define PRINTF(fmt,args...) printf (fmt ,##args)
+#else
+#define PRINTF(fmt,args...)
+#endif
+
+static inline unsigned char read_byte(volatile unsigned char* from)
+{
+ int x;
+ asm volatile ("lbz %0,%1\n eieio" : "=r" (x) : "m" (*from));
+ return (unsigned char)x;
+}
+
+static inline void write_byte(volatile unsigned char *to, int x)
+{
+ asm volatile ("stb %1,%0\n eieio" : "=m" (*to) : "r" (x));
+}
+
+static inline unsigned long read_long_little(volatile unsigned long *from)
+{
+ unsigned long x;
+ asm volatile ("lwbrx %0,0,%1\n eieio\n sync" : "=r" (x) : "r" (from), "m"(*from));
+ return (unsigned long)x;
+}
+
+#ifdef out8
+#undef out8
+#endif
+
+#ifdef in8
+#undef in8
+#endif
+
+#define out8(addr, byte) write_byte(0xFE000000 | addr, byte)
+#define in8(addr) read_byte(0xFE000000 | addr)
+
+/*
+ * This contains the irq mask for both 8259A irq controllers,
+ */
+static char cached_imr[2] = {0xff, 0xff};
+
+#define cached_imr1 (cached_imr[0])
+#define cached_imr2 (cached_imr[1])
+
+void i8259_init(void)
+{
+ char dummy;
+ PRINTF("Initializing Interrupt controller\n");
+ /* init master interrupt controller */
+ out8(0x20, 0x11); //0x19); // was: 0x11); /* Start init sequence */
+ out8(0x21, 0x00); /* Vector base */
+ out8(0x21, 0x04); /* edge tiggered, Cascade (slave) on IRQ2 */
+ out8(0x21, 0x11); // was: 0x01); /* Select 8086 mode */
+
+ /* init slave interrupt controller */
+ out8(0xA0, 0x11); //0x19); // was: 0x11); /* Start init sequence */
+ out8(0xA1, 0x08); /* Vector base */
+ out8(0xA1, 0x02); /* edge triggered, Cascade (slave) on IRQ2 */
+ out8(0xA1, 0x11); // was: 0x01); /* Select 8086 mode */
+
+ /* always read ISR */
+ out8(0x20, 0x0B);
+ dummy = in8(ISR_1);
+ out8(0xA0, 0x0B);
+ dummy = in8(ISR_2);
+
+/* out8(0x43, 0x30); */
+/* out8(0x40, 0); */
+/* out8(0x40, 0); */
+/* out8(0x43, 0x70); */
+/* out8(0x41, 0); */
+/* out8(0x41, 0); */
+/* out8(0x43, 0xb0); */
+/* out8(0x42, 0); */
+/* out8(0x42, 0); */
+
+ /* Mask all interrupts */
+ out8(IMR_2, cached_imr2);
+ out8(IMR_1, cached_imr1);
+
+ i8259_unmask_irq(2);
+#if 0
+ {
+ int i;
+ for (i=0; i<16; i++)
+ {
+ i8259_unmask_irq(i);
+ }
+ }
+#endif
+}
+
+static volatile char *pci_intack = (void *)0xFEF00000;
+
+int i8259_irq(void)
+{
+ int irq;
+
+ irq = read_long_little(pci_intack) & 0xff;
+ if (irq==7) {
+ /*
+ * This may be a spurious interrupt.
+ *
+ * Read the interrupt status register (ISR). If the most
+ * significant bit is not set then there is no valid
+ * interrupt.
+ */
+ if(~in8(0x20)&0x80) {
+ irq = -1;
+ }
+ }
+
+ return irq;
+}
+int i8259_get_irq(struct pt_regs *regs)
+{
+ unsigned char irq;
+
+ /*
+ * Perform an interrupt acknowledge cycle on controller 1
+ */
+ out8(OCW3_1, 0x0C); /* prepare for poll */
+ irq = in8(IPL_1) & 7;
+ if (irq == 2) {
+ /*
+ * Interrupt is cascaded so perform interrupt
+ * acknowledge on controller 2
+ */
+ out8(OCW3_2, 0x0C); /* prepare for poll */
+ irq = (in8(IPL_2) & 7) + 8;
+ if (irq == 15) {
+ /*
+ * This may be a spurious interrupt
+ *
+ * Read the interrupt status register. If the most
+ * significant bit is not set then there is no valid
+ * interrupt
+ */
+ out8(OCW3_2, 0x0b);
+ if (~(in8(ISR_2) & 0x80)) {
+ return -1;
+ }
+ }
+ } else if (irq == 7) {
+ /*
+ * This may be a spurious interrupt
+ *
+ * Read the interrupt status register. If the most
+ * significant bit is not set then there is no valid
+ * interrupt
+ */
+ out8(OCW3_1, 0x0b);
+ if (~(in8(ISR_1) & 0x80)) {
+ return -1;
+ }
+ }
+ return irq;
+}
+
+/*
+ * Careful! The 8259A is a fragile beast, it pretty
+ * much _has_ to be done exactly like this (mask it
+ * first, _then_ send the EOI, and the order of EOI
+ * to the two 8259s is important!
+ */
+void i8259_mask_and_ack(int irq)
+{
+ if (irq > 7) {
+ cached_imr2 |= (1 << (irq - 8));
+ in8(IMR_2); /* DUMMY */
+ out8(IMR_2, cached_imr2);
+ out8(OCW2_2, 0x20); /* Non-specific EOI */
+ out8(OCW2_1, 0x20); /* Non-specific EOI to cascade */
+ } else {
+ cached_imr1 |= (1 << irq);
+ in8(IMR_1); /* DUMMY */
+ out8(IMR_1, cached_imr1);
+ out8(OCW2_1, 0x20); /* Non-specific EOI */
+ }
+}
+
+void i8259_mask_irq(int irq)
+{
+ if (irq & 8) {
+ cached_imr2 |= (1 << (irq & 7));
+ out8(IMR_2, cached_imr2);
+ } else {
+ cached_imr1 |= (1 << irq);
+ out8(IMR_1, cached_imr1);
+ }
+}
+
+void i8259_unmask_irq(int irq)
+{
+ if (irq & 8) {
+ cached_imr2 &= ~(1 << (irq & 7));
+ out8(IMR_2, cached_imr2);
+ } else {
+ cached_imr1 &= ~(1 << irq);
+ out8(IMR_1, cached_imr1);
+ }
+}
diff --git a/board/MAI/AmigaOneG3SE/i8259.h b/board/MAI/AmigaOneG3SE/i8259.h
new file mode 100644
index 00000000000..05c40522d1f
--- /dev/null
+++ b/board/MAI/AmigaOneG3SE/i8259.h
@@ -0,0 +1,56 @@
+/*
+ * (C) Copyright 2002
+ * John W. Linville, linville@tuxdriver.com
+ *
+ * See file CREDITS for list of people who contributed to this
+ * project.
+ *
+ * This program is free software; you can redistribute it and/or
+ * modify it under the terms of the GNU General Public License as
+ * published by the Free Software Foundation; either version 2 of
+ * the License, or (at your option) any later version.
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with this program; if not, write to the Free Software
+ * Foundation, Inc., 59 Temple Place, Suite 330, Boston,
+ * MA 02111-1307 USA
+ */
+
+#define ICW1_1 CFG_ISA_IO_BASE_ADDRESS + ISA_INT1_ICW1
+#define ICW1_2 CFG_ISA_IO_BASE_ADDRESS + ISA_INT2_ICW1
+#define ICW2_1 CFG_ISA_IO_BASE_ADDRESS + ISA_INT1_ICW2
+#define ICW2_2 CFG_ISA_IO_BASE_ADDRESS + ISA_INT2_ICW2
+#define ICW3_1 CFG_ISA_IO_BASE_ADDRESS + ISA_INT1_ICW3
+#define ICW3_2 CFG_ISA_IO_BASE_ADDRESS + ISA_INT2_ICW3
+#define ICW4_1 CFG_ISA_IO_BASE_ADDRESS + ISA_INT1_ICW4
+#define ICW4_2 CFG_ISA_IO_BASE_ADDRESS + ISA_INT2_ICW4
+#define OCW1_1 CFG_ISA_IO_BASE_ADDRESS + ISA_INT1_OCW1
+#define OCW1_2 CFG_ISA_IO_BASE_ADDRESS + ISA_INT2_OCW1
+#define OCW2_1 CFG_ISA_IO_BASE_ADDRESS + ISA_INT1_OCW2
+#define OCW2_2 CFG_ISA_IO_BASE_ADDRESS + ISA_INT2_OCW2
+#define OCW3_1 CFG_ISA_IO_BASE_ADDRESS + ISA_INT1_OCW3
+#define OCW3_2 CFG_ISA_IO_BASE_ADDRESS + ISA_INT2_OCW3
+
+#define IMR_1 OCW1_1
+#define IMR_2 OCW1_2
+
+#define ISR_1 ICW1_1
+#define ISR_2 ICW1_2
+
+#define IPL_1 ICW1_1
+#define IPL_2 ICW1_2
+
+extern void i8259_init(void);
+
+extern int i8259_get_irq(struct pt_regs *regs);
+
+extern void i8259_mask_and_ack(int irq);
+
+extern void i8259_mask_irq(int irq);
+
+extern void i8259_unmask_irq(int irq);
diff --git a/board/MAI/AmigaOneG3SE/interrupts.c b/board/MAI/AmigaOneG3SE/interrupts.c
new file mode 100644
index 00000000000..bb93ea02839
--- /dev/null
+++ b/board/MAI/AmigaOneG3SE/interrupts.c
@@ -0,0 +1,268 @@
+/*
+ * (C) Copyright 2002
+ * John W. Linville <linville@tuxdriver.com>
+ *
+ * Copied and modified from original code by Josh Huber. Original
+ * copyright notice preserved below.
+ *
+ * (C) Copyright 2001
+ * Josh Huber <huber@mclx.com>, Mission Critical Linux, Inc.
+ *
+ * See file CREDITS for list of people who contributed to this
+ * project.
+ *
+ * This program is free software; you can redistribute it and/or
+ * modify it under the terms of the GNU General Public License as
+ * published by the Free Software Foundation; either version 2 of
+ * the License, or (at your option) any later version.
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with this program; if not, write to the Free Software
+ * Foundation, Inc., 59 Temple Place, Suite 330, Boston,
+ * MA 02111-1307 USA
+ */
+
+/*
+ * interrupts.c - just enough support for the decrementer/timer
+ */
+
+#include <common.h>
+#include <asm/processor.h>
+#include <command.h>
+#include "i8259.h"
+
+#undef DEBUG
+#ifdef DEBUG
+#define PRINTF(fmt,args...) printf (fmt ,##args)
+#else
+#define PRINTF(fmt,args...)
+#endif
+#define NR_IRQS 16
+
+void irq_alloc_init(void);
+long irq_alloc(long wanted);
+
+/****************************************************************************/
+
+unsigned decrementer_count; /* count value for 1e6/HZ microseconds */
+
+struct irq_action {
+ interrupt_handler_t *handler;
+ void *arg;
+ ulong count;
+};
+
+static struct irq_action irq_handlers[NR_IRQS];
+
+/****************************************************************************/
+
+static __inline__ unsigned long
+get_msr(void)
+{
+ unsigned long msr;
+
+ asm volatile("mfmsr %0" : "=r" (msr) :);
+ return msr;
+}
+
+static __inline__ void
+set_msr(unsigned long msr)
+{
+ asm volatile("mtmsr %0" : : "r" (msr));
+}
+
+static __inline__ unsigned long
+get_dec(void)
+{
+ unsigned long val;
+
+ asm volatile("mfdec %0" : "=r" (val) :);
+ return val;
+}
+
+
+static __inline__ void
+set_dec(unsigned long val)
+{
+ asm volatile("mtdec %0" : : "r" (val));
+}
+
+
+void
+enable_interrupts(void)
+{
+ set_msr (get_msr() | MSR_EE);
+}
+
+/* returns flag if MSR_EE was set before */
+int
+disable_interrupts(void)
+{
+ ulong msr;
+
+ msr = get_msr();
+ set_msr (msr & ~MSR_EE);
+ return ((msr & MSR_EE) != 0);
+}
+
+/****************************************************************************/
+
+int interrupt_init (void)
+{
+ extern void new_reset(void);
+ extern void new_reset_end(void);
+#ifdef DEBUG
+ puts("interrupt_init: setting decrementer_count\n");
+#endif
+ decrementer_count = get_tbclk() / CFG_HZ;
+
+#ifdef DEBUG
+ puts("interrupt_init: setting actual decremter\n");
+#endif
+ set_dec (get_tbclk() / CFG_HZ);
+
+#ifdef DEBUG
+ puts("interrupt_init: clearing external interrupt table\n");
+#endif
+ /* clear external interrupt table here */
+ memset(irq_handlers, 0, sizeof(irq_handlers));
+
+#ifdef DEBUG
+ puts("interrupt_init: initializing interrupt controller\n");
+#endif
+ i8259_init();
+
+#ifdef DEBUG
+ puts("Copying reset trampoline\n");
+#endif
+ /* WARNING: Assmues that the first megabyte is CACHEINHIBIT! */
+ memcpy((void *)0x100, new_reset, new_reset_end - new_reset);
+
+#ifdef DEBUG
+ PRINTF("interrupt_init: enabling interrupts (msr = %08x)\n",
+ get_msr());
+#endif
+ set_msr (get_msr() | MSR_EE);
+
+#ifdef DEBUG
+ PRINTF("interrupt_init: done. (msr = %08x)\n", get_msr());
+#endif
+
+}
+
+/****************************************************************************/
+
+/*
+ * Handle external interrupts
+ */
+void
+external_interrupt(struct pt_regs *regs)
+{
+ extern int i8259_irq(void);
+
+ int irq, unmask = 1;
+
+ irq = i8259_irq(); //i8259_get_irq(regs);
+// printf("irq = %d, handler at %p ack=%d\n", irq, irq_handlers[irq].handler, *(volatile unsigned char *)0xFEF00000);
+ i8259_mask_and_ack(irq);
+
+ if (irq_handlers[irq].handler != NULL)
+ (*irq_handlers[irq].handler)(irq_handlers[irq].arg);
+ else {
+ PRINTF ("\nBogus External Interrupt IRQ %d\n", irq);
+ /*
+ * turn off the bogus interrupt, otherwise it
+ * might repeat forever
+ */
+ unmask = 0;
+ }
+
+ if (unmask) i8259_unmask_irq(irq);
+}
+
+volatile ulong timestamp = 0;
+
+/*
+ * timer_interrupt - gets called when the decrementer overflows,
+ * with interrupts disabled.
+ * Trivial implementation - no need to be really accurate.
+ */
+void
+timer_interrupt(struct pt_regs *regs)
+{
+ set_dec(decrementer_count);
+ timestamp++;
+}
+
+/****************************************************************************/
+
+void
+reset_timer(void)
+{
+ timestamp = 0;
+}
+
+ulong
+get_timer(ulong base)
+{
+ return (timestamp - base);
+}
+
+void
+set_timer(ulong t)
+{
+ timestamp = t;
+}
+
+/****************************************************************************/
+
+/*
+ * Install and free a interrupt handler.
+ */
+
+void
+irq_install_handler(int irq, interrupt_handler_t *handler, void *arg)
+{
+ if (irq < 0 || irq >= NR_IRQS) {
+ PRINTF("irq_install_handler: bad irq number %d\n", irq);
+ return;
+ }
+
+ if (irq_handlers[irq].handler != NULL)
+ PRINTF("irq_install_handler: 0x%08lx replacing 0x%08lx\n",
+ (ulong)handler, (ulong)irq_handlers[irq].handler);
+
+ irq_handlers[irq].handler = handler;
+ irq_handlers[irq].arg = arg;
+
+ i8259_unmask_irq(irq);
+}
+
+void
+irq_free_handler(int irq)
+{
+ if (irq < 0 || irq >= NR_IRQS) {
+ PRINTF("irq_free_handler: bad irq number %d\n", irq);
+ return;
+ }
+
+ i8259_mask_irq(irq);
+
+ irq_handlers[irq].handler = NULL;
+ irq_handlers[irq].arg = NULL;
+}
+
+/****************************************************************************/
+
+void
+do_irqinfo(cmd_tbl_t *cmdtp, bd_t *bd, int flag, int argc, char *argv[])
+{
+ puts("IRQ related functions are unimplemented currently.\n");
+}
+
+
diff --git a/board/MAI/AmigaOneG3SE/macros.h b/board/MAI/AmigaOneG3SE/macros.h
new file mode 100644
index 00000000000..0fbe39b3ba8
--- /dev/null
+++ b/board/MAI/AmigaOneG3SE/macros.h
@@ -0,0 +1,84 @@
+
+#ifndef _MACROS_H
+#define _MACROS_H
+
+ /*
+ ** Load a long integer into a register
+ */
+ .macro liw reg, value
+ lis \reg, \value@h
+ ori \reg, \reg, \value@l
+ .endm
+
+
+ /*
+ ** Generate config_addr request
+ ** This macro expects the values in registers:
+ ** r3 - bus
+ ** r4 - devfn
+ ** r5 - offset
+ */
+ .macro config_addr
+ rlwinm r9, r5, 24, 0, 6
+ rlwinm r8, r4, 16, 0, 31
+ rlwinm r7, r3, 8, 0, 31
+ or r9, r8, r9
+ or r9, r7, r9
+ ori r9, r9, 0x80
+ liw r10, 0xfec00cf8
+ stw r9, 0(r10)
+ eieio
+ sync
+ .endm
+
+
+ /*
+ ** Generate config_data address
+ */
+ .macro config_data mask
+ andi. r9, r5, \mask
+ addi r9, r9, 0xcfc
+ oris r9, r9, 0xfee0
+ .endm
+
+
+ /*
+ ** Write a byte value to an output port
+ */
+ .macro outb port, value
+ lis r2, 0xfe00
+ li r0, \value
+ stb r0, \port(r2)
+ .endm
+
+
+ /*
+ ** Write a register byte value to an output port
+ */
+ .macro outbr port, value
+ lis r2, 0xfe00
+ stb \value, \port(r2)
+ .endm
+
+
+ /*
+ ** Read a byte value from a port into a specified register
+ */
+ .macro inb reg, port
+ lis r2, 0xfe00
+ lbz \reg, \port(r2)
+ .endm
+
+
+ /*
+ ** Write a byte to the SuperIO config area
+ */
+ .macro siowb offset, value
+ li r3, 0
+ li r4, (7<<3)
+ li r5, \offset
+ li r6, \value
+ bl pci_write_cfg_byte
+ .endm
+
+#endif
diff --git a/board/MAI/AmigaOneG3SE/memio.S b/board/MAI/AmigaOneG3SE/memio.S
new file mode 100644
index 00000000000..c4a09aab101
--- /dev/null
+++ b/board/MAI/AmigaOneG3SE/memio.S
@@ -0,0 +1,74 @@
+#include "macros.h"
+
+
+
+ .globl pci_read_cfg_byte
+
+pci_read_cfg_byte:
+ config_addr
+ config_data 3
+ eieio
+ sync
+ lbz r3, 0(r9)
+ blr
+
+
+
+ .globl pci_write_cfg_byte
+
+pci_write_cfg_byte:
+ config_addr
+ config_data 3
+ stb r6, 0(r9)
+ eieio
+ sync
+ blr
+
+
+
+ .globl pci_read_cfg_word
+
+pci_read_cfg_word:
+ config_addr
+ config_data 2
+ lhbrx r3, 0, r9
+ eieio
+ sync
+ blr
+
+
+
+ .globl pci_write_cfg_word
+
+pci_write_cfg_word:
+ config_addr
+ config_data 2
+ sthbrx r6, 0, r9
+ eieio
+ sync
+ blr
+
+
+
+ .globl pci_read_cfg_long
+
+pci_read_cfg_long:
+ config_addr
+ config_data 0
+ lwbrx r3, 0, r9
+ eieio
+ sync
+ blr
+
+
+
+ .globl pci_write_cfg_long
+
+pci_write_cfg_long:
+ config_addr
+ config_data 0
+ stwbrx r6, 0, r9
+ eieio
+ sync
+ blr
+
diff --git a/board/MAI/AmigaOneG3SE/memio.h b/board/MAI/AmigaOneG3SE/memio.h
new file mode 100644
index 00000000000..df0839f91dc
--- /dev/null
+++ b/board/MAI/AmigaOneG3SE/memio.h
@@ -0,0 +1,113 @@
+/*
+ * Memory mapped IO
+ *
+ * (C) Copyright 2002
+ * Hyperion Entertainment, ThomasF@hyperion-entertainment.com
+ *
+ * See file CREDITS for list of people who contributed to this
+ * project.
+ *
+ * This program is free software; you can redistribute it and/or
+ * modify it under the terms of the GNU General Public License as
+ * published by the Free Software Foundation; either version 2 of
+ * the License, or (at your option) any later version.
+ * You may also use this under a BSD license.
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
+ *
+ */
+
+#ifndef _MEMIO_H
+#define _MEMIO_H
+
+#include "short_types.h"
+
+#define IOBASE 0xFE000000
+
+#define in_byte(from) read_byte( (uint8 *)(IOBASE | (from)))
+#define in_word(from) read_word_little((uint16 *)(IOBASE | (from)))
+#define in_long(from) read_long_little((uint32 *)(IOBASE | (from)))
+#define out_byte(to, val) write_byte((uint8 *)(IOBASE | (to)), val)
+#define out_word(to, val) write_word_little((uint16 *)(IOBASE | (to)), val)
+#define out_long(to, val) write_long_little((uint32 *)(IOBASE | (to)), val)
+
+
+static inline uint8 read_byte(volatile uint8 *from)
+{
+ int x;
+ asm volatile ("lbz %0,%1\n eieio\n sync" : "=r" (x) : "m" (*from));
+ return (uint8)x;
+}
+
+
+static inline void write_byte(volatile uint8 *to, uint8 x)
+{
+ asm volatile ("stb %1,%0\n eieio\n sync" : "=m" (*to) : "r" (x));
+}
+
+static inline uint16 read_word_little(volatile uint16 *from)
+{
+ int x;
+ asm volatile ("lhbrx %0,0,%1\n eieio\n sync" : "=r" (x) : "r" (from), "m" (*from));
+ return (uint16)x;
+}
+
+static inline uint16 read_word_big(volatile uint16 *from)
+{
+ int x;
+ asm volatile ("lhz %0,%1\n eieio\n sync" : "=r" (x) : "m" (*from));
+ return (uint16)x;
+}
+
+static inline void write_word_little(volatile uint16 *to, int x)
+{
+ asm volatile ("sthbrx %1,0,%2\n eieio\n sync" : "=m" (*to) : "r" (x), "r" (to));
+}
+
+static inline void write_word_big(volatile uint16 *to, int x)
+{
+ asm volatile ("sth %1,%0\n eieio\n sync" : "=m" (*to) : "r" (x));
+}
+
+static inline uint32 read_long_little(volatile uint32 *from)
+{
+ unsigned long x;
+ asm volatile ("lwbrx %0,0,%1\n eieio\n sync" : "=r" (x) : "r" (from), "m"(*from));
+ return (uint32)x;
+}
+
+static inline uint32 read_long_big(volatile uint32 *from)
+{
+ unsigned long x;
+ asm volatile ("lwz %0,%1\n eieio\n sync" : "=r" (x) : "m" (*from));
+ return (uint32)x;
+}
+
+static inline void write_long_little(volatile uint32 *to, uint32 x)
+{
+ asm volatile ("stwbrx %1,0,%2\n eieio\n sync" : "=m" (*to) : "r" (x), "r" (to));
+}
+
+static inline void write_long_big(volatile uint32 *to, uint32 x)
+{
+ asm volatile ("stw %1,%0\n eieio\n sync" : "=m" (*to) : "r" (x));
+}
+
+#define CONFIG_ADDR(bus, devfn, offset) \
+ write_long_big((uint32 *)0xFEC00CF8, \
+ ((offset & 0xFC)<<24) | (devfn << 16) \
+ | (bus<<8) | 0x80);
+#define CONFIG_DATA(offset,mask) ((void *)(0xFEE00CFC+(offset & mask)))
+
+
+uint8 pci_read_cfg_byte(int32 bus, int32 devfn, int32 offset);
+void pci_write_cfg_byte(int32 bus, int32 devfn, int32 offset, uint8 x);
+uint16 pci_read_cfg_word(int32 bus, int32 devfn, int32 offset);
+void pci_write_cfg_word(int32 bus, int32 devfn, int32 offset, uint16 x);
+uint32 pci_read_cfg_long(int32 bus, int32 devfn, int32 offset);
+void pci_write_cfg_long(int32 bus, int32 devfn, int32 offset, uint32 x);
+
+
+#endif
diff --git a/board/MAI/AmigaOneG3SE/memory_dump b/board/MAI/AmigaOneG3SE/memory_dump
new file mode 100644
index 00000000000..65e79362a6d
--- /dev/null
+++ b/board/MAI/AmigaOneG3SE/memory_dump
@@ -0,0 +1,30 @@
+64 MB:
+0x00: 80 08 04 0c 09 01 40 00 01 a0 60 00 80 08 00 01
+0x10: 8f 04 04 01 01 00 06 a0 60 00 00 14 10 14 2d 10
+0x20: 20 10 20 10 00 00 00 00 00 00 00 00 00 00 00 00
+0x30: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 12 f2
+0x40: 7f 61 00 00 00 00 00 00 46 04 00 ff ff ff ff ff
+0x50: ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff
+0x60: ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff
+0x70: ff ff ff ff ff ff ff ff ff ff ff ff ff ff 64 f4
+
+512 MB:
+0x00: 80 08 04 0d 0a 02 40 00 01 75 54 00 82 08 00 01
+0x10: 8f 04 04 01 01 00 0f 00 00 00 00 14 0f 14 2d 40
+0x20: 15 08 15 08 00 00 00 00 00 00 00 00 00 00 00 00
+0x30: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 12 d2
+0x40: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00
+0x50: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00
+0x60: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00
+0x70: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 64 fd
+
+256 MB:
+0x00: 80 08 04 0c 0a 02 40 00 01 75 54 00 80 08 00 01
+0x10: 8f 04 06 01 01 00 0e a0 60 00 00 14 0f 14 2d 20
+0x20: 15 08 15 08 00 00 00 00 00 00 00 00 00 00 00 00
+0x30: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 12 b0
+0x40: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00
+0x50: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00
+0x60: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00
+0x70: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 64 f6
+
diff --git a/board/MAI/AmigaOneG3SE/nvram.c b/board/MAI/AmigaOneG3SE/nvram.c
new file mode 100644
index 00000000000..5dde15b6a75
--- /dev/null
+++ b/board/MAI/AmigaOneG3SE/nvram.c
@@ -0,0 +1,37 @@
+/*
+ * (C) Copyright 2002
+ * Thomas Frieden, Hyperion Entertainment
+ * ThomasF@hyperion-entertainment.com
+ *
+ * See file CREDITS for list of people who contributed to this
+ * project.
+ *
+ * This program is free software; you can redistribute it and/or
+ * modify it under the terms of the GNU General Public License as
+ * published by the Free Software Foundation; either version 2 of
+ * the License, or (at your option) any later version.
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with this program; if not, write to the Free Software
+ * Foundation, Inc., 59 Temple Place, Suite 330, Boston,
+ * MA 02111-1307 USA
+ */
+
+#include <common.h>
+#include "memio.h"
+
+void enable_nvram(void)
+{
+ pci_write_cfg_byte(0, 0, 0x56, 0x0b);
+}
+
+void disable_nvram(void)
+{
+ pci_write_cfg_byte(0, 0, 0x56, 0x0);
+}
+
diff --git a/board/MAI/AmigaOneG3SE/ps2kbd.c b/board/MAI/AmigaOneG3SE/ps2kbd.c
new file mode 100644
index 00000000000..a6d67beecd9
--- /dev/null
+++ b/board/MAI/AmigaOneG3SE/ps2kbd.c
@@ -0,0 +1,699 @@
+/*
+ * (C) Copyright 2002
+ * John W. Linville, linville@tuxdriver.com
+ *
+ * Modified from code for support of MIP405 and PIP405 boards. Previous
+ * copyright follows.
+ *
+ * (C) Copyright 2001
+ * Denis Peter, MPL AG Switzerland, d.peter@mpl.ch
+ *
+ * See file CREDITS for list of people who contributed to this
+ * project.
+ *
+ * This program is free software; you can redistribute it and/or
+ * modify it under the terms of the GNU General Public License as
+ * published by the Free Software Foundation; either version 2 of
+ * the License, or (at your option) any later version.
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with this program; if not, write to the Free Software
+ * Foundation, Inc., 59 Temple Place, Suite 330, Boston,
+ * MA 02111-1307 USA
+ *
+ *
+ * Source partly derived from:
+ * linux/drivers/char/pc_keyb.c
+ *
+ *
+ */
+#include <common.h>
+#include <asm/processor.h>
+#include <devices.h>
+#include "ps2kbd.h"
+
+
+unsigned char kbd_read_status(void);
+unsigned char kbd_read_input(void);
+void kbd_send_data(unsigned char data);
+void i8259_mask_irq(unsigned int irq);
+void i8259_unmask_irq(unsigned int irq);
+
+/* used only by send_data - set by keyboard_interrupt */
+
+
+#undef KBG_DEBUG
+//#define KBG_DEBUG
+
+#ifdef KBG_DEBUG
+#define PRINTF(fmt,args...) printf (fmt ,##args)
+#else
+#define PRINTF(fmt,args...)
+#endif
+
+#define KBD_STAT_KOBF 0x01
+#define KBD_STAT_IBF 0x02
+#define KBD_STAT_SYS 0x04
+#define KBD_STAT_CD 0x08
+#define KBD_STAT_LOCK 0x10
+#define KBD_STAT_MOBF 0x20
+#define KBD_STAT_TI_OUT 0x40
+#define KBD_STAT_PARERR 0x80
+
+#define KBD_INIT_TIMEOUT 2000 /* Timeout in ms for initializing the keyboard */
+#define KBC_TIMEOUT 250 /* Timeout in ms for sending to keyboard controller */
+#define KBD_TIMEOUT 2000 /* Timeout in ms for keyboard command acknowledge */
+/*
+ * Keyboard Controller Commands
+ */
+
+#define KBD_CCMD_READ_MODE 0x20 /* Read mode bits */
+#define KBD_CCMD_WRITE_MODE 0x60 /* Write mode bits */
+#define KBD_CCMD_GET_VERSION 0xA1 /* Get controller version */
+#define KBD_CCMD_MOUSE_DISABLE 0xA7 /* Disable mouse interface */
+#define KBD_CCMD_MOUSE_ENABLE 0xA8 /* Enable mouse interface */
+#define KBD_CCMD_TEST_MOUSE 0xA9 /* Mouse interface test */
+#define KBD_CCMD_SELF_TEST 0xAA /* Controller self test */
+#define KBD_CCMD_KBD_TEST 0xAB /* Keyboard interface test */
+#define KBD_CCMD_KBD_DISABLE 0xAD /* Keyboard interface disable */
+#define KBD_CCMD_KBD_ENABLE 0xAE /* Keyboard interface enable */
+#define KBD_CCMD_WRITE_AUX_OBUF 0xD3 /* Write to output buffer as if
+ initiated by the auxiliary device */
+#define KBD_CCMD_WRITE_MOUSE 0xD4 /* Write the following byte to the mouse */
+
+/*
+ * Keyboard Commands
+ */
+
+#define KBD_CMD_SET_LEDS 0xED /* Set keyboard leds */
+#define KBD_CMD_SET_RATE 0xF3 /* Set typematic rate */
+#define KBD_CMD_ENABLE 0xF4 /* Enable scanning */
+#define KBD_CMD_DISABLE 0xF5 /* Disable scanning */
+#define KBD_CMD_RESET 0xFF /* Reset */
+
+/*
+ * Keyboard Replies
+ */
+
+#define KBD_REPLY_POR 0xAA /* Power on reset */
+#define KBD_REPLY_ACK 0xFA /* Command ACK */
+#define KBD_REPLY_RESEND 0xFE /* Command NACK, send the cmd again */
+
+/*
+ * Status Register Bits
+ */
+
+#define KBD_STAT_OBF 0x01 /* Keyboard output buffer full */
+#define KBD_STAT_IBF 0x02 /* Keyboard input buffer full */
+#define KBD_STAT_SELFTEST 0x04 /* Self test successful */
+#define KBD_STAT_CMD 0x08 /* Last write was a command write (0=data) */
+#define KBD_STAT_UNLOCKED 0x10 /* Zero if keyboard locked */
+#define KBD_STAT_MOUSE_OBF 0x20 /* Mouse output buffer full */
+#define KBD_STAT_GTO 0x40 /* General receive/xmit timeout */
+#define KBD_STAT_PERR 0x80 /* Parity error */
+
+#define AUX_STAT_OBF (KBD_STAT_OBF | KBD_STAT_MOUSE_OBF)
+
+/*
+ * Controller Mode Register Bits
+ */
+
+#define KBD_MODE_KBD_INT 0x01 /* Keyboard data generate IRQ1 */
+#define KBD_MODE_MOUSE_INT 0x02 /* Mouse data generate IRQ12 */
+#define KBD_MODE_SYS 0x04 /* The system flag (?) */
+#define KBD_MODE_NO_KEYLOCK 0x08 /* The keylock doesn't affect the keyboard if set */
+#define KBD_MODE_DISABLE_KBD 0x10 /* Disable keyboard interface */
+#define KBD_MODE_DISABLE_MOUSE 0x20 /* Disable mouse interface */
+#define KBD_MODE_KCC 0x40 /* Scan code conversion to PC format */
+#define KBD_MODE_RFU 0x80
+
+
+#define KDB_DATA_PORT 0x60
+#define KDB_COMMAND_PORT 0x64
+
+#define LED_SCR 0x01 /* scroll lock led */
+#define LED_CAP 0x04 /* caps lock led */
+#define LED_NUM 0x02 /* num lock led */
+
+#define KBD_BUFFER_LEN 0x20 /* size of the keyboardbuffer */
+
+
+
+
+static volatile char kbd_buffer[KBD_BUFFER_LEN];
+static volatile int in_pointer = 0;
+static volatile int out_pointer = 0;
+
+
+static unsigned char num_lock = 0;
+static unsigned char caps_lock = 0;
+static unsigned char scroll_lock = 0;
+static unsigned char shift = 0;
+static unsigned char ctrl = 0;
+static unsigned char alt = 0;
+static unsigned char e0 = 0;
+static unsigned char leds = 0;
+
+#define DEVNAME "ps2kbd"
+
+/* Simple translation table for the keys */
+
+static unsigned char kbd_plain_xlate[] = {
+ 0xff,0x1b, '1', '2', '3', '4', '5', '6', '7', '8', '9', '0', '-', '=','\b','\t', /* 0x00 - 0x0f */
+ 'q', 'w', 'e', 'r', 't', 'y', 'u', 'i', 'o', 'p', '[', ']','\r',0xff, 'a', 's', /* 0x10 - 0x1f */
+ 'd', 'f', 'g', 'h', 'j', 'k', 'l', ';','\'', '`',0xff,'\\', 'z', 'x', 'c', 'v', /* 0x20 - 0x2f */
+ 'b', 'n', 'm', ',', '.', '/',0xff,0xff,0xff, ' ',0xff,0xff,0xff,0xff,0xff,0xff, /* 0x30 - 0x3f */
+ 0xff,0xff,0xff,0xff,0xff,0xff,0xff, '7', '8', '9', '-', '4', '5', '6', '+', '1', /* 0x40 - 0x4f */
+ '2', '3', '0', '.',0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff, /* 0x50 - 0x5F */
+ '\r',0xff,0xff
+ };
+
+static unsigned char kbd_shift_xlate[] = {
+ 0xff,0x1b, '!', '@', '#', '$', '%', '^', '&', '*', '(', ')', '_', '+','\b','\t', /* 0x00 - 0x0f */
+ 'Q', 'W', 'E', 'R', 'T', 'Y', 'U', 'I', 'O', 'P', '{', '}','\r',0xff, 'A', 'S', /* 0x10 - 0x1f */
+ 'D', 'F', 'G', 'H', 'J', 'K', 'L', ':', '"', '~',0xff, '|', 'Z', 'X', 'C', 'V', /* 0x20 - 0x2f */
+ 'B', 'N', 'M', '<', '>', '?',0xff,0xff,0xff, ' ',0xff,0xff,0xff,0xff,0xff,0xff, /* 0x30 - 0x3f */
+ 0xff,0xff,0xff,0xff,0xff,0xff,0xff, '7', '8', '9', '-', '4', '5', '6', '+', '1', /* 0x40 - 0x4f */
+ '2', '3', '0', '.',0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff, /* 0x50 - 0x5F */
+ '\r',0xff,0xff
+ };
+
+static unsigned char kbd_ctrl_xlate[] = {
+ 0xff,0x1b, '1',0x00, '3', '4', '5',0x1E, '7', '8', '9', '0',0x1F, '=','\b','\t', /* 0x00 - 0x0f */
+ 0x11,0x17,0x05,0x12,0x14,0x18,0x15,0x09,0x0f,0x10,0x1b,0x1d,'\n',0xff,0x01,0x13, /* 0x10 - 0x1f */
+ 0x04,0x06,0x08,0x09,0x0a,0x0b,0x0c, ';','\'', '~',0x00,0x1c,0x1a,0x18,0x03,0x16, /* 0x20 - 0x2f */
+ 0x02,0x0e,0x0d, '<', '>', '?',0xff,0xff,0xff,0x00,0xff,0xff,0xff,0xff,0xff,0xff, /* 0x30 - 0x3f */
+ 0xff,0xff,0xff,0xff,0xff,0xff,0xff, '7', '8', '9', '-', '4', '5', '6', '+', '1', /* 0x40 - 0x4f */
+ '2', '3', '0', '.',0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff, /* 0x50 - 0x5F */
+ '\r',0xff,0xff
+ };
+
+/******************************************************************
+ * Init
+ ******************************************************************/
+
+int isa_kbd_init(void)
+{
+ char* result;
+ result=kbd_initialize();
+ if (result != NULL)
+ {
+ result = kbd_initialize();
+ }
+ if(result==NULL) {
+ printf("AT Keyboard initialized\n");
+ irq_install_handler(KBD_INTERRUPT, (interrupt_handler_t *)kbd_interrupt, NULL);
+ return (1);
+ }
+ else {
+ printf("%s\n",result);
+ return (-1);
+ }
+}
+
+#ifdef CFG_CONSOLE_OVERWRITE_ROUTINE
+extern int overwrite_console (void);
+#else
+int overwrite_console (void)
+{
+ return (0);
+}
+#endif
+
+int drv_isa_kbd_init (void)
+{
+ int error;
+ device_t kbddev ;
+ char *stdinname = getenv ("stdin");
+
+ if(isa_kbd_init()==-1)
+ return -1;
+ memset (&kbddev, 0, sizeof(kbddev));
+ strcpy(kbddev.name, DEVNAME);
+ kbddev.flags = DEV_FLAGS_INPUT | DEV_FLAGS_SYSTEM;
+ kbddev.putc = NULL ;
+ kbddev.puts = NULL ;
+ kbddev.getc = kbd_getc ;
+ kbddev.tstc = kbd_testc ;
+
+ error = device_register (&kbddev);
+ if(error==0) {
+ /* check if this is the standard input device */
+ if(strcmp(stdinname,DEVNAME)==0) {
+ /* reassign the console */
+ if(overwrite_console()) {
+ return 1;
+ }
+ error=console_assign(stdin,DEVNAME);
+ if(error==0)
+ return 1;
+ else
+ return error;
+ }
+ return 1;
+ }
+ return error;
+}
+
+/******************************************************************
+ * Queue handling
+ ******************************************************************/
+/* puts character in the queue and sets up the in and out pointer */
+void kbd_put_queue(char data)
+{
+ if((in_pointer+1)==KBD_BUFFER_LEN) {
+ if(out_pointer==0) {
+ return; /* buffer full */
+ } else{
+ in_pointer=0;
+ }
+ } else {
+ if((in_pointer+1)==out_pointer)
+ return; /* buffer full */
+ in_pointer++;
+ }
+ kbd_buffer[in_pointer]=data;
+ return;
+}
+
+/* test if a character is in the queue */
+int kbd_testc(void)
+{
+ if(in_pointer==out_pointer)
+ return(0); /* no data */
+ else
+ return(1);
+}
+/* gets the character from the queue */
+int kbd_getc(void)
+{
+ char c;
+
+ while(in_pointer==out_pointer);
+ if((out_pointer+1)==KBD_BUFFER_LEN)
+ out_pointer=0;
+ else
+ out_pointer++;
+ c=kbd_buffer[out_pointer];
+ return (int)c;
+
+}
+
+
+/* set LEDs */
+
+void kbd_set_leds(void)
+{
+ if(caps_lock==0)
+ leds&=~LED_CAP; /* switch caps_lock off */
+ else
+ leds|=LED_CAP; /* switch on LED */
+ if(num_lock==0)
+ leds&=~LED_NUM; /* switch LED off */
+ else
+ leds|=LED_NUM; /* switch on LED */
+ if(scroll_lock==0)
+ leds&=~LED_SCR; /* switch LED off */
+ else
+ leds|=LED_SCR; /* switch on LED */
+ kbd_send_data(KBD_CMD_SET_LEDS);
+ kbd_send_data(leds);
+}
+
+
+void handle_keyboard_event(unsigned char scancode)
+{
+ unsigned char keycode;
+
+ /* Convert scancode to keycode */
+ PRINTF("scancode %x\n",scancode);
+ if(scancode==0xe0) {
+ e0=1; /* special charakters */
+ return;
+ }
+ if(e0==1) {
+ e0=0; /* delete flag */
+ if(!( ((scancode&0x7F)==0x38)|| /* the right ctrl key */
+ ((scancode&0x7F)==0x1D)|| /* the right alt key */
+ ((scancode&0x7F)==0x35)|| /* the right '/' key */
+ ((scancode&0x7F)==0x1C)|| /* the right enter key */
+ ((scancode)==0x48)|| /* arrow up */
+ ((scancode)==0x50)|| /* arrow down */
+ ((scancode)==0x4b)|| /* arrow left */
+ ((scancode)==0x4d))) /* arrow right */
+ /* we swallow unknown e0 codes */
+ return;
+ }
+ /* special cntrl keys */
+ switch(scancode)
+ {
+ case 0x48:
+ kbd_put_queue(27);
+ kbd_put_queue(91);
+ kbd_put_queue('A');
+ return;
+ case 0x50:
+ kbd_put_queue(27);
+ kbd_put_queue(91);
+ kbd_put_queue('B');
+ return;
+ case 0x4b:
+ kbd_put_queue(27);
+ kbd_put_queue(91);
+ kbd_put_queue('D');
+ return;
+ case 0x4D:
+ kbd_put_queue(27);
+ kbd_put_queue(91);
+ kbd_put_queue('C');
+ return;
+ case 0x58: /* F12 key */
+ if (ctrl == 1)
+ {
+ extern int console_changed;
+ setenv("stdin", DEVNAME);
+ setenv("stdout", "vga");
+ console_changed = 1;
+ }
+ return;
+ case 0x2A:
+ case 0x36: /* shift pressed */
+ shift=1;
+ return; /* do nothing else */
+ case 0xAA:
+ case 0xB6: /* shift released */
+ shift=0;
+ return; /* do nothing else */
+ case 0x38: /* alt pressed */
+ alt=1;
+ return; /* do nothing else */
+ case 0xB8: /* alt released */
+ alt=0;
+ return; /* do nothing else */
+ case 0x1d: /* ctrl pressed */
+ ctrl=1;
+ return; /* do nothing else */
+ case 0x9d: /* ctrl released */
+ ctrl=0;
+ return; /* do nothing else */
+ case 0x46: /* scrollock pressed */
+ scroll_lock=~scroll_lock;
+ kbd_set_leds();
+ return; /* do nothing else */
+ case 0x3A: /* capslock pressed */
+ caps_lock=~caps_lock;
+ kbd_set_leds();
+ return;
+ case 0x45: /* numlock pressed */
+ num_lock=~num_lock;
+ kbd_set_leds();
+ return;
+ case 0xC6: /* scroll lock released */
+ case 0xC5: /* num lock released */
+ case 0xBA: /* caps lock released */
+ return; /* just swallow */
+ }
+ if((scancode&0x80)==0x80) /* key released */
+ return;
+ /* now, decide which table we need */
+ if(scancode > (sizeof(kbd_plain_xlate)/sizeof(kbd_plain_xlate[0]))) { /* scancode not in list */
+ PRINTF("unkown scancode %X\n",scancode);
+ return; /* swallow it */
+ }
+ /* setup plain code first */
+ keycode=kbd_plain_xlate[scancode];
+ if(caps_lock==1) { /* caps_lock is pressed, overwrite plain code */
+ if(scancode > (sizeof(kbd_shift_xlate)/sizeof(kbd_shift_xlate[0]))) { /* scancode not in list */
+ PRINTF("unkown caps-locked scancode %X\n",scancode);
+ return; /* swallow it */
+ }
+ keycode=kbd_shift_xlate[scancode];
+ if(keycode<'A') { /* we only want the alphas capital */
+ keycode=kbd_plain_xlate[scancode];
+ }
+ }
+ if(shift==1) { /* shift overwrites caps_lock */
+ if(scancode > (sizeof(kbd_shift_xlate)/sizeof(kbd_shift_xlate[0]))) { /* scancode not in list */
+ PRINTF("unkown shifted scancode %X\n",scancode);
+ return; /* swallow it */
+ }
+ keycode=kbd_shift_xlate[scancode];
+ }
+ if(ctrl==1) { /* ctrl overwrites caps_lock and shift */
+ if(scancode > (sizeof(kbd_ctrl_xlate)/sizeof(kbd_ctrl_xlate[0]))) { /* scancode not in list */
+ PRINTF("unkown ctrl scancode %X\n",scancode);
+ return; /* swallow it */
+ }
+ keycode=kbd_ctrl_xlate[scancode];
+ }
+ /* check if valid keycode */
+ if(keycode==0xff) {
+ PRINTF("unkown scancode %X\n",scancode);
+ return; /* swallow unknown codes */
+ }
+
+ kbd_put_queue(keycode);
+ PRINTF("%x\n",keycode);
+}
+
+/*
+ * This reads the keyboard status port, and does the
+ * appropriate action.
+ *
+ */
+unsigned char handle_kbd_event(void)
+{
+ unsigned char status = kbd_read_status();
+ unsigned int work = 10000;
+
+ while ((--work > 0) && (status & KBD_STAT_OBF)) {
+ unsigned char scancode;
+
+ scancode = kbd_read_input();
+
+ /* Error bytes must be ignored to make the
+ Synaptics touchpads compaq use work */
+ /* Ignore error bytes */
+ if (!(status & (KBD_STAT_GTO | KBD_STAT_PERR)))
+ {
+ if (status & KBD_STAT_MOUSE_OBF)
+ ; /* not supported: handle_mouse_event(scancode); */
+ else
+ handle_keyboard_event(scancode);
+ }
+ status = kbd_read_status();
+ }
+ if (!work)
+ PRINTF("pc_keyb: controller jammed (0x%02X).\n", status);
+ return status;
+}
+
+
+
+/******************************************************************************
+ * Lowlevel Part of keyboard section
+ */
+unsigned char kbd_read_status(void)
+{
+ return(in8(CFG_ISA_IO_BASE_ADDRESS + KDB_COMMAND_PORT));
+}
+
+unsigned char kbd_read_input(void)
+{
+ return(in8(CFG_ISA_IO_BASE_ADDRESS + KDB_DATA_PORT));
+}
+
+void kbd_write_command(unsigned char cmd)
+{
+ out8(CFG_ISA_IO_BASE_ADDRESS + KDB_COMMAND_PORT,cmd);
+}
+
+void kbd_write_output(unsigned char data)
+{
+ out8(CFG_ISA_IO_BASE_ADDRESS + KDB_DATA_PORT, data);
+}
+
+int kbd_read_data(void)
+{
+ int val;
+ unsigned char status;
+
+ val=-1;
+ status = kbd_read_status();
+ if (status & KBD_STAT_OBF) {
+ val = kbd_read_input();
+ if (status & (KBD_STAT_GTO | KBD_STAT_PERR))
+ val = -2;
+ }
+ return val;
+}
+
+int kbd_wait_for_input(void)
+{
+ unsigned long timeout;
+ int val;
+
+ timeout = KBD_TIMEOUT;
+ val=kbd_read_data();
+ while(val < 0)
+ {
+ if(timeout--==0)
+ return -1;
+ udelay(1000);
+ val=kbd_read_data();
+ }
+ return val;
+}
+
+
+int kb_wait(void)
+{
+ unsigned long timeout = KBC_TIMEOUT * 10;
+
+ do {
+ unsigned char status = handle_kbd_event();
+ if (!(status & KBD_STAT_IBF))
+ return 0; /* ok */
+ udelay(1000);
+ timeout--;
+ } while (timeout);
+ return 1;
+}
+
+void kbd_write_command_w(int data)
+{
+ if(kb_wait())
+ PRINTF("timeout in kbd_write_command_w\n");
+ kbd_write_command(data);
+}
+
+void kbd_write_output_w(int data)
+{
+ if(kb_wait())
+ PRINTF("timeout in kbd_write_output_w\n");
+ kbd_write_output(data);
+}
+
+void kbd_send_data(unsigned char data)
+{
+ unsigned char status;
+ i8259_mask_irq(KBD_INTERRUPT); /* disable interrupt */
+ kbd_write_output_w(data);
+ status = kbd_wait_for_input();
+ if (status == KBD_REPLY_ACK)
+ i8259_unmask_irq(KBD_INTERRUPT); /* enable interrupt */
+}
+
+
+char * kbd_initialize(void)
+{
+ int status;
+
+ in_pointer = 0; /* delete in Buffer */
+ out_pointer = 0;
+ /*
+ * Test the keyboard interface.
+ * This seems to be the only way to get it going.
+ * If the test is successful a x55 is placed in the input buffer.
+ */
+ kbd_write_command_w(KBD_CCMD_SELF_TEST);
+ if (kbd_wait_for_input() != 0x55)
+ return "Kbd: failed self test";
+ /*
+ * Perform a keyboard interface test. This causes the controller
+ * to test the keyboard clock and data lines. The results of the
+ * test are placed in the input buffer.
+ */
+ kbd_write_command_w(KBD_CCMD_KBD_TEST);
+ if (kbd_wait_for_input() != 0x00)
+ return "Kbd: interface failed self test";
+ /*
+ * Enable the keyboard by allowing the keyboard clock to run.
+ */
+ kbd_write_command_w(KBD_CCMD_KBD_ENABLE);
+ status = kbd_wait_for_input();
+ /*
+ * Reset keyboard. If the read times out
+ * then the assumption is that no keyboard is
+ * plugged into the machine.
+ * This defaults the keyboard to scan-code set 2.
+ *
+ * Set up to try again if the keyboard asks for RESEND.
+ */
+ do {
+ kbd_write_output_w(KBD_CMD_RESET);
+ status = kbd_wait_for_input();
+ if (status == KBD_REPLY_ACK)
+ break;
+ if (status != KBD_REPLY_RESEND)
+ {
+ PRINTF("status: %X\n",status);
+ return "Kbd: reset failed, no ACK";
+ }
+ } while (1);
+ if (kbd_wait_for_input() != KBD_REPLY_POR)
+ return "Kbd: reset failed, no POR";
+
+ /*
+ * Set keyboard controller mode. During this, the keyboard should be
+ * in the disabled state.
+ *
+ * Set up to try again if the keyboard asks for RESEND.
+ */
+ do {
+ kbd_write_output_w(KBD_CMD_DISABLE);
+ status = kbd_wait_for_input();
+ if (status == KBD_REPLY_ACK)
+ break;
+ if (status != KBD_REPLY_RESEND)
+ return "Kbd: disable keyboard: no ACK";
+ } while (1);
+
+ kbd_write_command_w(KBD_CCMD_WRITE_MODE);
+ kbd_write_output_w(KBD_MODE_KBD_INT
+ | KBD_MODE_SYS
+ | KBD_MODE_DISABLE_MOUSE
+ | KBD_MODE_KCC);
+
+ /* ibm powerpc portables need this to use scan-code set 1 -- Cort */
+ kbd_write_command_w(KBD_CCMD_READ_MODE);
+ if (!(kbd_wait_for_input() & KBD_MODE_KCC)) {
+ /*
+ * If the controller does not support conversion,
+ * Set the keyboard to scan-code set 1.
+ */
+ kbd_write_output_w(0xF0);
+ kbd_wait_for_input();
+ kbd_write_output_w(0x01);
+ kbd_wait_for_input();
+ }
+ kbd_write_output_w(KBD_CMD_ENABLE);
+ if (kbd_wait_for_input() != KBD_REPLY_ACK)
+ return "Kbd: enable keyboard: no ACK";
+
+ /*
+ * Finally, set the typematic rate to maximum.
+ */
+ kbd_write_output_w(KBD_CMD_SET_RATE);
+ if (kbd_wait_for_input() != KBD_REPLY_ACK)
+ return "Kbd: Set rate: no ACK";
+ kbd_write_output_w(0x00);
+ if (kbd_wait_for_input() != KBD_REPLY_ACK)
+ return "Kbd: Set rate: no ACK";
+ return NULL;
+}
+
+void kbd_interrupt(void)
+{
+ handle_kbd_event();
+}
+
+
+
+/* eof */
+
diff --git a/board/MAI/AmigaOneG3SE/ps2kbd.h b/board/MAI/AmigaOneG3SE/ps2kbd.h
new file mode 100644
index 00000000000..95fc14d66ab
--- /dev/null
+++ b/board/MAI/AmigaOneG3SE/ps2kbd.h
@@ -0,0 +1,41 @@
+/*
+ * (C) Copyright 2002
+ * John W. Linville, linville@tuxdriver.com
+ *
+ * Modified from code for support of MIP405 and PIP405 boards. Previous
+ * copyright follows.
+ *
+ * (C) Copyright 2001
+ * Denis Peter, MPL AG Switzerland, d.peter@mpl.ch
+ *
+ * See file CREDITS for list of people who contributed to this
+ * project.
+ *
+ * This program is free software; you can redistribute it and/or
+ * modify it under the terms of the GNU General Public License as
+ * published by the Free Software Foundation; either version 2 of
+ * the License, or (at your option) any later version.
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with this program; if not, write to the Free Software
+ * Foundation, Inc., 59 Temple Place, Suite 330, Boston,
+ * MA 02111-1307 USA
+ *
+ */
+
+#ifndef _KBD_H_
+#define _KBD_H_
+
+extern int kbd_testc(void);
+extern int kbd_getc(void);
+extern void kbd_interrupt(void);
+extern char *kbd_initialize(void);
+
+unsigned char kbd_is_init(void);
+#define KBD_INTERRUPT 1
+#endif
diff --git a/board/MAI/AmigaOneG3SE/serial.c b/board/MAI/AmigaOneG3SE/serial.c
new file mode 100644
index 00000000000..e83fb46c735
--- /dev/null
+++ b/board/MAI/AmigaOneG3SE/serial.c
@@ -0,0 +1,247 @@
+#include <common.h>
+#include <ns16550.h>
+#include "short_types.h"
+#include "memio.h"
+#include "articiaS.h"
+
+#ifndef CFG_NS16550
+static uint32 ComPort1;
+
+uint16 SerialEcho = 1;
+
+
+#define RECEIVER_HOLDING 0
+#define TRANSMITTER_HOLDING 0
+#define INTERRUPT_ENABLE 1
+#define INTERRUPT_STATUS 2
+#define FIFO_CONTROL 2
+#define LINE_CONTROL 3
+#define MODEM_CONTROL 4
+#define LINE_STATUS 5
+#define MODEM_STATUS 6
+#define SCRATCH_PAD 7
+
+#define DIVISOR_LATCH_LSB 0
+#define DIVISOR_LATCH_MSB 1
+#define PRESCALER_DIVISION 5
+
+#define COM_WRITE_BYTE(reg, byte) out_byte((ComPort1+reg), byte)
+#define COM_READ_BYTE(reg) in_byte((ComPort1+reg))
+
+static int serial_init_done = 0;
+
+void serial_init (void)
+{
+#if 0
+ uint32 clock_divisor = 115200 / baudrate;
+ uint8 cfg;
+ uint8 a;
+ uint16 devfn = 7 << 3;
+
+ if (serial_init_done)
+ return;
+
+ /* Enter configuration mode */
+ cfg = pci_read_cfg_byte (0, devfn, 0x85);
+ pci_write_cfg_byte (0, devfn, 0x85, cfg | 0x02);
+
+ /* Set serial port COM1 as 3F8 */
+ out_byte (0x3F0, 0xE7);
+ out_byte (0x3f1, 0xfe);
+
+ /* Set serial port COM2 as 2F8 */
+ out_byte (0x3f0, 0xe8);
+ out_byte (0x3f1, 0xeb);
+
+ /* Enable */
+ out_byte (0x3f0, 0xe2);
+ a = in_byte (0x3f1);
+ a |= 0xc;
+ out_byte (0x3f0, 0xe2);
+ out_byte (0x3f1, a);
+
+ /* Reset the configuration mode */
+ pci_write_cfg_byte (0, devfn, 0x85, cfg);
+#endif
+
+ ComPort1 = 0x3F8;
+
+ /* Disable interrupts */
+ COM_WRITE_BYTE (INTERRUPT_ENABLE, 0x00);
+
+ /* Set baud rate */
+ /* COM_WRITE_BYTE(LINE_CONTROL, 0x83); */
+ /* COM_WRITE_BYTE(DIVISOR_LATCH_LSB, (uint8)(clock_divisor & 0xFF)); */
+ /* COM_WRITE_BYTE(DIVISOR_LATCH_MSB, (uint8)(clock_divisor >> 8)); */
+ /* __asm("eieio"); */
+
+ /* Set 8-N-1 */
+ COM_WRITE_BYTE (LINE_CONTROL, 0x03);
+ __asm ("eieio");
+
+ /* Disable FIFO */
+ COM_WRITE_BYTE (MODEM_CONTROL, 0x03);
+ COM_WRITE_BYTE (FIFO_CONTROL, 0x07);
+
+ __asm ("eieio");
+ serial_init_done = 1;
+}
+
+extern int console_changed;
+
+void serial_putc (const char sendme)
+{
+ if (sendme == '\n') {
+ while ((in_byte (0x3FD) & 0x40) == 0);
+ out_byte (0x3f8, 0x0D);
+ }
+
+ while ((in_byte (0x3FD) & 0x40) == 0);
+ out_byte (0x3f8, sendme);
+}
+
+int serial_getc (void)
+{
+#if 0
+ uint8 c;
+
+ for (;;) {
+ uint8 x = in_byte (0x3FD);
+
+ if (x & 0x01)
+ break;
+
+ if (x & 0x0C)
+ out_byte (0x3fd, 0x0c);
+ }
+
+ c = in_byte (0x3F8);
+
+ return c;
+#else
+ while ((in_byte (0x3FD) & 0x01) == 0) {
+ if (console_changed != 0) {
+ printf ("Console changed\n");
+ console_changed = 0;
+ return 0;
+ }
+ }
+ return in_byte (0x3F8);
+#endif
+}
+
+int serial_tstc (void)
+{
+ return (in_byte (0x03FD) & 0x01) != 0;
+}
+
+void serial_debug_putc (int c)
+{
+ serial_puts ("DBG");
+ serial_putc (c);
+ serial_putc (0x0d);
+ serial_putc (0x0A);
+}
+
+#else
+
+const NS16550_t Com0 = (NS16550_t) CFG_NS16550_COM1;
+const NS16550_t Com1 = (NS16550_t) CFG_NS16550_COM2;
+
+int serial_init (void)
+{
+ DECLARE_GLOBAL_DATA_PTR;
+
+ uint32 clock_divisor = 115200 / gd->baudrate;
+
+ NS16550_init (Com0, clock_divisor);
+ /* NS16550_reinit(Com1, clock_divisor); */
+ /* serial_puts("COM1: 3F8h initalized"); */
+
+ return (0);
+}
+
+#if 0
+void serial_putc (const char c)
+{
+ NS16550_putc (Com0, c);
+ if (c == '\n')
+ NS16550_putc (Com0, 0x0D);
+}
+
+int serial_getc (void)
+{
+ return (int) NS16550_getc (Com0);
+}
+
+int serial_tstc (void)
+{
+ return NS16550_tstc (Com0);
+}
+#else
+void serial_putc (const char sendme)
+{
+ if (sendme == '\n') {
+ while ((in_byte (0x3FD) & 0x40) == 0);
+ out_byte (0x3f8, 0x0D);
+ }
+
+ while ((in_byte (0x3FD) & 0x40) == 0);
+ out_byte (0x3f8, sendme);
+}
+
+
+extern int console_changed;
+
+int serial_getc (void)
+{
+#if 0
+ uint8 c;
+
+ for (;;) {
+ uint8 x = in_byte (0x3FD);
+
+ if (x & 0x01)
+ break;
+
+ if (x & 0x0C)
+ out_byte (0x3fd, 0x0c);
+ }
+
+ c = in_byte (0x3F8);
+
+ return c;
+#else
+ while ((in_byte (0x3FD) & 0x01) == 0) {
+ if (console_changed != 0) {
+ console_changed = 0;
+ return 0;
+ }
+ }
+
+ return in_byte (0x3F8);
+#endif
+}
+
+int serial_tstc (void)
+{
+ return (in_byte (0x03FD) & 0x01) != 0;
+}
+#endif
+
+#endif
+
+void serial_puts (const char *string)
+{
+ while (*string)
+ serial_putc (*string++);
+}
+
+void serial_setbrg (void)
+{
+ DECLARE_GLOBAL_DATA_PTR;
+
+ uint32 clock_divisor = 115200 / gd->baudrate;
+
+ NS16550_init (Com0, clock_divisor);
+}
diff --git a/board/MAI/AmigaOneG3SE/short_types.h b/board/MAI/AmigaOneG3SE/short_types.h
new file mode 100644
index 00000000000..22df3c92c46
--- /dev/null
+++ b/board/MAI/AmigaOneG3SE/short_types.h
@@ -0,0 +1,36 @@
+/*
+ * short type names
+ *
+ * (C) Copyright 2002
+ * Hyperion Entertainment, ThomasF@hyperion-entertainment.com
+ *
+ * See file CREDITS for list of people who contributed to this
+ * project.
+ *
+ * This program is free software; you can redistribute it and/or
+ * modify it under the terms of the GNU General Public License as
+ * published by the Free Software Foundation; either version 2 of
+ * the License, or (at your option) any later version.
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with this program; if not, write to the Free Software
+ * Foundation, Inc., 59 Temple Place, Suite 330, Boston,
+ * MA 02111-1307 USA
+ */
+
+#ifndef _SHORT_TYPES_H
+#define _SHORT_TYPES_H
+
+typedef unsigned long uint32;
+typedef long int32;
+typedef unsigned short uint16;
+typedef short int16;
+typedef unsigned char uint8;
+typedef signed char int8;
+
+#endif
diff --git a/board/MAI/AmigaOneG3SE/smbus.c b/board/MAI/AmigaOneG3SE/smbus.c
new file mode 100644
index 00000000000..616005ea939
--- /dev/null
+++ b/board/MAI/AmigaOneG3SE/smbus.c
@@ -0,0 +1,206 @@
+#include "memio.h"
+#include "articiaS.h"
+
+#ifndef FALSE
+#define FALSE 0
+#endif
+
+#ifndef TRUE
+#define TRUE 1
+#endif
+
+
+void sm_write_mode(void)
+{
+ out_byte(0xA539, 0x00);
+ out_byte(0xA53A, 0x03);
+}
+
+void sm_read_mode(void)
+{
+ out_byte(0xA53A, 0x02);
+ out_byte(0xA539, 0x02);
+}
+
+void sm_write_byte(uint8 writeme)
+{
+ int i;
+ int level;
+
+ out_byte(0xA539, 0x00);
+
+ level = 0;
+
+ for (i=0; i<8; i++)
+ {
+ if ((writeme & 0x80) == (level<<7))
+ {
+ /* Bit did not change, rewrite strobe */
+ out_byte(0xA539, level | 0x02);
+ out_byte(0xA539, level);
+ }
+ else
+ {
+ /* Bit changed, set bit, then strobe */
+ level = (writeme & 0x80) >> 7;
+ out_byte(0xA539, level);
+ out_byte(0xA539, level | 0x02);
+ out_byte(0xA539, level);
+ }
+ writeme <<= 1;
+ }
+ out_byte(0xA539, 0x00);
+}
+
+uint8 sm_read_byte(void)
+{
+ uint8 retme, r;
+ int i;
+
+ retme = 0;
+ for (i=0; i<8; i++)
+ {
+ retme <<= 1;
+ out_byte(0xA539, 0x00);
+ out_byte(0xA539, 0x02);
+ r = in_byte(0xA538) & 0x01;
+ retme |= r;
+ }
+
+ return retme;
+}
+
+int sm_get_ack(void)
+{
+ uint8 r;
+ r = in_byte(0xA538);
+ if ((r&0x01) == 0) return TRUE;
+ else return FALSE;
+}
+
+void sm_write_ack(void)
+{
+ out_byte(0xA539, 0x00);
+ out_byte(0xA539, 0x02);
+ out_byte(0xA539, 0x00);
+}
+
+void sm_write_nack(void)
+{
+ out_byte(0xA539, 0x01);
+ out_byte(0xA539, 0x03);
+ out_byte(0xA539, 0x01);
+}
+
+void sm_send_start(void)
+{
+ out_byte(0xA539, 0x03);
+ out_byte(0xA539, 0x02);
+}
+
+void sm_send_stop(void)
+{
+ out_byte(0xA539, 0x02);
+ out_byte(0xA539, 0x03);
+}
+
+int sm_read_byte_from_device(uint8 addr, uint8 reg, uint8 *storage)
+{
+ // S Addr Wr
+ sm_write_mode();
+ sm_send_start();
+ sm_write_byte((addr<<1));
+
+ // [A]
+ sm_read_mode();
+ if (sm_get_ack() == FALSE) return FALSE;
+
+ // Comm
+ sm_write_mode();
+ sm_write_byte(reg);
+
+ // [A]
+ sm_read_mode();
+ if (sm_get_ack() == FALSE) return FALSE;
+
+ // S Addr Rd
+ sm_write_mode();
+ sm_send_start();
+ sm_write_byte((addr<<1)|1);
+
+ // [A]
+ sm_read_mode();
+ if (sm_get_ack() == FALSE) return FALSE;
+
+ // [Data]
+ *storage = sm_read_byte();
+
+ // NA
+ sm_write_mode();
+ sm_write_nack();
+ sm_send_stop();
+
+ return TRUE;
+}
+
+void sm_init(void)
+{
+ /* Switch to PMC mode */
+ pci_write_cfg_byte(0, 0, REG_GROUP, (uint8)(REG_GROUP_SPECIAL|REG_GROUP_POWER));
+
+ /* Set GPIO Base */
+ pci_write_cfg_long(0, 0, 0x40, 0xa500);
+
+ /* Enable GPIO */
+ pci_write_cfg_byte(0, 0, 0x44, 0x11);
+
+ /* Set both GPIO 0 and 1 as output */
+ out_byte(0xA53A, 0x03);
+}
+
+
+void sm_term(void)
+{
+ /* Switch to normal mode */
+ pci_write_cfg_byte(0, 0, REG_GROUP, 0);
+}
+
+
+int sm_get_data(uint8 *DataArray, int dimm_socket)
+{
+ int j;
+
+#if 0
+ /* Switch to PMC mode */
+ pci_write_cfg_byte(0, 0, REG_GROUP, (uint8)(REG_GROUP_SPECIAL|REG_GROUP_POWER));
+
+ /* Set GPIO Base */
+ pci_write_cfg_long(0, 0, 0x40, 0xa500);
+
+ /* Enable GPIO */
+ pci_write_cfg_byte(0, 0, 0x44, 0x11);
+
+ /* Set both GPIO 0 and 1 as output */
+ out_byte(0xA53A, 0x03);
+#endif
+
+ sm_init();
+ /* Start reading the rom */
+
+ j = 0;
+
+ do
+ {
+ if (sm_read_byte_from_device(dimm_socket, (uint8)j, DataArray) == FALSE)
+ {
+ sm_term();
+ return FALSE;
+ }
+
+ DataArray++;
+ j++;
+ } while (j < 128);
+
+ sm_term();
+ return TRUE;
+}
diff --git a/board/MAI/AmigaOneG3SE/smbus.h b/board/MAI/AmigaOneG3SE/smbus.h
new file mode 100644
index 00000000000..beeb6a06aaf
--- /dev/null
+++ b/board/MAI/AmigaOneG3SE/smbus.h
@@ -0,0 +1,22 @@
+#ifndef _SMBUS_H_
+#define _SMBUS_H_
+
+#include "short_types.h"
+
+#define SM_DIMM0_ADDR 0x51
+#define SM_DIMM1_ADDR 0x52
+
+void sm_write_mode(void);
+void sm_read_mode(void);
+void sm_write_byte(uint8 writeme);
+uint8 sm_read_byte(void);
+int sm_get_ack(void);
+void sm_write_ack(void);
+void sm_write_nack(void);
+void sm_send_start(void);
+void sm_send_stop(void);
+int sm_read_byte_from_device(uint8 addr, uint8 reg, uint8 *storage);
+int sm_get_data(uint8 *DataArray, int dimm_socket);
+void sm_init(void);
+void sm_term(void);
+#endif
diff --git a/board/MAI/AmigaOneG3SE/start.txt b/board/MAI/AmigaOneG3SE/start.txt
new file mode 100644
index 00000000000..5c7b541a2b5
--- /dev/null
+++ b/board/MAI/AmigaOneG3SE/start.txt
@@ -0,0 +1,201 @@
+
+ /*------------------------------------------------------*/
+ /* TERON Articia / SDRAM Init */
+ /*------------------------------------------------------*/
+
+* XD_CTL = 0x81000000 (0x74)
+
+* HBUS_ACC_CTL_0 &= 0xFFFFFDFF (0x5c)
+ /* host bus access ctl reg 2(5e) */
+ /* set - CPU read from memory data one clock after data is latched */
+
+* GLOBL_INFO_0 |= 0x00004000 (0x50)
+ /* global info register 2 (52), AGP/PCI bus 1 arbiter is addressed in Articia S */
+
+ PCI_1_SB_CONFIG_0 |= 0x00000400 (0x80d0)
+ /* PCI1 side band config reg 2 (d2), enable read acces while write buffer not empty */
+
+ MEM_RAS_CTL_0 |= 0x3f000000 (0xcc)
+ &= 0x3fffffff
+ /* RAS park control reg 0(cc), park access enable is set */
+
+ HOST_RDBUF_CTL |= 0x10000000 (0x70)
+ &= 0x10ffffff
+ /* host read buffer control reg, enable prefetch for CPU read from DRAM control */
+
+ HBUS_ACC_CTL_0 |= 0x0100001f (0x5c)
+ &= 0xf1ffffff
+ /* host bus access control register, enable CPU address bus pipe control */
+ /* two outstanding requests, *** changed to 2 from 3 */
+ /* enable line merge write control for CPU write to system memory, PCI 1 */
+ /* and PCI 0 bus memory; enable page merge write control for write to */
+ /* PCI bus 0 & bus 1 memory */
+
+ SRAM_CTL |= 0x00004000 (0xc8)
+ &= 0xffbff7ff
+ /* DRAM detail timing control register 1 (ca), bit 3 set to 0 */
+ /* DRAM start access latency control - wait for one clock */
+ /* ff9f changed to ffbf */
+
+ DIM0_TIM_CTL_0 = 0x737d737d (0xc9)
+ /* DRAM timing control for dimm0 & dimm1; set wait one clock */
+ /* cycle for next data access */
+
+ DIM2_TIM_CTL_0 = 0x737d737d (0xca)
+ /* DRAM timing control for dimm2 & dimm3; set wait one clock */
+ /* cycle for next data access */
+
+ DIM0_BNK0_CTL_0 = BNK0_RAM_SIZ_128MB (0x90)
+ /* set dimm0 bank0 for 128 MB */
+
+ DIM0_BNK1_CTL_0 = BNK1_RAM_SIZ_128MB (0x94)
+ /* set dimm0 for bank1 */
+
+ DIM0_TIM_CTL_0 = 0xf3bf0000 (0xc9)
+ /* dimm0 timing control register; RAS - CAS latency - 4 clock */
+ /* CAS access latency - 3 wait; pre-charge latency - 3 wait */
+ /* pre-charge command period control - 5 clock; wait one clock */
+ /* cycle for next data access; read to write access latency control */
+ /* - 2 clock cycles */
+
+ DRAM_GBL_CTL_0 |= 0x00000100 (0xc0)
+ &= 0xffff01ff
+ /* memory global control register - support buffer sdram on bank 0 */
+
+ DRAM_ECC_CTL_0 |= 0x00260000 (0xc4)
+ &= 0xff26ffff
+ /* enable ECC; enable read, modify, write control */
+
+ DRAM_REF_CTL_0 = DRAM_REF_DATA (0xb8)
+ /* set DRAM refresh parameters *** changed to 00940100 */
+
+ nop
+ nop
+ nop
+ nop
+ nop
+
+ DRAM_ECC_CTL_0 |= 0x20243280 (0xc4)
+ /* turn off ecc */
+ /* for SDRAM bank 0 */
+
+ DRAM_ECC_CTL_0 |= 0x20243290 (0xc4) ?
+ /* for SDRAM bank 1 */
+
+
+/* Additional Stuff...*/
+
+ GLOBL_CTRL |= 0x20000b00 (0x54)
+
+ PCI_0_SB_CONFIG |= 0x04100007 (0xd0)
+ /* PCI 0 Side band config reg*/
+
+ 0x8000083c |= 0x00080000
+ /* Disable VGA decode on PCI Bus 1 */
+
+
+/*End Additional Stuff..*/
+
+ /*--------------------------------------------------------------*/
+ /* TERON serial port initialization code */
+ /*--------------------------------------------------------------*/
+
+ 0x84380080 |= 0x00030000
+ /* enable super IO configuration VIA chip Register 85 */
+ /* Enable super I/O config mode */
+
+ 0xfe0003f0 = 0xe2
+ bl delay1
+
+ 0xfe0003f1 = 0x0f
+ bl delay1
+ /* enable com1 & com2, parallel port disabled */
+
+ 0xfe0003f0 = 0xe7
+ bl delay1
+ /* let's make com1 base as 0x3f8 */
+
+ 0xfe0003f1 = 0xfe
+ bl delay1
+
+ 0xfe0003f0 = 0xe8
+ bl delay1
+ /* let's make com2 base as 0x2f8 */
+
+ 0xfe0003f1 = 0xbe
+
+ 0x84380080 &= 0xfffdffff
+ /* closing super IO configuration VIA chip Register 85 */
+
+
+/* -------------------------------*/
+
+ 0xfe0003fb = 0x83
+ bl delay1
+ /*latch enable word length -8 bit */ /* set mslab bit */
+ 0xfe0003f8 = 0x0c
+ bl delay1
+ /* set baud rate lsb for 9600 baud */
+ 0xfe0003f9 = 0x0
+ bl delay1
+ /* set baud rate msb for 9600 baud */
+ 0xfe0003fb = 0x03
+ bl delay1
+ /* reset mslab */
+
+ /*--------------------------------------------------------------*/
+ /* END TERON Serial Port Initialization Code */
+ /*--------------------------------------------------------------*/
+
+
+
+ /*--------------------------------------------------------------*/
+ /* END TERON Articia / SDRAM Initialization code */
+ /*--------------------------------------------------------------*/
+
+Proposed from Documentation:
+
+write dmem 0xfec00cf8 0x50000080
+write dmem 0xfee00cfc 0xc0305411
+
+ Writes to index 0x50-0x53.
+ 0x50: Global Information Register 0
+ 0xC0 = Little Endian CPU, Sequential order Burst
+ 0x51: Global Information Register 1
+ Read only, 0x30 = Provides PowerPC and X86 support
+ 0x52: Global Information Register 2
+ 0x05 = 64/128 bit CPU bus support
+ 0x53: Global Information Register 3
+ 0x80 = PCI Bus 0 grant active time is 1 clock after REQ# deasserted
+
+write dmem 0xfec00cf8 0x5c000080
+write dmem 0xfee00cfc 0xb300011F
+
+write dmem 0xfec00cf8 0xc8000080
+write dmem 0xfee00cfc 0x0020f100
+
+write dmem 0xfec00cf8 0x90000080
+write dmem 0xfee00cfc 0x007fe700
+
+write dmem 0xfec00cf8 0x9400080
+write dmem 0xfee00cfc 0x007fe700
+
+write dmem 0xfec00cf8 0xb0000080
+write dmem 0xfee00cfc 0x737d737d
+
+write dmem 0xfec00cf8 0xb4000080
+write dmem 0xfee00cfc 0x737d737d
+
+write dmem 0xfec00cf8 0xc0000080
+write dmem 0xfee00cfc 0x40005500
+
+write dmem 0xfec00cf8 0xb8000080
+write dmem 0xfee00cfc 0x00940100
+
+write dmem 0xfec00cf8 0xc4000080
+write dmem 0xfee00cfc 0x00003280
+
+write dmem 0xfec00cf8 0xc4000080
+write dmem 0xfee00cfc 0x00003290
+
+
diff --git a/board/MAI/AmigaOneG3SE/todo.txt b/board/MAI/AmigaOneG3SE/todo.txt
new file mode 100644
index 00000000000..df25e3dee0d
--- /dev/null
+++ b/board/MAI/AmigaOneG3SE/todo.txt
@@ -0,0 +1,3 @@
+- Init interrupt controller
+- init sdram
+- init ide controller
\ No newline at end of file
diff --git a/board/MAI/AmigaOneG3SE/u-boot.lds b/board/MAI/AmigaOneG3SE/u-boot.lds
new file mode 100644
index 00000000000..d36a7e1caaf
--- /dev/null
+++ b/board/MAI/AmigaOneG3SE/u-boot.lds
@@ -0,0 +1,131 @@
+/*
+ * (C) Copyright 2001
+ * Josh Huber <huber@mclx.com>, Mission Critical Linux, Inc.
+ *
+ * (C) Copyright 2002
+ * Wolfgang Denk, DENX Software Engineering, wd@denx.de.
+ *
+ * See file CREDITS for list of people who contributed to this
+ * project.
+ *
+ * This program is free software; you can redistribute it and/or
+ * modify it under the terms of the GNU General Public License as
+ * published by the Free Software Foundation; either version 2 of
+ * the License, or (at your option) any later version.
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with this program; if not, write to the Free Software
+ * Foundation, Inc., 59 Temple Place, Suite 330, Boston,
+ * MA 02111-1307 USA
+ */
+
+/*
+ * u-boot.lds - linker script for U-Boot on the AmigaOneG3SE Board.
+ */
+
+OUTPUT_ARCH(powerpc)
+SEARCH_DIR(/lib); SEARCH_DIR(/usr/lib); SEARCH_DIR(/usr/local/lib); SEARCH_DIR(/usr/local/powerpc-any-elf/lib);
+/* Do we need any of these for elf?
+ __DYNAMIC = 0; */
+SECTIONS
+{
+ /* Read-only sections, merged into text segment: */
+ . = + SIZEOF_HEADERS;
+ .interp : { *(.interp) }
+ .hash : { *(.hash) }
+ .dynsym : { *(.dynsym) }
+ .dynstr : { *(.dynstr) }
+ .rel.text : { *(.rel.text) }
+ .rela.text : { *(.rela.text) }
+ .rel.data : { *(.rel.data) }
+ .rela.data : { *(.rela.data) }
+ .rel.rodata : { *(.rel.rodata) }
+ .rela.rodata : { *(.rela.rodata) }
+ .rel.got : { *(.rel.got) }
+ .rela.got : { *(.rela.got) }
+ .rel.ctors : { *(.rel.ctors) }
+ .rela.ctors : { *(.rela.ctors) }
+ .rel.dtors : { *(.rel.dtors) }
+ .rela.dtors : { *(.rela.dtors) }
+ .rel.bss : { *(.rel.bss) }
+ .rela.bss : { *(.rela.bss) }
+ .rel.plt : { *(.rel.plt) }
+ .rela.plt : { *(.rela.plt) }
+ .init : { *(.init) }
+ .plt : { *(.plt) }
+ .text :
+ {
+ cpu/74xx_7xx/start.o (.text)
+/* store the environment in a seperate sector in the boot flash */
+/* . = env_offset; */
+ common/environment.o(.text)
+
+ *(.text)
+ *(.fixup)
+ *(.got1)
+ }
+ _etext = .;
+ PROVIDE (etext = .);
+ .rodata :
+ {
+ *(.rodata)
+ *(.rodata1)
+ }
+ .fini : { *(.fini) } =0
+ .ctors : { *(.ctors) }
+ .dtors : { *(.dtors) }
+
+ /* Read-write section, merged into data segment: */
+ . = (. + 0x00FF) & 0xFFFFFF00;
+ _erotext = .;
+ PROVIDE (erotext = .);
+ .reloc :
+ {
+ *(.got)
+ _GOT2_TABLE_ = .;
+ *(.got2)
+ _FIXUP_TABLE_ = .;
+ *(.fixup)
+ }
+ __got2_entries = (_FIXUP_TABLE_ - _GOT2_TABLE_) >>2;
+ __fixup_entries = (. - _FIXUP_TABLE_)>>2;
+
+ .data :
+ {
+ *(.data)
+ *(.data1)
+ *(.sdata)
+ *(.sdata2)
+ *(.dynamic)
+ CONSTRUCTORS
+ }
+ _edata = .;
+ PROVIDE (edata = .);
+
+ __start___ex_table = .;
+ __ex_table : { *(__ex_table) }
+ __stop___ex_table = .;
+
+ . = ALIGN(256);
+ __init_begin = .;
+ .text.init : { *(.text.init) }
+ .data.init : { *(.data.init) }
+ . = ALIGN(256);
+ __init_end = .;
+
+ __bss_start = .;
+ .bss :
+ {
+ *(.sbss) *(.scommon)
+ *(.dynbss)
+ *(.bss)
+ *(COMMON)
+ }
+ _end = ALIGN(4) /*.*/ ;
+ PROVIDE (end = ALIGN(4) /*.*/);
+}
diff --git a/board/MAI/AmigaOneG3SE/usb_uhci.c b/board/MAI/AmigaOneG3SE/usb_uhci.c
new file mode 100644
index 00000000000..fd8cb4ef33f
--- /dev/null
+++ b/board/MAI/AmigaOneG3SE/usb_uhci.c
@@ -0,0 +1,1179 @@
+/*
+ * (C) Copyright 2001
+ * Denis Peter, MPL AG Switzerland
+ *
+ * See file CREDITS for list of people who contributed to this
+ * project.
+ *
+ * This program is free software; you can redistribute it and/or
+ * modify it under the terms of the GNU General Public License as
+ * published by the Free Software Foundation; either version 2 of
+ * the License, or (at your option) any later version.
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with this program; if not, write to the Free Software
+ * Foundation, Inc., 59 Temple Place, Suite 330, Boston,
+ * MA 02111-1307 USA
+ *
+ * Note: Part of this code has been derived from linux
+ *
+ */
+
+/**********************************************************************
+ * How it works:
+ * -------------
+ * The framelist / Transfer descriptor / Queue Heads are similar like
+ * in the linux usb_uhci.c.
+ *
+ * During initialization, the following skeleton is allocated in init_skel:
+ *
+ * framespecific | common chain
+ *
+ * framelist[]
+ * [ 0 ]-----> TD ---------\
+ * [ 1 ]-----> TD ----------> TD ------> QH -------> QH -------> QH ---> NULL
+ * ... TD ---------/
+ * [1023]-----> TD --------/
+ *
+ * ^^ ^^ ^^ ^^ ^^
+ * 7 TDs for 1 TD for Start of Start of End Chain
+ * INT (2-128ms) 1ms-INT CTRL Chain BULK Chain
+ *
+ *
+ * Since this is a bootloader, the isochronous transfer descriptor have been removed.
+ *
+ * Interrupt Transfers.
+ * --------------------
+ * For Interupt transfers USB_MAX_TEMP_INT_TD Transfer descriptor are available. They
+ * will be inserted after the appropriate (depending the interval setting) skeleton TD.
+ * If an interrupt has been detected the dev->irqhandler is called. The status and number
+ * of transfered bytes is stored in dev->irq_status resp. dev->irq_act_len. If the
+ * dev->irqhandler returns 0, the interrupt TD is removed and disabled. If an 1 is returned,
+ * the interrupt TD will be reactivated.
+ *
+ * Control Transfers
+ * -----------------
+ * Control Transfers are issued by filling the tmp_td with the appropriate data and connect
+ * them to the qh_cntrl queue header. Before other control/bulk transfers can be issued,
+ * the programm has to wait for completion. This does not allows asynchronous data transfer.
+ *
+ * Bulk Transfers
+ * --------------
+ * Bulk Transfers are issued by filling the tmp_td with the appropriate data and connect
+ * them to the qh_bulk queue header. Before other control/bulk transfers can be issued,
+ * the programm has to wait for completion. This does not allows asynchronous data transfer.
+ *
+ *
+ */
+
+#include <common.h>
+#include <pci.h>
+
+#ifdef CONFIG_USB_UHCI
+
+#include <usb.h>
+#include "usb_uhci.h"
+
+#define USB_MAX_TEMP_TD 128 /* number of temporary TDs for bulk and control transfers */
+#define USB_MAX_TEMP_INT_TD 32 /* number of temporary TDs for Interrupt transfers */
+
+
+//#define USB_UHCI_DEBUG
+
+#ifdef USB_UHCI_DEBUG
+#define USB_UHCI_PRINTF(fmt,args...) printf (fmt ,##args)
+#else
+#define USB_UHCI_PRINTF(fmt,args...)
+#endif
+
+
+static int irqvec = -1; /* irq vector, if -1 uhci is stopped / reseted */
+unsigned int usb_base_addr; /* base address */
+
+static uhci_td_t td_int[8]; /* Interrupt Transfer descriptors */
+static uhci_qh_t qh_cntrl; /* control Queue Head */
+static uhci_qh_t qh_bulk; /* bulk Queue Head */
+static uhci_qh_t qh_end; /* end Queue Head */
+static uhci_td_t td_last; /* last TD (linked with end chain) */
+
+/* temporary tds */
+static uhci_td_t tmp_td[USB_MAX_TEMP_TD]; /* temporary bulk/control td's */
+static uhci_td_t tmp_int_td[USB_MAX_TEMP_INT_TD]; /* temporary interrupt td's */
+
+static unsigned long framelist[1024] __attribute__ ((aligned (0x1000))); /* frame list */
+
+static struct virt_root_hub rh; /* struct for root hub */
+
+/**********************************************************************
+ * some forward decleration
+ */
+int uhci_submit_rh_msg(struct usb_device *dev, unsigned long pipe,
+ void *buffer, int transfer_len,struct devrequest *setup);
+
+/* fill a td with the approproiate data. Link, status, info and buffer
+ * are used by the USB controller itselfes, dev is used to identify the
+ * "connected" device
+ */
+void usb_fill_td(uhci_td_t* td,unsigned long link,unsigned long status,
+ unsigned long info, unsigned long buffer, unsigned long dev)
+{
+ td->link=swap_32(link);
+ td->status=swap_32(status);
+ td->info=swap_32(info);
+ td->buffer=swap_32(buffer);
+ td->dev_ptr=dev;
+}
+
+/* fill a qh with the approproiate data. Head and element are used by the USB controller
+ * itselfes. As soon as a valid dev_ptr is filled, a td chain is connected to the qh.
+ * Please note, that after completion of the td chain, the entry element is removed /
+ * marked invalid by the USB controller.
+ */
+void usb_fill_qh(uhci_qh_t* qh,unsigned long head,unsigned long element)
+{
+ qh->head=swap_32(head);
+ qh->element=swap_32(element);
+ qh->dev_ptr=0L;
+}
+
+/* get the status of a td->status
+ */
+unsigned long usb_uhci_td_stat(unsigned long status)
+{
+ unsigned long result=0;
+ result |= (status & TD_CTRL_NAK) ? USB_ST_NAK_REC : 0;
+ result |= (status & TD_CTRL_STALLED) ? USB_ST_STALLED : 0;
+ result |= (status & TD_CTRL_DBUFERR) ? USB_ST_BUF_ERR : 0;
+ result |= (status & TD_CTRL_BABBLE) ? USB_ST_BABBLE_DET : 0;
+ result |= (status & TD_CTRL_CRCTIMEO) ? USB_ST_CRC_ERR : 0;
+ result |= (status & TD_CTRL_BITSTUFF) ? USB_ST_BIT_ERR : 0;
+ result |= (status & TD_CTRL_ACTIVE) ? USB_ST_NOT_PROC : 0;
+ return result;
+}
+
+/* get the status and the transfered len of a td chain.
+ * called from the completion handler
+ */
+int usb_get_td_status(uhci_td_t *td,struct usb_device *dev)
+{
+ unsigned long temp,info;
+ unsigned long stat;
+ uhci_td_t *mytd=td;
+
+ if(dev->devnum==rh.devnum)
+ return 0;
+ dev->act_len=0;
+ stat=0;
+ do {
+ temp=swap_32((unsigned long)mytd->status);
+ stat=usb_uhci_td_stat(temp);
+ info=swap_32((unsigned long)mytd->info);
+ if(((info & 0xff)!= USB_PID_SETUP) &&
+ (((info >> 21) & 0x7ff)!= 0x7ff) &&
+ (temp & 0x7FF)!=0x7ff)
+ { /* if not setup and not null data pack */
+ dev->act_len+=(temp & 0x7FF) + 1; /* the transfered len is act_len + 1 */
+ }
+ if(stat) { /* status no ok */
+ dev->status=stat;
+ return -1;
+ }
+ temp=swap_32((unsigned long)mytd->link);
+ mytd=(uhci_td_t *)(temp & 0xfffffff0);
+ }while((temp & 0x1)==0); /* process all TDs */
+ dev->status=stat;
+ return 0; /* Ok */
+}
+
+
+/*-------------------------------------------------------------------
+ * LOW LEVEL STUFF
+ * assembles QHs und TDs for control, bulk and iso
+ *-------------------------------------------------------------------*/
+
+/* Submits a control message. That is a Setup, Data and Status transfer.
+ * Routine does not wait for completion.
+ */
+int submit_control_msg(struct usb_device *dev, unsigned long pipe, void *buffer,
+ int transfer_len,struct devrequest *setup)
+{
+ unsigned long destination, status;
+ int maxsze = usb_maxpacket(dev, pipe);
+ unsigned long dataptr;
+ int len;
+ int pktsze;
+ int i=0;
+
+ if (!maxsze) {
+ USB_UHCI_PRINTF("uhci_submit_control_urb: pipesize for pipe %lx is zero\n", pipe);
+ return -1;
+ }
+ if(((pipe>>8)&0x7f)==rh.devnum) {
+ /* this is the root hub -> redirect it */
+ return uhci_submit_rh_msg(dev,pipe,buffer,transfer_len,setup);
+ }
+ USB_UHCI_PRINTF("uhci_submit_control start len %x, maxsize %x\n",transfer_len,maxsze);
+ /* The "pipe" thing contains the destination in bits 8--18 */
+ destination = (pipe & PIPE_DEVEP_MASK) | USB_PID_SETUP; /* Setup stage */
+ /* 3 errors */
+ status = (pipe & TD_CTRL_LS) | TD_CTRL_ACTIVE | (3 << 27);
+ /* (urb->transfer_flags & USB_DISABLE_SPD ? 0 : TD_CTRL_SPD); */
+ /* Build the TD for the control request, try forever, 8 bytes of data */
+ usb_fill_td(&tmp_td[i],UHCI_PTR_TERM ,status, destination | (7 << 21),(unsigned long)setup,(unsigned long)dev);
+#if 0
+ {
+ char *sp=(char *)setup;
+ printf("SETUP to pipe %lx: %x %x %x %x %x %x %x %x\n", pipe,
+ sp[0],sp[1],sp[2],sp[3],sp[4],sp[5],sp[6],sp[7]);
+ }
+#endif
+ dataptr = (unsigned long)buffer;
+ len=transfer_len;
+
+ /* If direction is "send", change the frame from SETUP (0x2D)
+ to OUT (0xE1). Else change it from SETUP to IN (0x69). */
+ destination = (pipe & PIPE_DEVEP_MASK) | ((pipe & USB_DIR_IN)==0 ? USB_PID_OUT : USB_PID_IN);
+ while (len > 0) {
+ /* data stage */
+ pktsze = len;
+ i++;
+ if (pktsze > maxsze)
+ pktsze = maxsze;
+ destination ^= 1 << TD_TOKEN_TOGGLE; /* toggle DATA0/1 */
+ usb_fill_td(&tmp_td[i],UHCI_PTR_TERM, status, destination | ((pktsze - 1) << 21),dataptr,(unsigned long)dev); /* Status, pktsze bytes of data */
+ tmp_td[i-1].link=swap_32((unsigned long)&tmp_td[i]);
+
+ dataptr += pktsze;
+ len -= pktsze;
+ }
+
+ /* Build the final TD for control status */
+ /* It's only IN if the pipe is out AND we aren't expecting data */
+
+ destination &= ~UHCI_PID;
+ if (((pipe & USB_DIR_IN)==0) || (transfer_len == 0))
+ destination |= USB_PID_IN;
+ else
+ destination |= USB_PID_OUT;
+ destination |= 1 << TD_TOKEN_TOGGLE; /* End in Data1 */
+ i++;
+ status &=~TD_CTRL_SPD;
+ /* no limit on errors on final packet , 0 bytes of data */
+ usb_fill_td(&tmp_td[i],UHCI_PTR_TERM, status | TD_CTRL_IOC, destination | (UHCI_NULL_DATA_SIZE << 21),0,(unsigned long)dev);
+ tmp_td[i-1].link=swap_32((unsigned long)&tmp_td[i]); /* queue status td */
+ /* usb_show_td(i+1);*/
+ USB_UHCI_PRINTF("uhci_submit_control end (%d tmp_tds used)\n",i);
+ /* first mark the control QH element terminated */
+ qh_cntrl.element=0xffffffffL;
+ /* set qh active */
+ qh_cntrl.dev_ptr=(unsigned long)dev;
+ /* fill in tmp_td_chain */
+ qh_cntrl.element=swap_32((unsigned long)&tmp_td[0]);
+ return 0;
+}
+
+/*-------------------------------------------------------------------
+ * Prepare TDs for bulk transfers.
+ */
+int submit_bulk_msg(struct usb_device *dev, unsigned long pipe, void *buffer,int transfer_len)
+{
+ unsigned long destination, status,info;
+ unsigned long dataptr;
+ int maxsze = usb_maxpacket(dev, pipe);
+ int len;
+ int i=0;
+
+ if(transfer_len < 0) {
+ printf("Negative transfer length in submit_bulk\n");
+ return -1;
+ }
+ if (!maxsze)
+ return -1;
+ /* The "pipe" thing contains the destination in bits 8--18. */
+ destination = (pipe & PIPE_DEVEP_MASK) | usb_packetid (pipe);
+ /* 3 errors */
+ status = (pipe & TD_CTRL_LS) | TD_CTRL_ACTIVE | (3 << 27);
+ /* ((urb->transfer_flags & USB_DISABLE_SPD) ? 0 : TD_CTRL_SPD) | (3 << 27); */
+ /* Build the TDs for the bulk request */
+ len = transfer_len;
+ dataptr = (unsigned long)buffer;
+ do {
+ int pktsze = len;
+ if (pktsze > maxsze)
+ pktsze = maxsze;
+ /* pktsze bytes of data */
+ info = destination | (((pktsze - 1)&UHCI_NULL_DATA_SIZE) << 21) |
+ (usb_gettoggle (dev, usb_pipeendpoint (pipe), usb_pipeout (pipe)) << TD_TOKEN_TOGGLE);
+
+ if((len-pktsze)==0)
+ status |= TD_CTRL_IOC; /* last one generates INT */
+
+ usb_fill_td(&tmp_td[i],UHCI_PTR_TERM, status, info,dataptr,(unsigned long)dev); /* Status, pktsze bytes of data */
+ if(i>0)
+ tmp_td[i-1].link=swap_32((unsigned long)&tmp_td[i]);
+ i++;
+ dataptr += pktsze;
+ len -= pktsze;
+ usb_dotoggle (dev, usb_pipeendpoint (pipe), usb_pipeout (pipe));
+ } while (len > 0);
+ /* first mark the bulk QH element terminated */
+ qh_bulk.element=0xffffffffL;
+ /* set qh active */
+ qh_bulk.dev_ptr=(unsigned long)dev;
+ /* fill in tmp_td_chain */
+ qh_bulk.element=swap_32((unsigned long)&tmp_td[0]);
+ return 0;
+}
+
+
+/* search a free interrupt td
+ */
+uhci_td_t *uhci_alloc_int_td(void)
+{
+ int i;
+ for(i=0;i<USB_MAX_TEMP_INT_TD;i++) {
+ if(tmp_int_td[i].dev_ptr==0) /* no device assigned -> free TD */
+ return &tmp_int_td[i];
+ }
+ return NULL;
+}
+
+#if 0
+void uhci_show_temp_int_td(void)
+{
+ int i;
+ for(i=0;i<USB_MAX_TEMP_INT_TD;i++) {
+ if((tmp_int_td[i].dev_ptr&0x01)!=0x1L) /* no device assigned -> free TD */
+ printf("temp_td %d is assigned to dev %lx\n",i,tmp_int_td[i].dev_ptr);
+ }
+ printf("all others temp_tds are free\n");
+}
+#endif
+/*-------------------------------------------------------------------
+ * submits USB interrupt (ie. polling ;-)
+ */
+int submit_int_msg(struct usb_device *dev, unsigned long pipe, void *buffer,int transfer_len, int interval)
+{
+ int nint, n;
+ unsigned long status, destination;
+ unsigned long info,tmp;
+ uhci_td_t *mytd;
+ if (interval < 0 || interval >= 256)
+ return -1;
+
+ if (interval == 0)
+ nint = 0;
+ else {
+ for (nint = 0, n = 1; nint <= 8; nint++, n += n) /* round interval down to 2^n */
+ {
+ if(interval < n) {
+ interval = n / 2;
+ break;
+ }
+ }
+ nint--;
+ }
+
+ USB_UHCI_PRINTF("Rounded interval to %i, chain %i\n", interval, nint);
+ mytd=uhci_alloc_int_td();
+ if(mytd==NULL) {
+ printf("No free INT TDs found\n");
+ return -1;
+ }
+ status = (pipe & TD_CTRL_LS) | TD_CTRL_ACTIVE | TD_CTRL_IOC | (3 << 27);
+/* (urb->transfer_flags & USB_DISABLE_SPD ? 0 : TD_CTRL_SPD) | (3 << 27);
+*/
+
+ destination =(pipe & PIPE_DEVEP_MASK) | usb_packetid (pipe) | (((transfer_len - 1) & 0x7ff) << 21);
+
+ info = destination | (usb_gettoggle(dev, usb_pipeendpoint(pipe), usb_pipeout(pipe)) << TD_TOKEN_TOGGLE);
+ tmp = swap_32(td_int[nint].link);
+ usb_fill_td(mytd,tmp,status, info,(unsigned long)buffer,(unsigned long)dev);
+ /* Link it */
+ tmp = swap_32((unsigned long)mytd);
+ td_int[nint].link=tmp;
+
+ usb_dotoggle (dev, usb_pipeendpoint (pipe), usb_pipeout (pipe));
+
+ return 0;
+}
+
+/**********************************************************************
+ * Low Level functions
+ */
+
+
+void reset_hc(void)
+{
+
+ /* Global reset for 100ms */
+ out16r( usb_base_addr + USBPORTSC1,0x0204);
+ out16r( usb_base_addr + USBPORTSC2,0x0204);
+ out16r( usb_base_addr + USBCMD,USBCMD_GRESET | USBCMD_RS);
+ /* Turn off all interrupts */
+ out16r(usb_base_addr + USBINTR,0);
+ wait_ms(50);
+ out16r( usb_base_addr + USBCMD,0);
+ wait_ms(10);
+}
+
+void start_hc(void)
+{
+ int timeout = 1000;
+
+ while(in16r(usb_base_addr + USBCMD) & USBCMD_HCRESET) {
+ if (!--timeout) {
+ printf("USBCMD_HCRESET timed out!\n");
+ break;
+ }
+ }
+ /* Turn on all interrupts */
+ out16r(usb_base_addr + USBINTR,USBINTR_TIMEOUT | USBINTR_RESUME | USBINTR_IOC | USBINTR_SP);
+ /* Start at frame 0 */
+ out16r(usb_base_addr + USBFRNUM,0);
+ /* set Framebuffer base address */
+ out32r(usb_base_addr+USBFLBASEADD,(unsigned long)&framelist);
+ /* Run and mark it configured with a 64-byte max packet */
+ out16r(usb_base_addr + USBCMD,USBCMD_RS | USBCMD_CF | USBCMD_MAXP);
+}
+
+/* Initialize the skeleton
+ */
+void usb_init_skel(void)
+{
+ unsigned long temp;
+ int n;
+
+ for(n=0;n<USB_MAX_TEMP_INT_TD;n++)
+ tmp_int_td[n].dev_ptr=0L; /* no devices connected */
+ /* last td */
+ usb_fill_td(&td_last,UHCI_PTR_TERM,TD_CTRL_IOC ,0,0,0L);
+ /* usb_fill_td(&td_last,UHCI_PTR_TERM,0,0,0); */
+ /* End Queue Header */
+ usb_fill_qh(&qh_end,UHCI_PTR_TERM,(unsigned long)&td_last);
+ /* Bulk Queue Header */
+ temp=(unsigned long)&qh_end;
+ usb_fill_qh(&qh_bulk,temp | UHCI_PTR_QH,UHCI_PTR_TERM);
+ /* Control Queue Header */
+ temp=(unsigned long)&qh_bulk;
+ usb_fill_qh(&qh_cntrl, temp | UHCI_PTR_QH,UHCI_PTR_TERM);
+ /* 1ms Interrupt td */
+ temp=(unsigned long)&qh_cntrl;
+ usb_fill_td(&td_int[0],temp | UHCI_PTR_QH,0,0,0,0L);
+ temp=(unsigned long)&td_int[0];
+ for(n=1; n<8; n++)
+ usb_fill_td(&td_int[n],temp,0,0,0,0L);
+ for (n = 0; n < 1024; n++) {
+ /* link all framelist pointers to one of the interrupts */
+ int m, o;
+ if ((n&127)==127)
+ framelist[n]= swap_32((unsigned long)&td_int[0]);
+ else
+ for (o = 1, m = 2; m <= 128; o++, m += m)
+ if ((n & (m - 1)) == ((m - 1) / 2))
+ framelist[n]= swap_32((unsigned long)&td_int[o]);
+ }
+}
+
+/* check the common skeleton for completed transfers, and update the status
+ * of the "connected" device. Called from the IRQ routine.
+ */
+void usb_check_skel(void)
+{
+ struct usb_device *dev;
+ /* start with the control qh */
+ if(qh_cntrl.dev_ptr!=0) /* it's a device assigned check if this caused IRQ */
+ {
+ dev=(struct usb_device *)qh_cntrl.dev_ptr;
+ usb_get_td_status(&tmp_td[0],dev); /* update status */
+ if(!(dev->status & USB_ST_NOT_PROC)) { /* is not active anymore, disconnect devices */
+ qh_cntrl.dev_ptr=0;
+ }
+ }
+ /* now process the bulk */
+ if(qh_bulk.dev_ptr!=0) /* it's a device assigned check if this caused IRQ */
+ {
+ dev=(struct usb_device *)qh_bulk.dev_ptr;
+ usb_get_td_status(&tmp_td[0],dev); /* update status */
+ if(!(dev->status & USB_ST_NOT_PROC)) { /* is not active anymore, disconnect devices */
+ qh_bulk.dev_ptr=0;
+ }
+ }
+}
+
+/* check the interrupt chain, ubdate the status of the appropriate device,
+ * call the appropriate irqhandler and reactivate the TD if the irqhandler
+ * returns with 1
+ */
+void usb_check_int_chain(void)
+{
+ int i,res;
+ unsigned long link,status;
+ struct usb_device *dev;
+ uhci_td_t *td,*prevtd;
+
+ for(i=0;i<8;i++) {
+ prevtd=&td_int[i]; /* the first previous td is the skeleton td */
+ link=swap_32(td_int[i].link) & 0xfffffff0; /* next in chain */
+ td=(uhci_td_t *)link; /* assign it */
+ /* all interrupt TDs are finally linked to the td_int[0].
+ * so we process all until we find the td_int[0].
+ * if int0 chain points to a QH, we're also done
+ */
+ while(((i>0) && (link != (unsigned long)&td_int[0])) ||
+ ((i==0) && !(swap_32(td->link) & UHCI_PTR_QH)))
+ {
+ /* check if a device is assigned with this td */
+ status=swap_32(td->status);
+ if((td->dev_ptr!=0L) && !(status & TD_CTRL_ACTIVE)) {
+ /* td is not active and a device is assigned -> call irqhandler */
+ dev=(struct usb_device *)td->dev_ptr;
+ dev->irq_act_len=((status & 0x7FF)==0x7FF) ? 0 : (status & 0x7FF) + 1; /* transfered length */
+ dev->irq_status=usb_uhci_td_stat(status); /* get status */
+ res=dev->irq_handle(dev); /* call irqhandler */
+ if(res==1) {
+ /* reactivate */
+ status|=TD_CTRL_ACTIVE;
+ td->status=swap_32(status);
+ prevtd=td; /* previous td = this td */
+ }
+ else {
+ prevtd->link=td->link; /* link previous td directly to the nex td -> unlinked */
+ /* remove device pointer */
+ td->dev_ptr=0L;
+ }
+ } /* if we call the irq handler */
+ link=swap_32(td->link) & 0xfffffff0; /* next in chain */
+ td=(uhci_td_t *)link; /* assign it */
+ } /* process all td in this int chain */
+ } /* next interrupt chain */
+}
+
+
+/* usb interrupt service routine.
+ */
+void handle_usb_interrupt(void)
+{
+ unsigned short status;
+
+ /*
+ * Read the interrupt status, and write it back to clear the
+ * interrupt cause
+ */
+
+ status = in16r(usb_base_addr + USBSTS);
+
+ if (!status) /* shared interrupt, not mine */
+ return;
+ if (status != 1) {
+ /* remove host controller halted state */
+ if ((status&0x20) && ((in16r(usb_base_addr+USBCMD) && USBCMD_RS)==0)) {
+ out16r(usb_base_addr + USBCMD, USBCMD_RS | in16r(usb_base_addr + USBCMD));
+ }
+ }
+ usb_check_int_chain(); /* call interrupt handlers for int tds */
+ usb_check_skel(); /* call completion handler for common transfer routines */
+ out16r(usb_base_addr+USBSTS,status);
+}
+
+
+/* init uhci
+ */
+int usb_lowlevel_init(void)
+{
+ unsigned char temp;
+ int busdevfunc;
+/*
+ * HJF - configure IRQ and base from variables optionally.
+ */
+ char *s;
+
+
+ busdevfunc=pci_find_device(USB_UHCI_VEND_ID,USB_UHCI_DEV_ID,0); /* get PCI Device ID */
+ if(busdevfunc==-1) {
+ printf("Error USB UHCI (%04X,%04X) not found\n",USB_UHCI_VEND_ID,USB_UHCI_DEV_ID);
+ return -1;
+ }
+
+#if 1
+ s = getenv("usb_irq");
+ if (s)
+ {
+ temp = atoi(s);
+ pci_write_config_byte(busdevfunc, PCI_INTERRUPT_LINE, temp);
+ }
+ else
+#endif
+ pci_read_config_byte(busdevfunc,PCI_INTERRUPT_LINE,&temp);
+
+ s = getenv("usb_base");
+ if (s)
+ {
+ unsigned long temp2;
+ temp2 = atoi(s);
+ pci_write_config_dword(busdevfunc, PCI_BASE_ADDRESS_4, temp2|0x01);
+ }
+
+ irqvec = temp;
+ irq_free_handler(irqvec);
+ USB_UHCI_PRINTF("Interrupt Line = %d\n",irqvec);
+ pci_read_config_byte(busdevfunc,PCI_INTERRUPT_PIN,&temp);
+ USB_UHCI_PRINTF("Interrupt Pin = %ld\n",temp);
+ pci_read_config_dword(busdevfunc,PCI_BASE_ADDRESS_4,&usb_base_addr);
+ USB_UHCI_PRINTF("IO Base Address = 0x%lx\n",usb_base_addr);
+ usb_base_addr&=0xFFFFFFF0;
+ usb_base_addr+=CFG_ISA_IO_BASE_ADDRESS;
+ rh.devnum = 0;
+ usb_init_skel();
+ reset_hc();
+ start_hc();
+ irq_install_handler(irqvec, (interrupt_handler_t *)handle_usb_interrupt, NULL);
+ irq_install_handler(0, (interrupt_handler_t *)handle_usb_interrupt, NULL);
+
+ return 0;
+}
+
+/* stop uhci
+ */
+int usb_lowlevel_stop(void)
+{
+ if(irqvec==-1)
+ return 1;
+ irq_free_handler(irqvec);
+ irq_free_handler(0);
+ reset_hc();
+ irqvec=-1;
+ return 0;
+}
+
+/*******************************************************************************************
+ * Virtual Root Hub
+ * Since the uhci does not have a real HUB, we simulate one ;-)
+ */
+#undef USB_RH_DEBUG
+
+#ifdef USB_RH_DEBUG
+#define USB_RH_PRINTF(fmt,args...) printf (fmt ,##args)
+static void usb_display_wValue(unsigned short wValue,unsigned short wIndex);
+static void usb_display_Req(unsigned short req);
+#else
+#define USB_RH_PRINTF(fmt,args...)
+static void usb_display_wValue(unsigned short wValue,unsigned short wIndex) {}
+static void usb_display_Req(unsigned short req) {}
+#endif
+
+static unsigned char root_hub_dev_des[] =
+{
+ 0x12, /* __u8 bLength; */
+ 0x01, /* __u8 bDescriptorType; Device */
+ 0x00, /* __u16 bcdUSB; v1.0 */
+ 0x01,
+ 0x09, /* __u8 bDeviceClass; HUB_CLASSCODE */
+ 0x00, /* __u8 bDeviceSubClass; */
+ 0x00, /* __u8 bDeviceProtocol; */
+ 0x08, /* __u8 bMaxPacketSize0; 8 Bytes */
+ 0x00, /* __u16 idVendor; */
+ 0x00,
+ 0x00, /* __u16 idProduct; */
+ 0x00,
+ 0x00, /* __u16 bcdDevice; */
+ 0x00,
+ 0x01, /* __u8 iManufacturer; */
+ 0x00, /* __u8 iProduct; */
+ 0x00, /* __u8 iSerialNumber; */
+ 0x01 /* __u8 bNumConfigurations; */
+};
+
+
+/* Configuration descriptor */
+static unsigned char root_hub_config_des[] =
+{
+ 0x09, /* __u8 bLength; */
+ 0x02, /* __u8 bDescriptorType; Configuration */
+ 0x19, /* __u16 wTotalLength; */
+ 0x00,
+ 0x01, /* __u8 bNumInterfaces; */
+ 0x01, /* __u8 bConfigurationValue; */
+ 0x00, /* __u8 iConfiguration; */
+ 0x40, /* __u8 bmAttributes;
+ Bit 7: Bus-powered, 6: Self-powered, 5 Remote-wakwup, 4..0: resvd */
+ 0x00, /* __u8 MaxPower; */
+
+ /* interface */
+ 0x09, /* __u8 if_bLength; */
+ 0x04, /* __u8 if_bDescriptorType; Interface */
+ 0x00, /* __u8 if_bInterfaceNumber; */
+ 0x00, /* __u8 if_bAlternateSetting; */
+ 0x01, /* __u8 if_bNumEndpoints; */
+ 0x09, /* __u8 if_bInterfaceClass; HUB_CLASSCODE */
+ 0x00, /* __u8 if_bInterfaceSubClass; */
+ 0x00, /* __u8 if_bInterfaceProtocol; */
+ 0x00, /* __u8 if_iInterface; */
+
+ /* endpoint */
+ 0x07, /* __u8 ep_bLength; */
+ 0x05, /* __u8 ep_bDescriptorType; Endpoint */
+ 0x81, /* __u8 ep_bEndpointAddress; IN Endpoint 1 */
+ 0x03, /* __u8 ep_bmAttributes; Interrupt */
+ 0x08, /* __u16 ep_wMaxPacketSize; 8 Bytes */
+ 0x00,
+ 0xff /* __u8 ep_bInterval; 255 ms */
+};
+
+
+static unsigned char root_hub_hub_des[] =
+{
+ 0x09, /* __u8 bLength; */
+ 0x29, /* __u8 bDescriptorType; Hub-descriptor */
+ 0x02, /* __u8 bNbrPorts; */
+ 0x00, /* __u16 wHubCharacteristics; */
+ 0x00,
+ 0x01, /* __u8 bPwrOn2pwrGood; 2ms */
+ 0x00, /* __u8 bHubContrCurrent; 0 mA */
+ 0x00, /* __u8 DeviceRemovable; *** 7 Ports max *** */
+ 0xff /* __u8 PortPwrCtrlMask; *** 7 ports max *** */
+};
+
+static unsigned char root_hub_str_index0[] =
+{
+ 0x04, /* __u8 bLength; */
+ 0x03, /* __u8 bDescriptorType; String-descriptor */
+ 0x09, /* __u8 lang ID */
+ 0x04, /* __u8 lang ID */
+};
+
+static unsigned char root_hub_str_index1[] =
+{
+ 28, /* __u8 bLength; */
+ 0x03, /* __u8 bDescriptorType; String-descriptor */
+ 'U', /* __u8 Unicode */
+ 0, /* __u8 Unicode */
+ 'H', /* __u8 Unicode */
+ 0, /* __u8 Unicode */
+ 'C', /* __u8 Unicode */
+ 0, /* __u8 Unicode */
+ 'I', /* __u8 Unicode */
+ 0, /* __u8 Unicode */
+ ' ', /* __u8 Unicode */
+ 0, /* __u8 Unicode */
+ 'R', /* __u8 Unicode */
+ 0, /* __u8 Unicode */
+ 'o', /* __u8 Unicode */
+ 0, /* __u8 Unicode */
+ 'o', /* __u8 Unicode */
+ 0, /* __u8 Unicode */
+ 't', /* __u8 Unicode */
+ 0, /* __u8 Unicode */
+ ' ', /* __u8 Unicode */
+ 0, /* __u8 Unicode */
+ 'H', /* __u8 Unicode */
+ 0, /* __u8 Unicode */
+ 'u', /* __u8 Unicode */
+ 0, /* __u8 Unicode */
+ 'b', /* __u8 Unicode */
+ 0, /* __u8 Unicode */
+};
+
+
+/*
+ * Root Hub Control Pipe (interrupt Pipes are not supported)
+ */
+
+
+int uhci_submit_rh_msg(struct usb_device *dev, unsigned long pipe, void *buffer,int transfer_len,struct devrequest *cmd)
+{
+ void *data = buffer;
+ int leni = transfer_len;
+ int len = 0;
+ int status = 0;
+ int stat = 0;
+ int i;
+
+ unsigned short cstatus;
+
+ unsigned short bmRType_bReq;
+ unsigned short wValue;
+ unsigned short wIndex;
+ unsigned short wLength;
+
+ if ((pipe & PIPE_INTERRUPT) == PIPE_INTERRUPT) {
+ printf("Root-Hub submit IRQ: NOT implemented\n");
+#if 0
+ uhci->rh.urb = urb;
+ uhci->rh.send = 1;
+ uhci->rh.interval = urb->interval;
+ rh_init_int_timer (urb);
+#endif
+ return 0;
+ }
+ bmRType_bReq = cmd->requesttype | cmd->request << 8;
+ wValue = swap_16(cmd->value);
+ wIndex = swap_16(cmd->index);
+ wLength = swap_16(cmd->length);
+ usb_display_Req(bmRType_bReq);
+ for (i = 0; i < 8; i++)
+ rh.c_p_r[i] = 0;
+ USB_RH_PRINTF("Root-Hub: adr: %2x cmd(%1x): %02x%02x %04x %04x %04x\n",
+ dev->devnum, 8, cmd->requesttype,cmd->request, wValue, wIndex, wLength);
+
+ switch (bmRType_bReq) {
+ /* Request Destination:
+ without flags: Device,
+ RH_INTERFACE: interface,
+ RH_ENDPOINT: endpoint,
+ RH_CLASS means HUB here,
+ RH_OTHER | RH_CLASS almost ever means HUB_PORT here
+ */
+
+ case RH_GET_STATUS:
+ *(unsigned short *) data = swap_16(1);
+ len=2;
+ break;
+ case RH_GET_STATUS | RH_INTERFACE:
+ *(unsigned short *) data = swap_16(0);
+ len=2;
+ break;
+ case RH_GET_STATUS | RH_ENDPOINT:
+ *(unsigned short *) data = swap_16(0);
+ len=2;
+ break;
+ case RH_GET_STATUS | RH_CLASS:
+ *(unsigned long *) data = swap_32(0);
+ len=4;
+ break; /* hub power ** */
+ case RH_GET_STATUS | RH_OTHER | RH_CLASS:
+
+ status = in16r(usb_base_addr + USBPORTSC1 + 2 * (wIndex - 1));
+ cstatus = ((status & USBPORTSC_CSC) >> (1 - 0)) |
+ ((status & USBPORTSC_PEC) >> (3 - 1)) |
+ (rh.c_p_r[wIndex - 1] << (0 + 4));
+ status = (status & USBPORTSC_CCS) |
+ ((status & USBPORTSC_PE) >> (2 - 1)) |
+ ((status & USBPORTSC_SUSP) >> (12 - 2)) |
+ ((status & USBPORTSC_PR) >> (9 - 4)) |
+ (1 << 8) | /* power on ** */
+ ((status & USBPORTSC_LSDA) << (-8 + 9));
+
+ *(unsigned short *) data = swap_16(status);
+ *(unsigned short *) (data + 2) = swap_16(cstatus);
+ len=4;
+ break;
+ case RH_CLEAR_FEATURE | RH_ENDPOINT:
+ switch (wValue) {
+ case (RH_ENDPOINT_STALL):
+ len=0;
+ break;
+ }
+ break;
+
+ case RH_CLEAR_FEATURE | RH_CLASS:
+ switch (wValue) {
+ case (RH_C_HUB_OVER_CURRENT):
+ len=0; /* hub power over current ** */
+ break;
+ }
+ break;
+
+ case RH_CLEAR_FEATURE | RH_OTHER | RH_CLASS:
+ usb_display_wValue(wValue,wIndex);
+ switch (wValue) {
+ case (RH_PORT_ENABLE):
+ status = in16r(usb_base_addr+USBPORTSC1+2*(wIndex-1));
+ status = (status & 0xfff5) & ~USBPORTSC_PE;
+ out16r(usb_base_addr+USBPORTSC1+2*(wIndex-1),status);
+ len=0;
+ break;
+ case (RH_PORT_SUSPEND):
+ status = in16r(usb_base_addr+USBPORTSC1+2*(wIndex-1));
+ status = (status & 0xfff5) & ~USBPORTSC_SUSP;
+ out16r(usb_base_addr+USBPORTSC1+2*(wIndex-1),status);
+ len=0;
+ break;
+ case (RH_PORT_POWER):
+ len=0; /* port power ** */
+ break;
+ case (RH_C_PORT_CONNECTION):
+ status = in16r(usb_base_addr+USBPORTSC1+2*(wIndex-1));
+ status = (status & 0xfff5) | USBPORTSC_CSC;
+ out16r(usb_base_addr+USBPORTSC1+2*(wIndex-1),status);
+ len=0;
+ break;
+ case (RH_C_PORT_ENABLE):
+ status = in16r(usb_base_addr+USBPORTSC1+2*(wIndex-1));
+ status = (status & 0xfff5) | USBPORTSC_PEC;
+ out16r(usb_base_addr+USBPORTSC1+2*(wIndex-1),status);
+ len=0;
+ break;
+ case (RH_C_PORT_SUSPEND):
+/*** WR_RH_PORTSTAT(RH_PS_PSSC); */
+ len=0;
+ break;
+ case (RH_C_PORT_OVER_CURRENT):
+ len=0;
+ break;
+ case (RH_C_PORT_RESET):
+ rh.c_p_r[wIndex - 1] = 0;
+ len=0;
+ break;
+ }
+ break;
+ case RH_SET_FEATURE | RH_OTHER | RH_CLASS:
+ usb_display_wValue(wValue,wIndex);
+ switch (wValue) {
+ case (RH_PORT_SUSPEND):
+ status = in16r(usb_base_addr+USBPORTSC1+2*(wIndex-1));
+ status = (status & 0xfff5) | USBPORTSC_SUSP;
+ out16r(usb_base_addr+USBPORTSC1+2*(wIndex-1),status);
+ len=0;
+ break;
+ case (RH_PORT_RESET):
+ status = in16r(usb_base_addr+USBPORTSC1+2*(wIndex-1));
+ status = (status & 0xfff5) | USBPORTSC_PR;
+ out16r(usb_base_addr+USBPORTSC1+2*(wIndex-1),status);
+ wait_ms(10);
+ status = (status & 0xfff5) & ~USBPORTSC_PR;
+ out16r(usb_base_addr+USBPORTSC1+2*(wIndex-1),status);
+ udelay(10);
+ status = (status & 0xfff5) | USBPORTSC_PE;
+ out16r(usb_base_addr+USBPORTSC1+2*(wIndex-1),status);
+ wait_ms(10);
+ status = (status & 0xfff5) | 0xa;
+ out16r(usb_base_addr+USBPORTSC1+2*(wIndex-1),status);
+ len=0;
+ break;
+ case (RH_PORT_POWER):
+ len=0; /* port power ** */
+ break;
+ case (RH_PORT_ENABLE):
+ status = in16r(usb_base_addr+USBPORTSC1+2*(wIndex-1));
+ status = (status & 0xfff5) | USBPORTSC_PE;
+ out16r(usb_base_addr+USBPORTSC1+2*(wIndex-1),status);
+ len=0;
+ break;
+ }
+ break;
+
+ case RH_SET_ADDRESS:
+ rh.devnum = wValue;
+ len=0;
+ break;
+ case RH_GET_DESCRIPTOR:
+ switch ((wValue & 0xff00) >> 8) {
+ case (0x01): /* device descriptor */
+ i=sizeof(root_hub_config_des);
+ status=i > wLength ? wLength : i;
+ len = leni > status ? status : leni;
+ memcpy (data, root_hub_dev_des, len);
+ break;
+ case (0x02): /* configuration descriptor */
+ i=sizeof(root_hub_config_des);
+ status=i > wLength ? wLength : i;
+ len = leni > status ? status : leni;
+ memcpy (data, root_hub_config_des, len);
+ break;
+ case (0x03): /*string descriptors */
+ if(wValue==0x0300) {
+ i=sizeof(root_hub_str_index0);
+ status = i > wLength ? wLength : i;
+ len = leni > status ? status : leni;
+ memcpy (data, root_hub_str_index0, len);
+ break;
+ }
+ if(wValue==0x0301) {
+ i=sizeof(root_hub_str_index1);
+ status = i > wLength ? wLength : i;
+ len = leni > status ? status : leni;
+ memcpy (data, root_hub_str_index1, len);
+ break;
+ }
+ stat = USB_ST_STALLED;
+ }
+ break;
+
+ case RH_GET_DESCRIPTOR | RH_CLASS:
+ root_hub_hub_des[2] = 2;
+ i=sizeof(root_hub_hub_des);
+ status= i > wLength ? wLength : i;
+ len = leni > status ? status : leni;
+ memcpy (data, root_hub_hub_des, len);
+ break;
+ case RH_GET_CONFIGURATION:
+ *(unsigned char *) data = 0x01;
+ len = 1;
+ break;
+ case RH_SET_CONFIGURATION:
+ len=0;
+ break;
+ default:
+ stat = USB_ST_STALLED;
+ }
+ USB_RH_PRINTF("Root-Hub stat %lx port1: %x port2: %x\n\n",stat,
+ in16r(usb_base_addr + USBPORTSC1), in16r(usb_base_addr + USBPORTSC2));
+ dev->act_len=len;
+ dev->status=stat;
+ return stat;
+
+}
+
+/********************************************************************************
+ * Some Debug Routines
+ */
+
+#ifdef USB_RH_DEBUG
+
+static void usb_display_Req(unsigned short req)
+{
+ USB_RH_PRINTF("- Root-Hub Request: ");
+ switch (req) {
+ case RH_GET_STATUS:
+ USB_RH_PRINTF("Get Status ");
+ break;
+ case RH_GET_STATUS | RH_INTERFACE:
+ USB_RH_PRINTF("Get Status Interface ");
+ break;
+ case RH_GET_STATUS | RH_ENDPOINT:
+ USB_RH_PRINTF("Get Status Endpoint ");
+ break;
+ case RH_GET_STATUS | RH_CLASS:
+ USB_RH_PRINTF("Get Status Class");
+ break; /* hub power ** */
+ case RH_GET_STATUS | RH_OTHER | RH_CLASS:
+ USB_RH_PRINTF("Get Status Class Others");
+ break;
+ case RH_CLEAR_FEATURE | RH_ENDPOINT:
+ USB_RH_PRINTF("Clear Feature Endpoint ");
+ break;
+ case RH_CLEAR_FEATURE | RH_CLASS:
+ USB_RH_PRINTF("Clear Feature Class ");
+ break;
+ case RH_CLEAR_FEATURE | RH_OTHER | RH_CLASS:
+ USB_RH_PRINTF("Clear Feature Other Class ");
+ break;
+ case RH_SET_FEATURE | RH_OTHER | RH_CLASS:
+ USB_RH_PRINTF("Set Feature Other Class ");
+ break;
+ case RH_SET_ADDRESS:
+ USB_RH_PRINTF("Set Address ");
+ break;
+ case RH_GET_DESCRIPTOR:
+ USB_RH_PRINTF("Get Descriptor ");
+ break;
+ case RH_GET_DESCRIPTOR | RH_CLASS:
+ USB_RH_PRINTF("Get Descriptor Class ");
+ break;
+ case RH_GET_CONFIGURATION:
+ USB_RH_PRINTF("Get Configuration ");
+ break;
+ case RH_SET_CONFIGURATION:
+ USB_RH_PRINTF("Get Configuration ");
+ break;
+ default:
+ USB_RH_PRINTF("****UNKNOWN**** 0x%04X ",req);
+ }
+ USB_RH_PRINTF("\n");
+
+}
+
+static void usb_display_wValue(unsigned short wValue,unsigned short wIndex)
+{
+ switch (wValue) {
+ case (RH_PORT_ENABLE):
+ USB_RH_PRINTF("Root-Hub: Enable Port %d\n",wIndex);
+ break;
+ case (RH_PORT_SUSPEND):
+ USB_RH_PRINTF("Root-Hub: Suspend Port %d\n",wIndex);
+ break;
+ case (RH_PORT_POWER):
+ USB_RH_PRINTF("Root-Hub: Port Power %d\n",wIndex);
+ break;
+ case (RH_C_PORT_CONNECTION):
+ USB_RH_PRINTF("Root-Hub: C Port Connection Port %d\n",wIndex);
+ break;
+ case (RH_C_PORT_ENABLE):
+ USB_RH_PRINTF("Root-Hub: C Port Enable Port %d\n",wIndex);
+ break;
+ case (RH_C_PORT_SUSPEND):
+ USB_RH_PRINTF("Root-Hub: C Port Suspend Port %d\n",wIndex);
+ break;
+ case (RH_C_PORT_OVER_CURRENT):
+ USB_RH_PRINTF("Root-Hub: C Port Over Current Port %d\n",wIndex);
+ break;
+ case (RH_C_PORT_RESET):
+ USB_RH_PRINTF("Root-Hub: C Port reset Port %d\n",wIndex);
+ break;
+ default:
+ USB_RH_PRINTF("Root-Hub: unknown %x %x\n",wValue,wIndex);
+ break;
+ }
+}
+
+#endif
+
+
+
+#ifdef USB_UHCI_DEBUG
+
+static int usb_display_td(uhci_td_t *td)
+{
+ unsigned long tmp;
+ int valid;
+
+ printf("TD at %p:\n",td);
+
+ tmp=swap_32(td->link);
+ printf("Link points to 0x%08lX, %s first, %s, %s\n",tmp&0xfffffff0,
+ ((tmp & 0x4)==0x4) ? "Depth" : "Breath",
+ ((tmp & 0x2)==0x2) ? "QH" : "TD",
+ ((tmp & 0x1)==0x1) ? "invalid" : "valid");
+ valid=((tmp & 0x1)==0x0);
+ tmp=swap_32(td->status);
+ printf(" %s %ld Errors %s %s %s \n %s %s %s %s %s %s\n Len 0x%lX\n",
+ (((tmp>>29)&0x1)==0x1) ? "SPD Enable" : "SPD Disable",
+ ((tmp>>28)&0x3),
+ (((tmp>>26)&0x1)==0x1) ? "Low Speed" : "Full Speed",
+ (((tmp>>25)&0x1)==0x1) ? "ISO " : "",
+ (((tmp>>24)&0x1)==0x1) ? "IOC " : "",
+ (((tmp>>23)&0x1)==0x1) ? "Active " : "Inactive ",
+ (((tmp>>22)&0x1)==0x1) ? "Stalled" : "",
+ (((tmp>>21)&0x1)==0x1) ? "Data Buffer Error" : "",
+ (((tmp>>20)&0x1)==0x1) ? "Babble" : "",
+ (((tmp>>19)&0x1)==0x1) ? "NAK" : "",
+ (((tmp>>18)&0x1)==0x1) ? "Bitstuff Error" : "",
+ (tmp&0x7ff));
+ tmp=swap_32(td->info);
+ printf(" MaxLen 0x%lX\n",((tmp>>21)&0x7FF));
+ printf(" %s Endpoint 0x%lX Dev Addr 0x%lX PID 0x%lX\n",((tmp>>19)&0x1)==0x1 ? "TOGGLE" : "",
+ ((tmp>>15)&0xF),((tmp>>8)&0x7F),tmp&0xFF);
+ tmp=swap_32(td->buffer);
+ printf(" Buffer 0x%08lX\n",tmp);
+ printf(" DEV %08lX\n",td->dev_ptr);
+ return valid;
+}
+
+
+void usb_show_td(int max)
+{
+ int i;
+ if(max>0) {
+ for(i=0;i<max;i++) {
+ usb_display_td(&tmp_td[i]);
+ }
+ }
+ else {
+ i=0;
+ do {
+ printf("tmp_td[%d]\n",i);
+ }while(usb_display_td(&tmp_td[i++]));
+ }
+}
+
+
+#endif
+#endif /* CONFIG_USB_UHCI */
+
+/* EOF */
diff --git a/board/MAI/AmigaOneG3SE/usb_uhci.h b/board/MAI/AmigaOneG3SE/usb_uhci.h
new file mode 100644
index 00000000000..7fda60b6a15
--- /dev/null
+++ b/board/MAI/AmigaOneG3SE/usb_uhci.h
@@ -0,0 +1,194 @@
+/*
+ * (C) Copyright 2001
+ * Denis Peter, MPL AG Switzerland
+ *
+ * See file CREDITS for list of people who contributed to this
+ * project.
+ *
+ * This program is free software; you can redistribute it and/or
+ * modify it under the terms of the GNU General Public License as
+ * published by the Free Software Foundation; either version 2 of
+ * the License, or (at your option) any later version.
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with this program; if not, write to the Free Software
+ * Foundation, Inc., 59 Temple Place, Suite 330, Boston,
+ * MA 02111-1307 USA
+ *
+ * Note: Part of this code has been derived from linux
+ *
+ */
+#ifndef _USB_UHCI_H_
+#define _USB_UHCI_H_
+
+#undef USB_UHCI_VEND_ID
+#define USB_UHCI_VEND_ID PCI_VENDOR_ID_VIA
+#undef USB_UHCI_DEV_ID
+#define USB_UHCI_DEV_ID 0x3038
+
+/* Command register */
+#define USBCMD 0
+#define USBCMD_RS 0x0001 /* Run/Stop */
+#define USBCMD_HCRESET 0x0002 /* Host reset */
+#define USBCMD_GRESET 0x0004 /* Global reset */
+#define USBCMD_EGSM 0x0008 /* Global Suspend Mode */
+#define USBCMD_FGR 0x0010 /* Force Global Resume */
+#define USBCMD_SWDBG 0x0020 /* SW Debug mode */
+#define USBCMD_CF 0x0040 /* Config Flag (sw only) */
+#define USBCMD_MAXP 0x0080 /* Max Packet (0 = 32, 1 = 64) */
+
+/* Status register */
+#define USBSTS 2
+#define USBSTS_USBINT 0x0001 /* Interrupt due to IOC */
+#define USBSTS_ERROR 0x0002 /* Interrupt due to error */
+#define USBSTS_RD 0x0004 /* Resume Detect */
+#define USBSTS_HSE 0x0008 /* Host System Error - basically PCI problems */
+#define USBSTS_HCPE 0x0010 /* Host Controller Process Error - the scripts were buggy */
+#define USBSTS_HCH 0x0020 /* HC Halted */
+
+/* Interrupt enable register */
+#define USBINTR 4
+#define USBINTR_TIMEOUT 0x0001 /* Timeout/CRC error enable */
+#define USBINTR_RESUME 0x0002 /* Resume interrupt enable */
+#define USBINTR_IOC 0x0004 /* Interrupt On Complete enable */
+#define USBINTR_SP 0x0008 /* Short packet interrupt enable */
+
+#define USBFRNUM 6
+#define USBFLBASEADD 8
+#define USBSOF 12
+
+/* USB port status and control registers */
+#define USBPORTSC1 16
+#define USBPORTSC2 18
+#define USBPORTSC_CCS 0x0001 /* Current Connect Status ("device present") */
+#define USBPORTSC_CSC 0x0002 /* Connect Status Change */
+#define USBPORTSC_PE 0x0004 /* Port Enable */
+#define USBPORTSC_PEC 0x0008 /* Port Enable Change */
+#define USBPORTSC_LS 0x0030 /* Line Status */
+#define USBPORTSC_RD 0x0040 /* Resume Detect */
+#define USBPORTSC_LSDA 0x0100 /* Low Speed Device Attached */
+#define USBPORTSC_PR 0x0200 /* Port Reset */
+#define USBPORTSC_SUSP 0x1000 /* Suspend */
+
+/* Legacy support register */
+#define USBLEGSUP 0xc0
+#define USBLEGSUP_DEFAULT 0x2000 /* only PIRQ enable set */
+
+#define UHCI_NULL_DATA_SIZE 0x7ff /* for UHCI controller TD */
+#define UHCI_PID 0xff /* PID MASK */
+
+#define UHCI_PTR_BITS 0x000F
+#define UHCI_PTR_TERM 0x0001
+#define UHCI_PTR_QH 0x0002
+#define UHCI_PTR_DEPTH 0x0004
+
+/* for TD <status>: */
+#define TD_CTRL_SPD (1 << 29) /* Short Packet Detect */
+#define TD_CTRL_C_ERR_MASK (3 << 27) /* Error Counter bits */
+#define TD_CTRL_LS (1 << 26) /* Low Speed Device */
+#define TD_CTRL_IOS (1 << 25) /* Isochronous Select */
+#define TD_CTRL_IOC (1 << 24) /* Interrupt on Complete */
+#define TD_CTRL_ACTIVE (1 << 23) /* TD Active */
+#define TD_CTRL_STALLED (1 << 22) /* TD Stalled */
+#define TD_CTRL_DBUFERR (1 << 21) /* Data Buffer Error */
+#define TD_CTRL_BABBLE (1 << 20) /* Babble Detected */
+#define TD_CTRL_NAK (1 << 19) /* NAK Received */
+#define TD_CTRL_CRCTIMEO (1 << 18) /* CRC/Time Out Error */
+#define TD_CTRL_BITSTUFF (1 << 17) /* Bit Stuff Error */
+#define TD_CTRL_ACTLEN_MASK 0x7ff /* actual length, encoded as n - 1 */
+
+#define TD_CTRL_ANY_ERROR (TD_CTRL_STALLED | TD_CTRL_DBUFERR | \
+ TD_CTRL_BABBLE | TD_CTRL_CRCTIME | TD_CTRL_BITSTUFF)
+
+#define TD_TOKEN_TOGGLE 19
+
+/* ------------------------------------------------------------------------------------
+ Virtual Root HUB
+ ------------------------------------------------------------------------------------ */
+/* destination of request */
+#define RH_INTERFACE 0x01
+#define RH_ENDPOINT 0x02
+#define RH_OTHER 0x03
+
+#define RH_CLASS 0x20
+#define RH_VENDOR 0x40
+
+/* Requests: bRequest << 8 | bmRequestType */
+#define RH_GET_STATUS 0x0080
+#define RH_CLEAR_FEATURE 0x0100
+#define RH_SET_FEATURE 0x0300
+#define RH_SET_ADDRESS 0x0500
+#define RH_GET_DESCRIPTOR 0x0680
+#define RH_SET_DESCRIPTOR 0x0700
+#define RH_GET_CONFIGURATION 0x0880
+#define RH_SET_CONFIGURATION 0x0900
+#define RH_GET_STATE 0x0280
+#define RH_GET_INTERFACE 0x0A80
+#define RH_SET_INTERFACE 0x0B00
+#define RH_SYNC_FRAME 0x0C80
+/* Our Vendor Specific Request */
+#define RH_SET_EP 0x2000
+
+/* Hub port features */
+#define RH_PORT_CONNECTION 0x00
+#define RH_PORT_ENABLE 0x01
+#define RH_PORT_SUSPEND 0x02
+#define RH_PORT_OVER_CURRENT 0x03
+#define RH_PORT_RESET 0x04
+#define RH_PORT_POWER 0x08
+#define RH_PORT_LOW_SPEED 0x09
+#define RH_C_PORT_CONNECTION 0x10
+#define RH_C_PORT_ENABLE 0x11
+#define RH_C_PORT_SUSPEND 0x12
+#define RH_C_PORT_OVER_CURRENT 0x13
+#define RH_C_PORT_RESET 0x14
+
+/* Hub features */
+#define RH_C_HUB_LOCAL_POWER 0x00
+#define RH_C_HUB_OVER_CURRENT 0x01
+
+#define RH_DEVICE_REMOTE_WAKEUP 0x00
+#define RH_ENDPOINT_STALL 0x01
+
+/* Our Vendor Specific feature */
+#define RH_REMOVE_EP 0x00
+
+
+#define RH_ACK 0x01
+#define RH_REQ_ERR -1
+#define RH_NACK 0x00
+
+
+/* Transfer descriptor structure */
+typedef struct {
+ unsigned long link; /* next td/qh (LE)*/
+ unsigned long status; /* status of the td */
+ unsigned long info; /* Max Lenght / Endpoint / device address and PID */
+ unsigned long buffer; /* pointer to data buffer (LE) */
+ unsigned long dev_ptr; /* pointer to the assigned device (BE) */
+ unsigned long res[3]; /* reserved (TDs must be 8Byte aligned) */
+} uhci_td_t, *puhci_td_t;
+
+/* Queue Header structure */
+typedef struct {
+ unsigned long head; /* Next QH (LE)*/
+ unsigned long element; /* Queue element pointer (LE) */
+ unsigned long res[5]; /* reserved */
+ unsigned long dev_ptr; /* if 0 no tds have been assigned to this qh */
+} uhci_qh_t, *puhci_qh_t;
+
+struct virt_root_hub {
+ int devnum; /* Address of Root Hub endpoint */
+ int numports; /* number of ports */
+ int c_p_r[8]; /* C_PORT_RESET */
+};
+
+
+#endif /* _USB_UHCI_H_ */
+
+
diff --git a/board/MAI/AmigaOneG3SE/via686.c b/board/MAI/AmigaOneG3SE/via686.c
new file mode 100644
index 00000000000..0483ca9fbdf
--- /dev/null
+++ b/board/MAI/AmigaOneG3SE/via686.c
@@ -0,0 +1,299 @@
+/*
+ * (C) Copyright 2002
+ * Hyperion Entertainment, Hans-JoergF@hyperion-entertainment.com
+ *
+ * See file CREDITS for list of people who contributed to this
+ * project.
+ *
+ * This program is free software; you can redistribute it and/or
+ * modify it under the terms of the GNU General Public License as
+ * published by the Free Software Foundation; either version 2 of
+ * the License, or (at your option) any later version.
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with this program; if not, write to the Free Software
+ * Foundation, Inc., 59 Temple Place, Suite 330, Boston,
+ * MA 02111-1307 USA
+ */
+#include <common.h>
+#include <pci.h>
+#include <ata.h>
+#include "memio.h"
+#include "articiaS.h"
+#include "via686.h"
+#include "i8259.h"
+
+#undef VIA_DEBUG
+
+#ifdef VIA_DEBUG
+#define PRINTF(fmt,args...) printf (fmt ,##args)
+#else
+#define PRINTF(fmt,args...)
+#endif
+
+
+/* Setup the ISA-to-PCI host bridge */
+void via_isa_init(pci_dev_t dev, struct pci_config_table *table)
+{
+ char regval;
+ if (PCI_FUNC(dev) == 0)
+ {
+ PRINTF("... PCI-to-ISA bridge, dev=0x%X\n", dev);
+
+ /* Enable I/O Recovery time */
+ pci_write_config_byte(dev, 0x40, 0x08);
+
+ /* Enable ISA refresh */
+ pci_write_config_byte(dev, 0x41, 0x41); /* was 01 */
+
+ /* Enable ISA line buffer */
+ pci_write_config_byte(dev, 0x45, 0x80);
+
+ /* Gate INTR, and flush line buffer */
+ pci_write_config_byte(dev, 0x46, 0x60);
+
+ /* Enable EISA ports 4D0/4D1. Do we need this ? */
+ pci_write_config_byte(dev, 0x47, 0xe6); /* was 20 */
+
+ /* 512 K PCI Decode */
+ pci_write_config_byte(dev, 0x48, 0x01);
+
+ /* Wait for PGNT before grant to ISA Master/DMA */
+ /* ports 0-FF to SDBus */
+ /* IRQ 14 and 15 for ide 0/1 */
+ pci_write_config_byte(dev, 0x4a, 0x04); /* Was c4 */
+
+ /* Plug'n'Play */
+ /* Parallel DRQ 3, Floppy DRQ 2 (default) */
+ pci_write_config_byte(dev, 0x50, 0x0e);
+
+ /* IRQ Routing for Floppy and Parallel port */
+ /* IRQ 6 for floppy, IRQ 7 for parallel port */
+ pci_write_config_byte(dev, 0x51, 0x76);
+
+ /* IRQ Routing for serial ports (take IRQ 3 and 4) */
+ pci_write_config_byte(dev, 0x52, 0x34);
+
+ /* All IRQ's level triggered. */
+ pci_write_config_byte(dev, 0x54, 0x00);
+
+ /* PCI IRQ's all at IRQ 9 */
+ pci_write_config_byte(dev, 0x55, 0x90);
+ pci_write_config_byte(dev, 0x56, 0x99);
+ pci_write_config_byte(dev, 0x57, 0x90);
+
+ /* Enable Keyboard */
+ pci_read_config_byte(dev, 0x5A, ®val);
+ regval |= 0x01;
+ pci_write_config_byte(dev, 0x5A, regval);
+
+ pci_write_config_byte(dev, 0x80, 0);
+ pci_write_config_byte(dev, 0x85, 0x01);
+
+/* pci_write_config_byte(dev, 0x77, 0x00); */
+ }
+}
+
+/*
+ * Initialize PNP irq routing
+ */
+
+void via_init_irq_routing(uint8 irq_map[])
+{
+ char *s;
+ uint8 level_edge_bits = 0xf;
+
+ /* Set irq routings */
+ pci_write_cfg_byte(0, 7<<3, 0x55, irq_map[0]<<4);
+ pci_write_cfg_byte(0, 7<<3, 0x56, irq_map[1] | irq_map[2]<<4);
+ pci_write_cfg_byte(0, 7<<3, 0x57, irq_map[3]<<4);
+
+ /*
+ * Gather level/edge bits
+ * Default is to assume level triggered
+ */
+
+ s = getenv("pci_irqa_select");
+ if (s && strcmp(s, "level") == 0)
+ level_edge_bits &= ~0x01;
+
+ s = getenv("pci_irqb_select");
+ if (s && strcmp(s, "level") == 0)
+ level_edge_bits &= ~0x02;
+
+ s = getenv("pci_irqc_select");
+ if (s && strcmp(s, "level") == 0)
+ level_edge_bits &= ~0x04;
+
+ s = getenv("pci_irqd_select");
+ if (s && strcmp(s, "level") == 0)
+ level_edge_bits &= ~0x08;
+
+ PRINTF("IRQ map\n");
+ PRINTF("%d: %s\n", irq_map[0], level_edge_bits&0x1 ? "edge" : "level");
+ PRINTF("%d: %s\n", irq_map[1], level_edge_bits&0x2 ? "edge" : "level");
+ PRINTF("%d: %s\n", irq_map[2], level_edge_bits&0x4 ? "edge" : "level");
+ PRINTF("%d: %s\n", irq_map[3], level_edge_bits&0x8 ? "edge" : "level");
+ pci_write_cfg_byte(0, 7<<3, 0x54, level_edge_bits);
+
+ PRINTF("%02x %02x %02x %02x\n", pci_read_cfg_byte(0, 7<<3, 0x54),
+ pci_read_cfg_byte(0, 7<<3, 0x55), pci_read_cfg_byte(0, 7<<3, 0x56),
+ pci_read_cfg_byte(0, 7<<3, 0x57));
+}
+
+
+/* Setup the IDE controller. This doesn't seem to work yet. I/O to an IDE controller port */
+/* always return the last character output on the serial port (!) */
+/* This function is called by the pnp-library when it encounters 0:7:1 */
+void via_cfgfunc_ide_init(struct pci_controller *host, pci_dev_t dev, struct pci_config_table *table)
+{
+ PRINTF("... IDE controller, dev=0x%X\n", dev);
+
+ /* Enable both IDE channels. */
+ pci_write_config_byte(dev, 0x40, 0x03);
+ /* udelay(10000); */
+ /* udelay(10000); */
+
+ /* Enable IO Space */
+ pci_write_config_word(dev, 0x04, 0x03);
+
+ /* Set to compatibility mode */
+ pci_write_config_byte(dev, 0x09, 0x8A); /* WAS: 0x8f); */
+
+ /* Set to legacy interrupt mode */
+ pci_write_config_byte(dev, 0x3d, 0x00); /* WAS: 0x01); */
+
+}
+
+
+/* Set the base address of the floppy controller to 0x3F0 */
+void via_fdc_init(pci_dev_t dev)
+{
+ unsigned char c;
+ /* Enable Configuration mode */
+ pci_read_config_byte(dev, 0x85, &c);
+ c |= 0x02;
+ pci_write_config_byte(dev, 0x85, c);
+
+ /* Set floppy controller port to 0x3F0. */
+ SIO_WRITE_CONFIG(0xE3, (0x3F<<2));
+
+ /* Enable floppy controller */
+ SIO_READ_CONFIG(0xE2, c);
+ c |= 0x10;
+ SIO_WRITE_CONFIG(0xE2, c);
+
+ /* Switch of configuration mode */
+ pci_read_config_byte(dev, 0x85, &c);
+ c &= ~0x02;
+ pci_write_config_byte(dev, 0x85, c);
+}
+
+/* Init function 0 of the via southbridge. Called by the pnp-library */
+void via_cfgfunc_via686(struct pci_controller *host, pci_dev_t dev, struct pci_config_table *table)
+{
+ if (PCI_FUNC(dev) == 0)
+ {
+ /* FIXME: Try to generate a PCI reset */
+ /* unsigned char c; */
+ /* pci_read_config_byte(dev, 0x47, &c); */
+ /* pci_write_config_byte(dev, 0x47, c | 0x01); */
+
+ via_isa_init(dev, table);
+ via_fdc_init(dev);
+ }
+}
+
+__asm (" .globl via_calibrate_time_base \n"
+ "via_calibrate_time_base: \n"
+ " lis 9, 0xfe00 \n"
+ " li 0, 0x00 \n"
+ " mttbu 0 \n"
+ " mttbl 0 \n"
+ "ctb_loop: \n"
+ " lbz 0, 0x61(9) \n"
+ " eieio \n"
+ " andi. 0, 0, 0x20 \n"
+ " beq ctb_loop \n"
+ "ctb_done: \n"
+ " mftb 3 \n"
+ " blr");
+
+extern unsigned long via_calibrate_time_base(void);
+
+void via_calibrate_bus_freq(void)
+{
+ DECLARE_GLOBAL_DATA_PTR;
+
+ unsigned long tb;
+
+ /* This is 20 microseconds */
+ #define CALIBRATE_TIME 28636
+
+
+ /* Enable the timer (and disable speaker) */
+ unsigned char c;
+ c = in_byte(0x61);
+ out_byte(0x61, ((c & ~0x02) | 0x01));
+
+ /* Set timer 2 to low/high writing */
+ out_byte(0x43, 0xb0);
+ out_byte(0x42, CALIBRATE_TIME & 0xff);
+ out_byte(0x42, CALIBRATE_TIME >>8);
+
+ /* Read the time base */
+ tb = via_calibrate_time_base();
+
+ if (tb >= 700000)
+ gd->bus_clk = 133333333;
+ else
+ gd->bus_clk = 100000000;
+
+}
+
+
+void ide_led(uchar led, uchar status)
+{
+/* unsigned char c = in_byte(0x92); */
+
+/* if (!status) */
+/* out_byte(0x92, c | 0xC0); */
+/* else */
+/* out_byte(0x92, c & ~0xC0); */
+}
+
+
+void via_init_afterscan(void)
+{
+ /* Modify IDE controller setup */
+ pci_write_cfg_byte(0, 7<<3|1, PCI_LATENCY_TIMER, 0x20);
+ pci_write_cfg_byte(0, 7<<3|1, PCI_COMMAND, PCI_COMMAND_IO|PCI_COMMAND_MEMORY|PCI_COMMAND_MASTER);
+ pci_write_cfg_byte(0, 7<<3|1, PCI_INTERRUPT_LINE, 0xff);
+ pci_write_cfg_byte(0, 7<<3|1, 0x40, 0x0b); /* FIXME: Might depend on drives connected */
+ pci_write_cfg_byte(0, 7<<3|1, 0x41, 0x42); /* FIXME: Might depend on drives connected */
+ pci_write_cfg_byte(0, 7<<3|1, 0x43, 0x05);
+ pci_write_cfg_byte(0, 7<<3|1, 0x44, 0x18);
+ pci_write_cfg_byte(0, 7<<3|1, 0x45, 0x10);
+ pci_write_cfg_byte(0, 7<<3|1, 0x4e, 0x22); /* FIXME: Not documented, but set in PC bios */
+ pci_write_cfg_byte(0, 7<<3|1, 0x4f, 0x20); /* FIXME: Not documented */
+
+ /* Modify some values in the USB controller */
+ pci_write_cfg_byte(0, 7<<3|2, 0x05, 0x17);
+ pci_write_cfg_byte(0, 7<<3|2, 0x06, 0x01);
+ pci_write_cfg_byte(0, 7<<3|2, 0x41, 0x12);
+ pci_write_cfg_byte(0, 7<<3|2, 0x42, 0x03);
+ pci_write_cfg_byte(0, 7<<3|2, PCI_LATENCY_TIMER, 0x40);
+
+ pci_write_cfg_byte(0, 7<<3|3, 0x05, 0x17);
+ pci_write_cfg_byte(0, 7<<3|3, 0x06, 0x01);
+ pci_write_cfg_byte(0, 7<<3|3, 0x41, 0x12);
+ pci_write_cfg_byte(0, 7<<3|3, 0x42, 0x03);
+ pci_write_cfg_byte(0, 7<<3|3, PCI_LATENCY_TIMER, 0x40);
+
+
+}
diff --git a/board/MAI/AmigaOneG3SE/via686.h b/board/MAI/AmigaOneG3SE/via686.h
new file mode 100644
index 00000000000..2a06a05e16d
--- /dev/null
+++ b/board/MAI/AmigaOneG3SE/via686.h
@@ -0,0 +1,29 @@
+#ifndef VIA686_H_
+#define VIA686_H_
+
+
+#define CMOS_ADDR 0x70
+#define CMOS_DATA 0x71
+
+#define I8259_MASTER_CONTROL 0x20
+#define I8259_MASTER_MASK 0x21
+
+#define I8259_SLAVE_CONTROL 0xA0
+#define I8259_SLAVE_MASK 0xA1
+
+#define SIO_CONFIG_ADDR 0x3F0
+#define SIO_CONFIG_DATA 0x3F1
+
+#define SIO_WRITE_CONFIG(addr, byte) \
+ out_byte(SIO_CONFIG_ADDR, addr); \
+ out_byte(SIO_CONFIG_DATA, byte);
+
+#define SIO_READ_CONFIG(addr, byte) \
+ out_byte(SIO_CONFIG_ADDR, addr); \
+ byte = in_byte(SIO_CONFIG_DATA);
+
+void via_init(void);
+
+void via_calibrate_bus_freq(void);
+
+#endif
diff --git a/board/MAI/AmigaOneG3SE/video.c b/board/MAI/AmigaOneG3SE/video.c
new file mode 100644
index 00000000000..d0e366c2ed5
--- /dev/null
+++ b/board/MAI/AmigaOneG3SE/video.c
@@ -0,0 +1,539 @@
+/*
+ * (C) Copyright 2002
+ * Hyperion Entertainment, Hans-JoergF@hyperion-entertainment.com
+ *
+ * See file CREDITS for list of people who contributed to this
+ * project.
+ *
+ * This program is free software; you can redistribute it and/or
+ * modify it under the terms of the GNU General Public License as
+ * published by the Free Software Foundation; either version 2 of
+ * the License, or (at your option) any later version.
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with this program; if not, write to the Free Software
+ * Foundation, Inc., 59 Temple Place, Suite 330, Boston,
+ * MA 02111-1307 USA
+ */
+
+#include <common.h>
+#include <devices.h>
+#include "memio.h"
+#include <part.h>
+
+unsigned char *cursor_position;
+unsigned int cursor_row;
+unsigned int cursor_col;
+
+unsigned char current_attr;
+
+unsigned int video_numrows = 25;
+unsigned int video_numcols = 80;
+unsigned int video_scrolls = 0;
+
+#define VIDEO_BASE (unsigned char *)0xFD0B8000
+#define VIDEO_ROWS video_numrows
+#define VIDEO_COLS video_numcols
+#define VIDEO_PITCH (2 * video_numcols)
+#define VIDEO_SIZE (video_numrows * video_numcols * 2)
+#define VIDEO_NAME "vga"
+
+void video_test(void);
+void video_putc(char ch);
+void video_puts(char *string);
+void video_scroll(int rows);
+void video_banner(void);
+int video_init(void);
+int video_start(void);
+int video_rows(void);
+int video_cols(void);
+
+char *prompt_string = "=>";
+
+void video_set_color(unsigned char attr)
+{
+ unsigned char *fb = (unsigned char *)VIDEO_BASE;
+ int i;
+
+ current_attr = video_get_attr();
+
+ for (i=0; i<VIDEO_SIZE; i+=2)
+ {
+ *(fb+i+1) = current_attr;
+ }
+}
+
+unsigned char video_get_attr(void)
+{
+ char *s;
+ unsigned char attr;
+
+ attr = 0x0f;
+
+ s = getenv("vga_fg_color");
+ if (s)
+ {
+ attr = atoi(s);
+ }
+
+ s = getenv("vga_bg_color");
+ if (s)
+ {
+ attr |= atoi(s)<<4;
+ }
+
+ return attr;
+}
+
+int video_inited = 0;
+
+int drv_video_init(void)
+{
+ int error, devices = 1 ;
+ device_t vgadev ;
+ if (video_inited) return 1;
+ video_inited = 1;
+ video_init();
+ memset (&vgadev, 0, sizeof(vgadev));
+
+ strcpy(vgadev.name, VIDEO_NAME);
+ vgadev.flags = DEV_FLAGS_OUTPUT | DEV_FLAGS_SYSTEM;
+ vgadev.putc = video_putc;
+ vgadev.puts = video_puts;
+ vgadev.getc = NULL;
+ vgadev.tstc = NULL;
+ vgadev.start = video_start;
+
+ error = device_register (&vgadev);
+
+ if (error == 0)
+ {
+ char *s = getenv("stdout");
+ if (s && strcmp(s, VIDEO_NAME)==0)
+ {
+ if (overwrite_console()) return 1;
+ error = console_assign(stdout, VIDEO_NAME);
+ if (error == 0) return 1;
+ else return error;
+ }
+ return 1;
+ }
+
+ return error;
+}
+
+int video_init(void)
+{
+ cursor_position = VIDEO_BASE; // Color text display base
+ cursor_row = 0;
+ cursor_col = 0;
+ current_attr = video_get_attr(); // Currently selected value for attribute.
+// video_test();
+ video_set_color(current_attr);
+
+ return 0;
+}
+
+void video_set_cursor(int line, int column)
+{
+ unsigned short offset = line*video_numcols + column;
+ cursor_position = VIDEO_BASE + line*VIDEO_PITCH + column*2;
+ out_byte(0x3D4, 0x0E);
+ out_byte(0x3D5, offset/256);
+ out_byte(0x3D4, 0x0F);
+ out_byte(0x3D5, offset%256);
+}
+
+void video_write_char(int character)
+{
+ *cursor_position = character;
+ *(cursor_position+1) = current_attr;
+}
+
+void video_test(void)
+{
+
+}
+
+void video_putc(char ch)
+{
+ switch(ch)
+ {
+ case '\n':
+ cursor_col = 0;
+ cursor_row += 1;
+ break;
+ case '\r':
+ cursor_col = 0;
+ break;
+ case '\b':
+ if (cursor_col) cursor_col--;
+ else return;
+ break;
+ case '\t':
+ cursor_col = (cursor_col/8+1)*8;
+ break;
+ default:
+ video_write_char(ch);
+ cursor_col++;
+ if (cursor_col > VIDEO_COLS-1)
+ {
+ cursor_row++;
+ cursor_col=0;
+ }
+ }
+
+ if (cursor_row > VIDEO_ROWS-1)
+ video_scroll(1);
+ video_set_cursor(cursor_row, cursor_col);
+}
+
+void video_scroll(int rows)
+{
+ unsigned short clear = ((unsigned short)current_attr) | (' '<<8);
+ unsigned short* addr16 = &((unsigned short *)VIDEO_BASE)[(VIDEO_ROWS-rows)*VIDEO_COLS];
+ int i;
+ char *s;
+
+ s = getenv("vga_askscroll");
+ video_scrolls += rows;
+
+ if (video_scrolls >= video_numrows)
+ {
+ if (s && strcmp(s, "yes"))
+ {
+ while (-1 == tstc());
+ }
+
+ video_scrolls = 0;
+ }
+
+
+ memcpy(VIDEO_BASE, VIDEO_BASE+rows*(VIDEO_COLS*2), (VIDEO_ROWS-rows)*(VIDEO_COLS*2));
+ for (i = 0 ; i < rows * VIDEO_COLS ; i++)
+ addr16[i] = clear;
+ cursor_row-=rows;
+ cursor_col=0;
+}
+
+void video_puts(char *string)
+{
+ while (*string)
+ {
+ video_putc(*string);
+ string++;
+ }
+}
+
+int video_start(void)
+{
+ return 0;
+}
+
+unsigned char video_single_box[] =
+{
+ 218, 196, 191,
+ 179, 179,
+ 192, 196, 217
+};
+
+unsigned char video_double_box[] =
+{
+ 201, 205, 187,
+ 186, 186,
+ 200, 205, 188
+};
+
+unsigned char video_single_title[] =
+{
+ 195, 196, 180, 180, 195
+};
+
+unsigned char video_double_title[] =
+{
+ 204, 205, 185, 181, 198
+};
+
+#define SINGLE_BOX 0
+#define DOUBLE_BOX 1
+
+unsigned char *video_addr(int x, int y)
+{
+ return VIDEO_BASE + 2*(VIDEO_COLS*y) + 2*x;
+}
+
+void video_bios_print_string(char *s, int x, int y, int attr, int count)
+{
+ int cattr = current_attr;
+ if (attr != -1) current_attr = attr;
+ video_set_cursor(x,y);
+ while (count)
+ {
+ char c = *s++;
+ if (attr == -1) current_attr = *s++;
+ video_putc(c);
+ count--;
+ }
+}
+
+void video_draw_box(int style, int attr, char *title, int separate, int x, int y, int w, int h)
+{
+ unsigned char *fb, *fb2;
+ unsigned char *st = (style == SINGLE_BOX)?video_single_box : video_double_box;
+ unsigned char *ti = (style == SINGLE_BOX)?video_single_title : video_double_title;
+ int i;
+
+ fb = video_addr(x,y);
+ *(fb) = st[0];
+ *(fb+1) = attr;
+ fb += 2;
+
+ fb2 = video_addr(x,y+h-1);
+ *(fb2) = st[5];
+ *(fb2+1) = attr;
+ fb2 += 2;
+
+ for (i=0; i<w-2;i++)
+ {
+ *fb = st[1];
+ fb++;
+ *fb = attr;
+ fb++;
+
+ *fb2 = st[6];
+ fb2++;
+ *fb2 = attr;
+ fb2++;
+
+ }
+ *fb = st[2];
+ *(fb+1) = attr;
+
+ *fb2 = st[7];
+ *(fb2+1) = attr;
+
+ fb = video_addr(x, y+1);
+ fb2 = video_addr(x+w-1, y+1);
+ for (i=0; i<h-2; i++)
+ {
+ *fb = st[3];
+ *(fb+1) = attr; fb += 2*VIDEO_COLS;
+
+ *fb2 = st[4];
+ *(fb2+1) = attr; fb2 += 2*VIDEO_COLS;
+ }
+
+ // Draw title
+ if (title)
+ {
+ if (separate == 0)
+ {
+ fb = video_addr(x+1, y);
+ *fb = ti[3];
+ fb += 2;
+ *fb = ' ';
+ fb += 2;
+ while (*title)
+ {
+ *fb = *title;
+ fb ++;
+ *fb = attr;
+ fb++; title++;
+ }
+ *fb = ' ';
+ fb += 2;
+ *fb = ti[4];
+ }
+ else
+ {
+ fb = video_addr(x, y+2);
+ *fb = ti[0];
+ fb += 2;
+ for (i=0; i<w-2; i++)
+ {
+ *fb = ti[1];
+ *(fb+1) = attr;
+ fb += 2;
+ }
+ *fb = ti[2];
+ *(fb+1) = attr;
+ fb = video_addr(x+1, y+1);
+ for (i=0; i<w-2; i++)
+ {
+ *fb = ' ';
+ *(fb+1) = attr;
+ fb += 2;
+ }
+ fb = video_addr(x+2, y+1);
+
+ while (*title)
+ {
+ *fb = *title;
+ *(fb+1) = attr;
+ fb += 2;
+ title++;
+ }
+ }
+ }
+
+}
+
+void video_draw_text(int x, int y, int attr, char *text)
+{
+ unsigned char *fb = video_addr(x,y);
+ while (*text)
+ {
+ *fb++ = *text++;
+ *fb++ = attr;
+ }
+}
+
+void video_save_rect(int x, int y, int w, int h, void *save_area, int clearchar, int clearattr)
+{
+ unsigned char *save = (unsigned char *)save_area;
+ unsigned char *fb = video_addr(x,y);
+ int i,j;
+ for (i=0; i<h; i++)
+ {
+ unsigned char *fbb = fb;
+ for (j=0; j<w; j++)
+ {
+ *save ++ = *fb;
+ if (clearchar > 0) *fb = clearchar;
+ fb ++;
+ *save ++ = *fb;
+ if (clearattr > 0) *fb = clearattr;
+ }
+ fb = fbb + 2*VIDEO_COLS;
+ }
+}
+
+void video_restore_rect(int x, int y, int w, int h, void *save_area)
+{
+ unsigned char *save = (unsigned char *)save_area;
+ unsigned char *fb = video_addr(x,y);
+ int i,j;
+ for (i=0; i<h; i++)
+ {
+ unsigned char *fbb = fb;
+ for (j=0; j<w; j++)
+ {
+ *fb ++ = *save ++;
+ *fb ++ = *save ++;
+ }
+ fb = fbb + 2*VIDEO_COLS;
+ }
+
+}
+
+int video_rows(void)
+{
+ return VIDEO_ROWS;
+}
+
+int video_cols(void)
+{
+ return VIDEO_COLS;
+}
+
+void video_size(int cols, int rows)
+{
+ video_numrows = rows;
+ video_numcols = cols;
+}
+
+void video_clear(void)
+{
+ unsigned short *fbb = (unsigned short *)0xFD0B8000;
+ int i,j;
+ unsigned short val = 0x2000 | current_attr;
+
+ for (i=0; i<video_rows(); i++)
+ {
+ for (j=0; j<video_cols(); j++)
+ {
+ *fbb++ = val;
+ }
+ }
+ video_set_cursor(0,0);
+ cursor_row = 0;
+ cursor_col = 0;
+}
+
+#ifdef EASTEREGG
+int video_easteregg_active = 0;
+
+void video_easteregg(void)
+{
+ video_easteregg_active = 1;
+}
+#endif
+
+extern bd_t *bd_global;
+extern block_dev_desc_t * ide_get_dev(int dev);
+extern char version_string[];
+
+void video_banner(void)
+{
+ block_dev_desc_t *ide;
+ int i;
+ char *s;
+ int maxdev;
+
+
+ if (video_inited == 0) return;
+#ifdef EASTEREGG
+ if (video_easteregg_active)
+ {
+ prompt_string="";
+ video_clear();
+ printf("\n");
+ printf(" **** COMMODORE 64 BASIC X2 ****\n\n");
+ printf(" 64K RAM SYSTEM 38911 BASIC BYTES FREE\n\n");
+ printf("READY\n");
+ }
+ else
+ {
+#endif
+ s = getenv("ide_maxbus");
+ if (s)
+ maxdev = atoi(s) * 2;
+ else
+ maxdev = 4;
+
+ s = getenv("stdout");
+ if (s && strcmp(s, "serial") == 0)
+ return;
+
+ video_clear();
+ printf("%s\n\nCPU: ", version_string);
+ checkcpu();
+ printf("DRAM: %ld MB\n", bd_global->bi_memsize/(1024*1024));
+ printf("FSB: %ld MHz\n", bd_global->bi_busfreq/1000000);
+
+ printf("\n---- Disk summary ----\n");
+ for (i = 0; i < maxdev; i++)
+ {
+ ide = ide_get_dev(i);
+ printf("Device %d: ", i);
+ dev_print(ide);
+ }
+
+/*
+ video_draw_box(SINGLE_BOX, 0x0F, "Test 1", 0, 0,18, 72, 4);
+ video_draw_box(DOUBLE_BOX, 0x0F, "Test 2", 1, 4,10, 50, 6);
+ video_draw_box(DOUBLE_BOX, 0x0F, "Test 3", 0, 40, 3, 20, 5);
+
+ video_draw_text(1, 4, 0x2F, "Highlighted options");
+ video_draw_text(1, 5, 0x0F, "Non-selected option");
+ video_draw_text(1, 6, 0x07, "disabled option");
+*/
+#ifdef EASTEREGG
+ }
+#endif
+}
diff --git a/board/MAI/bios_emulator/bios.c b/board/MAI/bios_emulator/bios.c
new file mode 100644
index 00000000000..4707bd9a8c4
--- /dev/null
+++ b/board/MAI/bios_emulator/bios.c
@@ -0,0 +1,335 @@
+/*
+ * Mostly done after the Scitech Bios emulation
+ * Written by Hans-Jörg Frieden
+ * Hyperion Entertainment
+ */
+#include "x86emu.h"
+#include "glue.h"
+
+#undef DEBUG
+#ifdef DEBUG
+#define PRINTF(fmt, args...) printf(fmt, ## args)
+#else
+#define PRINTF(fmt, args...)
+#endif
+
+#define BIOS_SEG 0xFFF0
+#define PCIBIOS_SUCCESSFUL 0
+#define PCIBIOS_DEVICE_NOT_FOUND 0x86
+
+typedef unsigned char UBYTE;
+typedef unsigned short UWORD;
+typedef unsigned long ULONG;
+
+typedef char BYTE;
+typedef short WORT;
+typedef long LONG;
+
+static inline UBYTE read_byte(volatile UBYTE* from)
+{
+ int x;
+ asm volatile ("lbz %0,%1\n eieio" : "=r" (x) : "m" (*from));
+ return (UBYTE)x;
+}
+
+static inline void write_byte(volatile UBYTE *to, int x)
+{
+ asm volatile ("stb %1,%0\n eieio" : "=m" (*to) : "r" (x));
+}
+
+static inline UWORD read_word_little(volatile UWORD *from)
+{
+ int x;
+ asm volatile ("lhbrx %0,0,%1\n eieio" : "=r" (x) : "r" (from), "m" (*from));
+ return (UWORD)x;
+}
+
+static inline UWORD read_word_big(volatile UWORD *from)
+{
+ int x;
+ asm volatile ("lhz %0,%1\n eieio" : "=r" (x) : "m" (*from));
+ return (UWORD)x;
+}
+
+static inline void write_word_little(volatile UWORD *to, int x)
+{
+ asm volatile ("sthbrx %1,0,%2\n eieio" : "=m" (*to) : "r" (x), "r" (to));
+}
+
+static inline void write_word_big(volatile UWORD *to, int x)
+{
+ asm volatile ("sth %1,%0\n eieio" : "=m" (*to) : "r" (x));
+}
+
+static inline ULONG read_long_little(volatile ULONG *from)
+{
+ unsigned long x;
+ asm volatile ("lwbrx %0,0,%1\n eieio" : "=r" (x) : "r" (from), "m"(*from));
+ return (ULONG)x;
+}
+
+static inline ULONG read_long_big(volatile ULONG *from)
+{
+ unsigned long x;
+ asm volatile ("lwz %0,%1\n eieio" : "=r" (x) : "m" (*from));
+ return (ULONG)x;
+}
+
+static inline void write_long_little(volatile ULONG *to, ULONG x)
+{
+ asm volatile ("stwbrx %1,0,%2\n eieio" : "=m" (*to) : "r" (x), "r" (to));
+}
+
+static inline void write_long_big(volatile ULONG *to, ULONG x)
+{
+ asm volatile ("stw %1,%0\n eieio" : "=m" (*to) : "r" (x));
+}
+
+#define port_to_mem(from) (0xFE000000|(from))
+#define in_byte(from) read_byte( (UBYTE *)port_to_mem(from))
+#define in_word(from) read_word_little((UWORD *)port_to_mem(from))
+#define in_long(from) read_long_little((ULONG *)port_to_mem(from))
+#define out_byte(to, val) write_byte((UBYTE *)port_to_mem(to), val)
+#define out_word(to, val) write_word_little((UWORD *)port_to_mem(to), val)
+#define out_long(to, val) write_long_little((ULONG *)port_to_mem(to), val)
+
+static void X86API undefined_intr(int intno)
+{
+ extern u16 A1_rdw(u32 addr);
+ if (A1_rdw(intno * 4 + 2) == BIOS_SEG)
+ {
+ PRINTF("Undefined interrupt %xh called AX = %xh, BX = %xh, CX = %xh, DX = %xh\n",
+ intno, M.x86.R_AX, M.x86.R_BX, M.x86.R_CX, M.x86.R_DX);
+ X86EMU_halt_sys();
+ }
+ else
+ {
+ PRINTF("Calling interrupt %xh, AL=%xh, AH=%xh\n", intno, M.x86.R_AL, M.x86.R_AH);
+ X86EMU_prepareForInt(intno);
+ }
+}
+
+static void X86API int42(int intno);
+static void X86API int15(int intno);
+
+static void X86API int10(int intno)
+{
+ if (A1_rdw(intno*4+2) == BIOS_SEG)
+ int42(intno);
+ else
+ {
+ PRINTF("int10: branching to %04X:%04X, AL=%xh, AH=%xh\n", A1_rdw(intno*4+2), A1_rdw(intno*4),
+ M.x86.R_AL, M.x86.R_AH);
+ X86EMU_prepareForInt(intno);
+ }
+}
+
+static void X86API int1A(int intno)
+{
+ int device;
+
+ switch(M.x86.R_AX)
+ {
+ case 0xB101: // PCI Bios Present?
+ M.x86.R_AL = 0x00;
+ M.x86.R_EDX = 0x20494350;
+ M.x86.R_BX = 0x0210;
+ M.x86.R_CL = 3;
+ CLEAR_FLAG(F_CF);
+ break;
+ case 0xB102: // Find device
+ device = mypci_find_device(M.x86.R_DX, M.x86.R_CX, M.x86.R_SI);
+ if (device != -1)
+ {
+ M.x86.R_AH = PCIBIOS_SUCCESSFUL;
+ M.x86.R_BH = mypci_bus(device);
+ M.x86.R_BL = mypci_devfn(device);
+ }
+ else
+ {
+ M.x86.R_AH = PCIBIOS_DEVICE_NOT_FOUND;
+ }
+ CONDITIONAL_SET_FLAG((M.x86.R_AH != PCIBIOS_SUCCESSFUL), F_CF);
+ break;
+ case 0xB103: // Find PCI class code
+ M.x86.R_AH = PCIBIOS_DEVICE_NOT_FOUND;
+ //printf("Find by class not yet implmented");
+ CONDITIONAL_SET_FLAG((M.x86.R_AH != PCIBIOS_SUCCESSFUL), F_CF);
+ break;
+ case 0xB108: // read config byte
+ M.x86.R_CL = mypci_read_cfg_byte(M.x86.R_BH, M.x86.R_BL, M.x86.R_DI);
+ M.x86.R_AH = PCIBIOS_SUCCESSFUL;
+ CONDITIONAL_SET_FLAG((M.x86.R_AH != PCIBIOS_SUCCESSFUL), F_CF);
+ //printf("read_config_byte %x,%x,%x -> %x\n", M.x86.R_BH, M.x86.R_BL, M.x86.R_DI,
+ // M.x86.R_CL);
+ break;
+ case 0xB109: // read config word
+ M.x86.R_CX = mypci_read_cfg_word(M.x86.R_BH, M.x86.R_BL, M.x86.R_DI);
+ M.x86.R_AH = PCIBIOS_SUCCESSFUL;
+ CONDITIONAL_SET_FLAG((M.x86.R_AH != PCIBIOS_SUCCESSFUL), F_CF);
+ //printf("read_config_word %x,%x,%x -> %x\n", M.x86.R_BH, M.x86.R_BL, M.x86.R_DI,
+ // M.x86.R_CX);
+ break;
+ case 0xB10A: // read config dword
+ M.x86.R_ECX = mypci_read_cfg_long(M.x86.R_BH, M.x86.R_BL, M.x86.R_DI);
+ M.x86.R_AH = PCIBIOS_SUCCESSFUL;
+ CONDITIONAL_SET_FLAG((M.x86.R_AH != PCIBIOS_SUCCESSFUL), F_CF);
+ //printf("read_config_long %x,%x,%x -> %x\n", M.x86.R_BH, M.x86.R_BL, M.x86.R_DI,
+ // M.x86.R_ECX);
+ break;
+ case 0xB10B: // write config byte
+ mypci_write_cfg_byte(M.x86.R_BH, M.x86.R_BL, M.x86.R_DI, M.x86.R_CL);
+ M.x86.R_AH = PCIBIOS_SUCCESSFUL;
+ CONDITIONAL_SET_FLAG((M.x86.R_AH != PCIBIOS_SUCCESSFUL), F_CF);
+ //printf("write_config_byte %x,%x,%x <- %x\n", M.x86.R_BH, M.x86.R_BL, M.x86.R_DI,
+ // M.x86.R_CL);
+ break;
+ case 0xB10C: // write config word
+ mypci_write_cfg_word(M.x86.R_BH, M.x86.R_BL, M.x86.R_DI, M.x86.R_CX);
+ M.x86.R_AH = PCIBIOS_SUCCESSFUL;
+ CONDITIONAL_SET_FLAG((M.x86.R_AH != PCIBIOS_SUCCESSFUL), F_CF);
+ //printf("write_config_word %x,%x,%x <- %x\n", M.x86.R_BH, M.x86.R_BL, M.x86.R_DI,
+ // M.x86.R_CX);
+ break;
+ case 0xB10D: // write config dword
+ mypci_write_cfg_long(M.x86.R_BH, M.x86.R_BL, M.x86.R_DI, M.x86.R_ECX);
+ M.x86.R_AH = PCIBIOS_SUCCESSFUL;
+ CONDITIONAL_SET_FLAG((M.x86.R_AH != PCIBIOS_SUCCESSFUL), F_CF);
+ //printf("write_config_long %x,%x,%x <- %x\n", M.x86.R_BH, M.x86.R_BL, M.x86.R_DI,
+ // M.x86.R_ECX);
+ break;
+ default:
+ PRINTF("BIOS int %xh: Unknown function AX=%04xh\n", intno, M.x86.R_AX);
+
+ }
+}
+
+void bios_init(void)
+{
+ int i;
+ X86EMU_intrFuncs bios_intr_tab[256];
+
+ for (i=0; i<256; i++)
+ {
+ write_long_little(M.mem_base+i*4, BIOS_SEG<<16);
+ bios_intr_tab[i] = undefined_intr;
+ }
+
+ bios_intr_tab[0x10] = int10;
+ bios_intr_tab[0x1A] = int1A;
+ bios_intr_tab[0x42] = int42;
+ bios_intr_tab[0x15] = int15;
+
+ bios_intr_tab[0x6D] = int42;
+
+ X86EMU_setupIntrFuncs(bios_intr_tab);
+ video_init();
+}
+
+unsigned char setup_40x25[] =
+{
+ 0x38, 0x28, 0x2d, 0x0a, 0x1f, 6, 0x19,
+ 0x1c, 2, 7, 6, 7, 0, 0, 0, 0
+};
+
+unsigned char setup_80x25[] =
+{
+ 0x71, 0x50, 0x5a, 0x0a, 0x1f, 6, 0x19,
+ 0x1c, 2, 7, 6, 7, 0, 0, 0, 0
+};
+
+unsigned char setup_graphics[] =
+{
+ 0x38, 0x28, 0x20, 0x0a, 0x7f, 6, 0x64,
+ 0x70, 2, 1, 6, 7, 0, 0, 0, 0
+};
+
+unsigned char setup_bw[] =
+{
+ 0x61, 0x50, 0x52, 0x0f, 0x19, 6, 0x19,
+ 0x19, 2, 0x0d, 0x0b, 0x0c, 0, 0, 0, 0
+};
+
+unsigned char * setup_modes[] =
+{
+ setup_40x25, // mode 0: 40x25 bw text
+ setup_40x25, // mode 1: 40x25 col text
+ setup_80x25, // mode 2: 80x25 bw text
+ setup_80x25, // mode 3: 80x25 col text
+ setup_graphics, // mode 4: 320x200 col graphics
+ setup_graphics, // mode 5: 320x200 bw graphics
+ setup_graphics, // mode 6: 640x200 bw graphics
+ setup_bw // mode 7: 80x25 mono text
+};
+
+unsigned int setup_cols[] =
+{
+ 40, 40, 80, 80, 40, 40, 80, 80
+};
+
+unsigned char setup_modesets[] =
+{
+ 0x2C, 0x28, 0x2D, 0x29, 0x2A, 0x2E, 0x1E, 0x29
+};
+
+unsigned int setup_bufsize[] =
+{
+ 2048, 2048, 4096, 2096, 16384, 16384, 16384, 4096
+};
+
+void bios_set_mode(int mode)
+{
+ int i;
+ unsigned char mode_set = setup_modesets[mode]; // Control register value
+ unsigned char *setup_regs = setup_modes[mode]; // Register 3D4 Array
+
+ // Switch video off
+ out_byte(0x3D8, mode_set & 0x37);
+
+ // Set up parameters at 3D4h
+ for (i=0; i<16; i++)
+ {
+ out_byte(0x3D4, (unsigned char)i);
+ out_byte(0x3D5, *setup_regs);
+ setup_regs++;
+ }
+
+ // Enable video
+ out_byte(0x3D8, mode_set);
+
+ // Set overscan
+ if (mode == 6) out_byte(0x3D9, 0x3F);
+ else out_byte(0x3D9, 0x30);
+}
+
+static void bios_print_string(void)
+{
+ extern void video_bios_print_string(char *string, int x, int y, int attr, int count);
+ char *s = (char *)(M.x86.R_ES<<4) + M.x86.R_BP;
+ int attr;
+ if (M.x86.R_AL & 0x02) attr = - 1;
+ else attr = M.x86.R_BL;
+ video_bios_print_string(s, M.x86.R_DH, M.x86.R_DL, attr, M.x86.R_CX);
+}
+
+static void X86API int42(int intno)
+{
+ switch (M.x86.R_AH)
+ {
+ case 0x00:
+ bios_set_mode(M.x86.R_AL);
+ break;
+ case 0x13:
+ bios_print_string();
+ break;
+ default:
+ PRINTF("Warning: VIDEO BIOS interrupt %xh unimplemented function %xh, AL = %xh\n",
+ intno, M.x86.R_AH, M.x86.R_AL);
+ }
+}
+
+static void X86API int15(int intno)
+{
+ PRINTF("Called interrupt 15h: AX = %xh, BX = %xh, CX = %xh, DX = %xh\n",
+ M.x86.R_AX, M.x86.R_BX, M.x86.R_CX, M.x86.R_DX);
+}
diff --git a/board/MAI/bios_emulator/glue.c b/board/MAI/bios_emulator/glue.c
new file mode 100644
index 00000000000..b765ed54c98
--- /dev/null
+++ b/board/MAI/bios_emulator/glue.c
@@ -0,0 +1,528 @@
+#include <common.h>
+#include <pci.h>
+#include <74xx_7xx.h>
+
+
+#ifdef DEBUG
+#undef DEBUG
+#endif
+
+#ifdef DEBUG
+#define PRINTF(format, args...) _printf(format , ## args)
+#else
+#define PRINTF(format, argc...)
+#endif
+
+static pci_dev_t to_pci(int bus, int devfn)
+{
+ return PCI_BDF(bus, (devfn>>3), devfn&3);
+}
+
+int mypci_find_device(int vendor, int product, int index)
+{
+ return pci_find_device(vendor, product, index);
+}
+
+int mypci_bus(int device)
+{
+ return PCI_BUS(device);
+}
+
+int mypci_devfn(int device)
+{
+ return (PCI_DEV(device)<<3) | PCI_FUNC(device);
+}
+
+
+#define mypci_read_func(type, size) \
+type mypci_read_cfg_##size##(int bus, int devfn, int offset) \
+{ \
+ type c; \
+ pci_read_config_##size##(to_pci(bus, devfn), offset, &c); \
+ return c; \
+}
+
+#define mypci_write_func(type, size) \
+void mypci_write_cfg_##size##(int bus, int devfn, int offset, int value) \
+{ \
+ pci_write_config_##size##(to_pci(bus, devfn), offset, value); \
+}
+
+mypci_read_func(u8,byte);
+mypci_read_func(u16,word);
+
+mypci_write_func(u8,byte);
+mypci_write_func(u16,word);
+
+u32 mypci_read_cfg_long(int bus, int devfn, int offset)
+{
+ u32 c;
+ pci_read_config_dword(to_pci(bus, devfn), offset, &c);
+ return c;
+}
+
+void mypci_write_cfg_long(int bus, int devfn, int offset, int value)
+{
+ pci_write_config_dword(to_pci(bus, devfn), offset, value);
+}
+
+void _printf(const char *fmt, ...)
+{
+ va_list args;
+ char buf[CFG_PBSIZE];
+
+ va_start(args, fmt);
+ (void)vsprintf(buf, fmt, args);
+ va_end(args);
+
+ printf(buf);
+}
+
+char *_getenv(char *name)
+{
+ return getenv(name);
+}
+
+unsigned long get_bar_size(pci_dev_t dev, int offset)
+{
+ u32 bar_back, bar_value;
+
+ /* Save old BAR value */
+ pci_read_config_dword(dev, offset, &bar_back);
+
+ /* Write all 1's. */
+ pci_write_config_dword(dev, offset, ~0);
+
+ /* Now read back the relevant bits */
+ pci_read_config_dword(dev, offset, &bar_value);
+
+ /* Restore original value */
+ pci_write_config_dword(dev, offset, bar_back);
+
+ if (bar_value == 0) return 0xFFFFFFFF; /* This BAR is disabled */
+
+ if ((bar_value & PCI_BASE_ADDRESS_SPACE) == PCI_BASE_ADDRESS_SPACE_MEMORY)
+ {
+ /* This is a memory space BAR. Mask it out so we get the size of it */
+ return ~(bar_value & PCI_BASE_ADDRESS_MEM_MASK) + 1;
+ }
+
+ /* Not suitable */
+ return 0xFFFFFFFF;
+}
+
+void enable_compatibility_hole(void)
+{
+ u8 cfg;
+ pci_dev_t art = PCI_BDF(0,0,0);
+
+ pci_read_config_byte(art, 0x54, &cfg);
+ /* cfg |= 0x08; */
+ cfg |= 0x20;
+ pci_write_config_byte(art, 0x54, cfg);
+}
+
+void disable_compatibility_hole(void)
+{
+ u8 cfg;
+ pci_dev_t art = PCI_BDF(0,0,0);
+
+ pci_read_config_byte(art, 0x54, &cfg);
+ /* cfg &= ~0x08; */
+ cfg &= ~0x20;
+ pci_write_config_byte(art, 0x54, cfg);
+}
+
+void map_rom(pci_dev_t dev, u32 address)
+{
+ pci_write_config_dword(dev, PCI_ROM_ADDRESS, address|PCI_ROM_ADDRESS_ENABLE);
+}
+
+void unmap_rom(pci_dev_t dev)
+{
+ pci_write_config_dword(dev, PCI_ROM_ADDRESS, 0);
+}
+
+void bat_map(u8 batnum, u32 address, u32 length)
+{
+ u32 temp = address;
+ address &= 0xFFFE0000;
+ temp &= 0x0001FFFF;
+ length = (length - 1 ) >> 17;
+ length <<= 2;
+
+ switch (batnum)
+ {
+ case 0:
+ __asm volatile ("mtdbatu 0, %0" : : "r" (address | length | 3));
+ __asm volatile ("mtdbatl 0, %0" : : "r" (address | 0x22));
+ break;
+ case 1:
+ __asm volatile ("mtdbatu 1, %0" : : "r" (address | length | 3));
+ __asm volatile ("mtdbatl 1, %0" : : "r" (address | 0x22));
+ break;
+ case 2:
+ __asm volatile ("mtdbatu 2, %0" : : "r" (address | length | 3));
+ __asm volatile ("mtdbatl 2, %0" : : "r" (address | 0x22));
+ break;
+ case 3:
+ __asm volatile ("mtdbatu 3, %0" : : "r" (address | length | 3));
+ __asm volatile ("mtdbatl 3, %0" : : "r" (address | 0x22));
+ break;
+ }
+}
+
+int find_image(u32 rom_address, u32 rom_size, void **image, u32 *image_size);
+
+int attempt_map_rom(pci_dev_t dev, void *copy_address)
+{
+ u32 rom_size = 0;
+ u32 rom_address = 0;
+ u32 bar_size = 0;
+ u32 bar_backup = 0;
+ int i,j;
+ void *image = 0;
+ u32 image_size = 0;
+ int did_correct = 0;
+ u32 prefetch_addr = 0;
+ u32 prefetch_size = 0;
+ u32 prefetch_idx = 0;
+
+ /* Get the size of the expansion rom */
+ pci_write_config_dword(dev, PCI_ROM_ADDRESS, 0xFFFFFFFF);
+ pci_read_config_dword(dev, PCI_ROM_ADDRESS, &rom_size);
+ if ((rom_size & 0x01) == 0)
+ {
+ PRINTF("No ROM\n");
+ return 0;
+ }
+
+ rom_size &= 0xFFFFF800;
+ rom_size = (~rom_size)+1;
+
+ PRINTF("ROM Size is %dK\n", rom_size/1024);
+
+ /*
+ * Try to find a place for the ROM. We always attempt to use
+ * one of the card's bases for this, as this will be in any
+ * bridge's resource range as well as being free of conflicts
+ * with other cards. In a graphics card it is very unlikely
+ * that there won't be any base address that is large enough to
+ * hold the rom.
+ *
+ * FIXME: To work around this, theoretically the largest base
+ * could be used if none is found in the loop below.
+ */
+
+ for (i = PCI_BASE_ADDRESS_0; i <= PCI_BASE_ADDRESS_5; i += 4)
+ {
+ bar_size = get_bar_size(dev, i);
+ PRINTF("PCI_BASE_ADDRESS_%d is %dK large\n",
+ (i - PCI_BASE_ADDRESS_0)/4,
+ bar_size/1024);
+ if (bar_size != 0xFFFFFFFF && bar_size >= rom_size)
+ {
+ PRINTF("Found a match for rom size\n");
+ pci_read_config_dword(dev, i, &rom_address);
+ rom_address &= 0xFFFFFFF0;
+ if (rom_address != 0 && rom_address != 0xFFFFFFF0) break;
+ }
+ }
+
+ if (rom_address == 0 || rom_address == 0xFFFFFFF0)
+ {
+ PRINTF("No suitable rom address found\n");
+ return 0;
+ }
+
+ /* Disable the BAR */
+ pci_read_config_dword(dev, i, &bar_backup);
+ pci_write_config_dword(dev, i, 0);
+
+ /* Map ROM */
+ pci_write_config_dword(dev, PCI_ROM_ADDRESS, rom_address | PCI_ROM_ADDRESS_ENABLE);
+
+ /* Copy the rom to a place in the emulator space */
+ PRINTF("Claiming BAT 2\n");
+ bat_map(2, rom_address, rom_size);
+ /* show_bat_mapping(); */
+
+ if (0 == find_image(rom_address, rom_size, &image, &image_size))
+ {
+ PRINTF("No x86 BIOS image found\n");
+ return 0;
+ }
+
+ PRINTF("Copying %ld bytes from 0x%lx to 0x%lx\n", (long)image_size, (long)image, (long)copy_address);
+
+ /* memcpy(copy_address, rom_address, rom_size); */
+ {
+ unsigned char *from = (unsigned char *)image; /* rom_address; */
+ unsigned char *to = (unsigned char *)copy_address;
+ for (j=0; j<image_size /*rom_size*/; j++)
+ {
+ *to++ = *from++;
+ }
+ }
+
+ PRINTF("Copy is done\n");
+
+ /* Unmap the ROM and restore the BAR */
+ pci_write_config_dword(dev, PCI_ROM_ADDRESS, 0);
+ pci_write_config_dword(dev, i, bar_backup);
+
+ /* FIXME: */
+ bat_map(2, 0x80000000, 256*1024*1024);
+ show_bat_mapping();
+
+ /*
+ * Since most cards can probably only do 16 bit IO addressing, we
+ * correct their IO base into an appropriate value.
+ * This should do for most.
+ */
+ for (i = PCI_BASE_ADDRESS_0; i <= PCI_BASE_ADDRESS_5; i += 4)
+ {
+ unsigned long value;
+ pci_read_config_dword(dev, i, &value);
+ if (value & 0x01) /* IO */
+ {
+ did_correct = 1;
+ pci_write_config_dword(dev, i, 0x1001);
+ break;
+ }
+
+ if (value & PCI_BASE_ADDRESS_MEM_PREFETCH)
+ {
+ prefetch_idx = i;
+ prefetch_addr = value & PCI_BASE_ADDRESS_MEM_MASK;
+ prefetch_size = get_bar_size(dev, i);
+ }
+ }
+
+ if (1) /* did_correct) */
+ {
+ extern pci_dev_t pci_find_bridge_for_bus(struct pci_controller *hose, int busnr);
+ int busnr = PCI_BUS(dev);
+ if (busnr)
+ {
+ pci_dev_t bridge;
+ PRINTF("Need to correct bridge device for IO range change\n");
+ bridge = pci_find_bridge_for_bus(NULL, busnr);
+ if (bridge == PCI_ANY_ID)
+ {
+ PRINTF("Didn't find bridge. Hope that's OK\n");
+ }
+ else
+ {
+ /*
+ * Set upper I/O base/limit to 0
+ */
+ pci_write_config_byte(bridge, 0x30, 0x00);
+ pci_write_config_byte(bridge, 0x31, 0x00);
+ pci_write_config_byte(bridge, 0x32, 0x00);
+ pci_write_config_byte(bridge, 0x33, 0x00);
+ if (did_correct)
+ {
+ /*
+ * set lower I/O base to 1000
+ * That is, bits 0:3 are set to 0001 by default.
+ * bits 7:4 contain I/O address bits 15:12
+ * all others are assumed 0.
+ */
+ pci_write_config_byte(bridge, 0x1C, 0x11);
+ /*
+ * Set lower I/O limit to 1FFF
+ * That is, bits 0:3 are reserved and always 0000
+ * Bits 7:4 contain I/O address bits 15:12
+ * All others are assumed F.
+ */
+ pci_write_config_byte(bridge, 0x1D, 0x10);
+ pci_write_config_byte(bridge, 0x0D, 0x20);
+ PRINTF("Corrected bridge resource range of bridge at %02x:%02x:%02x\n",
+ PCI_BUS(bridge), PCI_DEV(bridge), PCI_FUNC(bridge));
+
+ }
+ else
+ {
+ /*
+ * This card doesn't have I/O, we disable I/O forwarding
+ */
+ pci_write_config_byte(bridge, 0x1C, 0x11);
+ pci_write_config_byte(bridge, 0x1D, 0x00);
+ pci_write_config_byte(bridge, PCI_INTERRUPT_LINE, 0);
+ pci_write_config_byte(bridge, PCI_INTERRUPT_PIN, 0);
+ pci_write_config_dword(bridge, PCI_COMMAND, PCI_COMMAND_MEMORY | PCI_COMMAND_MASTER | PCI_COMMAND_IO);
+ PRINTF("Disabled bridge resource range of bridge at %02x:%02x:%02x\n",
+ PCI_BUS(bridge), PCI_DEV(bridge), PCI_FUNC(bridge));
+
+ }
+ }
+ /*
+ * Correct the prefetchable memory base, which is not set correctly by
+ * the U-Boot autoconfig stuff
+ */
+ if (prefetch_idx)
+ {
+/* PRINTF("Setting prefetchable range to %x, %x (%x and %x)\n", */
+/* prefetch_addr, prefetch_addr+prefetch_size, */
+/* prefetch_addr>>16, (prefetch_addr+prefetch_size)>>16); */
+/* pci_write_config_word(bridge, PCI_PREF_MEMORY_BASE, (prefetch_addr>>16)); */
+/* pci_write_config_word(bridge, PCI_PREF_MEMORY_LIMIT, (prefetch_addr+prefetch_size)>>16); */
+ }
+
+ pci_write_config_word(bridge, PCI_PREF_MEMORY_BASE, 0x1000);
+ pci_write_config_word(bridge, PCI_PREF_MEMORY_LIMIT, 0x0000);
+
+ pci_write_config_byte(bridge, 0xD0, 0x0A);
+ pci_write_config_byte(bridge, 0xD3, 0x04);
+
+ /*
+ * Set the interrupt pin to 0
+ */
+#if 0
+ pci_write_config_byte(dev, PCI_INTERRUPT_LINE, 0);
+ pci_write_config_byte(dev, PCI_INTERRUPT_PIN, 0);
+#endif
+ pci_write_config_byte(bridge, PCI_INTERRUPT_LINE, 0);
+ pci_write_config_byte(bridge, PCI_INTERRUPT_PIN, 0);
+
+ }
+ }
+
+ /* Finally, enable the card's IO and memory response */
+ pci_write_config_dword(dev, PCI_COMMAND, PCI_COMMAND_MEMORY | PCI_COMMAND_IO);
+ pci_write_config_byte(dev, PCI_CACHE_LINE_SIZE, 0);
+ pci_write_config_byte(dev, PCI_LATENCY_TIMER, 0);
+
+ return 1;
+}
+
+int find_image(u32 rom_address, u32 rom_size, void **image, u32 *image_size)
+{
+ int i = 0;
+ unsigned char *rom = (unsigned char *)rom_address;
+ /* if (*rom != 0x55 || *(rom+1) != 0xAA) return 0; // No bios rom this is, yes. */
+
+ for (;;)
+ {
+ unsigned short pci_data_offset = *(rom+0x18) + 256 * *(rom+0x19);
+ unsigned short pci_image_length = (*(rom+pci_data_offset+0x10) + 256 * *(rom+pci_data_offset+0x11)) * 512;
+ unsigned char pci_image_type = *(rom+pci_data_offset+0x14);
+ if (*rom != 0x55 || *(rom+1) != 0xAA)
+ {
+ PRINTF("Invalid header this is\n");
+ return 0;
+ }
+ PRINTF("Image %i: Type %d (%s)\n", i++, pci_image_type,
+ pci_image_type==0 ? "x86" :
+ pci_image_type==1 ? "OpenFirmware" :
+ "Unknown");
+ if (pci_image_type == 0)
+ {
+ *image = rom;
+ *image_size = pci_image_length;
+ return 1;
+ }
+
+ if (*(rom+pci_data_offset+0x15) & 0x80)
+ {
+ PRINTF("LAST image encountered, no image found\n");
+ return 0;
+ }
+
+ rom += pci_image_length;
+ }
+}
+
+void show_bat_mapping(void)
+{
+#ifdef DEBUG
+ u32 dbat0u, dbat0l, ibat0u, ibat0l;
+ u32 dbat1u, dbat1l, ibat1u, ibat1l;
+ u32 dbat2u, dbat2l, ibat2u, ibat2l;
+ u32 dbat3u, dbat3l, ibat3u, ibat3l;
+ u32 msr, hid0, l2cr_reg;
+
+ __asm volatile ("mfdbatu %0,0" : "=r" (dbat0u));
+ __asm volatile ("mfdbatl %0,0" : "=r" (dbat0l));
+ __asm volatile ("mfibatu %0,0" : "=r" (ibat0u));
+ __asm volatile ("mfibatl %0,0" : "=r" (ibat0l));
+
+ __asm volatile ("mfdbatu %0,1" : "=r" (dbat1u));
+ __asm volatile ("mfdbatl %0,1" : "=r" (dbat1l));
+ __asm volatile ("mfibatu %0,1" : "=r" (ibat1u));
+ __asm volatile ("mfibatl %0,1" : "=r" (ibat1l));
+
+ __asm volatile ("mfdbatu %0,2" : "=r" (dbat2u));
+ __asm volatile ("mfdbatl %0,2" : "=r" (dbat2l));
+ __asm volatile ("mfibatu %0,2" : "=r" (ibat2u));
+ __asm volatile ("mfibatl %0,2" : "=r" (ibat2l));
+
+ __asm volatile ("mfdbatu %0,3" : "=r" (dbat3u));
+ __asm volatile ("mfdbatl %0,3" : "=r" (dbat3l));
+ __asm volatile ("mfibatu %0,3" : "=r" (ibat3u));
+ __asm volatile ("mfibatl %0,3" : "=r" (ibat3l));
+
+ __asm volatile ("mfmsr %0" : "=r" (msr));
+ __asm volatile ("mfspr %0,1008": "=r" (hid0));
+ __asm volatile ("mfspr %0,1017": "=r" (l2cr_reg));
+
+ printf("dbat0u: %08x dbat0l: %08x ibat0u: %08x ibat0l: %08x\n",
+ dbat0u, dbat0l, ibat0u, ibat0l);
+ printf("dbat1u: %08x dbat1l: %08x ibat1u: %08x ibat1l: %08x\n",
+ dbat1u, dbat1l, ibat1u, ibat1l);
+ printf("dbat2u: %08x dbat2l: %08x ibat2u: %08x ibat2l: %08x\n",
+ dbat2u, dbat2l, ibat2u, ibat2l);
+ printf("dbat3u: %08x dbat3l: %08x ibat3u: %08x ibat3l: %08x\n",
+ dbat3u, dbat3l, ibat3u, ibat3l);
+
+ printf("\nMSR: %08x HID0: %08x L2CR: %08x \n", msr,hid0, l2cr_reg);
+#endif
+}
+
+
+
+void remove_init_data(void)
+{
+ char *s;
+ u32 batl = ((CFG_SDRAM_BASE+0x100000) | BATL_PP_RW);
+ u32 batu =((CFG_SDRAM_BASE+0x100000) | BATU_BL_256M | BATU_VS | BATU_VP);
+#if 0 /* already done in board_init_r() */
+ void *data = (void *)(CFG_INIT_RAM_ADDR+CFG_INIT_DATA_OFFSET);
+ unsigned char data2[CFG_INIT_DATA_SIZE];
+
+ /* Make a copy of the data */
+ memcpy(data2, data, CFG_INIT_DATA_SIZE);
+#endif /* 0 */
+
+ /* Invalidate and disable data cache */
+ invalidate_l1_data_cache();
+ dcache_disable();
+
+#if 0
+ /* Copy to the real RAM address */
+ memcpy(data, data2, CFG_INIT_DATA_SIZE);
+#endif
+
+ /*printf("Before ICache enable\n");
+ show_bat_mapping();*/
+
+ __asm volatile ("isync \n"
+ "mtdbatu 2,%2 \n"
+ "mtdbatl 2,%2 \n"
+ "mtdbatu 1,%0 \n"
+ "mtdbatl 1,%1 \n"
+ "sync \n"
+ "isync \n"
+ : : "r" (batu), "r" (batl), "r" (0));
+
+ /* show_bat_mapping(); */
+ s = getenv("x86_cache");
+
+ if (!s || (s && strcmp(s, "on")==0))
+ {
+ icache_enable();
+ dcache_enable();
+ }
+
+}
diff --git a/board/MAI/bios_emulator/glue.h b/board/MAI/bios_emulator/glue.h
new file mode 100644
index 00000000000..585efe12869
--- /dev/null
+++ b/board/MAI/bios_emulator/glue.h
@@ -0,0 +1,57 @@
+#ifndef GLUE_H
+#define GLUE_H
+
+typedef unsigned int pci_dev_t;
+
+int mypci_find_device(int vendor, int product, int index);
+int mypci_bus(int device);
+int mypci_devfn(int device);
+unsigned long get_bar_size(pci_dev_t dev, int offset);
+
+u8 mypci_read_cfg_byte(int bus, int devfn, int offset);
+u16 mypci_read_cfg_word(int bus, int devfn, int offset);
+u32 mypci_read_cfg_long(int bus, int devfn, int offset);
+
+void mypci_write_cfg_byte(int bus, int devfn, int offset, u8 value);
+void mypci_write_cfg_word(int bus, int devfn, int offset, u16 value);
+void mypci_write_cfg_long(int bus, int devfn, int offset, u32 value);
+
+void _printf(const char *fmt, ...);
+char *_getenv(char *name);
+
+void *malloc(size_t size);
+void memset(void *addr, int value, size_t size);
+void memcpy(void *to, void *from, size_t numbytes);
+int strcmp(char *, char *);
+
+void enable_compatibility_hole(void);
+void disable_compatibility_hole(void);
+
+void map_rom(pci_dev_t dev, unsigned long address);
+void unmap_rom(pci_dev_t dev);
+int attempt_map_rom(pci_dev_t dev, void *copy_address);
+
+#define PCI_BASE_ADDRESS_SPACE 0x01 /* 0 = memory, 1 = I/O */
+#define PCI_BASE_ADDRESS_SPACE_IO 0x01
+#define PCI_BASE_ADDRESS_SPACE_MEMORY 0x00
+#define PCI_BASE_ADDRESS_MEM_MASK (~0x0fUL)
+
+#define PCI_BASE_ADDRESS_0 0x10 /* 32 bits */
+#define PCI_BASE_ADDRESS_1 0x14 /* 32 bits [htype 0,1 only] */
+#define PCI_BASE_ADDRESS_2 0x18 /* 32 bits [htype 0 only] */
+#define PCI_BASE_ADDRESS_3 0x1c /* 32 bits */
+#define PCI_BASE_ADDRESS_4 0x20 /* 32 bits */
+#define PCI_BASE_ADDRESS_5 0x24 /* 32 bits */
+#define PCI_BUS(d) (((d) >> 16) & 0xff)
+#define PCI_DEV(d) (((d) >> 11) & 0x1f)
+#define PCI_FUNC(d) (((d) >> 8) & 0x7)
+#define PCI_BDF(b,d,f) ((b) << 16 | (d) << 11 | (f) << 8)
+
+#define PCI_ANY_ID (~0)
+#define PCI_ROM_ADDRESS 0x30 /* Bits 31..11 are address, 10..1 reserved */
+#define PCI_ROM_ADDRESS_ENABLE 0x01
+
+#define OFF(addr) ((addr) & 0xFFFF)
+#define SEG(addr) (((addr)>>4) &0xF000)
+
+#endif
diff --git a/board/MAI/bios_emulator/scitech/bin-linux/glibc/dmake b/board/MAI/bios_emulator/scitech/bin-linux/glibc/dmake
new file mode 100644
index 0000000000000000000000000000000000000000..4d6ccb3f46ee6c0e2ca1e75884595e043b3ec097
GIT binary patch
literal 70812
zcmd?SeRx#W)i-=5nMo!vVS)sV8Z>H9P*9?v1c(j^6CxiHnUJ7{uWIm+B1AX`K?n?;
zq~>slO<QcOwN;93ZELM<wW37~A5GAkTBO=i<yLB`-EpX;f<vk)^Zb76oJj)qe%|ML
zulN1yf$L=NwLjNhd+oK?Ui)J<hG&+0JRU9eFHK9=2<3m(>mLVq^k64$oK~Ruw2|5{
zZK#%kaK?>`A`QML;OFPV=f#(f?@fM)<2M9;evD&jPKod!j^BA%9*rOKYdKDQF5uj6
z`TYELrfHf!Op|&U4^XQZ=+P>^?ep_%0nCqhv5sq(E&al^%kCbtZ0T}y%{8l5TyveK
zl_7i%zW)Cv0w7+6Zs3h@$Kqq!+4u_Z@n12%;rPxYfPWM4O%k7`-2itozDyTp+o$52
z?!qCsx8WP*!gR*tE5ete1KV>oz7hCH*IV%MUy0*r16;Slb+2{ZAlzyAO7UHW?^b+%
zeEfG4zASt*@D0V6i|-127vUR&?-G3ccfRAu-*VS~q3h=LiyQ3vN4oA+{o>Fi+RZLZ
z`ltR4bUpd0fd4~xX1{co!jJ9)-)UMlzKikkU!~({SGw-G&S*Da);SSV`oWjOe?dPu
z;Q9x-ZrF9nSHhbvOy_#ne@(xzlsDC{gbVPIp5#+F+F<RUN!B~_(LR{`)n4cGlPAv8
z1_~|TM0(P4FhYpO*jBG!mw3PQ>G6lWe)1f7az4KNHm{$3PWWzowSbSh@KU%VAM^Q1
zGnQw<U61_iOQvtcHyQ92xa6ZIe6@gIL_-+Q@PqyE`3B&9-|fTi2Y}b3{1m>w0(>0!
zZi37FFXKD#l|KCT0e%|z?RLxmFTnYzZ!BQee+XXy@@Fqx!hgi~7|Lsb%ktjEHyP!P
zPjliw0K6XXdbmt~9A5zCahwtUC%z-d|Dp?@hWi-Ox4ZBexCapb5?q$=1s*-f|Gpa!
zQKM}EJk^DB06&fNxnK&WzYK5y<vk8R;i~}8M0&%8ivS--{BuZ8d?o;X4DmmP%k($H
zU54_=%Y@4T=Og`hT=-VNJ)l=l$ce83d>H+a>d(6XuSfnuH+?<e0Me)WcO~G*0B>~T
z9{@ZVa0Xn~_a(T?-1>-L3*dw3&r@(OMT)I(qy6~jalku~|LaK0^xp@(1^K`2!ao7r
z1AN|c;b#FKL3>mE@dD$K{>zAG{Vy{=%A<@Vybthbz_ts&26!j(lTR6c5b*kb@qYq5
z6Yvr@{wUyO{mT0rVdVFvIrx4AxVB&Y3BXSSrp#vfp8?(pxEU_nmyUc#P~JoE6Al0#
zjq;v!;atE60AJz47XY4#{G2D4{$j=>e+SBA`6B@D1btHRqX8dBe8^3I9pE+Ycq08L
zo&%Qw-h%w(N0xUB;3KFnm46oCr-4rjjsPCrFa8d|sq!fg?gpIdZ^HKh=KPPMG2IT(
z)&SlK`9zrVYa`S5lV@K(2mTu1^*`%NuPt17&%G;_FI;6TUTG{`s9}1(i_`KA+QO-~
z-#TU1EoIumX)|Y+PMNuIc6oUuT(z)jO6kn-LT%xarOTIUbt_jcU!g68*FZ_kEPh0;
zTxDpBjk-06kUtA=nT<;BMuvsjl7^K_mm5p8B}<l>t8{IZv2x{I`brdVm$9~?Zs8Yt
zea4DqEAFrBi!oN14Gn<rt-JTGhPBLi*S!tmAp5<Gmn~aym$qbOU7dDMol&=ZwYIX(
z4O`Jrw_ICNw*qw{YL&L+u4OA$)oJ&wTCvj5RxQ0}`Ql~T7nd$uhMG|*szo!5x|IwD
zyqvW(m{KIN-*x}pQs-i11qKcx%jvF8wajhp3e#Aqxs6@rx<=i-4a*nbi<;Je=mzm!
zjPlm5S_s-KTMDwdnU^jnrA%UL)B!cei$p6{N-NORrOWC-ekKC2s;=&fl2^c$b@wk_
zj&kdaFPKZTyBs=5TTrL5^xis+G`V}}N=-;X4-uhz|6+97k`*hzh@PvvYjp#u*|79(
zC!q$qE?v1|xwbInF{QM-%?9l*o!QOhQ0{<9Z-RwqHBLAUxxpJ~YTez7jm1d&g;lE@
z9%Q+9Lr((_QwEZkeVFt)=lUR{DO-II#+);K1Hj94q2zGP_@Gcx7Wy#pbIkZ=I&+~9
z%Gf;2>6sA1wR9nT7tx)D`Is&g7@aN@uVr-0G_8Rylp}*Kl!P^Op=hnA3uPcm7Ya%f
zT_|uZbfIW%p&QV&HoBK;+E%(yjvk>q5we~xl&>e~UaV<P(uLCT6kRBnPt(0Y)1IXp
z(zNI3UZ-h0=t8O3Nq0DO61oLwAKej}wx8~F$TGT691qf+0=m(KLVTF+XviYEP#%xc
z9jj@_=tA*SbfGLCr(2?FC+I?eouXTzY29=$!`wiZ3Ksey6O)3ME~Jm2E+&xx-K!y+
z=t79*(#_JeJi1V(^6B0P-HR?1>O#6#p+D(D;U7&GO7vK|rO>(Q-h_FXE`;i2x)A0e
zx<i3SzkhSBzeW_{J2&kelI_uAzwRbv_|z{}es<bQs2dM!nmxbAIzE4Ia(pFPk{nTm
zzf6=IF%LeS-marb{2NhAm~mYP1ztoLoThcP3w$?WP*Ur9R$!fQ0pTYEUPgE%;WmLA
z2!rBUS5#nwFes#TH3+<haES0Cf!7nRAY3VMlyD{CkiboZ=Mf$&a0}r@gbM`TLYNKe
z$`QDYa06jY;H`w$5I%7R0V5tE93^~I;KvBJ5I!jI6NK9cw+s9v;YSEREAUf<pCJ5%
zz)ur?ig262&k}x?a8%&u2=5@=An*>t?SvNzyp!;L!j%HI6Fx{dB=A1MhY61rct7Ez
zgbM^dKv)sZ5%?hC6NEK^-z3~k_{6{2{=<a1?&~@#@Daj(!UqLDN|@?pSG&N+2<H)g
zR$xWAfbbInA16GLaGSs<2#+Nk75Efks+(O60(TP*5nd#458(>Jl>&3b>6L^-0(0c)
z^9YX>m?KbMM7Tg;jznE2oFgztq~1VS6PP1YUqkpr58KZXsz(VQ6__JcZy|h8V2)V5
zjc~ib9J%@<gr60dBUpce@Dl=aB<oKRZWEXzT7Q;sRA7#5eFxzNfjPqUcEXDU=1AA~
z6Rs4PBVIp9I0U%p@6Csd%sJ{5`f{Gyg%&Mno%)=2JLduG{n)YY%E~#_>ch{HNuA3#
zbwJX6T#41GBLAOiYipyt_;m%y94p~p%@|}Q?DXWp*j{gJl4hQQsCad6>uL?@Uft`Y
zj~&misgBsQ{L!`ZwBVMDyqeY-CKG9~wY6IC;r0<p_$%u*+mmeYtLq@KV*9*=XZf9=
z(|!p`_Z315t4x}Kdd>N-{w*;hV{3A?VDoe7C^?ji=4xF}(I4(%E!N)Vc4G!`DoVuG
z<!i=y^;&XOUUF5w8iL8q>WJ+Nw1#^sBWersp!9C_O$c8r+#TDO)0{8{)NAS*%of1O
zzO$hD9dk#lv0F2T+2Nj8$w;b&!RCp`*;Rr+ZAFRB@F~{HM8?E6dser7dqL-v0)|D`
zj?s+4w<XO}YMfMYDn1B!p~`A?IRk);-<sczN;)mGJJxtgGcxR1rz{jQt2?%~KnpfK
zfpYBo3St`oJlr1q)nO!_Vh@fzP>8;;Gh%BBHM5A2c_r(fQebNgGlmoLNc154wgNj%
zLes6esLi-_7m3#CJMxUrPhX1i`VsO$;X+OUAcr4Ghgpg0@_J81eOE{yaA<N|&s>6(
z?=BEJC44hM7r!wIz2qT5S0b&oH?pmg{a2}vX4=>Pl}tv|JaA!bUx7=s&M<`yI_@~J
zAPIv_AHZuRiV{MBJk7WzR;(F0$@}sY7dRxDH|}k-O@H*(Du1!*H*z=KTBU`U{kUdk
z63AhTx}$4HYo<4P>%1t+XEmg6uxSR$2aWA4YnGxr#cPLht@6n>z$x=a-27b_p33JX
z%BynF=jBy_9Q(Ga*!zW92d(ldd&*d=d@NGN)=tojD*M(6)~sX9xOPHw(wK_Atq;_D
z)bG($Yp>AH^r;abQu0PMeG0Ho2llbXW12D0o^{N+-5bw99&5n_YyL5NqqjL}zT%(+
zwkF0>Q-x++6Wf5lm!P%gg~|IWlB+A!ip3nJpM+3oc?DQHJ^;Lj7E}Nfj79^aFSOa2
zww7Ey83QfV$I6ERiOx|kR%qI$3ZWK9S7o*O<1OsYf>d|rMxX(p2X&qOH>jIE7l^2b
zAuu>N1mDMFjVClCmjxuv6V+-fiilSD{TNH=0t>usp0IBj365@lHQ0OwBuw1j+#YPE
zyi&jPX<BRD;X4;BOv#W<$Dc#9AwD{rmq7vv4Z{9dd!Q2NlLy}X2~qS`s!ohPQn=mp
z7qxd?!Lf)W)|7zNtRpAtXc~w>yOogbNrbA>FkV81R`cBmhz}#(!>3%q)CxRX86JC?
zf59a?um<dGt|EYcMeo=W4W?<OrV(3<5jMb{QfO=VKhNL#a05bjEJ9M0+mWV~R+#@H
z!Ef<ft+j}<TIb<!>#T!TD^oVV6Kwi15<A!>@5`mQWb>AyS}S}wqD}#KtHYMs9HIC=
zLPml6bDI;5X+?>odDzYK8|fHQwdp8$8xiVP%)Q4tffVUeazU@+J;AT+MP$9EKlT&o
zbV#!rnxoac2-u)kAu%s#eVM4)4f#DU<^i{p-?tl|5P4OUjAwR+4<igiXoqIp$U%NM
zY3@*aE@l~|l9Ul_x*c`ctt`~OCEsbZJ$^EHDDLH$hCI0`#a;Oh`Yg%evagZLp8AAk
z<s`!ULgo;1RckY`s#G^$&i)SAL-#{wZF)ZnWE|>9Uj&`L2+bS8h^#%G%`=e;Ud@%+
zrnmW!Ilu`9j%dh%-l>Q@grVn!WDQkT+fpG0O!9e_Az0=npJy*7pC>aVpRdH9+mg?d
zL)91AW5TTQThRBYB^-NMc-Nf#KNd!2IIA#wRv=lVE<suFS)SOwk+GMB`D8kJ9Ap;3
zaTtPweRrO8xz}aNTf7eQa)ebtzPdcmU>OPs{shC#7A#x8A41(S<S=Jrq&Y)3M}G<A
z$5g8_uyVBa))z+9%+u_PeDFrN-kUW2`cC%H2J%fuL@mc0X?3EnVjBXOWRt4{Y8^6k
zmSbfn=oZfp7#R_@1cBCP@t~DJfa#B@DOf^Td#%H*b*BUk>KIfQOo*reCg6LUUp1Ce
z>Cx;9+Q2bmtd9|j{B~M#x{+zmVOO4PK9tfVfM2>5!NlZ6NB$1b2>SwLyQIxVU|D{s
zSk#C{-<i^!c)C@Z&xG%o@7uR{n-k{Ot&=ExYMZ^z8(o*98RLpinwi#_cmREANBnk~
z*DCeK)_FA}%Z_;MGQU;oPp-;UZ3)h1oAH-Z_-82aW$Q$$MaYXbNt5E20Poc(A(vf;
zj5U(Q8&S799@cOEcWYhuoeN&wYbB7csNJ6Hk51H#Aj*kOyvFo|N&%Xu+<2i?z;4W`
zAB(x>o|FCOnip$8+e!A^Tnos~&9fqYv@WByI$%X|?78_?BsXb}RIgx>ZI$IG%|i8@
zc=N1PBT=apDcC%>pd~VT^W4!bkulryuz6*b6<Wi^)7xRdF%m0bm}cAo93`DSuQ1sV
zP+l;Xz~t98(7pyH8}ii`WK?^dh&7nh5t^rFI-$w&EK1$vKu%?#=Z{3SL|t}R7^5Bi
zvR~#2Yfo%V0Xt+)LF|D7%{*;QFX&GjwAswWq(Hl{aQEtw>L~EylpKiN1nK_YV6J*k
zeNx{Aj*h7G3FJry*cq5E8xV8?>u;uq;+2mKTgZ*&`Oyhb{-UYO?UK1eQrbfwfm|Ki
zZvC<6MO2mi_!(>e>4O!O$<_ID)LkE^1`@P``Xs{Qmw;~ck8QV0n6rPb^zwXYr^{Uo
zas<&mQr8{*!*;xeu-FDr)3;+EyvQ>#6)(YqlB@F~>Ic#|aA~X&<Fvw28I6#X>NMXg
zxfp=vhh$C@8XSj>MQ9*tSzAOMcEfUFjTkMLMv`WZE4~jPUZ=@P9Xr9Xu^fz9^iIEF
zE^CQcNj~|;Jik7mYLSlRb2tuFXR0(UKFA)<cnrJkbgjev))!#VZ4y}OwT9B;_Ibpf
zPepZ5a+O#89i)$_-{G%hl<@@q=|q=dJ`X|jp#$wy(_Y;R-r`uA@3+kWdhT@pK4@K&
zg#L7`sz6bgNw4cHmAuvielB}_){uB+8-+uqmm{srAM$itW&V@^ka}asy)1sNKlT6`
zoKe&sUj$h&*PmSJSBw9FV#7UlV-K63gqE0$fWzkc?dvdLM<Lw;e<XQBjq)QQxYqMt
zM`pn^dx5uFeGDB6nXGrg<$vm!mc)ebS3}w2a8GO92@$DMe|4lNp^n}!lm6T2990V&
zU45GVH~K5#-*ymFDFyhNv6?wXG}jA=*B*(mD#ud4It1MA0&Ws!hsJhlr;vZ!QD*JS
z_veo!A4B`)yPEkJc6L693iMY^o1MO?Vjg<J<4EKa@u^k<YUFsLrB)#V108JpY0}J+
z=^%c)m2l8#sM_>_7S%Z0V##La)F-iM8@`Lv4h7yzPNh=K<)CGHB6LU8JWqzU{t25u
z1&o5UPQ~vPwfC35n~pz%y3uu=;jQpsb<*ZI6as)+9H+@~qT)2KM+Xq2&gM1naq{YH
zHhO(jVI*CcMWc+z9OntgdD3y7a-65>w1!VX=fPy&8djC+2JsxJRAa<*uu>JmLmivk
zg{fsc)Rf}sxyBeryUH;xvZv%qd)?8Qbq`uS<G3&r*=$a(g}=}>W<5vnj(G!zQ?c3|
z_r?C=!EC=Wq~FLaZJZy%&r<W6<xfnx-D_MIYkUp@+@AZKU0P8*r2;|#QKF+_X`+6H
zg^LxAA_HdP43urnW!BhQ@Yp@}eHAGL^PC)x>Q~IFei|3-po5U3e<_UbM*+nvD~vI*
z#wavy^zzqX&;<LRRp%t9PNy=W+USpU`i*IjvG$FU^V&rDoqlt$ETaZ;`E(Eri(-<Z
zoT_W`fOL7qrd#J}UJXOSYtMSlx;4*P;_O7ZiPEZ2u$dcZiPGEQW9Qp<)N=YU3hmMY
zSzcUZhia|T+UWGE5Q6N`yx37sR_VMr=SUZ&+4hZ?kv!F^0W|{C*oIoo9GEDd8#1!2
z1+{T5S3M~bU6fp1YiCdsb*QwARC@43r{iVy^>gWzD!+L<O)Dm6W$4<NqxNBC1+>L3
zkRL1YGt{_b8{N%XpkVS^^SngqT(7~diQZC`6VD@#V1zVOr*C0JX|rWGN#9Mz!n$+H
z<Yy2rrH<6ho9qV)At7(%JXR>HOxSWRbcPl5uuO+`$B-l!MI`SlR6ideI9a75LEw6j
z7@;ngT{S_t%pnq4Cuyv}xV<s9VS;8X=q&egNZ1P|Kx|Z637s3<$?MfjY^ZX;L*v7`
zX3bO3U&p^m+3{@{*{wZxIdwOy+KU3?=K;^;_4=>avZ=Q^EfYQP7Y?Fd?+ovhN<afP
zEZD?dO5iZ-+1T2EX66B5if$L-wVX1YVKLil&Dvq#NaD?zH&B)*yFbi|z3;Ie<}x6<
zp-O9<1g5U3R@V=dP6v5LE{P#L*m^CtE9_PZisD;qgAegUfxWucdY&O&za(^{yP7bv
zV=s%42{wJ2!4+w9BG~j@pbVK=C|sf*lK~_P!A*=fTvqH`1gbO+?d{p4Z2w3cDxvTr
zYpEY%gU0Hx%me5T8Isk?5EjGu#oTTl&<E(qb84pK0bC<=C{$O`fYpfr)r5M1r&!N|
zw$P(X79I(6Y>iqXSi$PCQ!@wKAQeQy^un$`07LQ|19n=|y<NYNwjef9I?rolb1dRC
zkX;(G%BR8(Ga?k?i6Z<lbM1#oA0S+OTkZM`drGZUUQ6_+RE^-lnym7w#1t&|vlCP9
z^cb)Rp(IQ)sJFTR9Z{{$|1_D*3OA7k6l$n0bJJ?6F4owDuKyNBPm1gV5abCqeVGGF
zsx7Xr-H>J9T5CzSZTfyn^4qJcE`6SW)wt7c+yNG9eg#4r)w&EtC8Q0EvLIy5KalEw
z7VF}0rCnZIJf(KSC63NI6?$nkiJntjUb|rc%b8PKYE{?T&`pG2fJSw#^)MlHgUlGC
zu-LK}`eT2A5TjBQlnBfhIkJ{xdqFM~xG@L|m*2QLR<aKxMl&vxgqUIe<}7J?^J4aS
z(+QG+0^28Qle#Y8!Y;g3Ca7%jx3q>)f=B#YTEnRJ6J)i*ZD>SFs8Jz;G)*(7yHf3D
zve(c5N~uQlVryq=#s$gyW(qUvw=wqX5*vu0kMRgHh>V)ghzFc(XA6`6z8;Jjezrb<
zw8@oI^}CpIzXU#6kGW-wUdNDMNyyW&eT58c)9+#6HVJ%+AzSsO4Ec(LJi(9_{fi7~
zl#oZ5(Gg;k^?Mm!C*h9~!_u+a58!}NeY(CM&K&h|13NMgBWi>#{e^~-ch3i(`eBlU
zsBt?Y*mRQs^PXa_WOs&}*t=bsFzB?UNLYy6$@^-P&$H+IPopb{#*$+sWp1qG06R9=
z^fuT|a0*%B1NI$L6FyG#7#*>aT2|sLXiy|(_mDXmy7&<Ag5JimE|jwT@hjR;0>)*C
z=7$3j{ZT~5v&8#jru+CWtTW)2XkM2pZB$V^hF8c)Zw())#9HBidNV>wP&dfdcQES<
zlGXcptgfK+W38NTF94vw#q<w4>ANx!BJx92i(u1#p_!nj*BpGCN<u(d9N*rqPZ69n
zpH^)g(zLy90ZE#LBwM(~ZnWmMZ%%6o@9PY69|bmX{VB&LjwywjZfm%`QkB=Szym<s
z1`TID4Krh>uK<%Nvrt=Ub!w#d2M{D+<^I_-d$VH!Y3_9DKu*c}&>d{&)19ROh5$#g
zBMAkoD$UD9hGitC%=Mb*vm1r^|42$Ko+cH=FJ!G1D1~{mL6c6gU=cNELJc<UhoAE)
z$2_zkcg*|MYjY4@UK<n3pJrS|<9QTxEQj<QZZDvk4*S2I4qavh?7B3JJ1X;W7~i9!
zS=EU;h>`moY|nAuHZEqNU{$K+K)~9YTpfz2y)@j5SvI0-WXR?w%I^pn(8ofw1*{IK
zkOX@jqnNt*D&iFq$sJ<5`pKT8`J~!|;lN&fN!+K@FT{O9{aD<`)c3@FL_I3*v+8Sb
zQ_4j?lnbmqpj*JGGZ9NFF5}8!kjcW9dUBOtJ?}7mY#o-%FxdpulM;Xw-*!CAX?8ez
z!wd0&ZO}^p4c!K4CTEc-N%QZq#x`a)+tfX7p2n>buvJy30$L=XMTJuVTO?qM8s`LX
z+i3VdF~m)!hKhScWs7@I`QX~&rq=J*BEFyfJa!y<hP$M--m}ae;bHaqNYIlTT;Ax-
znsGOHBzlu()F#LGU>RMb{xV9sN}#0Kqkd1g!-<WkO@ulfs9LQe6z;J;9rgC86R?jI
z?=f@dR7cdtKZ^)}i1S6ULVg^RSTZ@j0%Jr!Np5}o3g$ayy@$B~^{1-VrD}{9WHPQu
zRXIqiq}c&P;D*v-$&Ci&#edU=X0<sfiR=|j%Z)TPX=)111JdFiY-)T@;;UK8qzdkt
z?7k8i_7eWD_la{swb}y@_Te~yegJ+CcemE5UfU$-3Hxxu^kM~njjWPSzK7&6TwsR9
z>Nq?V%#~rK+vPBpf%m<t6P;p#t6(t`vmV+DTSM%49{a|`#z=s>Pbcb8vl6m#8)Hnh
zx)L0SF^*l^A;oDaOXnxBbT<D~26Mp5?Ai_=%CqMO>>1EJk9UR@N4jO6+MLl6?#3P{
zLGYw2y|9dISw!XxK=v4mD%BpG{K3vbn9Cf9;lZ%WjzwJ|T2DX0_nTOw0wbbal%vJ3
zgnr3At>nAXCN>&ftSZZZ>Yd)`48PxQJZ`P?TGz*I;x+fw=5TjQn%#)ahd^<$ncYcz
zw9YAhI(9hFT6d(+M&a6ShRR?Ia<JV9f^?RNEbM3d5vI<Gl@x$qHS;_@L6+(sqiNe2
zf|e8yr^mP%<SV`-&kQ6=@9-Pg7oDmZS3{P@*1}A7HN@GKv9%SjTgBGl??uT~6<o45
zp*x*+Wx;B=187=_SjjQWlAhp0j{>Y;1OlA-Zz^*ED=kHWS*2(Xy0RGT(Ys}W#qN1n
zStnPHRJ*DDaZ9QYNLjZbETDdx3JbXWW0Zj3u9phFg9^Ao=n(iHQ&9S(-g477EvmYC
zBMMAsVU@X#82$~)-?UgF#6oh8{i#BX80~0*W@mHON8W+c=UKB3bcXjaG&N!S61&r|
z!VB}{Dml=egDuYjYwmtKn|h2j>rDo_T1~8RKjzRcA*D660pt6evM?1K=wDo_jy!I<
zW2#DyuR<pEAQW{ge2`j0<38*k=!bcB;SBrr7+4Ktu;(5~?8z};rrw8UI(m+IFgczo
zl^O?jf+UHR6beTS1CMIDXDMRd#dzP&P!?S>TB0vUB-e-f0H#<E0kC}}B07DHW}7*)
z50$3QJ&f_z^ca+|wxVQbnA|`O-O6TD?YW2TwCIFF^HvhUtgyvs5*6B}b^1<_Wsp93
zovH)}TOCdii>Ov#;JE9oR@G=7%4IrBvZL;SjR&}Dm~|K%hFP<A+Vgkrjt_((W}CEw
zRl!DzF&PS+hX%y6tOUHn-~~dc>@QeX%Eq{C&*keEAf{Sn7qVUc;uFRIh{2oR7NTN1
zj1&nry@dLuC!3!oCMWevCDYc+B@<;uUI#coAmO1(^@<Zw8TYp#keZP`0y)%*kwU%t
zKt#WW@It`bZiLSYAK5lZ+@njj-3-qXD|~FTZwh=Z;SXe`aJAqaQDxx#YBdGJIV;@P
zc()nlQgMOXj5U99cq6=Xw+g_%vi&e<p3-Eu;(SE63m6mZSvybf=4~4@UwUhdUW&RM
zij8+#L-}WCQw`3_raJeE@B-*<U=c>Xa}}<nd5}h%8Xw!57q5d2VmivIRzJF|mt2?D
zYentQEx`Xf$^Sm-Vo=_PLea<Zv?9ol!?6dvT5zj-1}0*&9X_;!BcrAsY*Ka$dL!J9
zeK%nTi1@?R>artjHMG~mP}l1qL!2=fMb81nMCqM5=KV74{8%~xZ7PYt8KzW@6~CYj
zi+$fXn+5FE`gdHGaMl4rJv3ktb3&!u=9mdE3wxmT_D2)jzdh>F3PIG-gMkPzdDD_H
zBtmH(=D>g0VOUn5K1)CGy6Oqgfqs=2(JP6{&;N)+NR$BTp2I{cux%MSWwX{2?&%2s
zyS5{IMzh|g0Kr<S0QGY6rN%HhI;qw?Kf2B{z#QCKmWC~m8kA(cjp+D6d#DtWJ|WG_
zhE+H#qOJhLfsU;aPy82FLZl^5Ey>(0w)**g*`pQ>Cc_@ijqB*7E6q~ty|L}7-GS3@
zShISf>j$2>(!8q7n%@&q4VMt3&!y>@I`E7p2W{e`+PI(E<M1w-E~2i50JHWw(F3eR
zL|rAN0K14f4Sg9NBpk_Y7IQGH77@LQgjzO9n2Ec35j7BF8cNAJ%)8FoFwN*av+*EP
z-|+__rqlTUmg>DSn-`Hvy&4R*G_-AFAs48$45!Dni++Rq`{~%KxeXXq>OW+e8z5HH
zHuSeU<2XAGpdqY}%&M6~VvYE_UjGS`|8b(UMT)nv9d%J}+XhASKQYC(B!!<6L@F3A
zax3t;7WFW3%UjYSTd?Fdkzjkh($Khw`V`Eg!0kN2D*HRJ<ApK@@?eA}YZK_8WUG{-
zw2ggig%!h~OPydk?m<v77Awb$8un9P5bPln5ER^%Ug@M#BZOlMaQ?zQ+6Fo2sNFR<
zgv>2+oPFpk01DY@*mce+^B9Am#pdyJkU0+u^+(coPzH?YvBsm^?v#zf_@Xu{x`S&R
zwOYqHWJp?fIAlj^RCRAijrtJXoHUQ9*Yh1j<VuuwHI5$5I@TFJineMPMZx9;NQP2_
z&2!=DRpI8U&EexMY4w2`{nC2SzDa~#pjhxQGHR5K;#=zu_8Z^O=Qt5NXH5L+yaMde
zv>WHyp?qusS>Eq(?v^tposORvr20zqY<oUzj+pZEs?~4hoKde)VN#@8z2?wFM908L
z{Qxz}35ck%Z?gYi!(WgBRc0s6Tzv$wo;U#tbALTtlyGRRI7nlRsn=?_g^44Ep5zVc
zQLiv7Pe*+bl!&Mwp?q%N;}k@~{C!HjO6l`{rzk`Pc5p`Q`Wl)8xdJ&=tsX$<zk-bk
zZAsCgC8tj>!O6Se3w!MR<~KnDBKeL{2;HyDTO95&gURcwRZlPWnf9GrTfC3&CK<1r
ze&2t*{vOunYW1%RQQ2;5Aol$*Zi6q(?Y6xSvv90JtbFms)9iuP{?@wV(nV*>IcSn=
zFmsNRA$x(_Y5E-`*_{~n+Zh2toG63+=1$N^)VEbrYt+3{P;Xf+v@aex`WHq_$}j~>
zL{Ab)T+7}USk@okV3*|9s0A3g_7Eal>bE*K-8Ju(<SU%iI(;J_ht$A7E*Wdo2AqIL
zaHWF^Pmg1{>7rMu+Cf$4ObSjiu-|aJAfh$^3636Y1_qmdjiTIkaW-V4ZETFBtm>cg
zt4NtBy8{-u2jN3fj8eAH4)wLroEa;b2N|ImW!vadGb)a)!@A;nq=mf{=vJzG#fmN^
zRM)5(sr)=U1AFsq#+FS*tNJLls<sCCT}nkssh=JcN^x$zPB;PceZXTtKZfmbVQgKk
zX54O<O)V}9L4OGT>I5(k!Gy9-Oem{D>fhiIQ~?c-^fU%<qidCgHqDray8v1|NIQ-M
z+=a>cl_c1|z%B~`v3OovD%YUocxF@2x`naU3!*csLW#0Fy+&|JY+aSM-mkvuwD7F`
zX4m#GD?q)u8wAC9-$H1blR$D&q*y!lyr&dyFGLk&o&xqp>ICgJhPnspI9>ks5ZlAS
zJP=nFm=Y5f_Pt;E6{z(h3~pM_Q`*TNn7KGiideUf27ml~j89N8qGn*|SE@J8M^-Qg
zs3_+YtJP0#lGNC%bC{UtYH|7&2O4I$bTBjIJTJE9jS1(H=3&7LopVYvU<OQaZ`^MQ
z>3AZzoA~s$r+A*9%Ex>sAILsL$Wh#Y;A&Ow1UsoiUY9loPNW5!-amt3-)oGJ@k^Pb
z?<BwcYZ%&vL&?+&snPQqrXBWMd%&W>CSKYE9rTxxbdK_H7~zD=)nT5ehHluS24N#r
zvgdIMXyP4ueK!(ER2~y!+7c9giI(X55MHA+hSQ29efKCLXrZZzsGAXiP^+U_fwRbj
zkf5yN$FecoQ>_+53PjYM_zUAosIqlhTBXWjaWF)5kLvE2nsH_nEHRV-)p{pew}M&s
z!X|<|tR|xV4Px{aJ=-Z7R(R}_uv{FN-koM)sShL0)osjD?`fUozb&F#GKn5m+=A0E
zCnNaF8E@zd7=nY%hfus6p>Tv{O2#{9I08swLel!X4x`zK!>N(6?RH}zr4`C)ACQw0
z3A*!J>>C=TxJ&m0Nhn=bPMT98Xp1%G;aIOdw<kLJI?Wgn+~vKlQa{Ls|KWEo+nYfu
z-aVcZqYhU_YT_44n<!#DmJ_6A3}M4^Dpe^wauyGBsplkch^R;(2Ikj<fHmr(RI*rO
zE{>NG(fz0`?!!FP=qIB&%AC`7XL1YfD)&_Czb9ssQ<w#t&VXAsmwUYL26wf`x~qZ@
zK8b*2Ve{7AUVq!jy|@egf5BJqAKIw)c>O2v^>2UoIdK0t`n7Y)@w;%2>*m4j$jFRu
zM89-o_~ZAB8;GwEcR>6eakJwK#m$P>h&wPoTin_>&p~u#To%6>ZV}F81$R}aZ99m?
zR$^+U$8TKBE^e(oe6Y1Vt+Expt%kfNEI2Ke^lUhkify^LH~!?S)cc&%n<!J{lGvTG
ziL|@GXq0m$r#5@~)a;^nkPeeLM}er-r)D?<BtT_$qC34;t3S)>4sH((lhcDa&>UlH
zFvDdg8$vj}nSf&a7Ooh|+9m#sg=5e-bNE|G$@zg;o&P-ytwh+LhhuK@xe1DcT`d0w
zD-ql^thdQt;}R%e+1vOAz-Dh-oaZcqyE5#dyePTZ`=yqQa^x}(puoRjEt}XKGUk20
zN&Q=MMXEIr?w3}pg@R#9k0y$X4>%}dS(=5tG{;7Y@?UX8_Y904_%ee{Q{el2U0gr(
z(QXHpP%@!WWfwzEwc@QgnIDT!;t){SpJtALzC3+DW!kAxhg<W<LKqd#KV{@tiH`Jw
zGI-6?@$@$9-TG^))p_X9)N(NQb4TH7Gm<FLYhI2LyJ6ctr^G>Lmq&?rD`o*?@dTTv
z!dGmbf))S|=-iP}P!8BU-E|cLAa~3_(L3y;$yOqIQ-R^%oZ&q^*>nFusJ@q5C*_<Z
zIxDYrou~NpsvwlB)xf|ygF4ZmqIaaHI%pg#KDjCr+)*P4!piIz@P#*XAj&q+&1so?
zq9_^t)G&O}PpeFyYwUp}yb7xp;3hVQ;4TeTgxfFzT!I)7rXPJOQ%_m^h$F{01la?a
zIV^M~b`MjlNwD8Jd>)`V2YO3DCfP4zCV)yYtXfr~f{407$|<6n6MwZW+IV7tIS8^E
zvmmA_99jWQ8c$qpUgm^}T(8M?WIpUlgIqR<KLq~ZeCOs<*E?x2;bH!SpU1V|Ll;92
z?^@{e17-gK_BswNAM0<A5BoRI4-~yxbO>W`x|L{p#|Yq*oxk~2(>o#0m=K*X(oCNc
zzc@N!ota)59~PZ3%FM)p?etsX1ELceO&>NdJkvwek^{)oj=VdY-Z5d->%AuyJ5C)2
zS1Nd-ob$?9Hbi!(zz?Wjn_OtD*f@OhfQ{Lcvl>S=wHqV4{)%xixxmQpIsy-9Jb9fl
zb8=&_i5Baw{Z1J2ih&-ilgFvkKk7uK?E72}V{F$SkcjdER=cl&>`;Tc)fEE}!RH&=
zB>aAM2NfUWrImLHX4}@e{y8vzKEd2nBEf2xkl5hF1F$AZG4Ex$4akd+X8()sAxVBD
z2B#dW6RXT_^=&|CXpNeKaf!~T?)n4_(T3WByF!>{|4M570SpWjpdL5>5V2f#5eFm!
z8YZnqL?hPNqZ!pe=0YH{5cLZp)hR@B;zg7h^$UoL)P0GI33=jgJ?QvwH`dFjt48gU
z8uNaQCTj8JE-yJv>;i$HVYv9e0|@!5)z>877AIePlC)Xqjr$X9=r5dv$Vp1B@vJj5
zW9@124C&vH6^1f7TQYmW1YLg7yqK;Ld#2E_PQ$|axiS|xWuib7g(66XoUQ{*+JAjJ
z)=^vBn`NBt+}mI7h8AVbP)K`M+tNE+Y8yi-c8eU2{4R*q<$>A=TT7vNez_CX#qNnQ
z>I1Akti<L)Ewc`GgnJsJ{~Bp};TeUS3OM%j8_;oc#^h1X`K*nj!MDpcUJN!~9o+H=
z;wBFWex;3WR&YxTX@0Afm^{+Ri*JCt&dAxAF?phKVZ32-qp>Jnk9uYuoG{2-T9yo-
zh~EXe#6I(wcXF4`oGXi#*&@l%OzFTWZH%Af?hD4R1I^hmNdtbl%%zO=2U#a=p4Ef0
zeTeYPz^x>)0he>>L3u5AyRuu$la;Ndp31lnbyv?(w{dGjmH}d%%$DMz#&;d0otc}5
z!+86yxX>7Mo0_l|<oYQZ$^I-PZzT4mD4s{~N*oh+c4JF^1D{+w#AGL@`4D}O;*0VV
z7%ohd<$7=xaFt(=vnv)|LFV)$)DIi*j9d@*5C8ZvdHYm!Rjwy~5%%%8i=Tmrct)Gk
zw|iuaoPwy1mGofq0B6yWHzz*WjsIR>JT4Rln?8h1$hDOfwOc32KY7ucN{swA(r%zJ
zu#ARin2bxzkMJkhY@xLnWLI&pV?|Uh2py?b^U?6uRi5B3j%e7b)fUVuY#SF~=HP1G
z|3x(F*CRly1-Jp^M;RZG=TSx)%fQ~zg(w0e+Jg~&gvSH!Ao0Rz3n+U;_3Y(nPT;Tg
zt{7)sF_ME8h^mkYk92sjsV5y?@bBT4{oc2r#Fxjqrw1QAgivVlwZHZH(O(CDhc|iN
z`25%M`sc&WP1keqf1hTnTgDS`ci?-vUzrE{`S<nnpIe7Q9C1AIze$tIb8cJyzpg(z
z>u9L!n-FB68~olbyVsxAwXxUl>sr<8_jKLU>-Trv+3PRpn%(Qq=_+&lVgkNUA4L{<
z1e;ebM}mvHXzyxcUmh#BPEHtP1RcH%mTjJOY{EeEp8{gfd=B&0%Ep&h_6)#a&74od
zN6M^s!7EHZ$jEW|+MmjgWDA%KXFZRoH8_@Sh2NyNbvN1V9tL#OsEvRy;dmhb5qnC#
z!pj|G&Cv)@ixFF`?!;fzW4#Mq;iiefrtuJ1<-(BWKe{gA44aU44%62V*JojGcH7xi
zidd(O(SH@1b=)bNbs9Bb_{c_3S%hLrJr9}90rLj$BZM*NR69ou#@t~{kTPaI{KQ49
zfQ{IXcoJ~~i0F>MVli|3<IAIs$1XFMJ460T^sCSlgCAQ?+1PTbH8Sw`GSgE=31I%2
ze{%Hi6Z4KsDVb=80P!v*PT?bGV{x~G1yKkK3i+T)9`+UYGXJmK{F#`4CK`iX8bS6<
z3^ref$-BI3H2#uS!KTaLlT$KB)hb8!_40<l%ZJD|{a-Be3r?9`AH%Hf(i!_oI9+p8
zO>**ql+H{?x%{(NMA2`p+xI!!v20ouL00!*Zb~o1lr?nYKumAbptoHfpV5YSE5N%P
z(Mju!lJfY(=%hwtJXS_Ux0=_)$2#GVmyKpYePcv@uq!nmq*;5*;sGmxq!}_@&48}_
zUF$IH>*=j!NpxV3dJ}VuSgm-^<1%Wz2-WkKp@Ai7?0b7|PA5E~w#3I`tpyOgLxZ6D
zHSRxH9b#swRv(G2Kj7{w7yMeVV5;YV5cS9lsT=pZPm{85`lH1l`wvklW<K$M8-8bU
zse=Fo*Ym&t>{0u?5>1;kRv2Q6BWcH?X0+jIXAbR73pV2+78Hg#^Ri$w4RO)69{5fJ
zZF^P^O6oceZ<`blQU7Eeoudw;yJFqg+Kf)R442`_iD}knFc_g+PdAo)4Qa*WC&TXD
zI4)K)fmVL(?2e~L{r+WP`fBy|OUdMR1_4z$*0YwIkdn(bd#=Vi1;E$M^b9DpjcGf)
z8JdL(I4QSp$icZzr_|pH2?LC>hccn(M29y=(=SHnxJf=lebh)DkYa-R4+thrt5J8b
zX&BN47)!zC02tdPT93L}C`;ob&6~|nLo9L)<403yh&$Ea5QjVT9aBALWC-HSu+-?-
z<zR?sb<iBSD*vyYE|2$HD~i3(%yHk6ke$pyone0g8sVO;;_ed<%LEt}I|Hlo=PZG^
z<jt_NZuPZJ#*W$27r}vOAg{dn)IjXBpb-)Ey&cXNNEq3mI2N3nKq%0+W9p<NRH`1$
z93&<?7;bUb3t01LS$|udv!-&cvVrBX*JRD@K^=i#yNILR8uzJoIdC^&EcD;&CEIJK
z51n%ZZfaT*-C%gI?Dz%n6T78cRja}t3^p47{(>M)g=jbv4$?0LL28r_ZA3R=UGkaJ
zELp3-0A4E$0&8_QR5HkKfV4UGx3|h3Aa-GRN`C};n6%=ZU?jho$<b^%Q73nXox@{t
zE^o|PZNbgUN_7V4_2K*kc0hr1F#}O&_nmlh0JZ@x7Mx9glV`tLK@}@;ZdqJ!ybS{|
z-#&>>gur+2<5sFi&#GfGcUj-IK4a2rsRv9fF^7QYK@pf8=_O?y>6gU^wXqCuM|y1;
zOb6+uWi&0niDU!x%RxW2`65k2x{fjrMp??r#`XeLEO1R4$9Qu&YX`eBj{9xaUXnkr
zjeFA7>KhLEF`P4GUh3*4+W&bOb5dm(|NAm-M%PSosvpO>U_yp@Me7VtYqckeEjc3>
zVIG{m$ebb<m`}2$8P?%A&N~QdulHWOlm3*>hvXgg@tUFM8lftR_pHv=BP7sL?0aGa
zLHKUIpu+=2-~`ry5d5<OEf@5sm(#Z(nDwWkL!{79^oezF_t8wx!QigJo;_0_oz0J|
z{i6<h_E^KLgRksI_ZJ;HeH#0;se&AunSQ%GcZ7C=H&6;RYyfT?Qo>h8f=vNP>#oc3
z2W89c6eGJtiz3N&T@>nVc6Gj8jzfc8y#I$ZfaSh?CPFuB@wBn+EoohUapIh-#(w~S
zc@1~nc%^>-a~w=L*4|CHhm7q<vuX!1*!0=IA*nZDTEwJTJe)B&w1%9qk`VkN>giER
z1}V;z`~wATXHZJiKLlC0jR75)Wy<rdJk-E5k46?e;}CAnZhmKDw*Dp3{1fceAmcVB
zDE2Y7u_!s7uKqp7zlC_Q)v<BrAZc~p>4TT1v9D3Oy*e*zY`?MV$}7;d5s&e7SGI=F
zR6=0TKE@%R1JQM#tZl#Os9)CwcMa*a--b-cn*u6gS;mm)qyfgDIr<yKVzyxEcX+G5
z5QjEzL91Dyb5i%)h_6<=KSNj<Y&^KJn}cohGq(4eR=Sn{O%4=C7|H!v$B=*n2{<Z%
z1y?{l1wLD1r9&=(V)<W|QjJT|zOtO+O!GV>;qmbso)__lQJP_2gm(Oy#hz^|mvaM+
zFofek<o&pdE9Hi}ixO_p&0PID#g8G+pnRMWI1g!A!CS%-+!uu=EmgdW#W6*~F!vAu
zvs;<g<cH~rXW(#hrgan247bbjtZ8|86v3L7Z<iHV)35=YJ0cByoi#1@Tv?3!%Q7Mb
z&DDPOBj}RW?xI7%7k1+mLm!GcFgg3Jw*`|^XfV%7&w&}xZ>L*namdWz3va;d6>ONw
z812wZ+O%5Q<mqjbL$sqvg#%6-P-Q1<E#M00afQ@7G3=X091StRftuls&dM2C?{SR=
zxc?^t0W$}t!bFG1xH+}~sfw+W!V}|vL2*IyCNKv-h<!3r^(X&AXgO}4=UC-A)v5~m
zg<YMSH8%$dH`V1N0Vm3H(~JwF*e70(!v}Z>?OyQQK;-Yb8$%ts`y~kA3_TkQdt{>#
zl&FPd#N(PnK;16w^rEC3<3c-}Gq61ODKC#G`1L}T_Ok4M$j0mIXf;mj2b*Y4vOWVJ
z)YnGTj$Z;zhoOy&`k#AS_^i|!e;cwj{ucG##GV3kre20(Ym^5V;mw?GCo_%F#>jK0
zxz?%aXX3P9S41Zi7@tNbWEr1ygz!XQUCw)QW(VWbEx?Nc%v`*G0c>EtpOquKt`{P&
zUXJ=AY8I&JP{1Sw{MLd1-jH#g1_4<&z3&Cjq5UJ)p{w|`5-x-cJz-oTXyb|s2{N4o
zc?7$)*jZ0htCeU%-xC{<%kKSp(_cTbT0Ox|b?6dodIc1#9~DuPKoe^>d-_%9y`AEd
z!7qQ0bX}J$3^qLiAC3YRzY+X0Cw?g1P%LBcVOHr#*R0=1Cyg{q#~!lYYdM(GlX_48
zjWS2}X-^U==lz@$feS=+iO!f8qWr^KAFe8c>-%N&c0#~Y9a)0PHqD;rg-DN;EF&+Q
zx8SXmFm+ZrL{+VR$7aJO9f)nr*UXV}Qhe3VdK(K4{tb6^7v|&Hk7+#JVcm(xcG_$N
zK<@O{5uGuUm^K%tMrxC|5RY9ozkWaIoGV+&u%A13hH)nj(sSTh^~`5Icw5A8-BB2?
zqFlo1*gFd4ag^-hNyZeMNhe^Q1Tantc<mV=+B?+pS-?#q)^nJ*v=H}htd)h_f3{Y6
zt&@F{($#l(@4~p$E-!?z8`5Ua!@E!C|D2qKyA@DyKI$wl1O-#ayTB9DMjYZyOsn$X
zls`3f_w9gE$Q)_zlWgt?JljeBoL%Ly7ZySg3`ct)bB0lfU$4MS4&FRwpD;d%-d}}H
z_mmiS>%rtTpA%J%jInC<okVYAjVx%zCik#1apNKW1+KSAaQzS}#~m7^MD12*Jk2^S
zgxdDg{ylmU`-e5^0-6ZY(N;EtSLp-R9p26|EFOV7i^Jg&SVy%i9QW#-Vt^a3#uptb
zdZ%r($9o#4y(zKo8-ow>z8p+@<NoaR7r&3+J^26W`%h(${vYZpbi?!ihxq?DIOd|P
z=xb^50`zC}wF0@<9(~;(=bfYI>p5}SHD#lNPjI~hp>7>aoj-KnEi?n}+Rr`2<UUo0
zb(vp%4+}Px4T-Po!@xyD0M?hfXSmXqBV;k;o&&2tfW@{~VobxDEhn2_Mjty*?y(0u
zd|r<C4qrQM(4D@0bnvg!H<jVy6Z5qA0=;1}<4M?9grQTBL(XrDPwsq*Zyu(8co1v!
z`s8r{30ssZFMLcAIS=HyTO><5<vl;<<$H%t9eOH<?^G|Qyzk)Dk?+RB65TZf6Lwpy
z!)sq0oirxcyc!l8OjMegtq)iZ68#vvePC)Hh!qX>gQw96+;roll)E{-C9`bW<Ryl8
za+&$}+3^qAZyS?i%#7LbO!)Z>N=K$<UrZ$rRu~k{bx*8&P4K}J7#d*lykj_nGN23R
zD*iA3X8z6Vuf><5!{~ngR2bd75Bk!i!rN6}*cRl=aq~`qJC*7Ghq6-n`@4@I{nJQa
zfUoDTUjJisQT{TwjFx`&uXX)T!hI9pbNJRH-9EU-@a==2^`F8=#T0y&yrF)H+5)Ca
z^6*!n>m<y7ZCq41aWhnd6IVX~#w@*nJopksEB0Nw_S0mD^SY<pwD+s2PFk9#zI8g8
zbRMYjx-tL@ljx+HVAEHT%^7tZ8(m)#F!h#Z*DBWU3~x`@5{cvRm83O{>-2Hxa^Q4L
zb6^fziNDc-Id}!W(t#-)1U_Hj@G$`f0O<5_C=2)*{-SISSt&bC*pV-FUGD;L{Nb)c
z@T={ZI&g8d@LFI&`vk^Ty<Z;<>gd<tPy9~kATE3Z;Te7KO@t@)!R3Un?t^b7jJ>y1
z{yPW{Bn(k_4*)gs6zL!6szAlCsjN$m2{s)hJ$B<yTiNDx?|0;2S#I#bpCJT;`Z)SM
z1fH3RZ!5leu1o*j{rrR*&Vd=0`quaJx4<9G=F_F#_*}{v@u$iCYsX&@FX;{U$BTOX
zIq?y_eoy>@UVljLUqf@6f{i-}Im*3Y^JvToOJXIg2uJ%}>AF#i&tg8LFs`Z(w3cE2
z|31>@V(jUCPBpJhKLdKjFKW}*GtCn0QN{<>!+wCe-U5KSL?AYwfV$YlbImBbz656<
zf9OhAn9{H3Gp?C`7ySvw^y6wTp60N^$5C=oJA~}jct{K^#q%%!#0hhV<oI-EX@l7u
z6(EaJZIVTa{;KYmZuIhWz<56Mq`rZ11)a(dot8hn;LK&{W0aN8(aCeFU->iUNX(k%
zas8WY%Qe`1AgJ{35xfMTT!T0+x1o=#E6@Ve?%Yb1yU<PmCtgk<`ZLU?{>f7G=i%3P
zFyM~}5c3B2SFsQqTwfZh)L&xMPDG*29lohBQfu~jPPl!js!K6JIdLA`Xkn)r;nwhp
zN_`(QPvZuJy8yd5qNc(Ys&65WnkSqD3#4@JCo||E^Spo^AnJQkQ?!ILei({7e|JM{
zqr+gKmJNyygs|{HT-H(_GxK@ihh#&cdZu5+VbwsW<CT9SMZcraz8&c+sBl#3KDg>H
zT_j4S?kCWJ4Y`Qg3L7OlLwMG09VX_%OfXom#ICqZ^?0A*N``(0fk;jktm}aF0`#Y9
z#GhD+XeD?$J~Eb&Xdy;sY{Y)F@87W!(PN<VPG&LBImL)RhN~9N8(%ZPKk9}WRsh~O
zrWv=&IYE2!cW7Mz$Bu7HOv??KBV!w(0biE9KR|QI1y~Xy1C|6i0QGVf-z>%Z?VDks
zK2WylvrhELh8I%Cusm1Qc;`uKU}PFZvsEdib5o*<qDwu7Elu=6!uKi~l4hJQFTCq_
zpdM$0u6N?qBV2QKsM~-~wF+Y8e)e0oFi2uKyE*KS!R&bv&PZii1H^s-(N?L~67BDz
z7hl~g@O^|I5?FNj{x?h2a;}^t<m_`)?m-E?m6^XU!<6RXi=n!H9YL-l+lt+Qp@n$8
z8}fcDjHm9qdDzdw)=dS*fc^{;x6VI>H-Wzgj+q+Kf6fB8ViUD~DjxpkFfoR1qg&DH
z4cXr2u{f$Py7Z2hkg`($HPhdX^!EG{{cSWjm5DLWJCWQqGcS}ABYd0jIxvvl$z1N8
z8>gB9IP^R~e~;l`f;NY4-bIeaR?3T%OwNJ-AogR(_`CQ+7V+V2JAw`1mUke%vf+W4
zf*!t&U4!h-g^L1X#E$b*i3YogT)jOXpelNtUCy`UZb;?G)^A|U`4R*1gWCZcQ1p)Z
zsd8>+IqDtkOU3Klw^<4>YF04UpT8?YOGpNawdOXH<9<CFWV3$3zuTxqTT_RKz3AG%
z0oy&P#8y?zoAi;`oxQrYn#rX~?+Vm;U(o3o+S^{;o6Kg0R1v$6roF^kHtpbFlF68n
zYS;NmBMtAKab=>fBd+5G*FY+7a$GYrshggF0A-=TA7Siq^(e>+qRLzHE?;aM+=nF*
z!Mu~o1wI*vT-(`H2_y3WH9N`*-1~XlZ{r!Q9ulbc;1A?CWS7`IAO<kb1M1A{>{7h_
zfN=|{kY)rq3E?anjeV4vSZ#;d_gy^Qr+z2Nog^#VB)MP`oO<t3htM_@gB(LpycC4}
zPMp<o5^}xm<9hqLb8RT8!I0bA9(OQsOtJYGyAstq#>Cd^Y%v9!I?zU21SM{plL6-T
z*h8u8VZ*M|*SBQrTgLS*?F!IgoJu==T*lES?;7TqC2XX;^{2i}6D`;tTW01Jm{P7+
zqhZ29kHxx^#!yL@?xd_urId#RXgxNbwH(am_TU;Xkh3W^h*RGcU#D(VE%w-cwsO8T
z87-0d)Hpv@QVF)f9)$a-kLja=i5X%hgK5(VHa&^}^%F8Re`bWd_z-x}c|Y{Y$A~je
zd|i+nPv(i}TYDoPlt^6sm%@xp{YgZ{vw;73`ZK+$7E3A&F5bp)N_`z{E<RivEESf=
z8%a(fD2>`Xc6A{k&nxUTD1n#JpRHls@{xGpEYf8lW@P8yFybWSUua26?n!!5!09ci
zB9-$Eq{HgEH&O_N$W&haB{V@j*jv8)0=vq_t4CyV8eR>aRqoIVc*xc~E%J4YOT$-t
z39#tfnC<oa`%*Nm1k4rB<3OrkVm0B>R5~>VUVScdsO|JUO5eBW+ehD5=u6Po3?H`W
z^+_uMtYPqa`j$&l`tGLhGy3kJ?}k<IRnm7aedY9hpT5cTy-(kD@Uh4X3;-h-Je$6Y
z=!?=fn7*IWmq}lOzJGrUzROMcPSSS^eO>gerSCoXSme(L9AfZE`u5W|WHo%d=o?Mn
zbM!5u@5l6QrSA#)_R{wa`aY#^3w$hc{QUqnGWd4-O!^+6?~C;9q;D~OJ@nPkH*pPo
zv*@d*uZ+Hj=qrYgMeZapS^!u^)I*nIbo0bC?V#X+5E#bowc||rrAII`d-MeS`ezKd
z4*_~`Eqs52&mPX%9%>#gc4J={?;c*ksF{eOEO36hqf5V<fj2Ve82ZLAr+aT2JI&A|
z0`=Eassw_0He`o^L@7RX?5vQT_gQE7q)>h8-JPmGJB%vUoD3XyjQ^GQmCb3b3zEg3
z85i}tH~n|?B+x-Um(3{t%=~M=s6&XdK1HqRu+Liu<JoOkABp|PI^DM^4%+nMQSIO{
zJB7!Aqo2p4_zb4+2hfW6Rc#JB`Lbv3-s7I%i;qw6IeQ1*kp=Fa!~B$u5I-?O{YFlJ
zoPFA(0gwDMyl;~rbwv!9zC0h}ct}YF#9nG&fsvj)#Y5+P%jaKpb8Bf%;fd|^$4aX3
z7kBFM_UkvXgG&fvAf69=lH-{I@2TLgx)$B!#`?E01al39;&jMAH$}-eFrhp7WoznM
zC}qK2Q;Tr0O0K)BTH!x*h?(oW+~j5)hl<HJJaT>=1<=L3Pt$k*J(bNpEN~1AD=77#
zLgcdrk^`u}f~ZUN&{glTha8BjUv&WkU<ibb1(rP<NoD)%OYm5S@zzwg#~d8J=^BW1
zK{q1znw*$4-0V!#*R7>-Jt4JH4K9;YO5N$^L^o2Z`9mt+yxb`W?_a%(-LYzw|1buC
zAPXeAW<UtTHnhsqH3dE)TxvhX`JEe#({iX9t{#J@4Jxq^ZwY_6B>1a?xb6L+{v@=V
z`n1;Yhn4yUpr#&!s;INm>$M#g0-}u{UW;+{AiR~j%@hwH1;qhhAE1GhuKqA%79pl1
z{2^Y#h-*5ZwWx>r3k5&U$TBAzTKNn>{bvlj6JhlQPQVKcn9cx?6YvTHiX~SemOhf}
zRfdgVq8umS4F=>QK#!seoUlJJOmi~ocv{5`exJcz1o;ELPSTGU_LhX@q{6xxwi{uv
z6YE+*D)<b8e=JFH&)3PG`2fPcfv`>=*OS0N(?<*KocLVEPnV)b>J21_reBCKJ)aRp
zEDTF#hDz(MWavebyg<)&%8}&PF(Qr0?{*52<RuK{d3yFnRljO081Z{V=za-B`Be;R
zchlDPOIynbo)gq3Fx2Z{qBHcXZt^uw@&<(ID;cqd$?xu0$a;o;!A;J`_3BI2UaWR2
z^{+Cfg6W?UM$^B=QohSjuC9prWEK=kj%Pmo$BfBi`gs!Upz{nvc|sED>!&+mzhKxm
zAVGD_N%;Z-^cNY*GbVbWgP(+UGW5#`#YtbV(t+NT)yzN6$^QmJ-(t#I=0C=c3F&`j
z=-(Jx?&R0`S}h_Z`NxbH!{j_Vqi3w+67_gQ4cm%xcS;EnJqw|V%wf+zmYSPzGyspI
z;g#5MP5_VMb4l<TM9Zd%T<@14N*eN^TS67a0h@?g`c(|_4EJCP=URKdo6k`lRhyf$
z6glVN5sLucd2{DTq|K>!RZOM3>9FZz&CBZy<&$ZhDO~1ophQgS)76*14yg!r{L<93
z%tQJ=%bbxY8yqryxR;Ojg4%m^fY|Zc8lF_+p$D!+VX|S%7l<7j=4k~I@Mc*qZe!2y
zrr5<+=?+*{;<ea&EFqiWy|Zm}-S?mI$`3a1OX`rM7;_2U#z8h~H+H*!ch+wA{tA>;
z>?6Tf4r&cQ1>+#?neuxs?X7i>@gQB_-1r}Ge918q0=XeTt{p~oLGE!PcSBo5J%f<{
zhkB)}zWWv4RNjHQ<?g9-e$VZtiC`;{!;s0}K$nUiFU_Ja3&iArrz#A*gUz=+F_+@a
zM!uP33_@te92J1!3ujhtbl-f#&&2e9+Y`@`K*h&8B5#g*W&yevYIt7kGrrmXxAOry
zKT+W7BJ*>g5tP(^i`C$H*!qy_1lrpfAgT^B4Ff%3wMR$@eYTBJv{qrZ<Ft1%Mk4M5
za^o7t5|o0en1Ts!+x$^xQ`$0}tBY32adZmkx?XgUEPE&g9)Fi$C<P@>;FL<~R_?Rq
zcuAjnO4c@tzIdjU*hZ0Qd4FMhe}TWCgQwg{od0a+)MsIOfia%1ne3PdK9jt@9pm7w
z)F+Yg{t7E?+(f^_>ddnuIEnQMHG>hULdt;$L!H|(gOJKR!2~$>sFf9uXY<X%ZFFMo
zq3v{G7=R)|a;Urd(F~c)Z#z`-K1;O3pW2G&*x~^HYHQ#6i#nnFrUR@4xcB%b*lW+Z
zdRQwCw{~bHA&3HMr|D3Z=BOSNk}6nafvC~j_;Y#NsZe7p71ToqapPnLn8pbpQkEo@
z;VQNnVgRFVnws~J^cs{GykY^k!hsQ&t|s@z`6GZw1C}D3@g({4`qEHnrK!w*1$+jC
zshFYgEJUWO4}}cC9j6YY(*m}$2kpEI>*GRuF8WWulbyKZ2w0OpwxBO2_#=We<I_%n
zu3(JX_us&2C`09!7dk^#u<UD{rH&Jtr?nFjXA^!)tbji$Hjj#dyLJH`)KffS<rHUu
zdJ(l9ZE)JCr-9Y<r!jx2ixDW}mi_t0mcIVn!AZcir^tac%3U5JHv@V-5JzWx%^^yq
zDn3McULUB`?`4w?{fPw1=Q#`vaNhIQO@t?JP$B8--m}E6Uf;-<=lyui9<PXGwC%c|
zrQ@+P*=babkUS|vQvk;SdK8XeV%ozL(1Wu)R{_B3dzgH!v_7+u@TV9dnu*X)|Iybj
z@+l8M((0ID3w`7)$iuc%k8@`6Z^&VnkF#*d17~mWJ3d}(!MGHc3a{~0@LcG-rqBJ2
zj&T^y1!!w=B_1}%qbrCyg`jNr_fPP9G(ugDo!<4+%Gkznnz77YI1bB}1vo3S$}b0d
z@Bpq?U61q-+KvU$V_cHF-d&9T3T<+%D<?KHNsjOt%uat7710adJs@;MEp|8+KX&wv
z`DEv`aiA5f<$b^ZwCOl`1_VJ{%-kmYe!%W-JmiA=kU>0vb9AFGiVT!nBLDex%uH|+
zMSHM$419P(7#u5hq=UezwVA(PTB$w+Dft#Q#VOvq79&ou=}DB8GEG(M38w!J(?`^F
zX$2NtlF}HeYwIa`uSc-+iabvP>H!3%a^xW@q7OodLkDF^jd<SJ8*F+C74dQ7_s}-b
zk5_sh?yEc4+~UN$h@aP6$aWMGU*6`nqF?Eo5n-3l8{yHsC@{c*e-$g(kgCAMZ$?1h
z6GHTr7ZId#)Qvb-6d%^sTLQA<z1onv8QELE-wop@e}syB5j)O1^Y{@)9MhUJZ}*3T
z_<II0R`Mm)LjJhq?S<fz;oy_>;)dD{>2^b{7!u8Y;C)E7imF5hhJI`>jwMrSx7m{t
z)9}td25a*E5O8pxCpU8w)9_I1AOt4wpQ^4xMhY~pG=0|nwedoChX%g|$BWFW_<1J4
zS-4u*5!FD}Gp#nYi{r)CW5{7r`~XVw{#rTk<x=AcP*+WdWer@4^N?ukrrGk?wd_?!
z*+0^PVDoJl=WKTxq`)gPk!=SROl!AnJ_MTvfZd?=^NBN^v1-ik1t&7)M@R^wt;y#m
zXpOoN;zuZ02>UJ>;E=Hq;}SQ0<o#dg_0WO0&vTC#$nO`l@r*hC;0HSR9(y3M*Tc&u
zr%)^S{gh^mwapW;4!?1En|(1QHAK%Phq3L7A6?vZS5*??0xiUwWsoZGirp1<T>NGl
zFu+~>CYS_f+QWICpzp|0jru`^Qy4?-jfGZYH>BVd=v)4RsQd0Lg?kP}eTWLYX5Z$P
zcO><Cfbh&bPJ5ywVlMh_i%S-~TOQuw9-a^3WIP7cO7sJCIkw53|0GzhPZr_%BwsfW
zVKtq;986gBwPA;u`*tcMoKB-r5s>t$Qy;(*rm4D1WrW2_Btx)iFp}w2?43y;Vndwk
zJLo(tm)$fR6=Uq+%^!I52awDy{q5H&dL!!0Wh{<1gzG`Di`-&iVcy6hRTo?4zO^nW
zvLQn2t|~B3D*3?Zr1^#k#`VPWWh<ITY6sym78_+;ic_{`K6}uuysp441U1Jiz$eIV
z2KA>{rRi2#<d%csLB%L9RoDfoa5KnoXs{_7#!BeJFIc<;30Ksf!p*k>wPBlNG#sd`
z+zNF_*Zd&TrAiAnH36#6tkicBi*Glly7Xoz#hT0lT!LJanPpyshPeCf?MS|l$)A2r
zsOdIuSBw&No{T^=+YN1j3XKs@(Rcx>(uu4(>D=&OpqGLDdT7FLi306c!6t=4tiR5h
zs+IIe*B=mqHy*~b6#Y}iOqLjb*G|NwCLH0_0?0Ra-NYBWj)EH4p~#o6xvtYE9t3sz
z?uJIn$dq7Np-%l3bBlg)BZ|*P@$vcSE16;z#K)$Nqz}Vy(%|?-)|UlcFw(H-qz!oY
zlgiC=Ujj@112ZIL!BCdJjq0VH-<FixFh}m_t5-%z7hk-G^u>eU7?<<?^2n1K2$E8)
zw3}~38QR9hI-b11d;6%sVc$JT*+Trh`kVf5+(0Zoyeb{HIH9#fCuEyL@BqUAGrL0@
zfB+u+PR??oE;Q2}Z#>Y}fs43^u0U=)G`7Zbq49T|TqcR|m>kQgHNg;`0R~u5f<ZZ`
z{9TX3?d3lFurBw5`wfNx(c*&Ci@7}36;bbS$acb3iiSid)|%zf2Y_9u_-&&g`arVQ
zywExr!fUYlCJeY)J#J5eGvbA95DeI{VeK53@gay5&j8T7Z>j9F8hhg2Shyz*c;gCC
zhrFne+Nll{k0&{UtzQ8H65I7f$pL0o2h62f`~t`l##R(};PAv`GQykS33P?717IJw
z3Gb7$-!Wk^fJ)&GFFx>7pBd5bWv=O|jxsNau9LB}4r7VGdzx%5!!R<DsLP8SZS~%W
zzL8nZ@6A#WUFYTSTj$M^hwYFBuO>Dz%NuAn&Rh8+`ex?&3y38AU?PuC^7wl5_$u`_
z=J}432lafDd4ATLC%<1kcp;Ifp`OQ(D85Ya`X1A7>`h-N=>x<|u)|c=o9l<nbp!f=
zxc!v*ruF8#N^nCypXBrLN0+2FVE9WWt;Jg%R`@8UH@PJ~99Ne~>bi|!0o-E#Hz<=D
z$om4lJ(2M$r4VJtq-)GOt@$T5r?<!t|B@##k?%m!t^DcY#R#DA{}YB9o^VAq7`7Kd
z(Lbi1!72qo_~8zhsmN$Sd+v$N;ZrSXoz8hYm=|Om<k=XcID(D&^O%**u&(JnluNwr
z_GaH(J1PA?fP?Re`pYBg2uLBA@@z6zq*}DZOL;`qRm6F)c^g7;-DZUQv~gJyx9jpE
zt+*Vm7HnWA(;o24WHA0S%A}G-l6@V1)AW8EG`kdcs!C3AHZXM+`7@Hkq`p9&qS*E`
zRLxcLSwCOdF*WUs^TU7J8&FcG?=Uk1g+2obW;YPAlFl6U;75>#*?8Ly7OIS*cX+NJ
zW54fkI&c!%yG&&7Rum+62rk@Q>TOA%Twvm^gkw*@0YE$gwff`eq-^8woX`S0*iBvI
zWFD9E@K<c(P_x31ZT2mLrzQLZL||+9u}anK5Ta`{if`)(KbGtWe@BaNMA^{AV)!ja
zV|MGRBzf>MdF`w&incqK6pR75w|JTH0d%Kq{Y4b3dPpXyhE7hrk0L)_k0(rv-!(>e
zJxrGQPdI-*J#T5BPt1ezyMU<#P4`e?Xv|47r$}VeH-NSEF4}Bd##d_4D76m^&Yo?@
z(+<1_Fd@xwUMPEab4Izqz$-ozbjP`c+hu14xgP4xRgOZS)BMJ5rgYEM`0FvVH{<67
zP#*IKaAzp6Ic-9DvbUAtt#L<YZe^#(@DnD%=I_B5Piy-R{bbF5gl~CDT6RRzd_;xM
zs&po7EylDcp7|<up7~lmF?v%re!OsQAh>IyU^EboF77t-;sx@yTeX^o67V__2~gZ^
z3`m9_aetPP=ooFq@0vqWEq)9g4<e<vu96@7x^8nuOR2X5m(_7QqNV@1!zwehIVbvQ
z*tk3T=`F$Ly`*`^D~HhGFJkb!$BY8b%=;806Nr9`(Kw*xMrZH930kd-uf2em5dSvg
zGkW9i+ktb0T6~%0J<2!;5ht%P1j&z`oqWI!)-2~u5&7ZSb!Ex9Owt5#|2Q{p05f_W
z`O@9@Tk5V&BkZq;b!P`3EJXP@NIPK&#NBFbE1Z2peg1L7@I2`M@HHS!Dvs&-ZPOtL
z64ArkAqb2t$AjOJ(oX>?^}Bavu)y*(0Ppw7Il>_rNJBOt?w3wnr?1DAA(R{B?hkPt
zvr-lO1l$?!aiY;4O}`PjXk;nh>+mfe-O)_^@Hsj!)_xMA>;6k{Hx%O}L=z-*ZOj^F
z@sH3p23}njFVrWZh-!5U3*ZERsklHdk+AXo!f;pyFL%q)W9U|?(pUR1Pn3Bu%nKl1
z@k&Ha8?VLrpu?NKisBRIKdB<gn@Ig}N}mz;lnL&#*=X%S-TW2PD9!+;;Ze0i&fV?e
zk2&OSlDp<-iCh>a&!Dp4f2eB?-fMWkp#_i7$Q!`XNtYUUs@6Y9PSr?|ES`mO$JbG`
zpf83dee5>ryCt38@U!eaO~Bx;HufcxnVHeoyp-9|*E}r}inY&dd#LpImzZj-8Cqg{
z=l-wuzCJLj;_CY*Y;Y5U2^tkOv=;>dNkTwS5((yOLsIf(HeVH@gk-}e<jd?`2tpvZ
zP+7NVY<>D^6+~NWZ66<7D{5;&EzxR~TH8{!mRg_ori(3Aim9dU`}>`_cXxx>kN5ra
zZS=DD&YYP!bLPyMGiPSbd<(A~K}Q3#3F0VqEQhH$a-))tJ%To5Tl^^93ZT^mdJ}Vt
z;V^b9LKUZIIBQ%;P6@&e36UGeX^BRPw~kT0h>8o(HBw_)g{P^!14~^*5T=dcMXII}
zKD?7Pz`-C3hl9eyT4V|l+L+=snEzRJ{%Jo@REn<na@;ED=lJfgHMe5E4W;`%^Sp9m
z&#_TXT=T{J>QU7REa)lTo0)Sa>xm1ZWGT)(FN~QBm$l5pn4Vg;P0Of2mF88jjZ)xo
zjcBI2Uql~GV)>NB!{zlbq|}-<u<O|N8s07B9R`5+R+hILD8jA13>#_NGm)ycD?`@L
zx*&!m@3ie2g3%3SdFA@`EE1mH#5eB&d~r;~weMzAqj^Ov4P|8)-0PWtB#70mlFY)_
z=-{X0Nrd50x&y1}H}0oe#?<4GJXkY<Xr>~F(i+V_`&DVUFG)atCLo+}M?qe+L0~;)
zF1+JQDY0+|J$0iHIlRQqaJLPOy<CPgQ*v-RU*K<Z&mew-%^AVzd>NYyyha+$7Y8K^
z^WmR!W*B!Tk@E8rDA>$w(za)TNPz-U79Vs{WSq5!Uor(vlSp-c#tvCUE!ZxQJN^PX
zjVAE}Aan_cP0vhbzR3j%wMQ>)JA283mqUUn4QjBH#oshhl=qV@iNPO*R$}L(|E<9L
z=WI=S9J`IRI`5az$e=N5trC+muNkZ5+zSuWW6uvQROX@sLTC`S06}+2s#2t)6E&5`
z74ntpy+`8a2pwleeCbxe`4W(-P}pN`{~1&~_@z{p@qUfGb{M>-stVL#)>YnA)E?EN
znX!4cMMdKZBgLkmahYx4n*ohTncNN_&v=uYF&TFN?l<V4V=ri_{Ob!e?=L+EEQeVl
zrf8F{sSGw8<-s58_KNZEbLuvpfJ?HXSMylj?`R@xNY86HHUzyeRCNp*NNCY5kar%)
ztdQLGgDVo0fiCddM3koPI<l_%!2&`b_L2uj_i&ka=HHVK@0ImlD*O}zJW<qS4zm1)
z;|UE%o6Oa!dnvozUGU@=s!GqRI<`3wyCNvGnEVPHmJ)|DxfkG4xQWPfjr%`_%f*01
zUU4OEXS_o0cQJo#uxY6lo)KD)%MAR_<5?+vv(6XaH}A#DA?OoIpab?vnC;@a0P%i+
z{pm-8?(|SmC6*WdS-%ONjd@L8bvnFyRKq=vNwywMVkhAnuD&^ez5n$7mryuyA3TkM
zaHJ_p=-dI~%*6`chmN}iyHao_0fDFm7vU_EAa}lrO%O8eIkMPPfQXqYl=;XYRxZKo
z=Zr*rSiycx#DY`25B#xg+Xu4q|CioBFx6`}K+I0vinpKOjp<=zd4&A}>6=I32jN6v
zgVSH0m&CO$XezS^dmmsq{&3MNFbHe+`JvjGfX#!iC2uJq0ty0Qk^XuLV%}AWY6%iw
zw~@F*A<;-A`k1WJMuP1d#bfqJ$ekG~#?`fRX!?b%$$wU40NK`=FM+Ujwy)aR{?OX3
zApJ|0IyqhZGC<{+X;-q@j@Cz2Pn6*BLYfLJG;5-Px*eEp=G%eEPCIa(IV&2NZU@dX
z(^X*Ta@-YwIbEao7S`zfzDVTYq!cLJD6cD}(Yyd)_MmXM(R&+#eg>d;oH_3ua^i%x
z)1MyL+6-%DU@Pwl_!5b@H3O^Ed0R8mc7*T=phWm`UOp4o0yNj-=(^KCY4~{@dV)0F
zu%yWx0F0_&irEVmadRGuJ4Xqa7=$3$Fw@M(oN;U!0O>y+wkt9p<IEmJEI9E5Vn}4P
z$&Txrjk(+YhP4&!1P(1P2Vl~^qG28>SoFwFFuJ!GA7&Ejg9Hh$l>rvO>qiv|`DR%7
z0v#2;7ow!kH(!Yh#vKX@dWQLZ6|6pW^IQ0&PR##^_f0@dzJPUPLzdJv@Jy~<-K{D$
zD8xet<wWdguP|=t`dqL#WVG9S6;@BMvRaxsCa@QHKS9|2fVHz)Bw1m389QbIT!klT
zVV8}P_8b7%##7J<x)Ay_$D5TTDHWC(Ko&IFSA)D|ewnnd60fyFK5<=@wC@@Qc$-=J
zQ$0dL<iN9Y7?`>l`XEAqDrMSh{y#+bz6g)QjSq*c8wj^uQaj%}h`s_h_Np5BW=}se
zb$b1TSuHT|M}R3YJcg!v2O0VaJ0+T)n`kyMaIpflsc|W?vDj7BmHf(`HyI)SG+>-d
z`(irGLUa_64FZQV0LPuSI7dJ^ce#nvI?`|Dg7Kf&lvC?!%D)({s85H(*x9rUKJ7Gy
zMj*N`?$U8XhsHteWnnRj_GDRB0O-Y#uj-OKaUg1LRUlRhRlRlHLV;5t8x*9fpKg{}
zc}Fm82!h*fC0A@ST=&By2u{*&iMu8Vx@i!!64&i{u=3DOwh=@Ox{fJ3+4<fP(sJyO
z40&<|<QRA7xy`!o5FC3GqZy39jgZkMbBUcn1}b_EF7~(!Sv<x@Rp)$g->q_#?lxxt
zX^j7W2b+<v-?@`HxXly<2mi)iBADGR8Dqg0Bl?L0I;=TWsoRHt^K0C-8FC%NG&nu&
z=FcMwOoNwRoa9WoB+2;#o_y;!gfM;&TfaxG-%Kl>aq-V8e8Y!_;DTNT8gXcHo0*R)
z?%t27*&tS)apWWwTc2EyNpM)_okRVprt4uKe-Lrlr7{<BjpkL-fpJ^iu`|+ka4oUP
zoP(gTBX|XmMGJW1yLJI7CkoF^Oxykx08}AI_DR&(LkNk&hfam(&YmXoL7WMIiQSco
zZF0cxJ|t~2AC=ya5gwpklzQTa3EWfW{VE$b^(9pS-Y?)bZ+x8Squz2`@Og035g2sf
z%qG$mI{4~;FO(}A8lLF_WOSx*9&%|im$LG>GIa^B9J_AGg4d7{I@g7Pf>$u?BAdu!
zzL;}>PH;M3MK!RO8`+nj4=s3ZIDdwJ@?$#cQ+!LJ<L7c}_}sLcY0O3|&zuRx|HN+m
z`)NG;{x6^Hap^W&@87}i@N)^_D?y9l=O%@7@Czqr`B?pU?u@WLGW=Xp_@cP5GhtsF
zelA(|un#{s6`%zGy%C3h6Bj%eeAd=?0!NpMzWfUC$6Cc<^>ax5yr6#GQa{Jk4?RQL
zs~V%OXZh82m9@AQS_k6E<zVPw7eKv=xL)`E0!>M`qksG#JJN#w$`=vvG@T5&CEXDS
zbflXz5~?}^-#D-j98Az@ABeb)bgiPreVz>mN#*}#u;n;S>$Wd^nBreWQCNt9LX1ww
z@fV4tqn^NWrp$q4SNIVQ9z(CdxOgGn;Imca!YkwmtN{KTNgK^nFek5r$vhVlfZie?
zgy(OI$XNYxIXgPVdxT87=><sS6wL2l{cqL}W_(BT(BW_ZZP93cbs9z1GmU10tT0l*
zPKw}O@1YlP!^E}~_0+xsLx*t0rqMfT8|I2^fRPg=^;j!jhDj4{aP%L8c-2QjlOU%<
zlPRoSo$MCKYin}wz0d~U6!x2-57$h?*Immo_~L<c9^{<>wIWpYOt9+E*t;KKh~Zk)
zk(nq2M<&7fQ(<@U)hFPprQy&@?pXS>q8t#=#-2g~`aqft$wDf84!+x@NJA&?ym9X^
z9c;`(c4o!%#0Q%~pC#3YabeTY4BQo^r|sB;Yy@#{Edg}_bdI$nn054DhSC$%GFY(X
zXgC=-hN{fqCo_XB=4c5`7~0sC3U^!!=1ALd8B>b0kV34gM|0o8+~2_p7;qe$j9~h|
z0f~X;vs}%9Uv1-zgGom@cVNT&r`nPpGX4lkAv`K{DIJi*W_LgH8<6~P5c4g~ILt+v
zDWH4!Mc^p2juc=zS|m7zT8@ICsUv~5`VSN>|DtG|9z2095?j%bD)^m1!C~N_8L&y1
z7n2Kl&ir*5$;qs*n_NgkHwaa|5}a~;FWQPTym7n;m+<CwoMXp1?`tA{-~`9Vhs?7u
zAqnH&F$M!o6=A-P?Shzt1rsbWwl8LnMlg=w=jHo7h4e^hTnDan-!gUh{d{Bk*0kaG
zXBZzFem~oot7Ogl*BR#zzrWeII6Nmcu}J(7q&kYi^k0<fEDF=dVQPAj?88dci<Es5
zxoiHfGjHrEmOXYD;W6b!L0K?k;BwiQjZ2`q)I}D*4tms@7lP0B^3@`cKWQ%sW!suW
zhZ#cTE2LhUT*6?T;M{YJ#5v+f9zButC%h&alL9a4p~Zycxj*hq4_#Nk?YHb|969_s
z;B{Qao~s$y>|-)RKQ>&bb~#&mnD<3#|7TS<d(EG0!O?giaQ+!5${G^<7Y!GXrLf+p
zk{xHVb#^kNJ~aIZvA}HUzl6tdPK8YwS$q`#nkhKT5h|%qbtc0vU_Bb$Mk0L=3kjCw
z?s-dovlR0j2-mTHoXf<?jm^nh>g@!xRf4kI;p+Nn%6Zl7;X$Xi*}+XZ>Za{Kg)^`Z
zYbII%<3hP}*t&lkcaveWWU}1q6<QBblD6YT^dGV5Vnw~w5~WxVM5!`L^2JQ-pan)~
zftum8BFP|c(n9h^<W(4{px%VscvXE7rki+wVbBBpxM5`vD|n_H!uYxdi=ltE_xzh^
zeEQ}$q(O$4tQ1@HVfML3bJHVm=$6DZTy~KSmKdu8N9V}2k2>^dSv?JpVrf4a7<Z=K
zd^<!VM(acKlAP(eNzTmdB<HpGeQ17?^EkqcEcJa1-|cu03}u4pRv{7W2TJJ*HDoHI
z$nI|vDRTA|*sL!zILg@CD8Oq!Rcy2$7d}{tydOh-%wnuALtZhkE;HDWiQQ87jJ=1>
z44*384MJf$_IrM-@)ZwB9^5Fl5P3Y73K*rkUNqrqX!DyWRUP0D*I=E^LiTFG1*4oX
zt!qvU#Y~J`sDt!v`Un)-->>^)2rnbTtymeGh;Z5tXiE|L>l<4JMD1;54e8t71Y)?)
z8+NYrGtZ@|>cAh8WJ@3JJT(!Abyxrm<0aT&-wZnHdYv(>Erym=Eb@=fut<mZMt*F3
z2z64NN;iuRV@_8A=8bI_+nQ+)z%~$^jH92An*r`N|7$1V;d>c}Gr-xFi@2|?Mrc$y
z{3{9wUe4uxe^RjJb@;AqI0CO{!ImS^8*nER#B<tqI88y@hZ<g&jcrHxvM@AR?ia*8
ze#aotIVPm-$S0pQj1T88^<P$u9dKRC>dZ?~Ag}|`X>g)H?(JD3`N=E`BG{WKGjN12
z`2moj>pcwRt+X-1Royl0^OI?gaPp4AxohmqV3b}pqN)O;Iqp_@aa7IcYt3U%G9RYG
z)Wo_BuvQW}#2$zxp@{K-T>N@1in=zmSd59NRAQ*Pd9)aej%rA=!L^x8()Hv+%Hl|%
zZL6Dc*K(xJ48hnN91X^jL(F2=UUG9Y8VzNf-DKWzn42U_GBd)$m}?x>{O8Fy3k%)2
zcZ4l_23E&FA`XD}w{k*vB-rpevv@g8wuecg3xv=Z(oM3*H<<1vS+>9sifxJ<QhzU-
zy&Q0#dHvrazaD$Q;wA&*W@aN?s^WGSZ0^0F)_hXX$>2Sdyz-J`6R&=UgS+F>7aRdk
z>hHrnpgqjR=!=@a6=#iph%&t|vEV<5C`yIz`OtLA$e5%YO`?orb?q`SPcp0V9cs|A
zQCq+vr{OCj9f9aG^ytfm5=^FeUt|84+7-jbh7|8f2AzYTU7i<Y7zbV=<D8<qpJYC)
z!9nc0`!O@4v%V?ba|1~BpxEQ#yf`DU5uvMs&tv`{+6ZmYC>G<F<&?3Cz`RpIdU!^#
zDMO}G8(YxAC1N50x0*i!04DL+8NQYJ=94_}Qk4<BCL>%;K5fYe9uDkx8gn3;^}Ll%
z|3%Q{GxAnsV1z7$RY<NUMVupV8umQwmrLd$WHLmQdbbdTlUT(e3RM}la)o<yaXkzz
zZ=t4o2$ngN8ROgD=YSsDIWT^LcaUX@0q;CyJxw`Ze2{tGuksW>;41*98w+S!fp+kD
zPz(L~y3Els(d5V^II{*>7QBwfwt{a!xjqv1ac{shi90ECg=rL*Ein5f_;Yx(qJNGQ
zXFhzE)w7NBl?578Z|qCJIY*$6C8_XSqG?>xWOid=KlpT$nFTEX!>=2eXPCbQRM3?X
z{I#&dIA-z)rXkz>)nukm6+>es@&K<kndLI}IPmF&69m{a4frvg20I5R0~*S{C#k5B
zB{BvMk3A2Pyx6YGSwk2)0TNGxVe03k(?gIy=ylSzX*+H`ogP5W%9VW|m&uKinaF<x
zwkbh!i9%9k{)aI7bE-LvFtW%LDh6QEpy)49K?A>W1gB7WvlLY2++l*vO6+)3yb0TZ
zTZV;OLwYDNuixpv%DaHUo(DwKF_cpy4m&gzRWlfukX;M*Rc%@-4Uidb2A?*Xk6Un;
zN^-ZkkZ>51R4zyMA~iMznxD16B41b8oe3};TjVYQEt>Nm00fe9cQ@$HaqScJWKuL;
zCYr;%7%gqpQE5A@BYkE<7~y0|-T~b6S(F)skK|v%w@mOyc}1B9?(D0}%q!0HkB5qJ
z2vB0L%?v&pwNW;~7-661%ZfkG_wiHrR1I%V{9ubHOyja=LvC%W+ehj_1|;pf951!z
z4R@o4Pa%Mg&?jsVkUd#&S~(PVpV~~w9o(npO2@TK7}suK-ya$eT^-us489ZmMf{3l
z@L6o#e0_M?Z2#Qh&66Xu{TFitd;mQxH1ztx(q$2id!ic6bPOr%RMU_bBm~T#<H1dt
z7?0sK+m#+_8D{}oGi9&1|1*F{u_lPv{~r~lqCb$V{WICS&!)^+hHaPNyTDV<;9mm=
za2YuIdtzP!e1_LKLKU2e@ZPwi9BO`smW1ct9h9M1wc=Wg|4gwiSB*W!Fyz!!o_8))
zU?U$Xw(n)zE8RFvc2ac}C>`G%zLo@q4sg6KvZ36({geEp>GEa&4dTYt$R0r%Sm^-<
zINzRkA<Uz7K*#?V1WXAfV$D54DgID&{g+DFgguw|pD2X8SquKpNP`Xgyr+&>s~nL*
zU^Ql=lH<F)QC#$x-$|dwgi}X;qsz;YMBBEuUb~Dx&BOQ_<9;x-0sHQ=ctt;eDIEL%
zIUJub=7m0XqND-G-(^~FE`$O~GX{hr1qbLeIXIZ179D@ahA2cso(wJ*UdLJ1<*-Ai
zhPGlHJ{cT@pYznw<y2v{(dAra#sC8Uw#NB1@?+!jN%PUKDQPA4i7_bf_b1|RcjRz2
z9dTVr0dNvl!9AQ{NI99o0=`?*3+{hB6r1;QLeStmQCyD;P;NqLfg91jlLI$mCb(YQ
z9DlkIjTBW4-=Mwm*O-!=d<<3`?cMv3c(iyX@f`j{{e{~;A;-=}i*p$=S}e4T6xW7|
zYl9_~qa{luxJ2p&7s;a~Qc<Z|o%zOBrD9U*c@s+Yo~Bfy?7#S*l^wnS_J_A|&w1qU
zP`OG3(b1Axg@#~*3Pcfv<pnsM9=k$d7u!T>ulxC(q3N8{p@ry!o~9^!`QY2A0tOt2
zf*fVy|BWaQOB>?pc`HoL){NE>ygVp*eQ4cd2-d0e_eN=E!!4}^<iabO?93<a>Q4x4
zD%ZdRw1#;%k^y+<M>vf>Kd8Pn&^TUFp1i5qUIhU!L*B~V5*JrF$lE*KNZU?pChx5~
z2YTHXk&pMw_-E{8gu)i|x5QZZeGHfJ0^xcr{F@BF$AWjp!XIJyEmn9s+>2THe;?st
z|H!t#4I>VhDqF!nWH8RZVQCMYC>H)A!^<Sx86W;C!*e8Dj}L!~;aJ~BKF}+%KikUx
zZG@Xw?I8(M4}@V>q+|K_4whmr2hH+b#y$q)OZ<AN&<g8qflZk(Oh$Z}xEC%WZGeeN
z0xp=+u@%8ez_E<|3J#}U=G9C&X*<3O*^d3RPl#z83m~7vHzwPKSIIuW?f4nTleH9U
z8_SZM&sx8HUyb)W@MIRKxM!?i#x23a-+qK)<>s6nnEk@UW$%rA97NK_=AkIGFXAs`
zJj2xNcnTUYQ5!om8h<h4Qy9Ns|GQr`QqsPQZK&U^iOhYL7m=pz_zfBZX&l<vFYu=F
z%wig-Gar@an<|Z_kL``7S@=)Va7~NMl{nTHO|vA5`{{9WF%9QvV^>Af6#kPmJfHNq
zrX$T6(KO{u6Hh}#!{UH(MAf&3@swI0L8I>j61XR5W8aRZSsBISe(l|_`lmcT%sf9E
zjc<#_pT2ILk|z?4T^~)ej%lQ=tUPJW8M`_f?`J$*p?nmc=SrSnhOslFX|_buSa~8w
z8w=wfRri}2A5R-}DsAlfX#A~={|CIV2au0zg-F9G2J-AW!+QtPxXsa8*~@pv<CJmX
z&EVBLCzh4`I9f=f4|l}vJv9zlYLp9zdw_Ac^wHw+<i{yN!k0<hBaD;1!>6OOKk0Ew
ziQpkyNQ#VC{n+ZoUjRX(z4)xOn|I<Hz1VSel5?aG|7<Tza(==3-EaM-BaGo$)-T`f
zXDQyB@c{3~iJQ=lv`^bUjw&E{|HP`M$d;@z>Trl0jn+rf?D#9v>?3cE{TctLHhY0E
z!mldd-H1Wb!*=l4P8IOh#Db>mBkzpC)@bDuW_+CN*he}>_g%m7gLmx=!}&t%2)|?P
z(7KQB^n-!IQ$B?_@-FpGd}r`G##f8?u^;n}x~|FIixB5Fzg8`>8e{2H$nc9L?6U~N
zoc4@;Oi4c-r)jqZC%R_g{FiVS&iY+7+sK3}AG>c0{+@<6Px@fCp`7EL;@eSVKCiyX
z@vl#N65f%NFCg==8Yy`VPIKfKt4i!!ae@ar0!wSPp{ek>kOQ9!*b$F_B5kwyT)2uS
zU*-qjz_p^d`aMDJ(XmsUgSI+dn(5e{#q~>jQZprPQe*s<*hbIJ%V@JdZ#wr&(Iig;
z4AyR-mnP$eKhYhPci_RV;Fv1(oNX(bX_k^nn3_S!UN7rj=m_Qy%7n7`7}Xn095|04
zo?9HSJUoLByy18?1$D%A67zZN$D`Nnon^F)EXBeUkDGO&aI?HJUg!A|OqR40(u)fe
zCPyUK4Ez^0lnjKHr_U>Q2A|!PF}y2d1po7@C?{@)!cRJX-aC9?Jh3BK0%HTGY6Zb@
zj7>Nw+YwqZtpk_zjdWnMVMkv1v@OZOr$WU%miIQ;W^%9@iwB(8oJmWj+bL@@&}7%M
zZaZdUD37>c(>@7%Wg^}~R<(_D4wgBz(0QTabR0JkX#d-%-qGU@O&21)W?W8NIQ6hp
z^Ei|)rT(1{jj#|tAgG<q1M8aEVor00R&tBYOG12+HEvN5FIo{#tRBG9Rx$&$#61)R
zEC{D}_wX0{1%pzuWP!F3`&TMOmfv<eJMsPmF#mh;&dy*X?#e&|eeDw{Q!VJip!L^p
z!Dx!ZDz`Iqc{*k)u?fJh5Z7o<`VwPOF};C~Im>@JCZrM0dbdpRwy}n50foqeCAeFm
zBspQ1I~C{F=`{hz0FOg>Y2hnzE(F&<A@m#`DVPE<M+jw=IN%osAGi~SZWhFfdFJqn
zWSs9hj&xe!=~SGzfp3DF*$QftYt(jt{i8+BTP{3Nn4Ex<>r(^!Q<pS5u`X4Zj1{op
zH4eNuj1(naW`JI>zXgk&;f#=mA8?5Sm!zKo)fvk3M87|>)&_MBb^>)U^6{H^ULqZQ
zO}`W7)1Lu74t8bX{t>J7bj%1Yz#hGlt}M5?lY!QHxdRs`EXTo{UyCYOpLX*kNIMK7
z<u3T4Tb|@Bt@!`<xwC9y-A#Ni`3E#vjkuk7YRf048??T4&=O<FZD7epv#s13Lui*f
zY3_%p8rzD0zz1EEyq^=8t8JLH9o>lH^7BdaEF3YCD+ETcf9gvDcfJjWIR#;`ac3t6
z@3G&2x0#>A`xSxv({iiKv>lnqkGbt;xt6{O{pTKm8;!xSd#D_F5A@ih_#Ej<@;)GN
zcgNsfh{Ama3^aC|z&X4R3ET!7&ccsgwtkNhd#n&(kWrJoj|f~%6fWKS7(&d;ZpBU~
z>YF2gd0b%T*)VB4npK(R9Z)F7a5bXTHOc#=z)iB@P$p}@GJP!b1&S_~`HaB5Ru-iR
zmjnbB^eZRm9)Oa5iQZ=g_P=AW9DW4W+yYf%j2lvL?$!Iez};-askXhBdF{3GO7b2O
zn6?;<*imLv`MnK5z%9x9bAh=!3WIy=x(x5@2xX(4v0mg^t+{XrJsH-JbUAO1bZ<zy
zGotC1sJ6QiN(tdo!;2L^yd`kIc1_^Hqrj6;4$Re&uF>QMVq4axsTTRdr&Wo#wQ3J2
zOcO->`mlF9l5l`{<`>KwQp~@=J`9t(huh$>Ojd~DZr>O%sP(>$f6Zs_$G%f(?|kI`
z9Q;4N!fjsJ@&SA?j(BI>%&KF*^e#%evn5K#mv)RV3t;+BHUEsg??KmYEGLGlcHfc^
z+jWE*?HYQ4W1*BHyNz~YaxE0$!LW}tmU(BQfF|?DposSw@But%eEoJ-VOsdv5cWMb
zjPDc&L*Chd!yKEVpm#3b%~yj2ORqJ5f|sBRhFY&6awiY_?haNRpNLAvuAzI`264EY
z<N_yKhq!zqic1l2v6ix%%-7KqXf+?idLpl;n<-7K%U)La<4HBokpNukn4(_7U%{HP
z+A2x99Y<yn|8DarenYN1cX>v{=%#G>vcHq}+tT79&37O7Y~yn8RP)PxbESH-P}fHD
z$02<2TFq1HB{UQ2Hkmg7MOFt69b)vJCac7$*jZxC@lsvGS%`7~;&O0v35q}))napu
zSt>-t2GVKa{Wkt?^QPNWt#g1qxGGlb=@NiiXW*sDJPZF4>B;!T?oNAWpyDCxu4ZoA
z6_0Gkz+_mu!}cP#k{vdqro|W)%!E7YT*q@!du|dL2Ig#~P0_kx31Sf28`v#JO6kp_
zYk&lUYnKdGcDZ*MlGd7U6_ar65ht*fpI2;;o5zt3Aze7kH0~`VFI~ZU@`mNba%?Ot
z0Mo)#xVD8mqLDx7gd8qVCt3)kI!+ZJW%Hb@`*0D5hYPV%jyr!<+clX}Z(-MY9{aX&
z*IY`Ixvd0mXeW9=pDi7%#BCl0{o!e0Rw0W@=ShrfEih__zohC8>>IIWX0~)g_p&ez
z3Z{CK`DsA21=?kMc-$SzTn7~&j2P~)KaN;nNzGg;FXI+_^|JLxyO592>uGlEagz2g
zMZ`ykIKe7D*0)l4-blRx`$^Djn!*?2O_z*-KQltz#N{xS;eXbTZ*_L<q-mlpNY5i|
z6EI1f&vG^2uqGQs^iC#pjXy#5UvNTlXVM?;BtF8<7mc{xwPwErprOBkmogTNJybX|
zp0=HK#x97<m#;=nQKfd~y*zvZ$v<vxM2ax=zo6q$<aDXZiOl0TsA+`=YKqJARqy6n
zNFWCm3Xd#99@r#{%QlB(&-|jhNvr2RMU>$q!&#E|?&d$Rh!Y@RlX(pP!m4jqSoQr3
zv`bulAMA_O7xI8oc~o5l7FYYxo1?Yo9y6)G1hM{jnNa^X?D_-SxcX!Lj#T*`L%9Kj
zLq(D~1;G|s)*z$s#}rM@R=LO1q$IAKIGVgr5Ti*haN~x%MR%KzfcR2|abC!AH;y>r
zI`E+5cC7sz4Q1SoO)w<YPZzwF*K%~rg@}tR`XWiWWk-yZEl0Qhj<kFLU8Bjo7yt4?
zs5|j1G(8fPr!e7TStXJiS!gapv9h;LF+Uk<MK8(VHcR+>kk(o*ex{q3<C{Xz{1RIL
ztIoyJ1@%TV4=*uOzmjF!j@}8fO0E!Rsi7%4L_u&DdSs*{Bv%%71b2Dy6`I0>h{0X$
zc&8gmCG>c1?rvy)I5*d@d*5ngg<EEd%l&`#mV?jT=I^B5ceu?15J>Q+FzWgOV6@R4
zgUF@^AiHpzIby1I@8S@5|ETLhiFZAuevSxC)g9Q_3gJ18NnPWKg<OHc7P{k{G^Xvi
z9l_pJ$PBwe{ugYp*Lg4A6U+<veiG|<-s=$=S<GPbUbO4pRJ>7M(HZq4M8%5y#zWG&
zNc%R@Mivv!ya}(hCiww{?$dOvf)&s~OXTCY1|~^-wd~aZSZkVBA#aD|?TC4?=m^ZJ
z1b9O1Dn0nk0p`0}cDv30xsIa#C6pVP!oZLaI4H#K2nppog3=BlX_TNekcHX(3a1hE
z8Cgs$B8!QDIUT3~T}=MUa5b3<`=x-he_ROhi|P@w(Ok0)4FHjr9)1)&0ZCy;Jcr4k
z3^n1qFm5Pf>{u$?WzimYVkoL!i*p#D+M_4|#w3v3yc2-d>mCUe>VH>W1;cL$Hq*jY
zxZ5_aeH=(<wGT0!*gm{76ul26RY^wDK5rrgd`$^rbg`J;XwF{;%tzth0Z_pYAe!%M
z1~$^MsO!O7slA!R_AiU|M(JPny|1Z1pr8)EYYA$cu?`?B9<~RKx)L~Bt}{PPl?GwF
zME(qplNW}Q@MGX!cC~A<&itXEg}qR9=Hu!Wo%E#nB1vl>-G2z<jnlgZ<-sqc8isE~
zo7f7mwI;_t--K2R9<;`|TaX9JhAdNsHJZ(;1dOlAk_~+tO1|c0lAp4wS@tl|)u_YZ
zY!+{z!d&GDW@g|6FijGao^X9|=y<S&Tkg@p;5ZrxHks}DK!F1yN}=CN-bGJE*!ye)
zJG=)P5I1AA0E}6k7&^1b+kup3+E*+A_g1tWj*3mkMI2a^?CzJM0#ejp^I}D*og?8a
zoIyreS&b}<c43zFXTVJ?Yww*9QZSsx>?kp%;oEe16uAQW2x<!f8d>j<y&obEjI2<A
z@wlux@C0A5f6eyhI0ca2Pq8WnvJZ}b$Tkb!u~idDqIJX`nhEp292rS(l>4h;Iwb!@
zu3!}B<KPIk?sUA0-BK*RYCkkoAVw`iW>~7SJj6urf2n1)hA^=1BiXpMu*saX1j7pY
zH{{FraP9_QFfH!~+HP|RJ_66o;hNVT)NL0J3_OJPYclUb%-(7Dp@ETdX~h4K*)6ac
z;>m6mfV-e>J>*TNY)O!))F(cUk8OWr&;ZtCuhRX=E7Yg&9bRuReARsTzMZ7ub~?h$
z$2P4gEFy4VX|QVFsOvk#+42GN9g-T;<L7`UPnes#t`z1bswWV&%k>Ishi!kg<~dhL
zYwyiKR$vA@_~c?0oX!%4_Gw1XuvKik0`X2I?mq(<*%xjaA3zZtIN?Ar;V@<qKSIV&
z5L3hkPc)hDGah}^5qLjh7&{N`oKzBcf4={B2TLLvgIeKh0DB$<9XQ1O4sNl+_$wr8
z!o()>6V>7iyR<z-s&M89f&EJ-C6NRuZIwzlHv9p#fV+Sey4_iHBnv;Jqy}WcJ_s#{
zfqSLHpq*r%x|BQyN2chudxV_()1hZiL3WMa7o?dFATzgl5kg`tv&-{6y5F>933qE?
zgXHvaj5t)<k#}B6s&%LQUl4+tfM3|}u~Fz{c-p!VR(IaLu0vN&@TXwwN8-U^XF}K!
zN(@ehJv0GEO^bJ<wtF(CKUI|??VRUJHRK#Kw$S42r2kKlA-P@Y=0l5Aqwvn8B(v^|
z`0}M%ml5wFj=@PZxdsK_-2LGAcw=v1e=^S7G7IYEnA9YhX~+UK*j0v@y_ZAoz;Et(
za(%QjxZV*y8}$w0m^#d)We&Uq`yIF<`d}G689rI!{Lp#}HbX!&x=yeI2`(9F+Es##
z9}teiAZ4UsBShYH4*%~Fn}ob$N|w-@bbyd+NevYU!6QZ|_5dv>y?LeFUod7hqvqM6
z4e+yravIIs(00K$P@B9B4*%N+m*WoK<*<fv?+n+xv@p(1ZE%dRes1$(8xJ%KuDo8(
zifGuD!?eG$D?=R}NTfYU=gTKSQuBFXIXI^gr&F;rV$|cId2U-%zjZ72mK3jIfuZRd
zoCtz3GHLX$pEW#;<K%dFmRZhunyA21vGZRJdfNj;lDXsakUy(2U}rLTlBmvTpk4&;
zVU{qA2PN;&RdKs-0tF7lLACoPiWp7ehX{xSIRxo_nL_xSEf86m=uEhGf=460uQ2rQ
zLkOJ{7y5IC{+^*aLUA>O4StvrFEV0g9QdmY-N(?ZxX{-bdJjW$CuZ^nBZ7=rBoV25
zh*7AP>jI;N(pGzjjf9NbA;d&Nj@uzbK|+q%AuL`(j@ltCIy9JSf3m<(zx@erk6dnk
z8I$G^i5wWj&Y7u^{&KSv9V0Ypw6GkM)D(7DoTyDzXkl89SHY*@I9~;khGTpc4B*27
zuPiz^n7W5$2K!TYdDJ8YJf#MpP|GxIyKgdAfJxa0_Zv$wBh7%SgV786*v$wZ<4!x+
z&R~kNd=K#AFnF9;{K}WndiU-GCBt`6h&%UWp~3T#c$0(iQX_IoH~+d@aaF4M?FD!{
z82A9bw7JipKCt#M2V5g}=uZ4x?)?t4`W~`^U)NmZ1T4BD=DYVrA|g=3m2Qyg=t7=q
zp(|!`*6DJ%5jk|FnctpI^>Qeem|>46&Ky8%k+WN|vHJRW-Ek-t^CRrINe(UMWD4?t
zqrJHaIj~<i=-xkBVS;;Y(ba<IDlB2e;F$v4;7jJmAA8FQY@q(N|NGQt;_ajEK*1bB
z8KszOPA8?d%!O}$h6N8FIFb}tnh0MqU1_|J&)knHAg>Yyxb-mFAi>1i4FlN*e~PWu
ziOj}sQ_0-_u`WHbn3<a`$YL)8i4!N-4}KPWb?zdDydUw;TJUn-xq`(-p(zBD1x{dr
zQyR&|Dr)P|;7<?yHfhpy#*a=S*&%hQ`)z`NO%HCue!-03rgXFD9#VY6deEyR6OM^M
zL{cM?M7AIS3rJV27Q%XDZpZj(3pp7d?KQ0vd4l;C-J;4dn<|s@RwX)&<T4e%^>^ww
zZTqKy(H`O!d>3erIyl>e3nvz8erpd=ddm-#Tqgx6Vob|4zky(tJt?{Q!VDZA8AU2w
zeu`9(UtC2FAv{!ip;O!(MvM#TrrNj=9V6Ae9#)E21ts55=`<=JCkk<e#6`8{BcO$Z
zkCskLC&^I%F`f=mWDdS_;LW7a@{C~V)QsR_wnpU2$Oc|%7}?;!zR8F&)oC`IWGNDf
zHji9s=7JUBQ(jnFkLzsy_0l^R{9QOB?2S<awRM_vZCv<ebuD9>ROEArf&v{&5ZF8o
z#~CgaDjg8^L$j$HGNuZY<oGAl9~I(^Xf--GfA0XW&FW}R>N++zQvX;IWi;KQ09Mcy
zpP^k7oH1_uo#HxsfQws8CXZKTEU+2m64innx8r!EG7))2c|;uFd@@V*U`~CK%x{bk
zVVq0xA#{?kF_;-_3}&7t%$x~kj%U8ji7+^x8C;b(4Npe+{E_%JES)-yUZhq{on~{h
zHBaj&x-HQ0N6_k6d%ApFXa*VUgi}O0lZms2OVK0Dedv=x*B8KxbdPui5u?w_uX7dG
zbw|X1r+FzMp5EoU7kUGIGX)Q(J$ewgOfI2dckNblpamh<y;yO`D{}bL+>r(50n}T%
zJ+>-W?G9DIX1^QTsDBw4+6@-xrX6)m*I{G;lUiWneS#u5?=q&tZDu26+%7D8nCHzS
zDkw(@k+rwM{~{2`5Cpi&aZPG4RX*J2df2}ilmK*sMKH}5+-2dBwu49Ty@y#y1{(#|
zP#!_rj5dVd78EOj7V1i?Yy;TM5GaSVnJ1a=U<D-bG;F!&(!l;y@Vs4R4ov1}8&Vur
z+Jj~3!5c8QxF5*Z^6rdWApj2Q?%Vbotq@|XIyK}nF-HvFKGI}9EV1yuCT;MAuMkNG
zNgVOtVg3Y-fPzUXBbU^>fg*hl<i6|PyfTL$hdA!Q29xVR7n{WEd1u2B*}o6VG<<rB
zyVk(a2#EbX)SC+M9q|e<Tnv2=GJ4=#dPhgg1LG}{AI(3QKN+h>p%LOQ+!Q>4yjKWO
zLUZGZ@+&Nd5#I!w(W5ju2iOy7p~-~mqg`%*oU-U(x4$l)n&5c>UTyqeuz2BBHdFQ-
zRuFT@JI#lI8<4u#-u*N2ilV?4ObjL?hw!8k4tm>_IaKySJh2o4E>OUKBL?^OPl_B0
zJbf~76%43x{abWd)|c|b<jcx!PX`vkAzlbY12A~B<>{iHHJxkyeSV+b+1ue6@btEM
z^fqs6XRlB1=o`?D)`7JiL!Uj%H(ML<`1-ond-PUG(rIke*LVQq(fbGb+B}~2&fc{-
z+ALqbu2(Rt0emA0dEVgf^cfzX-rC!)4|v)-`|<AgAv!-rz;kkP^jW@?__UsO;M3j-
zXd{+Kr{U38&hoWbko5x_Clp~v3*r_W*mRDzQftxX>e<=Lw7IH`Sqs}$i8;&bY8q;5
z>uM@%mTT(6Ra?OiZ8fT_cLLFV-RRTXTMds@Y_Y$yn|0N58fr_6>Rm;Zm8cae>hts(
ztwtv(qzW&LtI(;4&hgESBS$>Oq+fk!k4N_ztv&sEUx(yIOlEbrrzo^~`wS%U_qJzA
zCT*>~vkf$c-qYId(Pqvm%x_;aSF7k<-`d^TuDA7pkVa=;Z)-OI+6MY`&mgh&AxQGp
zN;mel_H?%CRTA6l@fk$7+q2%&4OliUnuB%HN<9Wz1Yd2P18x59)&afUO55(~_w=@d
zeKuaDul4kL20*ZO#W&K%%kYN+)-h)ddFAJCn$<pprc|_Ard_Qq)h^Yp!?6s3Z|Dcf
z3C#E`eGV$GFCz)&rf5c=zs);mmTzwKZ4STY#(ncs({&O`pn*#^zIwAggW$#1UPDXK
zO8ZE*b-jHXbT1yXa!>0zkIshIa&oksI#*Rqqf1+vqBXc(?s8XUrB+f?RaI17s%`Z6
zwB9~VPfnSaT{w%sT1i!PX;IyBx4cvrRk_d*7WiDeRu!#q0i$G1xEERWwyx>+uu$~2
z-nH_k_`Ppnqu`KbcRn;diJ<6GBGBzj7z0-{tZgdQN~Oy%3)Hf0o$l%BM?Ymx9`G3c
zfnL31psz>Ial7hEE9$h8K0nAxB7GDR6AN9#EKgH%eO0N}G{F9cZjZ9SSO!Y&8)yY0
z9i82tEPaC)KT1-7^U$t}%<h_ox)PTvrK+{RAMK>tlEuvOv01HdSK{@w3HNk&u918x
zlcZ)no}M+H0gF)#b{**{In@nlF=?Bn^R#)(&<H*240I{B!o{oBg9+9QbmT5rc=@8m
zS6r!WLg>uXFu3Y6(f}2`ZGAoc-RJ`!(UDx}XnIdyduK-{5bE*!44rjCH)-we>jf1$
z*Y-kSwrlQ<5EX+KwK{us2v5klR>SZN^v0m-`__4SJ8wj3|3a1xy-3{C*(?3d=jm@n
z4@6V=49a269SsnyAS+t+8~lCjqY6R??5Wa0tLX0btfknn%Ll3g6vJ_orh~>>X^-0&
zDE0R*gxFpWwA=L!orbs14+0FV_4hzBQj&oWd-TDAjVTaLtSYj0kzpY6-2OGlLGNho
z?DkP)`8Z@int+jfhE~fF#^=+!J9|JV$TdHRLh_;_%k%}ByC1^}h~BPW!g6Fl^7$~#
zDDh<{6k*!lqE)woNl=I(;~d38Kd59#k3>%xXoZXeL*)+6%3V0vqA9sZhSecz*<Da9
zn$gqI*^9=!Y+imrJWMo3Z|z_{exHXdH*?dF1+~6)pi{~c7Pjlrihi*c`3dE8WGR&b
ziL5c0EErdQ>x6OfG>jXQ$Y>LN?Lce4S8p|xDAAJ(v**o1|L@;8(7D!Y=yTfU>I?Gn
za<ecNXW`{aea%L_slGxl=^N<J(I~x2(8;ShRp;&N=YWDCf*h;mtZ=z%uXopDFw{0`
zMGeaduH{tM)E5=IwVaCO)irhac2`uos_XIVx~2gy6-AYHoQ%R+4n$H(QAxQA#WiD0
zE^)ct(Gq+8(#a{wvTOB@?$)(}R8>()T@9d6U_GR-s~+!Vl|>N4Gco*1xcVdnFs!R@
zs71AVJD~KSgRl~mPa=&(5X!Ks<q*6K__{Tpfx%wO*0MWPZV1$>`}EZuE0}aP+kr!W
z6xAG8b*TuZoQg7ns`iT$witi=1`LQdZ2{v20gS*NNt8XSO{?kc-UuNIwD2YIvmrsc
z`!;~v8f%N{%RxjDoO=Fs`ph{Jl<%9LKVP2@4X0hJs4gjW)dGxftcHw7H5j2;7J6HC
zMWtlRQnmU%j(oi+5daeG%fV1Rs87@csDZTSXdAQvZ3AV!HsEP(SCX4K_u7NC)B<(W
z=dd$Fe3z&`6U`kJ7Z{aG8Oe{3s7`}~K7Sj#dsOsy_sNi<hB;9WRJq;ge?STq(nO9x
z$J4c@)&aqV@1SlEHB<}{7!$PyU+Y>Al}>$ScI_oC_;*vs<`qLyXZhN&xoODmZ|DgK
z6LGh4M$5{Tm$j^%*RnFdrKLd0AI5WRLN4n!wY7J2_81$6m`hP{Tf4`#*4w$RxBrF#
zpWCSSHx4!<#_Gr_p^iTw!5{u*>ptk&J*2wgbjYeUjG66m!i>yMxelpJRc;-`3R6O^
zl7@VxtWjUBKHczgoKjq>N%V?;02$Yb1xlrWTBK$GM37q21}|jD#y-EkL3D@qKE1O;
zpRIsq>l>i$>y-Myo+`7-q$w_w0nZxh&+Igi@1jQ=%rcq<*z7|Y#ORx?ulEeB>GN?c
zMd~(`p-|d@5e;Rx_kj(eE@rRS3zq5G>#cU7F8HCpHiESKp%KJ1skYWOPz_U|KJ>rt
zji*c29!+K`O{{BF?fQpFJEBRY#n>a}w}H9;Nr|1&WU)CK%NgiV66~We?TMxn#TIy4
zjrp%6Hkf#w$Ajt51Xa!ldP7XKLp+_1Ivbb_qXY(MQMWM)_ZpoT#WtvJiD_Pq3?7*0
z%)w~Np_HvCdJ7uWqi1(QO)V(EubvHI->cd#y9n)<tpko~vo*%(K92jbA+iVB7PTFK
z>e<Ed3D_6dH$Vele=CFw+87E(Ydb?Q@T0f%K@)0)Shi-UDw8(Jgeg%Q0`#`G4scG@
zBRY+b`arbAb^%70pe$pW7+VNmsVrRzN|XoGXMN{DU$4qcR5eVKedxBBr$K}glsy}r
zkK+SkvR(Qb^e>X%QZFD8L^@9F>T4xcd#6uLGf;h-Rz03pk&meON*%IDZxLy{cAyVa
z-3gWVN*<ybNuTsnd`jog5W@x{W=f}3x~zrrI*AabLoc;vhM0+oDDh?Km|6BxZpduG
zO4BQ84Cr2{7z_ncY!)gi)btE`+WhG2Bs^lRH2sn$hF~kDgUoB$svi=6HwZX7IA$>@
z-R=zWbNn1#FYN<&um#&O!HfN2fHb^lYCzP<RLZC4GMAWrAWL7M_o38*4V~2Z@CW`S
zh0s`-Xp$kIWGc0Hz~Ak$D&ezWC{+g_RtMJUKFIT4!xBH)ZUta9Wpn_T0|5Y9`CwjA
zU2LvM`z*Z=L>TC7M=i2zHKf(E4aq?!!dXC=l3ACD5*WItA3fUA)fJUd$y4ZDFX^qO
zKp%s4f`)>QF4hi8FhAu!+B9lIimRYsQY&ozm_o(O5f&=a1!-r}0I6p;3Vf_p?KV{d
zqk<U}7)z0o-lAp&(vRahm4a>-Xp2!VnSp5pR2wS8s>h@JXy=&)szDve(zQi73v#ta
zi=P-$TM1nw1$F~ZN2|ZvfNC74M&@hDG-0J^wcVapv^13?VL_4f{Oa+{AMi+Ijxk94
z4XkTm(QY&bCNfqO8PDU(NrCn(vsc(5+)WkrCFMnR+A3|n1{K-us&&`b@vXRS1>bU9
z?vkQf*Y&k^P+6O`n4)bf-iRovsA+&IZW*_7Y>QWQO+|H?3t7bL<WXx!j=QO-7P{~X
zw-`1oMP4cE${wO?@~c#AiBRG4szN283fj3_QveNR#4<Wdh?_guGlq?EQ-SEDpw8v4
zb(PeY6uCJ+SmC1mLYjyljjlR(MNKs}!Ix?@MhNk80oPnvQSE~MyBx|e$WW^-$X&Py
z|45uQ$Ed8Rs;Gx59yjYK{UkKzijrzf87iumS0evP>eW=E0i{)1CJ5igo;7{lI<;se
zGJO7is`gOR6_ubKO8u2US5n2AHMW!GU}UO+51kx)?$Wak=+{zXhn{WoBnIF?V}cgV
z5m~8nt2rq>y=_JG<VsHm<Zcu^PJ>nob6a0KHE7#DgCg1c#oVjUsj#dSS>SZo;`|)w
zXhF3sGBSG|fM&hk(+-Z6@|NOHcSDnv*=kJ2h&iX*55BgnYH_v{iVADs!8DblP`hPj
z#I$)zbpFuOIS9enyB5G4AL7R=)uFXAnnZPfFVrFkc~~D?W^0|jZQXuYMRPC{s%$8A
z<!i1%C=Fs-RB{9TP%yxB9<~>m|6%3>iRc-KnJF-tXsBLMUDH&p*J8ZItRA8RQk0V|
zQi)UpDPT`%M;ru-bbHK#Dth}dT+2koz&s0PAgHH63K9WQVj_b|Z9j}~XNTto;9ust
zM(gb8RqxgK@N{=}pi5U`mg(unh=W)34Jy?PhLsXVMw=93>p{6_2iTM}B$50o%9s&h
z@gPugkQ^o7=)fSx2Fu2;b6Sf>m-0k|kQuK%TVyrcp*PazQBa`GC{Tz+^I~$_j=*d{
ze^r>ZnxLu?L!FtgtSD<iHg$D1kX3OK1M*n$BUvkco+-wNXd~E6cZps~bsx<mz0c~E
zwmHU^uccg4@Gtynv3x9*CO-vXm#IIUU0PQ?+77!cF1idNyk3Wpt<y^(u&Z6A6M^G$
zj}50{zF}QgsS1-8R!_=tHM>e0V0xJ#pCL<?K_;iRyr%k-aZ+3f^*A9fwqUf<gfYNg
z+MpT79wR<kRa_Ib*=W&0#2!>CD~jui>QIzz=!uRyz#HSLti$BzYx&yp%9>(Ye`fhg
zYQT5(5Zy(UZk>`vMo|J6=t!j{>zC+uHVB)Sf7y(yWmd12Drmj{-eSzI#xRObAFp4C
zg-+H!D3A233s6K$)Cddy%+J1V#%8Swqj@Lny1JDWGy|yOP_v=1*#_HFCK{)jcCjLT
zib;3YED<YNdXHr@LxAFzf74b6t7^BJ=t9kdJzXR#dNO9vYH5vj_imU=qrJ*vO7^U1
zO*r8ZgzVaGL?;#dr7e0zAyJck5Z)yV2WmPXx{5u0u(W1?6lTww2O7o}5n^_&9FEAJ
ztS`slsa0?xfGwlM?P`u#F=G!bG`47#?#hKRDT>xyu(XoeRC}Tykf|cm?e3j5F*{3u
zs@M&fGAWbZ^&+ryFv7+QkSfcv&0<LaOv#nq+-`W+AT-?xWVARUZuKupWRMbToiGOi
zBP=xu3E47gl1UBMr`0PGODn3y0T?`BR*&*vY*mp-If8(tl{wsqUvrdLLE35(W~t52
zpRKR=>9h0k3rg52VMw>yU)kQ!eDPIZeccSTmNF~5$78fcr$$y?qeEOg&jIZYy$_}w
zpRo~rhv~8vCNRAEa%KS);1DG!sT&6)I)>f7vVd<KC@kSvGJvh|LmiWupd;Ij14Ypm
z4l$`?YrVEu`WJQGsFo}8u^LUXw!3c)YzxuWC6Cx8TbbLUHztimx?9?xEfDRjEzH!9
zQV?z7YD?>A<Hyz<qcyZDqU5;}dRQc&b+=w~E7=?;!lfE&#B?>+*3{K&u4bsYQmmDe
zyjwM?s1g{fztL_?ZAtoF+;|%^i(7+_wSMOor5@Ju(<~527lz4!r;KPIu3C_YTD&18
zElam33`o+d&ziuMnp!B)pag1AhCFTFJ`H@~f#pt<1wO6U-`%bCc6MtT<cu~$K4$>5
zZ$R@w6lp%M2LN36f|8>7{A(aP{k@$xXfTUM7sHjbQe}yGhSqG)shTqTTnaTED1uz(
z#cRqbiu;DBO0Or+%br!JxmmpKf$gZ@1B|r|^E3lSb*^>h>-MU>y~>H2L5I@@=2`Jj
za$rlqgn)}w5c_H^)LH_izAaOF96}JAkgK+)q+FY^v~{4(y9}ELpgeT@F^w$L>;?DB
zu;k8Gwbn+k?t}#eYA|T}x%2(Lf%)BiZLQt&QPO--n&!)#+23#fibS<mBQVX**VW85
zwt|8ndnN-|EG#ICbTklhU3d@UfGiZ{ivq>z-30BJm@Qe5_o0a!!!c2>?BimqWim%&
za5e%VCzFyAum%<Mm^n^0o3&ddy43*jutm}UtVUW&8$x1$@xTzym1S83p>Lyq=kJ$2
zYIiNuB>X!GPl3I17{^EOT#Dyoc+SIf7M{s?{=PNI`3|1n;rSJwpW^v3o@elUAJ2F2
zd=1ZCcs`5gl&nAU^AL7++mW|o2h$*)>+vkYGXu{NE8fYCo^gNJM#Z}~wNrn~u|?Si
z8`$M=-h}5fc<#aTFrKIIyo~2fJn!I1yw%}68_&gf7UC(!Q-@~_o&h{J;rR@nd+<Dr
z=P5id<9QR$J9rXrLwY<H<5`HO7*8FZHFyT_+=S;dc<#aTFrKIIyo~2fJn!I196@?K
z7vouorx;Hio;7#|@Z5ywGkEU7^Dv&L@Vt!YO+4@5NxU8D@vzQpd$=IeQt{-XZg4!J
z?e`=(u`66NhaFD1i_qG4I-Ha7TN-dU$!DKW)U-44%XH`B;U5lcX_cTiqO`-vlpZao
z;^B2-l_7_d?<a3Tx%jQc!>h8QM8~_fyrcxy_vO_MbM=KeSLQ6t!NIKmg#CvG|BrlN
z^BDO&cR^0>f;hhWPnhce|Dnsj&l_3}46RtC!>=)*e!cdatf=&BIo?*ESIfa}M1ZPa
z0~=FdRnJ)q9Z+7@_<ZW6zZ)T)y`A`1Ud6tegUN6w;`^{V(uy49-!^QaLZWu{BRN?c
z9<?0F&RPi6a%i`wX#H3JE&?F?1ZDUuko~XVmvY+vV;ui3!NYNZa2z8{{I0?W#{m9u
z?BFvO5620@aqK7sfR2QWV_y8_7{Wfuw1neW(~eHdF~<J0%gsXoeMB;fW64PjM(p2A
z%Y2w0zl-tMa1M+;4j@sEFv4;CvEf$4!EubL1RTdM!ZE!KSC4n%z%h_xWG)8DEWF!)
zESrDV;<4dY0d5uG_A@i<kNNSr9*+%|iE%g+gX3-z+xjC6|JZmo9LMDS|Ep=45~KdH
z%Ux%|kuI+T?sdRjaY+o2dGODNhwnrw1Lq7gk`uH!b|k{=ayQ1oaYOggl!OUmwGB5M
z2UiNX(vN_<IS!6GLM7l%BFz3{etbTShcqUB)XB=>Cw3>^?eh4`_T?EH{u1sG;0^)q
z!8k@`9RI$AC$4%L;hImwS9<|>1{2_q@pH~PJsfoymTCVDrzdD%w?FV}m-T-D>-PGA
literal 0
HcmV?d00001
diff --git a/board/MAI/bios_emulator/scitech/bin-linux/glibc/k_cp b/board/MAI/bios_emulator/scitech/bin-linux/glibc/k_cp
new file mode 100644
index 0000000000000000000000000000000000000000..d3729496cea1d2f1343461ba075008530d59f976
GIT binary patch
literal 37612
zcmeHw3wTu3x%N&nfdLW{5ELugQNe=6+(;l0uz?URmCH!DwFSo^nPCPdnRI3kgjR6U
zA(df_(o@^RIh7-bw)C{e(sLB!1sg6UXg!vywN$L4rFEx?$WabPjO2gcZ|^;`Cu0Bh
zzdV2c=jqO~v%Yt&Z++`q-&*TiYwx{g?>npK&(6rmP|PD!$x?`-+imtzgnNT}N~z*d
z1}Ni{Ym}=HDhks|qu{~W4w`2+P8-fFoacBVjpt>cc`}W%lcga|!TJ0b6@@4BEBSi*
zDd1DD+Uz`EMuCqGQlwm_XM!!~R-A9z>^%1Z^Q2xZgQp#Z*qd#3o(^E1W?Esuzq&9`
zcT>RM5NRq12MbE{G>8`6<}6$aN-swU{Hrof;$i%UgXIm!Nqu-w{^dBQ5#XR5%;N?S
zBXQ>9oQiV{P99g`{G3pV@)?BJ<D{(y8*!tIaDovspq>t#rX5FvF2*?tCy#PHKx?HA
zw%2$APDw>8FsmFl8etj2fjBF0USq_~L^#x-Z!$tN$OCaDPPW~(X5=NpD=rbos4w6w
z!dZ#aJjQ}3z&Y8B=od}|z7FTjIA`=rBP=xHaxRfJ!ic-t2<-@`Tlj{6{;YvNZ;2;~
zZt@o&X4^1>11H<thcQLH*=Hzw@4YrV%Vr$g@7O&yJKKoqY{Pc+ZT6{Q=vB1SIHYew
z$n-fl?Z9j&=3j_&MJvV&LZ-6^AG_OTUuWQz2%EtF976K1#%V|Sv?2NZILncr!=1Ph
z=LzuBmgL`nQ$zY<RE&5t&T+`kHX`1Fb1Ty4890HE2geHKeFx__)c+oY<ll+23H&<@
z{1Cz&z^1$(0-pdj>-Q624f@btl(!$}T%^;k#LwVtLptq9{BxY;zz-s1dB4NS!_?=G
zpjROMy9mkOjq{kr-tPhXApbFh%>N<IxzOKiuZzGZQ2%cuWc~rL%T{1hpIqQkkpDfT
zG5=-2cB6jeAH{TF_I2XxfR7>nYy*!cM*8=ehO-d39Od6(;3>d9$e&^G-wZq#`R_+a
z{@Dn7fK7XT5x5Qbc_aN+ge!oz8}e2G+acf7-vc}f>HlrW4*+ZEPh|!U10S*2>ucmk
z{s#?t&A@Y^-&BOGUmRf@>T{Km{?EWokblgO_W<x#3;$kV4e1+=^hbbCA2G*6o^k+q
zFZi<&QvNRy`oM3t&&$9&kiO3-?^WO)lyCOuH-XE+&wfsO{fX(|H}jtb-V6S@2r2&p
z!V{>!*&pfjdw^9V|K-5rz;D`nG%yePP3FG=cn8We$DiVIt*H+-xWcMCq`F)RrlfjK
zMUzO?>Qq<_)i!Qa{J~l^pfra34XRfOt98MMs?>Yx>x1h(N`0iE-rcCI@u;4L^-3fh
z@OT;(FJPD~%-!e-g@Pe+MErG1y*m&H)+(X;I)6wBdjg(X6`FYc4Sv<*RYD$j9TU9X
zKqTx_>M6R`S0Ai{4v<r?c#~R$YTe9P=Lvb%_`|9v<no5x^&XeM!5d6URJ>u2XB~C+
zHz;BMng(}3%0Nu0fy#x$weAM5;$^`sBcMP#cR=;mqiUY|ut!zAswWUo)LK-)t*RkK
z(x6QP6|IX%-D@}0v4Xx}SZ#n3O4v}-TN?<5J&IfPH2GDk0b3~E4Ixw(IyS-ftOFt&
zf-V-U`hyLM@WLi~vX@0Eu6c{lQmBP1686*~4;#s7yLvY&CtTjf2<#4}!?3gzEyk>E
zK=Y}!h?fe~uVbvsbt%K?`kD<ApkX}9ocZ%+R=G+Fij!0kdluInf9@~q6RDq!xm12z
zzkD{VGcLtPX<UP3$a*9nv;*fbzaLASEame?|7TvVYnaYMPq#@r<MM?+Qz<j}?eHn|
zrJVb+v8bSr$;P0iZ_dU-XY?tXec&LJ#SoL%7=~CZjAMvNastEau%=*$#Z)Q7N{n@e
zSP)EOc!i==GQ{LRi{aJqRSdE4n$Hl5IT>QHu!JF;!U~2Zin5X+oc8SuM=DAkLkw~s
zLoDn946%S}WO%Kjs0;_d*D=IG=?;dNq@oPr47V`E0&pwC!HRM>LoC*|Gn}F*_c4T1
z*})Kt!TTB76lE7fSo$G`Saj}XI89N0%y5XJ>|=<<+M^8f;CmUuc|FY#3&VDXScDv5
zh{eV+hFDlV&(NVL#~IF4l$RM|A$x-1jf(ObLrfB<7-FGxnjt0yjp2CAqYSZFJ<G5N
z*8mLR0DBnTpeVfzuR+73JqMzlZ4A-&OXGj2(GabCrTOrkHHs2@s)tC;*8Ux($Ioju
zsI>MvERk5%`|M$*uWSS)^^F~c|77eNI~tUaWap_q9Ah2COzS)@cnmSSTxYxBam28w
z(z#FY1Y!sAF2O~_<A}ElE+s~dl+LK&a$;Cc>1-4{jkuEdcEOdzbBUdTXAwJzD+SLb
zUO`+Wcs}v%#16quVpga#U+@y*Mq)+q3gRZ>vlkIDb|rC?_>|z=iMJ9T7hFfYow!}F
zk9Y_1KEVOvUBtTtHxln9-Y!@r-bWl2+(g_)+$i`C;&$TO1xJaG5jzEMAwEuADR?XK
z3F0EbcN3o?b_m{1tP$r6zK{4Uu_AZ}aS!p?k6HiwiQ$b<f5E$mc^TMwT<}B0`NZvl
z_Y!j%*11pckBJ?`y9Dne9!I=g@T0^<#8JU*#O1_|f}bX?B)(m6J296Jole0=h@Hfh
zf{zieATAR8Jn`+s4#CHXeZ={KUnXuORs^3QZX!P0%lf}Y93?&__!RM0;^Tr(6K^MO
z7pxKQAl@gqn|K%TF2QGs_Y!Xxe2#b@aa3>*aT{@?;9lZ(;@bstg!_&WI|Xy3`;HS=
z0;ApJD1PU*_?xlQJ<cVIeNSV3=i7=!)ve2XTmHdj*9M}Y&uvdT;3s0!HQW?XBIR9q
z@$;=tTYThc;Dpk5d^d?$xf1DYE5}-{rClBD>wN=)7Q$j3+02IWm1hsf&qL0$hg;Xv
z@3e6p2i`p2^HfnX{O+T^J~RE<!xjx#es})zWi>wK=kPxfyY?WIj92%>jzC7<mUkiF
zmnBI#+Fg=#&PaM0Nw`e0E6cP7SRh{A8#`iSo~MwoHgm0#sP1uUhmj=2jpRAJRx#p#
z1Q<Iqy5(fvmV3e9{1GLEGvlwvPZYoS!TEUg+4vj9C#M_^Pi5|9Ycmqny-ux+LJq}_
z<WG4ovOH0JE}1Zzsu>A4kN=>mV%6Eu(Uv}S5_2y%a(@6T=u8(PS2DMm@H*^iB&fFH
z_AZAMHW#s?`p={e=bYMp5bPpKtLOArZgatsu%FKX^JupqX|1B2Lx8yE?s1qTVb;W|
zoY*FNR$j|QWa|stT3gPttd`Rs_Vqy?Xjro^Y;WCp7CCFQhxC~E&QoBB?|hB_-zaYH
zeS$vny+=OyRs2Ns4*SKG>J{;hPevC;u1*|aPHR%4g)v8G*)J*`EoWh;e5e9FKsog^
zr}p1ia>QFS@IjqePoKK(e9Jj7WU4iZ7AoP?p2NJ=dY~Kh^47<?FZA^-Yu(umgVwaR
zbVGHB((Cj!%&N<mv7KwQ_b`LTj!a0(xE%Z_AR#3=wa*tZ*=8tV3h=`OT{*3fVs^z8
z`8{Y++}`@|^C(z1xuy4Rr~PZ%z6!>~D*Jy%WiFMt*!1?37*u&JQKYR^e7CcW=CJ(_
zvxXn_MRI*n#!W`GpaZmBJACaxA6J0#Py3=6V-$=L$*<9#@9FE)GYmk6j%-S2N9f2t
zVo<w}fxt@YY#){}8Ok2QXzp|PpD$e|savAjo*2no;}0EtD|7L|Q<?EY&4<XoIQx10
zcWN#a-6w+0F^fEXxy*BkoXoR0oB5sESmZSGNU4Tzh;`f18DrC5hWCI`UWe-1uVLBP
z^wW%q+^{y&_a8LJ7&Po2#?eZsdakdX(ZjH$5i9kTF;PsFiRCPM{B^Jl$IhtOg(Ul1
zkPmhkaxhjll4ID~EWk_}cd(+p^T8)G{aZ3qj+x2QA~}lIc8N?)$xOLsCcUIAmXxb#
zu}fsC(ld2r(;T3c)=2NN)>S=lg84Aa68yus_wKRN;0t=AKhO8Za|Z(~t67_=l_5EP
zNEmEnsP6Ud835vF=6@cYnSuU2>SsBC9D?H@`~4sNECAU1gk3;1Hvtsw$W{=rY>bpl
z-}^N3URZL^*3-0oPD}fy%Oxe_C{pgRq^!;G@y;wP--D_V^}<CnN_(3TS(<Xbudmh9
zEu#hFqpcF982z9P?P$`=;hgO8SL462I*Zm@`=WPT)>o(wI%@k&;n7*R&(rGZ`3hW}
z%rWSPd(OgWW*^&4fVn2K?>OcTUk;S*E8{he_SAn<Iqfu5f)2a8b-n>kZ7|H&kxdL$
zOkHBrB_dMj+m8DC?#92qG7UUh2QEhTFj0&Wp?5Cw-S>}3`S2Xv^GGs5t9X85By%OI
zb4XH3qB=jGF9qv<diOC(fp5DrHvJSxMP1)lb_a{Az6BRZnjfn6l|>m*f{4B{@@qAS
z^;IHrZKe@312u~s8Piv`g|Rjx_UkaZUc!-_SWo6=)N}_F?8v4RI`58bDb!NuZf6aR
zmJg$~uG&|l%|%gK4OnZm-58sRRX=|AFl-m=p0<3Mp>kf!7tm*XqV=qll8>Npv5%VT
z8_y1N6N=^ll-d-h7+b)Y$YpHo&AfQ-^U$p$`#6n(L#k<1r<;9f(~)Ob^WG<L!KJ+a
zaMW}BT%!8O*lew@FDE-*edK8M$&91buPR5Y-%whsk2sSix<-n3tj#i{-3F8G5p!jV
zv5n{t#F8V>e{y{jsrLH!b+t$B0Jsvsw-*$~Tx*if)0&fXh89WEcFhkO?V@KHqJ24;
zG(cMjTDQN9cF)u1+}+%LH>$S0rlX|^cBc_KTJA8Y*!0(E7`VVn>NZqnW}DFvk!;P4
zHfmiJeZqlUGDpAvqr^zIcKkakM8qEE|IZ%$Q+A?-RNjwl-)@y+oH98|XQ^~*FTO`t
z*z#iD1MPYHkH?R<J{$lyM;zNesY8@HY{Nv0W=(d6dr%$iw@|Ee3#eB024!2e@|MlM
z^<ebPJGbVN+#6Nb<?TNh>zSlZymMHr=W2CYtmj7cbDg~N9X}uIajT!db8xJuTrKTn
z--`9rsW*0(f!a=a(Xs3uA9Ri}<m>p|&Jk(&jZT|^^Y)7ZvG&ukp1FB<wZb-iV_F`C
z@~ynZtweJv&)&(!qsSMW-+3erJ31dV@NTk~+PbbW)&n}u>>8SeGxm@zc50y0I&^nP
zhsfz#*M=J{Smxv3cEdi|Suo9$nfP}!oBtJ&yEjK2sN;;i4s~EOmr0q6eX~;oXclB{
z%eEnYt5npeZ`TcmKJ>>(G&=ZxT>~tN@2!<}jOjPqaLY&PKX>EDW*psdSE2UaSqxD$
z!w~iISdUE|<~z}WmS2fjxYO^Tv-r-=%T%<J?@CwbD?5Rj`vxvku-y6qQpFA2@r0~4
z^y`6Gca!*;cOa*A)z%vA6xdp;_kz<|gXv<}f0?<4Yu^D~QQaP~%i^Icce_tHhSD1l
zUEH2nwZ+u6xqB-rfF;Flj*-@;jJR}EjO3xxuRE(S(Xf3xvK{as;0498L8>*fYng5!
zl>QPbrt7@O7#+S0RK_siuamkJC#u^MOOM14#$RfFQ^8P;{a$JQkkek|@|Kg4;bS>^
zV{a+(gM)sR*Rl=WQ4|r?WKj0dE8m5=wu&{H2Elt6k97{_+EKpS8T(D$%7sWY+S4cI
zRiKemn`<hQcXv7EGYL(5&*uT0KHa?08m$>@hWg(<1CQ=TORdeU(Vm6y_@TJC2rLpX
z;_p6A7lI2EUls~jti5g8BJb|~NXdJg7f@3{Va)Tw>JX|3$(&yAhUC67-c{6^g_KEm
zJxDAJKFc6O8^s_~8z$+jtM&>CFjV`6l;tqc0ZE{YwHa#%`0l1LsIM`ZUjq@;CNYwA
zhVoMm<!!kPitS<RF7^#bwb=EkBF51%y@P*w`>WgcFlXl*K>93+#u(((BJW7$I<m#p
zqI$kvEc!vrgl#Cj&v1rx*RuXFR<Q8CpTpeIHZ3a?D+u_>ntd5h9>K!=%u_$d|0nsc
zd+Wix{m;gpb!<I$=E+wXp~c`ni`$=UC!-7yk$LI7&2PQ|by9ifAn!g$|Gc=si(sYq
zWCukSpTvE=&w}sCXQliBv#Xjv>cc?T+{rc6ZAKk<RVbN`>6v~;ZtZPco8;{uFgt$X
zjG3#e)pJf3appMY8a}bfUVQS2myt#M^VSpb=gvI&YbnoGQ5E~>ip|}{Cp)TpS;^K7
zql}uzA${wK#M0g~+GdbX9+V6Nw66lpMy?T?UnxHM%nQu3=qAW~@640G6qbw`NVQYu
zGqi8(qDgwHZedBaZSH>Zd10PY5$l+?Tsw`9q3yvxa}jFlpF{nzR;%vK+dsEr>#-*f
zA=?=d+=fdgCH|iG-F+Enu%h1PoE&}5k+=WVCs>eF@+mG|krZn$k5``)EpQ2+x4%5z
z0~7RBpM#>d&2P6U$RK^e`>vR2-!LRULkk&ZIvo4`om)?^wLXZS7txTKx4$$iewN0k
z2|EpAJV7H!nKz+K`m;-yYv25K@yVaj<cUac?5Jt=%WyG;3>VI5gFxl&AG-AzK`$=S
zbff=9WKVNyf55oV8u72yqnYb==_a^;(E8135bX5bj#;QiJKSyf%T2ky(;O=^|0F{Q
z6VFs(c+kRdjttl849m1OkuM#Q*T|+XH$#-S%ASbi)M$&)cDQDyyk**Ak(UoAnd=jI
zzv`3%TVuLfZsD4cEOoFi`&pFwBXAkL9%c3Aa)3v!*iC=Y(!P19Q}-FT-}GJ=FIg@6
z;C_@@b#FZKo;SYgY-{ydr*FiP<h1Y%@*utk=@-1{?C6;EqJvUy=zegBE%mj3al0Ox
zbv47jNDl9LZ8mjiD?}$V#;L|tgF*X7vQ8gh;oH(4$!@z2NOaat!AUuN4ovx4Cxl=&
z(ZT(ks3(F=hgYKw+Q?<fi$b=~@q1)@P?A8II>}9M-!7(olWC;PwB6@mMyPNZnj1Ze
zSAo1uvWL;xoD2>5DL>hV*#~#E2O|YG7Q?0z-$G*RHx*nkPR9)gWrHn#w##MS6S&g6
zCy);<EcXP|iun7@zenLp^B-}y1GmU>TDN5J%6TjyrgpjD&sdv<g|3zboAIJ+K*otK
zTl_q3<>;<Z_X&xm_GS(ZW&IF{sdO&Zs=%+el}rFeea!m9dti-$<!XkS({&kSwDn+Y
zbPZ|ifp^g5OFh9yo>6xW0Q-<G2j+ftMAwz^^KDO)e|TGyWCLzu#!Rz+urus_J9Q7m
zSIKq{LMKBT_GR$ggx+n@Ny_B#NtyO8OqmCNZ;PMEs?JHxHL-5-ft&2oX)}}*|8nq~
zH?6k3iZ<QN+db3i79(Hld=?Sn?`yOtF=fVk#?oks$hpLKdE=+~E#7w;bSN$;`hDJY
zdbc%aCpv_Z_!c?h$0f&jJ!6tz(qMVGt%GN5@giI^(}Vpnk7RGx^6jyXyx7}kc_Vhy
zT-+6YlCqwlcw>FkTDlWuDDlX-^BMVSULsS9nbMK>jl~!l2F!rhK4gm>wBfdF&mGUR
z59nS_=3jkMdxAI3k_I>lnZ+lYv8KyV)G>)N+Cs`UB_4#pswwa1ZTTrUr~ESVcIz}z
zBzmvhacd1{R7j>xb6ayBqlV|3B|$Au+$Hun)cls1FfR6clXS*&dYs(E8+1G_jLWo5
z;@WJjRT%qsRJWG4h`4X+;>r@=OcQtSr;8KD8m$20%!xf&|A;;B@sT4?$;8#8@jw1X
z-s4zs<t`z8?BFR|M#uT=Y5<#hee9wwGU(&_-mXcUk75@yBSSv+0)9^V$H#%*uB*v1
zptrtj1g`Ix-s`RJGOoXR0|(!<jsIoy@8L^PLf@c|;!>ii5&Czm+lD4V>G>$oRI5zX
z`asmWTGU$A8$Xez*%;jDM!6rq4`nJqXGR8o{5~}+`1pNjHBR&sp25BE*LRIFab^S<
z8V+QAdfyKm^z_<3zo{3_#Zd8LTuR41IBL}DIV&?{(srAYN?tvR_If?<@$+f6J8IhQ
zGqFBfB>UrFZ`X~nzD%g<1^L;J8+yAW#nv0_8peddz20EgK+&(af%baAwAcAT@5iN-
z|Czm}iz*jIm2`V0wMp6wN~G)s0DD2DbbAH++Y1Wn_G%D&MS7dx*6nqE&<AlT{ZjVQ
z+g6+p2Uy<YWtA}5!9Us(xzj*oys*tSG2SuF8@U3*|AXVPQyEcD@5MpYy;WU*5PQTg
zL@&G_85CX6o7vR`{~Pa_c2<3B+I#Bj({4~-omQZ}GHsIj;<TI97pB#z&rS2FN2je(
z4>4CDay?}3%~W%E9gC$%XC8bT=nt`C?#u$s`jE3eGF|7qZf}M<bgfNWL+&>*?BeHf
zJ@X}^mw?ERCGGh`87l6>b?ql!o7wdUbZUs)ASs#1pP?<sdZu%?o<BqTIrD$p$PeCN
z<Yt5SI*Q6gfj1ySS6G*)T}j|I{2dj`PzRy7$Hg8}9(3-GjPxdC1b1)E9s^T$mFo8D
znf6Yk#L#lM!Sc=?;TR7488O~>yb@QXw?o$g=yfJCe4B_ec+OOHP1=t5cO#!S<?W^%
zBl+E~Hz>~<<$bs77r0-VoAKMYG_PFLr;Q(3^XV6PzFJOoOW+A>d?Ap=rQiE+z>k-)
z9A9%P_IHSl9l_Nj?{xdNrxK0`JIAT-fmG}x5=;N)dn6URLxkW)D#wcNKq}!*VW-FO
zJ)es8ORR&jCsVOCrV#dD-=9(mQ<0GOcsBdD)AwO2{yGsem)rxNOI9;S7lRD*CBx;Z
zr2l$d1kvd^ePdGbzt!WN5?_*vKZtnThlHpVl2n;W`o5lJrNl2x#ovSYzOq?}_N`3C
zHtB+l<_RJ}dn{Ec_+B_?*1EMcv-l)dp6suA`)w1QzOSW(OcWtGxU9+B{FWgqN>OVe
zDs3%R!{^W1Z*WD(dkrsQfcV(D+CQDfg5$7$e+Bm*douG{evHI}U3OgEf`|-}e$}}b
z^mcC|m(@s&q=93HF2;p0%nFsg@tjQXuvPwNJgnNE<;i>8wv!iy-aQmY1fc9;zUHyi
zqVM7deVvnGTC4^0wp<IMMjMFH&s$m8bc4B$YmbPX4{7yBW4N*K0;-#QfP)=Tcz~0r
z8ZDzUQI)@kCP`F{+QTlMs2Z_{ojOrv+rvJb$l5a+K}R+V=k{vo^jMmPvJ?>wy}RvT
z^6p`GLpu&ea4B<j*fN!pPq#uM*G4HY>YwA`(<$<3mtVx~moY%`s?obylXzABZq_7T
zHEK6&60aJuTV}2*+iq4Rp5@)m%6Q{d4s*)mwIl7e3aiHal-<7j`%l^}%P^bGFq_>l
zTaID2eBEp?W4hfE3)q~kX{O_?WW90!pP23>W+~lt19Z#Hw&|9eZPzU~J4d(N?0nsF
zvqu<XA@*j5H@<LG-s1yI3&Ky!I?K49)8CTwu`-SIT^lLI<<os9G5D%`Te<n6{8e1_
zCgzT4J{Z7`Jjk?fo11^};MRq?+bVOm&d%wKU=q!He8d6TE${K11GHFtK~MkQ{J+{N
z-uOrvw+njo=_IiLRm|}2p$GIPW(@G|p^pTGZcWz*YOr_DN>cwXI{SEdvcI;)cC#+5
zS3JYJTWS+Wy>?4&;;7edsZAX9(*2y#wh1(C@_DO_4O~WzNR5rJ;WoklsaC+Ht?uw}
z+4gCkMEAPh1e!!|oY~37nVoE$*+%31-*-C?;D(pp5?O}VF~&}nF?Onqu>)@;UZ-k=
zS6adwhw=4hKn;v$Kn;v$Kn*O-aLcIl@zvbT8zSQ2b9^yOdA=6Tdxw6D5!JC=o|w1p
zR4}Y-w3|<0SBu2dXeFSrw85Q;#lCMNLycC19A@eWq%QM4B=MsVkBNS{_5dQmpUBJ@
z(E9K>bUV2~p`SGGE135RmZ$oJ7ZY>8KG7k|z3fGNSVHg2@r&jbXK9^OvS%W}ob|FR
z0Y0rG{NHce!?;zS*o4_szaC4!3G$8K{Y7<*U(LDaZ?%SR;!$}2mVu*H{<gLLJRjhD
zWakFw>r}rxgBj(L{ca%o9q#|=Q#E=W*9G)3f6HxCji*4;`(!@NNsQ$7nU)tf+1pV4
zzOM1xF??|69@W6jD{ctkRC><oQx@b@F4i{unoGkzRc`-D|BZD|pu<>dk1u^WWwNI*
z@g|mzSgd{XCHf9Njq8gHEN<`o2XuqxO*#1KrlMX?4j;+o+UA$_4A?p*F<Lz$@YpPI
zH3w^=>{0Ze-Q4}NNAS{@z44`|TdPkvTdPkyxlyVePlSF7uNjvNamj#Pk7ilJSr%Lp
z3e$#*=$z%+KY=i=@Q#_!5Cj`z^Dm)Ie`SWI-+~!&Qx*s8+}zEF{f1xNPnY_}ub^p5
zFBX^DcJYZe?HF#EI+tm`7Uk^Aw7b#kV7Fzh2XIrTZ@Kogo<J`f|ENa$_(j|<|CxBz
z>m&uw8}eFkM?;Anpj<^=lK2jZ#mls2Q)W42`VJw}GVK8JFVj9Jh2ZIdwkjpQM%$GV
z{&O@S>`39;AbhQDnRXtxdzWe5Xkt8u?if%P@~`ihZS#b}c=qv%#M&S*Cnb>jE=Y+C
znIa<<6!!xWw^J8~j4w&DofWOoE>C5vNM_@frXf!4%Sh9k?_qAuOx@$+%(5V-<we!j
z@~rHC%H5W+HFL(yE$xx>UyL7@>lppM4liYv;%;+(%X#&t^nG3Pru;T^Sq-fBA1LOi
zZKBeZBljl|Qw&Yan*wZKv~{$puON~!ckZ_Q=!L23Rd){A@}hcG^g^L}dDk`33oF&U
zt}BfDA<?FbN@TF;-Ia}XEjtcmU<_fGBXn87g-~J@o_4Fb+lE8Tz^(a}N0q6SEzhcs
z=oCf0>Q<+A1-isGC+u&h@Ifrdc2rqeiE0d9=G1y%4nC$osb0SAGKhdu1!O3wtZ`~5
zk$4pMg5c`#fK~6G99jA>E<PW_@KguD0e~sCDPQP(p+^WkLg-OKj{==;w$_b(xCsq$
zo3nq$;HdO+rM2Z_6dP}$X3G~lwc9WN(0dX)8IkeP(JZC7Pv7ry%eKo<oxCmF&vNIL
z(F-@~TdMCIh<dE=dUHFga$VPNqZhuAx8)V`45h^vc6FHcg+adF^#uIQW6`f?;99#z
z`x1*boY1Zhj&iXd*%5mo)5nW(*nN~!`x7p5p#)Uw{5ovg+Hw(jrX0>|sRzQY=;Eqq
zg`#G~Ua*^)@}1ga$xPd7`np!?`nUAuwUi^%95aW_%rU~L#q=Dvpd4wKanL=lWss#r
zb!6uS6iq4bA&k9{(fKEY;EP-nJwPLh8u@E86Jks!8VdV@Avb=u_2F)$r^Z2Z_X?w3
zH{mg5e&Vw=YvF2N`lXmY{#k5C-V6R3&3#<DON}<_H}JxdoY>JJ7>D0`0d`1jdKnD}
zwWFKblsjzEMYfFd)lXEaq%srLFURNDJLbTx;}!^8eOc=q*k>b3I(ipxS}Ls%-*2j>
zU&}RjH|n|-pYLdSh}FW;(Xz{+@R+f+h1$hiw&TB3J0M!y6FUiOw1!upX?1?AeMr28
zlASeL*MCCaRotY5-P4k3ZI<Rmr0f-IDMfLK1LU>t-kdk(g}m0+QFLM_lj0&CBe62x
zvI7{pa{GW~H~G9Nt<*NJ^@q%a$G@WdwwzI0pNoEYV`OgZ0IRT4{X$|V1+bO#w)`u3
zMW=1H0kg}GtD_UGEROe|wv8Sde`5<a_45Yn?DCf)XJSV$c3r8nmyZ~r4vl{Jg~&!z
zZX?RfduH@C@trJZcAu!(CrTs^u-56yzL0l!1$x(|D}npVVvy8cd6*+IRQFATjPb;+
z<Xa$Dx|P{>IT%Cm7e3r;QM3nt!Di}37nEH$5l81p+PdW&Vw}s+lJcBBAsn4-=hnv*
z2t@be%vO^)AXz(X%hxJ=Qn>CT3K~(9*va_j!<;*7v;$~JxU^;Qojr)f{KrB+itl70
zsVajb_Tj}yj$W9zqtaHOr2iTqddHB9g^^+LH&T^8I%~*9lu+?JyNaGOp3kbhs8)4d
z1;^aNBAwc7{O7)H%q)2=SJSFerM@EV6tf;>mh+KcCSzZPiip!O#weKDkPBOMG)S`8
zlb&~zy{k;-mzvfMnDp;rt)1FSxY%NW?dm8lvT_z{V-ce_&?w#C^i9^>EFQb`ZP?b;
z&S!=CCKy?t@$#Z?qP7sa)M$J0-?Gmwir-ntuQ#$qqRc~BfU(8?1)Rn_xdJ829X~h&
z{CXry8~&Uqm8fnze>g+6jk&WcGbf6r%eH4xH_tB4DtbTh^`R1M(#B(Qi}b#BxhHCr
zW7mENL0DKMqvdxBm<wy3Qt(rv*mVByQ*#noeaB;mdt()SczVm*kest*aYbGY9g4ph
zyyYr%#W&0fGEzVA*cu**KL653XtlCo^`(;}c4^qX#xvEi&Q;s!m=+F3LbaZo9n<PO
zVb$LtzZbrF@Sn+z-|g3V))#)w6AFF`*O!73M|~u$I(+W+9!Dq`R2}&7^7??MZjC4G
zP=k(8q`{&3{9!}~*Wf4C*Xkni>u8bqDf#^Y&!5j<+ZZXVSMhV`LddPv$+6+V$`bs{
zTWZ#@#u03A=s((ajIC2{nKkE@nF|)pss>eKP|$$o-^dEw=-_Xl9d1W$upt}_cpR%e
z-eAb%h=lzR<y_!ex7z1dukCM!zdS#F;9cvJ{3Gwj@A|)o_qrhbYtCJNWge5i-N<+R
zugHH2yl4Lk{=cRkm*TbBgZj!#1I8^|;#xjq-jW$rOXe-B9<TQtRo#f@G>>HeS?xhL
z^EiSV8ayFK&?}%e5(;@5)MS&QJL326Y2C44urAeTbyI9IWT(Je0@k|>hN%wx;{S81
z-dSXDnEhq2a@AMnUiFnPCbJ5$5CZ~3pn;vp&+dgW(CG8mh9RfXy&C<@$UkAQyP?hz
zX^=Q5igy~+p$B`Qpl*vf_znN;MGKdVH!!+!^%8byGs2l<Sh%!me)ZBCmvhFFxk_Oq
z9FjK%HAHFyo=8|hfnNU_Lrrw-dUs=u&mHpAIU1m>zrHcxsfX2oH+s}-2P^CA%O{N+
z@9?@YDC-8}1qf;+)Zm!zC~6wpG+6Ptn{>LUJV3ZQ9oDA9x^x)!r{%3nhpQXYQvGQV
z7Bo^zS!_5hF`SlImxkb$EE&CNXiXaOcmwWKj8v~SJXO^AibEM&RMO;7R>2^q5AwkC
z;O!9$JoQr@V{fd}&p@40v%%e%9<yN1eAnVdi<T&G-@E|j)hB+D_bEpXCX!D{`g`=>
zE%0{>{M`co-&=rJ7Js%9+}db4O#c2M-=}A?y@21vzmD?^&WkvQ;{8U~;4Hv-GtPxL
zZ^PMub2H9+aQ+L<M{qua^97u*<2-}&BF>@sP5w1F3vk|yb0N;#a5muFjPo9x|AO-o
zoX_BV0q5&D&)~d>b12@QbPdh|oHyfKi1Rj_4LCRBya(sM;Cuw<GdN$s`8v)sI4|NH
ziuY4pgR=nV%{Uk0ybWgqPSzQhEApNihM&R78yb8aK`uhRn}8-9*KEVaVZ6`fF1)7(
z;oO+b&MN@E?`8->?CO>G{2}1RdL<uo53fE>K<EgBeE%3;Kcnp1X0wytj&L|a2hPiI
zQW0Do2P+Yewh1yXHVFsY;;D8)RKMe&l_F%uLvDpDyN8VWnDjWrO*3-f1u9C^puHBF
zaXfkO-dmIej&7V$5;*uyvZzqFgJz)*TIjbeG=Btb@=vzVD=qYT3;it%{qGjK%R&!@
zQB9d87J8+HZUp@eL(gp%n!h)A(1_;`I!vBdEVO2!FIwo4wiLfr&Zp7iKZSp-C4RF(
zU;SO!7W5%Qw{L+q>v+mSk3`2a<Cj|Kf3VQcTj)%5P?LX(g>JOa4}v!B@VG&bt5B3*
zSa`;xW0`V-7W!VH$0$5L%?|%N@jr!p>Nax}#*ab&2EVy9ZF|CoL=2dy!aHo~I*gQf
zhs56`^tD1)3w@o?UlICxp+iEC6*?jG4MIOCbg|G+3XN?_I9?KZqR?GJmkOPYA1X!_
zybuY;H9}7kx?JdTp>Gu$FL%PRPG}e$$2~$%7yA1`;{{hZo)P*BLcbz(rO;=Do+0!=
zIH9OAQ)pasfUXj{T<BRs-zs#q&_1DO3*9XA9HIY7=($2aD)c;|e<Acjp@+iJMU`8H
z{+!T@g`OdFjnH2bdWp~>q48T290{SnB=kc<>vu-}OX!fq+u?YlN<`@Eh5owG(}li6
z=r0R>r_dXOjtc!<p<_b-htOMueo^SVgzgr4o6rN{+@p%@l~S%3`W}g|6#832e;G9U
z;VXEl;ynhvH4pEg6dqwo>;HeU#7`Vb`Fei~39a)#Vxdo4=*uBDs<SAIgx335t0n&D
zLhF6zl+b#+Uxmphs_5-oF0?Lay@h^QXuZ8&5?XJI%P<*5l~t0VSZF<OgN1(3LjOVN
zb;2}icuMCLLWd>3QRpV2Kg|!AV|f_*S6uk@Wy}LYkHTz{KCT~?czw+Nr_f_W{vU<b
z$1f++sG^TwYq_66yu)Y<#@8Vy=Ssf)u%K4I&<}@d3s;8=XD*#Le^%idzUJ>Hym_y%
zHXJEb*3{OP;66ruBQN9&6uggdsyeP{Lh<<NAqgsqib{%-2T<|k<WYeaDY`?#U!wDu
zjISuFC@z^?fp;Ft%?(}J#J@~hq=C2QaF4;%qSTTvsY6i_w3wJw!Yu0(nalo)%xT(A
zN@Xmzl$s(dic+OpD5KIM>l4~cP6<s3VpS~mOp_J%1w**=VzfuOp1pj0#Z41SCQmA_
z;D1zI=lVoxQ*`zzY>r7~WfRN5shc+0V#P&<Mn#ZWTvDz#TT)Vr&+H1t6jo9OQQkn%
zZFCc(-H}#`R0Z$x#O*7+2c;UloJnF9YkI12i%ZDBP8jesC97PF1`L<uEt-L;(i0~X
zO_*3x;jeeEG4R9^Mx-)Y)H0iJlA)I=+giTaB9q5gh=L~1CloboUku~xnywG}>-0Lp
z&eUznc%`7A(BDuSh}3y_U#<40@W%Sp!9cjc_h*OT>WClj?DkJApQOLIyHLLmhg|&x
zq8|hhE2XFb7GaIi%k_HPxC`fDnHFur8^eXQbsnz~UGERq7Fy$yw*uh_pv3Az(FS+^
zd~VfH%Cn|6439CTxM0$xWG(UPP)JQLOI~#9(c^TwFc}p<)z(j4GOk#hOSrVW&QpuV
z47eJD?Bt9`XSxyQEE%siHQs$13F8K6*cJ9P8VqQ0Hu_3sO(+;?#0^w4ep0FQjt14m
z8@w*v{AS{mNqQ#z-f!*3e#z+lOy{d>FQwFk;z`o=Rx0GUq*ldKL@lQGSFEH&G+U`O
z2E%?8xAj~ciKb>HWujVxXAK^_^iL}nwN}z8^G&q1t~&o3zZz!uhm9td6iq0vxKw;O
z;!&QfHtcE)d1^g)vSa3%I0<QuG^lGe%+Tnr^_WSerIM}TQrXH%kcJogULqT8qnE~N
zp)td#o37s^>VZuC<0n&x3Tq#2O7;?TT%+Tp;_zl#zCag-Q$vwjm3?R;C#dkmNoEr2
zhdA^fw>fK7lvOYaPUuF4a5hb0Lrk4pbx%bXL!-e=E?2F(vC-pNEh6A^*afGIXDT~|
znXCo_!3~~}Fu}W!sd)T^WaFmTB8_;fu)#LLXx<9GU01II{U-E*^I-tjBI*^31HrJY
z^E8GFBMts0j?wiP=Xjfcp=%DGG~oWcKC(WIZ8iEvA?w1S9`=9D<C4NA(N<8mbUd_(
zxD3Z$TxLWUqin{@OhV<#Xh*Su#B*>;EKHe_LMN$5!?K7j(}jFB;;z$6EkhI&CNser
z4dWqt5~Cry+~lS~VA3LyV@-gGm>^mrzIc+EL-)PqW`<M(XEtPkQ<fqomY6vpL}Zy+
zEGc@G#Y8A%QfV@aUTaY|lAfYhT(2KqF&#=~VZ~`)=_Vi~GanZjhAfuGr-5i-f6`!>
zU?k&2#;>u&v!;+E@qWD4*^pDhdLmx5#tW^D_D1`$o@Ryy^r3ahEUc%Q67+hL@p?6-
zgn%`kl?1<3p)sXWiQc%<DB)CBL(zKkN<t{$uTK`Bx33hy_>_f9j9TkGB58~gYo)z-
z`Lro%qEYLK^Z?~9*LtoGSf#YlUtGaX!--^4DSQoH>TPYJiF$QK%i6RAsW06Zvhc0k
z$x`(Si~ivas{=`kPSh(b33$_WZ7RW1V{aWEsD;-V<4Et(()viiE3}PxqsFDEU>H-9
z7ZV?cwA8K?wN3f9iKrf{T+Rv>7nSH$T<6(ns#~h}XMNB#*19ZBSE|=tMhEJF7kMW$
z={;JiqNk)<snqDy(n{WNzl^j2^pTEeCR*}Z`@1*n^#`nl8qIIy)e|jw4Wo#)(Dzd*
zW!B!0E^A3Kx_^ntR9$!<d%&F>o@Ex(sCe~xdZKO|$%xV3sHU>%#(_mSMbRy*KEB~S
zOh+wVyHSrQ6gO-D(;Fj?$=2Vw3wyZMhpR6iI-O9iMmKgvaH1=xmkyU2u_1pD?|I+I
z30C^HEPq`_SuU?Ttg;6(-(<;$;lcO8M`Ze+Xe_G`hlP_c>T=9=bW#x33$?tggB0->
zlZ|O~vObNb^O>`<VyeLx!s}gXvdjUHg8m_sbsb(8U+bevvg$DFz)4tY*cc4>Yt8EE
zYMCiw5ZxXa(wv!@%irMhz#@{_u!_FcV>UddH{y&19&@aTxI=aHSQu8E8O_BVGC;R=
z;tV(>b<-G&08!9PM#jmUzhw!4g@UmLFa%gdCue`tG?>K=KQ@_DKLw$GW3XfSzy-oO
zk!`vymRjrD;Kr&^*12pAqwW<+Yg44v;xhR`F6X*%Dg0ifzTUK`tYTAHll}tS`k+9+
zH&v~V-~$6@GZu4LP$&jLxCBz`@uvT<C$!#EXYGqrxE@QD2-ow{Ma?#>cgY?Msa~=Y
zI{P|*gDJ#py81L*u<^u+r>T}!XK_wYkNu3=QFn{ne)SGE)Ea&rS#&RrVQoqeZAf`>
zq#MnIOFVR8v{Pt9nsPF~up)@3JHSJGqw0Dml?3@X1J{Jog673YGEe^|HhOC+>n9k@
z>k(nGR5ZC}g*J_0*}q|EV|3C~<LlM5T2Wt4Kt=W(cn+GuBHOqGa`h8zIuFx)GMPb$
z-l5>OH*mqJccdwFO6VAvVK%_Knvu!AhjlKZ&4pa4!Oaz(B$&&!Qe%P2*=-IMP}VG|
z$xTm5<<b2&J$u@BFQ(3so{EnTRaH%OjKgQL#yhOnyN=>1Q>GM6EG{jaPp9t~CyB)c
z#RVmf5WY3y4tvJ`J+tKo!QZ&S@K{3*-h?eGE+{HS__q|N6yVl{>Rydd4e22!Or1hc
z_k<di0&L0h6wH`8?<Uo~Mk(;Q@mZUKx{VFUsE7EXOu?FlNCCGH@#`;E;6fVuZNZwL
zsuQcj*k;6-#sFe?+gQ;__)w7ij1JO+yl94W`S0=RAI4D%YSkcjDb?wL$b=&9dVj4_
zAc8TeN>$veQ3>z|>$#0guY%qXf5HE&z{B>+#3|q3Lx|hn$wO|a1Mv<z9;peRd?ybH
z4q)@J83fxr8z<%Q+4nf|0hs9wdGfh39^nWdpNY@K{q-UwFfYp_4<0wjcg&C^e0+x9
z1SP&e;l@E;9()>QKL6&k?>0Q^`X=HihX=Fp<P#=7FDK1s=9PGk-~?^zZ1UG44k9EE
zpSf=bANw-XM;IY-0H?{f1AIHchsTe?ce#a+Pp3>iKFi++K0f28JUm{Kkn%R;WSs`!
z<X(cUNGt?x9;SX<5MlDQfv*jGd`4j&<l`B~Y4Y(KjZqkNn*QifSZQM(_u@49xOd^{
zS^Ay^NyI<O;_)4v<fHvgf$tRfx@kP)a2O$96+u3#B;RHHBEH3Q3BElRzFxd!t#?tX
zEF>k%{Wl9AH+r+tOy6SVd(^^b2cP{@_@1)xanD6Q_<AYGI9Okv?Ks&MtcQF*@>YC1
z2eerg@=%XwjgWkNYiK+8UZ#<Z!(oIkAf#Q)gM72lr`czCP#*ik%Qz{^JZyOE#yuP6
zVaoU&B21cTr2*_~w?vraACboK%Y*5o8x&=iApM`oHw@5P?$hAwz62lnE!9(2sE9!3
zs}Vp2sR#QO`@B`&iWYpM2+ups!z|at){y>)SpUK(><oXRW4&bh7ai**(2wYtR@C?0
z=vZ$pb5Bf`w5UG*^>p1b9OpWgK;d}SF>9gk!O<}WFAk1R9n+KHn@LH`7F6V$s0_2@
zE1vqEARXfYE)I?#9pj-aF+Wp+L*Dg=kmEteY!w{nrwp>>3vsYV66+m<{a8;Q!9e<}
zjz<b+ztk~3Q|ic)9Y$7c_C`G}OTO5d>Q`B^+sVq$StNC2DWg*WR2F)LwViFsfA!Hq
z=Ds6-N5Cq9>DO5#nEd;UeM;oN3F-WL3)%QZv0{X#Ju)zZarc9K_QgoQ1)-Tg6Zzf1
zrhPNeaoK%)4EapwP62-2g_g*`_cXU6RKBH`$MpLE9TxlmaJNMt`YW@&GSFU^s?T<#
z{aGLSBNJ2puYhevdon-Ed(_}(I?GGxpRe#oY39CV*1sz)eb^=KPd^Vf9J%tnN}cA|
z)!V1Ys2|g<0?hQY-%jP{cNK}*6RF=|Huy=K{l^H{KEr|Afw?J;_$pw29fBj3nBTMH
z8;niNy<@Lg@MK`V-``BH0_JNlP0a6AY8Jc<m|rz8(^mtZwO|$4cAx&eP3rp%;9bD%
zN5uC6zih$$P9}f*uFJbzc?g(aNw~(~{|PWZieRQc4b1N)nD|*>epSH4zXpz4Fuxd5
z3Cw+W>~H+OBwy%n@}C3di_aM_o!^(_+tbbT47kLH@cR~e3hF-uxD9xzfj<MBzZ0KI
zGVl$+4vYL^;J_}My~IeL0lW*i%)m>?kMdBsl)s7?FHVgjo%(plZ^8Azd}*q#U%s*t
zc;8<A`=Qh?3S9X^oBdx6`3c}|;4KFJHgMy=rqUk(9{nTi$wbKfKR`I)-)#0l2Il_1
z@}J=Q(MEoGn=xn}W`Di?sZ@VG0{-Jq>)$V>yk7vH1E!xKJ^@^Lz-FIi;8VaSerB`(
zlY!3ytL=DKC))x17l7OL=zBef0}sQLbPV&sI`CtwiE=&g3E&FQ*WoM$)_`eWrq2d`
z{-14j_6z1;1pL|qy8j{e0ylmi<45>&mG!{K9<<qA2IjuSJ08dS)5!miz;$SE?w4f#
z?*p5Ab%$Zc=}&-HqW^L#W;$Q6J^F~vKE=S?<Jfc9W*=eT)4=xq_?ex7KL9rU$1wN{
z?tP4c|I0@DP&7QhlcfT)zJ<Vc?CIsYpY{C$u=RVkOMn~k4KK62F9Tb@kGc++2LrAv
zLLkZ^F9@3Qwg5kh`qT=}RsI1u2kp(7n)TZQJQw_94F3JVD}YZK_!zJc_%UGW`zmk~
z@D2la1K$q&oA$Z@Jnc!F{kY`MRk+Ew9PPi-z@G)4kMg<lVEF|g?uY&8r-`QmZ-xAM
zz$|Y*@D5<whj=CMUf{XXo{I8S;3kyMH0F;1-w#Z`O8jl$Ht=&ECC^WQCp?68t-*f~
z_!!c^Z=}Bn%&&mlW2FBP_yp3;{`mp$66ELnNBM)W2sYO{!*S)72dsgAG0JCo*8=xE
zVYAOP_$LF~9!}-|BGbWNh;;I=1fB)^aOFk$4ZtJ5gY~~rpY_0Y?BO=`*$P|)e>BzL
z-wAB}Uh*Tr<G{a7(((2@;FnQ8sv+{91Lim09t39j?*MZ>gl5F-f4R~J%-8dqco-Dh
z_XF$$H}X4x+tI!?1}+8uG33+U)PFAUeMlc;;1$4gQQlOe{ni2VYcRTeye0wo81kF_
z^Df{O;Qy}VM_&LgI%KmiFzoR|U?0+F80k*{A4mIr#YlgF*dqTmU|#Qm9pfce`8{wG
z@;?X6`kw<HgZ4G;a~U|dTJ-%K@DAX827fv5IMmPNpAS4?ANs3N{&L_^mhrY0_%+mT
z9P-mXO~feg1_N&c&c}E)>;I3y^v?~3Jnp0AClyS4{S^37WBp2ha{!p%{JYKIKLk7<
z<H7VFzXX2mu+4s@QQm97dr=?r`_CT&w?iK@eF&ELBhY_O8~mRE9&OQYJa8NGbA3R6
zQ^9o9uhrmR2yCw39kBS9fbHndX8pKt_ZaezH}Y=+J^^fwhkJode>xmrf&LD#hV<zM
z{||tB49xc9{S7;Qqj0m4{v5FN``fPpt4D11D<nNv`2+AYi~ss>U>mURk8_nQC^`=E
zO#d?i*!sQealirCYmy<4_f77GKSMW?_FW7-7x~TaiF<&#e&i=_*#0W;3Z!obKlM)l
zTfe{kJ>a^ZqJJCw4>7-`KRphdgZh~M>=5ucv`>jq{x5;|{=3c2dnzpNx4;3Uk2BKW
z25v(6#{?_N2f)!s@h&5Sf8Y@GC(QR>H~23D-U@zwJmb~tz}EgZ0oc6W8iqSUGl6%2
z|2gDm{T2h?cUm8R?61p#_adF`$#ft2ciZemM)_X{J^}xB0BO{p`<~mtZ+?G$C-5=g
z*^&<bPHgd4?Z6YTe%NK?e-`*0)(@t?d<}R7?8hrJ%KroK3CR1lA+HB`G}_l3-y?B>
zHUije-y&cQ{2LAa8NfZjW`A)4kFm6u8~8r-4^v(U*!n&8W?<zRoBb7|{`UY|zbC&N
z*!q2V?#<@6s?7F00Bnx8e2ll}fTuxUG^^C_Rp1_r|L6oB2Y<-<j`r^bUIKmL285sc
zx*tM*(;r+8Jl7)c2H<k!zr)C1!E|7=J#PUnviQe3;AxO=+Aj=j9u5%S0QMn2b)i4O
zMl`?58^YLF{E2<Tvfa2gq=waq*9(Tmf)YFyo3&)oV%Pk6HB0b0czuH<enVU^5h-;+
z*P1|ZH8uds-D8(K(uCORxvtrZXDq08&8(g?Zy_?VIQ=1}5?s9&pLQ=O#}~x$L3AUM
zDj6hxn$HJ&LG1Owy=s@M%2KwqJh^FYlqWpZ3umDuLs=8(YUqe>N??`h@sGcJ=Fg?&
z_Bh^Hpnn~nYIy1t{0`l<zLv>+U4Z^56jpPE+#6inp`&mo2;OqAth#2#%!t<&z<1b9
z8k-FiFEkHS^W*kac(l}jFTr#FE3=>&+?n?`;Hj(XTFqy3N*x|Qso1zCfbTtUdFzyF
zd=-A#%xVZv3Jzg+L<)pGYm{K14zDiIH6o3z-(iWw^M!hUP^aaG&Pr`Tae0xl&V!&>
zS--}O9g+d}MuktMUF%hsyO!G)u@BsXoiFl?7oVhehtx<T?Lhu8-T~2w-Fqs&Pfv^o
z$9P(hjB0eNzJij8rON7v7vW?*EG<&_ehH@<Dkv$Ps7Uq043H6)5HiRQ(;HC+9SLA(
z0qn9mvPN$f{L0>CG*~@0XQKJSYGZBVMkVa_%6`HI0{*Oi7M_Qo+3?6jolVFtgv}_P
zdN<zCpx_tr*c7m+rYaH&2Sf9*l~3h^l}I??@ibOenqRXoQtH>$`9szSD1;WV#z2<5
z_JKk{ROx-ChMOX4urGnp`1SpgpcC(~@ZjML%Z3fDe1<+V-3{wz%p~9&2@D3sHS0?Y
zXDpakWiZYDM3<sK4{90k%)nL+vdPcQm$?J}IwJRa{HmX?9Kes(gQ1Oz3%v}Ff{;Q(
zEd<TH7%w5u8h;pFMt>S47PnT^A8ZU*G5V=Hz)e-wNbK-kgZ>i;hSQ>5-bR;igMzJ;
z7z<W@XaS=cV}?4h_p`N}kP}wCc+p6M>b2$oyQg8jHHJG<-D#?My@5#BXXRmSLmrR*
z5(KePaOS*4HO@sfONfkK+`mznWxjuP$PKfB3ucx!Qo<OjwQ0Se9&KzbPpt(rAIDoG
zAp&fR;R2l8B<+#LatBal#?@dXyIimkwgl3)?2`R*vw!LDyKrKhDPGkRNUOIiRh6Ve
zsP(~9eNxUs{Y?=fM|Vcpyp3Y}aeCxs70a<H2R*hPyVRvaLysB!*@IaP)D>I$`eg+Z
z`}_>-r8N4z_`Lc^LqA(VX?T*Q4XXnf0JHqzMtUTe-kl~9PP0C^KCM@=NjPF*Htf{+
z^Su}Q+u>ELDk28Pw#GmnTik36il>*TsYPVNa(^96Zm>9g8^eBde^!oh(&3XM*3|^3
znN}7XM!YgY+QpjP8}@kC^;ZKUbGAPe)`w>QK}KoV?Xx<Fy-%ErWGZ4L2*20QH%)N+
zQ%F_3C@kDhw$ayF%Ox1SRUC11u`fS>{^)XfKcTy~5uUl93~T~vSOY_0T8xP6oaJ0F
z58X(`WC}eZvL7uqjP+VqEn48jk6_3EwPg6Eh5=$Q7O~q|OpNN!bk0&(r&?q3#boGm
z;UTn9vwF9`fvo6DsX<MLhWdo*&G@qoofka*ON^ui*t>@Qyby~I3PMv?EnWh@oz!pv
zW_ZyE&$=-j`<Va*r!`|8oR*;*r14crtl^AWar&2ZW7sQfl}UH($BSR!B<rp5UTm*S
z8|4@YnC8-1(j9IwD-^27+@+g{13P6Un0mf*i8O`qSS3kE?l<Q_7P1%)1DzZ@*Troh
zUR=g}bRbV1W*3F?R=><u!N!d<@wTSWMww+G$QKN&*i(=;l9|z}21NJkOjT$MeNNET
zsjJ-}v)gLy@(TyJXTr?WL@KrNQZ6xJW8?<d|JlO2h1OvOgW(;<{?UfC>Bi+@!(wOB
z{6#Zo%y%uCJsYp&aV?oKbAB~evv3SnwOy#b{^}lUEYvZ^+_E_{WMRNExd=#Nm<9E*
zW<n#QM_OaxuRhU@<%Lz01_wIR>OK)AYZok#LR=JC1+j3Cnl}Dthdf`6cp7TWX)Z0%
zbPnG1Rw`ENB589T<kFX<wG=Is>L2NQwZsaI0l%u7{*z<GD?9D1s?#C3SJR2W<);le
zSa2rZOg4*e+Cd`LK<iz>u!}o(x#+Iz*DZA$%v<D~Pc4vnX@egYm^aISSaZ*qExlZ=
yMQZ<<oD!{i>Edc4VGe*9jg3|4VC<QchF{m!nTrT)Smlq3#5v;{g^ne?ZT<)N&u!EI
literal 0
HcmV?d00001
diff --git a/board/MAI/bios_emulator/scitech/bin-linux/glibc/k_echo b/board/MAI/bios_emulator/scitech/bin-linux/glibc/k_echo
new file mode 100644
index 0000000000000000000000000000000000000000..6f65d4119a12bcc011f6216c0ee6880b21728553
GIT binary patch
literal 11924
zcmeHNeT-aJb-(Lf;{{Co0ZvT_)g-aYE?v*}&dz#q@%Kk@>?C#~LY%zLzIn6r;+c8V
zd2e=YsK|s3Esk+Ysu0@z1DLczRIO5)7DS}V;Ls`xmE2OL`G+c112~OaHByv<Kx}`%
zbKiY)XT45SRq9{8tGoAi?>YC}bI(2ZW8S?F>^r=FXlO{8uu2Up<}NLcj24mZy+u=s
zDy810#?<@O4M>$Dt=Iz(;ss#F)rcdA!-%glg2wo6U`Em?J82Cxg?K$GGP1r}uj!kS
z+5GvDQN}AM9zi9xOZqA#CqO>|8sk@yXC$3%Fph$M^udu)#uW05hL&mgvzbP9Tf=X4
zPo={ko!2yo7TpdUxf4jYBLM%{r*|My_ce&33sQ!+BT}bPM7BX*=?l`80%e$x0@#B1
zB<wwobR*)gA~I}1WPTFyA<)kwy&3UVL<U2@3wZ6PM@HH926dhCkUj?f)o6(I7Z4-l
zBc!Z<4w2zHMADVx%r%3S6GoLz<TwiEY0@kuB3Gk!$8SY7aMt{mA9+Mouj9@6VdQn3
zTBp+V9KTfy5)S1YItqzZzvXm8uZnUCi`!^c{1!^ytbRisIDBaL9w(p9B`8Z}Y3pH$
zL-?=#b%<^uF@<!4@4t(q@C9IoA^hEdlspXUg}zFCS!dNp;X`kOt@a{agF!sV6vjNv
z6oY*mQw;ENrr^8t%ny%UX5D)py!bN=!s0V2=AzY?XOWzF<MMwZxjYNbv-ke|xr=IP
z@<XV(v~?%`lW}P)TdEVj^3oE*R<>9t?UhTCXUlb}`^p8$Q-k_u=AV*0HL0hV{}S>@
zlaTwj`_BCH;>$m|?f4z_D-VIIh=ITTu6hsn@>jt8`sW4$`m(qq1#zldes$fMH_qKQ
za%R(w$e&e9m%dD}SXSLvzDfW4^o8gh^(`p6{Ob_(H>+6<om9_VJo5(RJa_TjJZ<w$
z`WkrG)khwO0#f1as9@;NU9>a+|6Rw<-aC4>yLRzsL!W%_()>t$J$(7{8r1m6;$M#}
zK06A+13#|6ho!ImVreON;hguAd+yU>Q2*F7V^nho|1U*r&kiqLTD<u4#hIn<>tg@U
ziEe0<yk^|?z`B>0AWaXE%vt)=)-WaWoCYmIpfN185j&fd>yDv)9Q}P5@d?DQA$|*y
zG}?xP$dvxK7LmgN=TsaU&et)lPh2ZTJ_R2{T1B4g41M>Vh^)T}k%8+<8STOqu@Wow
z9z?DIzl69Ja*0Qfa!ykLuDMLn%ivkahwcIE{s+>hkO#EF6Do@eT-&OMug85bnC*Qi
z=AJ^@i*e1uEMsJN8nH)!!1cRFfG`eY^aLr@weYts{9_AmfWn4<%EBisJa6GgE&O#0
zziQ#@U`Qh~Z{ZUbZUcWR*7IQtUjRNImw($Tf5F0+E&K}$ZyM>#wB=k2k6(lTeyjYG
zF@FE!ur2U+V%;7EHhp}_!kgf1ru<F||DJ`vXW><FO2a>G;kJd(0~=d?BgSJhN<DA!
zjKi^voWR1rD|m}yxRxFMH|2i@`P6MUR?in>{Er_V5?itS#S#3&Oz5ev0SxM}Ny<}F
zzD@8=g7*o&S@1oAZxP%PyjAd7!M`H-yx^SRZwbx|{=VRX;8z6~1+T_|q9?n)Qok&?
zB;{qnWx=-#o)&ykFbt0Hh~OQ9|48t!3H~d=9~S(A;GKg1UGOf!Yq0S2)Na8y3Em^P
zEO@Wr+Xe3vTo=4w@PmR62>t`X2L(SZ_>kb|1s@T79TvBqx?S)G1m7Wem*8W9?-qPq
za7QptI@nbO-!1q_!GYk{1a}0FVzKS1uHah)e?ssM!M`Q=V}c(LydbzI_;JCDg8y9b
zLxTTa@b3t|BKTp!Yp|gA;#1Wvf*+Ccoq`_~{4rqq+Y9@L)FUze%sQq1Qh0=A!2kc%
zDlg!m){~Q)QXRpX|4%LavW2gQ+@5ApM+IviJ7<-DSFrY(mjvr^e;+oSp3>u67OVx$
zTlfzJ>+$-&U_BP^#s<_=_ezDFU|qLm;qw;$q2QCkw0UD+=Z^{wrMxZpl;CTv17@Av
z0RK88{Q5}rMZue~n+(qDr=?ua*}oOMMdbfTu%5r%JbOydU%TBKP@am%g5_1z<X*{B
zaoSaxZrI6$9XB%@W_I6s=<wdm9FM)*aEi^iVK<}ZTsQByL9^{QylPtEP`y1G%TDCR
zcXT9~$!7D}Bp{cYO2UkC>y?i1=QV$Rd?q`S%TLXyM$no|8EJ*LCav2F{kfJ`P3je`
zdWjC%EVL*jN|?5;syz8Ws63!;sb4W?wc3X>*?#L5iaRZ`uF__zFSIX+U9s#rAS<i~
zohY$HSywNQ&ulB?r%L4+{zum}*Hx`eYxZdlM`?1hFbPg=+GNCX*;u12Wajc^J#2}j
zKA&-g9EIg4A*$90DzTfy;|^L8R8<YSvkgysP=C<NB#BvUdVg?pc{0!m8{Vm;%Q*~S
zSnhb0#&+?<iR?rnKjSwmb8)_qXF<QBrIs1OQmmJeZMSbmWNLgy6f`_nDH_{82jgo^
z=L5g0`v^Nzx9M?}PG|g<+vrw3{+f5Ug{PadK_g7p-*gJjc76Qr_Y38c{_&r2gI3L-
zL#<^3F_Ri7l~$q#o3KlCyEU&8bvqv0w6qCNhZ(o()#Bo&AG#U4OjZcU%U~sd60;f6
zrsGxXl_*xqn{z{~7}L3Qsg(2*Kcyjcu&qYmRvMlz(>Rk9HPE&B?Z?M*vbcoBa@BJ&
zm<^{LaG78^oauuwXMS7{byN?!VWm|KozQE?3>a|^`Uy4H3A$~+1z(Vg6Q!bfM=NsN
zZl~jD^BdxHNmnAtYq_VFk>UNM^OM6$N=@WS;(8|(IabsvH!W(BzFe_<UNk$Q+Ck_?
z{=DaKCK}E1lcHM7o2y(+D~nnu6zsz<8m?3I=lm$7`@=?se0HKdvr>5(<!H}wL#N&G
zT(9aSbqXcW+BB#$3p2DUu4lv*i&Cw%QnkrEX!szrLN(Y%x5jQ^FhlfB>sO*4sI<I%
ziaN~LK6)zg5;$(`IQ=qwsS&@zx0+7Zjp#!KZct&NWJu^A%HTg0vun*v&aeoJ&<B}f
zu{jmSVycy>vK=mlL4%nb$Bj<6J!e)#V9lWmPLGpHr!eFwXaoyhN0_j>kSRAlkqmC1
zt=n!VY!mVD&hTrK?gQ6N=!3<F36>U7FDDBKre)P@hna56KgBsZk9m$Sf*I!kcIbFr
zfPt>XHVfa#urHkIq5pBuk;Y2271S+`LyN8xFYLL=xHyNlSuQ&Xm7Am;#RgK&$tk5U
zWnT&xNnH%fqIgmZ`OR*ns#~2z5eZWy*u^j&ic2hp=(6FaL15CX$gv495ecFt%5x=C
zL$AGMQ=w1b&W0*jl%<J6-qe5)k!7k_6y0Sp5gI8KlPbE`qHcGPqC2kpSE*JzNfmaS
z<`p*qkjhnWK4Fl-r-5i-KQS0K7^zrb`J7eGo<fe4`>nvp$+Mp*7p<E?H6Cw_ANy%4
zwBSQ0lPc_|p#-&BQm(rxEi~+Mb`t#3g?3-1ydGQ`l(6q=Xj%`i5IPONnKYosR~le>
z-@^I0*V-czW902l*TR0&g}B!Rt^j4nndkX{T^gAExfwbQH<D5jYYjdQ+e1{)-4!j}
z0fO|G%NMFdKE5Fv=hqz;{lkUXMq<%|?ywMC%<(?K>T#{=G%MlBcphnwmeB_x^h^_R
zkBjJFh%KpxjgM1WdRIhm`)gYP-D8)_>|idN*Ihj6oi^$gwLj}g({>$e=!&}UGCR-@
z7kf*rKv8?NbVXD8qg0HYT1KfBE~`izKp$~LL$vDJ{$2}fe#34w9{#wlCR%l4qlmTO
z`+dr!?fr0BixRtkUSvj2h(k#wnVyrDX(C(&3=*|*q#|Z}JL*@{#(_n-MR8e<>NuNL
z!(=&b>w=6d!*Rx}#{b=_9lCY=`l`d}1Uc;rE-<*!mAOiX#kjQN2OU2;9iM;YPy*kM
z+j44^Fro*t-jvkC^uQfT)RpbO5Fe{hhJ%wZ>N#T0(TO0O7hL|VgA`dWrs8dMN^hfs
zd}dcxMvY2jtTrWk0HnY_WV5b%QN^uOB{_A-{FKvN-0ybK@LkhAt(KvPL9{*MvmUo@
zzg72O5iw6}6@AuYwV-WUi4S<JG1skhs$8)!t++Fq!yPI>x0A9Ma7t>^#D@S@OvtD>
z#r<2305~YbXMmW)7M<+=#x&T);{|StTR#QCzcJZyeBc4$q{ueQmYhwTg$hoMa?a&w
z#C@MhtWA-&#bxt@T<&#Y5$j&J*)$f79mZ&rtQX+clLCHkh|O-~ozg1<$eb1wib)XW
zA+?FCve4_ydsW*Psc;iVl`hZovizDcY&yY0OO8cWCp7y>zh#7&p=%D<f`ccE_<(8y
zeU`-u>e0`r9d)<lF6(#Da^rO!RrD&2X>Fu;7W%6==<zV&CmviF<J4IgP)_z2b_C^I
z4!n-cH4LHtK_Y|&xM;ug=Eq1<XZaAv-rBEv6@&RbA}m%%lQS!{X@~eWlZ;R7q<z29
z-L$Q!j}sUldJa|&n!%DC{{(WD2{wy|F`w)u5TYFl%k}~foZ6A5xhTOgu){21bv1>F
z@8O(_Vsnry#@syN3BerKitz!JyW0UApzJFB%}rDKb@ckpm3`nIc>4kIRHY8=*|R-0
zhO74Rl>K`*m7AWP&K7dT%waD2sWBnu(z$d#)$tl$CG^Jszq0j#;4K*pmkSd3DKwi)
zXLCsZFUnLJ9|oezEYhf>Q*1{X!H>L7Tcuk;<fV7*KC~^W%&By}65?}8^>hmrbsBY4
zdal(?&ttCpL2Dr6fCjHf&jpbN?FIn9#j3PGEKGoWvjBR)U!o8y|Gm0?wV={&6m&uq
z>qJDM{Yuk!ReClA1zVBypfU^H!5=i6UJGKWxwh+D`~N<$aRgQ&%G(&E_?(;s`B04<
zzf9w*O8Ddr3kWIXO&Ey*M{zYG<?$YQ41Bz!HFTzoysyR8i16`#xeC57A<w#i!h_HF
zinl}fq%C~Bj~;>GKStgJ@-pz2$J{0J9{DNo@h;l5OMMu5bHlr5V%|SL3$PQ|=xq31
zl;Ijmw~KG-BT$0gNjmMrl=%jt;p2VxTJVj<boS5i@z#gB;`&kU+l%1K0GnXi<&BWx
zt3qBCe7|9skdlwFhiLftF6t8aZZyUKjkaU>ZA8Pz`~54Z%zJ+mD2w5<h~%SPM)9hF
z4*+m|lLW)}7)r>8=JZ=A@Zs7i35M?plo&p~w%7tbLnE`nPg;C@EHMT?vkKUJ9CITt
z3%=|%_`YuO@m)e0d|N0e4s4h48;BeW_Ji*x_;%~7z(^#Jhk9IyQ}XfY$OtO&(TfS>
zWB4v2^)rEddof}74uXMvwA1s5lx4y}+^O-6g9%2)KcK*1(oUt6YFPya{s1)2O9s+^
zbQ5@WR{k44Tx$)qd*97U{mTk`<fjjq@VyVf22lP+6!2!3{h)8r=k0!cb^`XYDw=k|
zc2(dy!$SS45A`trbzTeLx}o#B1+EV|udU5>K<D*nnRg?@GNO83Yr3`!-=FBbB=Rmr
z=h+KAA9Ws=bqJhyI?oxb-yQ0__H@o8oyXuIaK7lgo-uqMsPnkQM4<ocyq=ZxbDig?
zVEmIjF8dJZw@ioQmDs%N8I~1I`=O?rS2)a(|9TDL|HFy*>4M?dbB!MjtM@MBw^s(r
z<L=N8!|(!oTu0PvOSFi2mqQP?Ymg2%OM>B7vHi%u4OG79BGZssr?`I@dko<vAlH9+
z3Kr8pg4EPsh58j_jeYszE<*lbET44Vq;uYK&JN+#(r1v~X3@ExwXOUYk?+e}r~U+a
zGhRb@*|buBE?E6}2K*+^_Wus~iKKrU6x)0GP1^e>(9Ih!_WxDn`}(Y3(f-CCY0sa6
z-vndto~7R^450C+4e+OTB5&$%z<6y$K7#+#j_hjzc?L7@w<BMS=f_68O52J2L&%>8
z5BXi>xgW94dgyaM^0Ytmls}I=_2HRdBj}$%{xR^IccH(JyqP~K_`_F_e-iX@;aBP}
zkT?2nRPR#HAaBe64)SLHY{2|^5&0Xf_J4r9{Vw$i@}|A@Xz!=Un~);l!Hs7%T%=!h
zPcGN%ZYK((ZmkA}HeT&I&feok?{E$uI(8h-R`rEqgbzCfP^y75*9c~D;Uxz<r_w!z
z(tQV={derTb)U0)-+@C%P>IdyAMGlbz29@AbXn=wtny1<REp`fpu-=s0lsbG80k2B
zthVj;<UAR-Cp`O(>_tnlvL>U|(7BV2=hg#s%GrDOkzKbQ+M^s#POkXDdG!<9ojc9T
z*sOADZKuAV@H-AiUMR8BliUG*oMk)Y#KD%ISb*cVxV%NxCHQvgx9m#nZ_KQp0oz1*
v5Da~_Q4SnFx_j4Q=ji_Z$Mzj}j_=xicprN1webFT;AbFp?Mq$u{`kKDglLYA
literal 0
HcmV?d00001
diff --git a/board/MAI/bios_emulator/scitech/bin-linux/glibc/k_rm b/board/MAI/bios_emulator/scitech/bin-linux/glibc/k_rm
new file mode 100644
index 0000000000000000000000000000000000000000..7de503024bbda1121f4090bd5d1e9f14f78a2bee
GIT binary patch
literal 38300
zcmeIb4SZD9wKjedCNMx^0)k>i9Y3(37?O}c5NLrAJ}SsaAlNJ1AtW=Lz$7!BIm1T_
zIyj^<3{hHbulHVU`OsVMy|$OOiuhFnQa&uTRINp&6~9kRs#Gba8p;28);?$EOvHQJ
z_y4}Xx4-w-11Ebud#}Cs+H0@9_CDwAIp>z@IWux{ay0wM)%s{e@vSa*Il_?<l~S&G
zw7%L%?PBdhgqp^*@;G>Kwt?oEhtq|#56)9Ok;d~}&^(#OveUI8O~W~7uBP#1eyvEQ
zF9lxuJC~d13#jm+{+iUw^jxrQsloY%%gyrvV4jqVb?|hf688p|o2Lhur=2z?*tl#=
zu;H3uV{>dxaWqt1rqWQf$Tsu(g`iYDLf}u8brQ2JJXqfloRo(L%O8ew5&;hC!9K18
zaX!uhoY&$Ufzv*|Xc5B^UV(Ec&H+~37p!o!6*3r%^D>;&<E1z+!dZ%Q98MmUDnM^#
z4))h53r?^?wijxZ<0>nxK-drGM4XpcanleMTJ$wmXa|EpT!@o>H`R_jOLzg|&N)lG
z9ra}pB{-+p5ms1?aD1;g!m&6nx8lEKg?2E;BJ%ABM|hq^Uu=bLgp(cV13`N%e6=H<
zB+TS5KG-+*;Q_&Z4Ps2O-`IaF`@uV0Zr05>_TLk?yWH#}rn3*Hyy<e&rUq%}Y1Gef
zq;E#Z^qDyGf!R;Ye?87%tIK@?A=7EWN4B`!D=oYjVG#V!ASC}XoZZ0G9r+t^&O!c=
zg~JGsAf37-|7x7wD35w4UWc<2{PWRJ;snmo;Ag!ok8%!2``C9(--`1d@XxmJKOy8n
z`yu~!oTH(i+Yyrg-*IjM|J@eeh44XOyS#^ij|1E7f1DWgQ=cqvAI`-{r{0O#?gx=h
zJrn;L=Oo}A2w7h{P9C;AAAp|a(0>>3I+VwH$=`!>4&=4_&jmdkM|<x?Jj>4q4g&i?
zlmC3+Ex@)s7XuHs+C%=!fky+=FA!e?d<6V6EL;ve3H4F$EbmLeiy{A1E4_;8;J*hU
z)2~C=4Q%Uc9`F;uN38T(gmZw|FXUeaoR9Kt`Bo4k{ZCf;Ujyz$|5sRe4e)e_er^FC
zj{G~U^1cZ?2l8EuknOo0;SsctzJm3AA9x+gKLncT_Yphze+b-(^tD#{Pl4|{Xpe_N
zZ6EMG;Lk(I{4XF}41T*mUIN~NblMH;dlk4F_1pIRHt=ZhhpqJYfjhx(=l>J%6X2hP
zkmdIvJdXC;_Li3m{UF`2@?Qu%3E0;6rNBJs^O*l?;CoP?J^nPGZ+TOw*%vkHB8JbW
zVM=P^R5XrMy`rK<q&~b>YYf#JK`k6<Y&HT~)MyCB46VuE)D&9f*P3F@O?6>yx!>?N
zuhL@Cpx+<X0)SDnFn8D=iG(8Lh&4870e>i<HPr=!p?WRimm(rf4UG{k>JR$s4M-Je
zY;H9C0i@P7Fd+~K#-h5`#A@pGrceXqL77cjAT3d(zK%H?{1N~1#;D<s_yUo-Ccm$-
zIS@*hNXZ+UwP@q==DMJij+jU@MPxhcqW=1(uojKh*EI)NMNor`bwQ)C39a-uMg4|m
z)T0%3h7r*u7GgA0!iJbApni1&Td9YlMl)*HqLzGt`d}#P*Xj)annr_CKp|RSbp)-1
zaBI*36dsYyAs?$W8bi&R@Io0XIl!tk-|TtlE;Payi~1XohdpI=U{f91CR~AV49bVN
zQK(z07A@8{qYsUG#7hI3Rx;M-JDbLoymn6nwLrx0*JjR{J*~=DR$Q8<N@!kKd;CxT
z`h14tvoXEPaP`XL!djy@4>3#PIwXh7GC4g62Q@ZgnbSurvBm)Naveh+9xB}>>5@<Q
zbG2(N{!LiZ^~HGO{FjG?1^rAO1}^<^-bENkue;p+`fJ)YhM2(aV~B;q0}L_X9%P6K
za~DG_5*}g*$F_&z6pU+zSRAx5#KL4hLo5UiF~q{)2*aV8c9bCo?+XmEa5%;g4&pe&
zGEF<d@O({slVPEznGCVG>tu*U)JcX|B%Wf3hITQ81MFtVi3siNhsB?Z;Q*{x8DgQ9
z&k&2WB8G4%Ll{DV!x*~YXBk4n9)`oPwqQ63YjuWLz>H>yg<1(iOlai{;kYUpVo^AW
zAr>H07-FF@o#Ca>FGEc5a~NKxX<mlYG;IMxEM{+HcoqCCLrhdl8G1CWfgvUao#80V
zdknE)4Kpm!G=m`)%4-;6A-s;^C7Kpzh<@J45PiQe`BseywP-hOc>0rtSW`UCSywai
z%%7n4<Y{vr8gKp!G@M$}efVjur{XSXvS-BI_)Er~5wr}QWc!I893yBUI@8*Z3Z|v#
zG`aRR!L%418r0f%38v-f9^!3+X+io(;;n*dNjh4jwZ{e1qI76bYYz*iW$9ChmkOqZ
z>9dHvf@x{Gmw1X`TAY3(afx7Bp1zdWBbXMbvq9}ef@z6*m{=1`i`3T;pFD$z5wuJ_
zPJBWzEmYq`d{i(kRo_b7CYTnh-%Y$rFfCW#M!ZchEm(hmc&lJqvc8KrE|?ar?;#Eg
zre*7G#7hNh=vn;`u~)E*_$cud!L)e&7;%YUTE2dQ*dv%DKsSkt1al<lCy6z|91(gK
z@ySowevS+s-U#g%>>=i*VEa+QR}dEww+ZHm(T5T563mgKdx*CQ<_OY95^ojEk))Rp
z#|3jl>6OG`!5mro6yl|Vrx0@q(e4#Io!Cn}MKDL4ej{;-V2(U}DX~W|N1(0~7YXJ_
z)WgJ@V2((gOR@Ho-E2QcrXD9gA$TeACgP)l8;G|Ow+ZHm)$b<WC72^u-$uMmFh{Wd
z0P$AA9Lf4F;<#XrXnhZHSTIMn-bTDsaGdxMu~+a$;-kb<fYEPS=^y?v`C8)5F7JZ*
z`Z}!d^etFq-B7D<y3^%0KS3i;ZOuC1BNCH!+!WAal^uo2)2&`ta%cl^O6xhgokXHi
zi?#3J+P<aD7@)6%Nt*Lf(7`-rL*3fpr<12q&f%w9SJCI};W`eyh58&!Fe<|zKk4bQ
z(+@xGkO2Jp1CZ0a1x2pV%u3iH;x=@8;G!1Q)*Ng(iI^f(ld5)mTU$<oE!kqCwO+Fu
zDT)2=)OvSmTlb?Jz#sf5@#ix}Vaj4y<c8DR?@CqYd+jJU@}m^wOt!qqQtX7WaMa0`
zPDCa47bUuS3OC+~N?RYMV<_C+%Aoaz=h!zI+BTu(xmZQv?%JG0SI(-@03!i%3wP%o
zLR&`d6ShQG?y5mZDnL>nBpsHdmgfpL4r0kSJcqQx!re1+TD>G)EP<&Xq6%s3y(b|}
zjXCsln%Td`T!mQ?4Xmv(OGI#YVse;$S-5c%3OU_!3R!cFTT;?4ulWhuNM+QTd%>RE
zm)M_=iihjJfMhjhi>jxkEp}09Tl;^Z0Q4u>Ys?kY7uek`&lzvjnAc%aMYYhwi>Yia
z{sGgltwlGrcvo9TRbq0GLK#DpKo=MTS7<fnk01<6tTF%eF?H@rm&88snjd08U{#4i
z3U?o+YN8bJNiy^p`F5*Dpde9r>-{ev<)(l1!NSCbO0Zaf4JFpQb7Fbsx6t(@3vd4z
zlVfX3H+9f*>d!QYZZWHqpwZw&n=9FJRK>I5EuD&n4a4+6>%WA;Qo_<xV#XM+loKmD
zn8&u#O4{S7WvhPF$@&!s>(GOF>?>hiNP%`ElcqoK<o|+$|AI`>j-0$s(tqpB^ET9J
zi!;c)2aRk$O?!I?D+Tbr?Bsnc!&}%=2QK}0ndGp`l=@q`&}8;~TVV??%lAP0J?+#u
z?L$(%GD)=F+YQbdvjKl80gS6~<8!Dq`D$i>e)MZw^T)wvYyKGNhdH2ItGkmeFQ_C@
z_z6W*(v~+t$JY%!Gaz<uc9{pJ4?F`|SR_U?OY_#Iq!?K5NUY6P;GZ3nYGIjP^DeBt
z68lGHXCos_Q5d3NuxLBaQpl9pKiq1z+5aQeR2Q2{uVN=?D4=JqJ0V8mf_ZlsTU(7Q
zQ5+2pGSb!%(6qd*OS)^)=Ja(`s)Ud<B+%r%=G#~ainPuG$OyGVIW^|b!I0+OgDA-9
z5P_C|$28b^X<O_4`%$C}6pWLaJzql~rIxsV8JBe+$4*UR@|54xk+j5-wnEcSz%I;h
zbfL9R!xR#q^u!8u?GWO|!%w4m7||;Rujr@q>P7yT-#bkShQSHMifT*`kjl^(84l*L
zbXX9m=@zwp76`0@PxfFbo}=v~j2C<be~V;vr)7h0ObunOQTz73o;!c<iQMGA4g1JG
zKW`5Hdd)jgS&tNK&pF7`Q@}iD$;mwP^O)ajeib?GJW{JQw<S8=bR?4(VD^Jjeh<;j
z-_RLNZeUF8$`!f#SgPYj7{pG-QA=ogfj))NgD^}*OFb1#6jkNoQVcWRsy`_c8kYDt
z&Hg&d2Rjrw0IPDzF=#~}z+5VKfM!lTOD5jpQJM1XOpYGO*UbF0WLlHXRA6UPHT7Xl
z1)BNWQ=b)&H^)%Z!91!1wALEyu5De?RipEo)Lei+sp_u4&Q0)dskz<ppBDv^1)BkC
zYgXi%6-Z9*6NZgssO}Ez{3eJ4xxYLxEr&Mq)D}RxjFBk&!~cA$6R`VHw}5!TK=f4n
zU|t-NtQ$ihSC3N3$I-r>?susB{Fb)$=Sj*2rtEX1tjN*%WC5BVjaZ^?_&r9M7c!!c
zx!^;%A%CYmKK4vOEtVbZK|k8`q8f~u<jcw5W;wST;GoX!8DsQ6;QGRt1JlpV(OUgo
zH(^SWH4^M_XBbMeZEQOM=F!}qqdhS!)*x(81+UM|LI|-U#~cZfFdnxD6<=SkIRNUz
zQ~(T7Y*{eHG9orcFGBnEeEjLD&=F-G#0C6LCW=yGuF|%S5`DqHAZ79ga92ag1gVlm
zsiDk;>5n8!NmUmmi=<*TpKhPUQo4GKTN0C(g4B#vJr&(=qq^$raB*w?5SG$Yp|Sol
zMD$dU-~1=U>TTd!k!!_#2lXcQU(r+H0_zHw75iUkuc~2xK2}aQqotjH<SLV;pkPo^
zsiV!E-Wn=xE0or{WLJ&31yz|fV68E?(-kjy@bJ^nU7~Z+qFPJj!j><?W^|EydPc|(
zP`T*GDA50%2D1TG%UEJ-N;8ay!I&yw8xyY;CJW|3wu5<IDg%c!(`rr$WNBT$|7UD@
z_oKL(p?!FN+<){`s(Sy3JhP`KKQCFm|3LLCIR~m=)(%v^s<l?{_oh`8k?K7w`dFoX
z8!Fo=>dF;mThS9m>>;q90{y2H`<atU>|^ZTB>=kquhhKxTAD62f0L$j%)@EgZ9WMa
z{i3oAG=G#%>TB)*t@JOW-Ty>pjkN_$TZCo$8t9!$IM}kzq7suAQ!#LXZItaCF2DA>
ztd78Xtd6t&lK7(@<dWI^!~aYTWp5|HW1xt{{rr2$-gom-Eu;$n({*R7RO98WS0lzU
z#cN&(*^>J(|9+pV#N^S|`-9--h-2TUWzY^ohRs+FWn?I9;azm|B?#8O5fta=&3SQ*
zzD;}Muidh#faC*lV`bs)y@{@I#@Jg1CAuy$CMCMAGQQZ(CpF2_iLN^1>RSdRx+;zG
zcG^~=tHHRcy#kcX_wf<5j*r@}u*z5X{q`YQ_|<kUtXMy;6Ig4a?af5jtisz`p_`s7
zTFN23S|7#>Sf0E61tgGP;iC5aS=iJ5kcGFCz1-Dtv9<nFIJe`RES$5GY>5;7yw0I}
zTnr+=W96RVD6Kt?KU*#R<Ru{FW4GeZfjs`zq}&JcjeZK}Jm4|<#S55}J71rX89<v*
z=H|SOh~Fd)wc6Wpr6mviG23q$_{T~DtUT|ihqaWp*?x0Rf2)17)_!Wo(H(b;F=xDo
zA&PDoXq=bmav6j48=pbX@A`wd)0f`Im^e8*S2Hg`1Wci);zqPw?^lbpli7h(aRcif
zmDPs2o=tSF5kJ#}a$1*csxhyCRISwyfYV!p>0%)&RJjJ5he1!QZi~5P@z7DQRgbgw
z9f&S%OD)-G%etX+6B>Xe#deO7)-^dvF;tA?bHuLOt9V6#{ymtt4ITu%pg1;2wZ^v9
zDg~kTe(BohS))VGL1QchUXX54X{x#{wQzrOZ}RyKukmqP;tg%XpE>Qt&TDxkHh2U_
zZ{l?=xwrqX3tKkB97PZjO$KEbz4C3CYoBI|!l-s9<K@C&{V@FmV;@smjv~>%-VpU_
zkjQIpu|+N1Qpxg}gs#2)Y5=dU)Emb-7HpRI?{>hW-`|O@%dIg#Md8VPNpTTaBw)mE
zIZ78&-R0H$po014)tL%*Bc<>WB$?NOLPw*bjr-6<lnnbaPoU(UiYX+2Bcx2a&w#|j
zAj%-e3^K?y{gTeMnqSC>Rw#9OEJ1T5fn}`7S<zR|{{@%}(s5=4MNpd5P_`MuPuN$u
z@mvVDlf64%@0;nd<!Gf<=tw%IKj2T{?&`Lk%-Q}bkeVgY8U4NH;diBR2lK?$qItT9
zRqwzmR4&sjXGnJ~>kn%M3-9|yEG+g+>XVBV1lRk!avs}{h537r{~UiG<Dbq=dkc3T
zP8{}ZI`rOSFEheSz<rjsJ=R7>86Z;T+4F9A?Nx}A$vYEycX@i}t*uGLu+n?%Ad4)0
z1^1*c0pDYXrT)G%sy2MmgMn~!JJ(SEXte>OMrAsrGCf6Z^Br8674GgkBl+=rcCL<A
z|0!9-+2fdNc-}2~<<S?AMf~%oW65XUd+aw-pKD@O;*;}l?ks)fV0AYe*}8g|)$$}t
z-*hasu=_ppW{{8Vl?;8&uK~<Jt|2$SSo+G(o@JhS*PzS~-h1p<!jdx;scx3}GwQc>
z-Z+)2G%TsEn>!ynBFr-<CJs(oWWEW*Fn8jQy$H4C&!_xYt5tUw?w&Pq)1k-qA=`UW
z@E%+;X~_=)@9)Za4=d`;-tqBgJcYYoev}nSBOm9|6-kM<%4GE^ks?)ns&IE@vI{Ec
zsXhfkT{pk8M?(g&g~0owrd@-O{4;9EQq$9kH*VQ<jJ@?y^0X9<QVVyN_eq|l@~Ogh
zOBs(+2~y`ZsFVKe?De{Dey8-6r>OE&tUGbQ*7~`)h((5v-!uDzD%^d}rb7h0%b=A0
zTPb^z*L(}(!VKe2tKYQO?P4aWCHbx2oP>hC`clk7HD*5<F}yw~&>J{bzWa_0Axu2i
z3d7s&mOBT7L57%Os5SRU`C^E?Mz(#q9iqM^?o=$l#+-+~!!<L@t2MtX<rPVVQr-wv
zUTZ>$RVQ5GbgcvQ7S`JHHX9?Ap{||+4)ECd+vzV_+HO9_t9(YxZH_}u8N;?5iOwRs
z>49YIgFtf0$=2$VUVX@d^t6zRJc#c?`o{qnI}DRvw1378oxmDZbg9<<oO#dI=AKwS
zmf+?-aElCk#=yv|acXkaVA1+_*rw~yCfr`k+p_~m_{|gWc3yoO{qQxS0^BbrxCbj<
z{ik44@CN8?4-@S2;wW3+_7*r_lq67g`{jX+?t!Ar$CyUSPTOukjS%5nbT=%DSAo1O
zwv*9$oD8k<Gk&rMGbo<O3_uF{K@^)wd>x6c-^88Pp2@i3psjW#Pj>k1djc2O_XMUx
z3dcPGV`B2d4R4@wZNuBR+rc}ItsDFB%6SAKrgpjD&sot23te;3TQEmlboI?S*5OK?
z#?2dL6v`*07P>cZXlSbjqL?Y(`Q~llSA8WDfYlzm{qP=GV_><OW8`<7i!%0fVQh2^
z+|vc`pvsqaf{#4IZs`m5fgK*q{l<`v3zDbzJVE}!d)7!c;5E#cYug8n;jK3__fYgU
z_WMrAWJyC?2G7@E2@aX0P7a@pYH!2rx%UlM@>rkh{LEaF=oBBg-YrI(qh<IPaXz+g
zT5Wt8eY%~udnVH@#=hQu7!l&{Yh;a*>>5F(rDCU2-{p;;4X^XQQ~!NQLGgd%U8nb3
z^Y4X0XsK_JBY9MEj8YlX{E`OE!)@(-&y_5}H8VZf+l3^%I~HwC94t({bF%c62~V$|
zm8|Z1jAcE_;;r>jYx%vXLrca^oz5x3lZ#xbX2QY3TjyhBSTF}(d!H+@*HtxfN!Pj~
zv;pPiWd2o?+M~Q_mR7(kD6{mH4Or9VXvP((3hF}YwoBZL0;?u`Sh(@W;GFQQ*gLJ0
zM3DF$a>uPTnln){t)JDJ|1c#yy+IO;%G7P5k9`|n7ZoN&f3K0wc}B&_O}zd`lfqbQ
zuE+Wf3$WHIjQw@ht>rCJ+&5Km6{&A#6?ezy7blE0W-*GhC-!vvWA4I7hTercLaB@H
z!QbSog^ystRqz7oLwirSat@x(`#FHixIA&j73=?LQ+LNW&PRzexv_zt1^~Y(_VH=3
zyW=9V^zCly7=r6NrgsOLI;`uj?%>|nT%&%q;SKmw)X>xalcdyWO9cB)bh^+bsC_Fc
zw8g3ru|5*9E)ubpbSIBxNp=MuPN3dTKZGz7LFdN$efl9KEB^FDNHtRA6P^LxA2xLi
zvvF<=7!vkld%8ai?)7)Ou3p~_=VFO?CMmV!9vmfV^`Dd(GOfGyX(2DVoBH~F;UlNB
zba%kk-4_x)u2|luq3({W5<R&PH30IGPn)|tB*oPo>KMd?0o{R6M?aCTyP5iW*4EeQ
z{vRf#mj6j#lSPy>B1*Qt($b{$1tBu}0)W0CQntQAz4ZkFmA;xqU$O2D?<jqp?*CCz
zYCoI4RNsp8;Q%Xqq@oQf+xxaFRqzCeoM$(?#wHI=3dGLG@c-y&;zUl|-+iWkb$3<A
zTcVHT$MKIpjP;Mt?auA!fd5T)O*(13KIsGF_mi$PUY=BJyf|r`@!X^@8P85?FrJy@
zHx5i%ZtP>OVC-^~`9Q9bk4uy9U@6jG2;T<!&sZ_H_W{lJkh3W^S#e(WK#p<F3YWQ@
z+^=ESB~Rme=Bq@{1Cbv~+SB`T4BUt7*iF15x8p~UsX2C~q~s!hj=2cynfC1}e~$Tc
z=D*X*58hDhOBU~CEUEw%UWp7HQB|IK0YSj>cN8qg=#T0i5q(H~khwE9G?0=J+_@?5
zKB%&zT<NQ8(jQ`FmXw1nmOtzij=|8M6%+VFK;o)YKXlB6T<^sOZ<eAgp7*Lc#%)FX
z`?0I-^0u=aEBXD7S6QAjD)4^CFL1xKAm^o|bgx|0XN@0O^Qk+w`Wu|;HvJyAAN3DF
zTK92h{*KpktVho|l8!A!Y+^sI9(ku*FUlkg6LyYM{gO;<uEf&6>BX7Y&f_cuH&QuP
z^vRio=aJAOV_u(=iG5OHw~_azOzaQrLTJDGicG@oNGN<HkM`}=*Jk2ZNim1WeOo4W
zsVW8;j!1^@W|FE^L3Dav{k}~6H7fq7#Q!7{KQvv`F-dC6Bz^pf$aGxdpUuR-j`*I6
z{fO3&XJU^aR`kQ`a{YZInC+@g8MG%{aL#OXYk6+zE4YtAdoA4U8tc_R&J=Q+6q1k2
zn!=l3w|ZLpC5rkUippAx)o}lW`P)yp##PTfb@s0L&sYy7pH}x*aR0L_x3J|wjGnz6
zZd~1hhz%6GYJULq)<CL&%}5QUf)o4BB!#flis>Sd%+Cc68}L8zuxbA-PvIl3dwEe9
z*vaCE0JNRVw_yaO=sELIPy2YN7Hh%6jhBMJ_0y;7Ru(plVXouaBj(0MR%RjgESj5s
zfP-Cscz~0t8ZM(VRaLZ;DoIrh+es5oRSnrmqfS-1cG8AZeRkf1;9wpr=g$Km)5BR3
z%2Grm3~cAqrNB;_8~Tw?m(HfHgRWey?DMsdD%i+Upw$14hfk--W1a_BCJrK5HGDf;
zlB_D)&Xy#rhHYm{l2t>t%gj~f+RmmV`vkVLF@a>2$DZ<d9Ywt@!K$$+qqpzA@mam~
zvDD_W)aJI-mT#%8NU05K%+_0KF1xceOLe@JtUCAqit1kJwpG_xX>Nu~X>NvFX>LZo
z(%g(9rMVeHtg(=IEhmt?epulneQgcGPs=*Xx}VcqlXI{#P4rwEE63&2p<@_))!o=t
zfcuZX#Z_-=){qT*gV;BNGTobJ6`k3;>H31rQ}Q>>$ZwBf5-ogW$dlAt;UoD^Qe(-v
zUA?XOf3;Tv$)PfC=XR;-BsCXJ%n9tI2Mna9_6_W$j|2s?rt1SWAh7c|ss9_sJ_?>p
z8T((}W82vlwkw$v*e<O}qFvjiHA%E<yR;^Wb}2t+^=%4Wn||IZV*{5_Lo#FI>$pwu
zzpEE;X{#I_F55oOlPIqnNTEwq=gdfV&Wv>D%&<D=|GeAzK5lrap6FwF9c%1VS!1Wl
z8awbt;&rNq1f(YdNhn`+16p8p16p8p16ttdhU<o9kFO1#ydfeUK40&HDNoPiyw?|_
zD0y&^JTY&*SHrNbF(bd}=}|E?W&kvnHn=k}Uq2TaYE0wBOzJG8*6LSC{9?poeqLlg
zk4W&Ra&!8&-hT>aCl@I6llFZD`(DAKj7<cv(&}Xs2W7dJH;)fX=$$!!(cR)Kos&x5
zG$h!wUfvXd&ohMo^L_g?Zq=vOV>VUSW7#)BZpFIqFKA=(BF;U3t1WyDdun?33>>ZY
zw=MP6kebUopIYZ+?Cw1*2+!Il{a|;v|D&dASRK~|^f7<SeN+7>%lc$K%})*G_L-LF
z*1Pwh`8^$@wqp3;&OMren^)Wr!m0EWw)@S^pEBQk{5dWSdkne#C-$4@98HI@(4AcP
zLPlkezs&JHWWM>#QTh%(jq8c^!zR;j!wfd8&&N+RG~;q|=p+}JKl!!FfURQ^V{S(T
z9-E~u;$TfxJOumM&fPyd1uuLdkX-m?YxOa2YxSF6Zj@@n6QLi&YbGT_QZis)uU*$*
z)&+-!%FG#3bp9gqcOa}QyhHXg1i{wW{7Y!tU)iDUx1dJcl*Iu(Z|LO1e#@_pqe~t8
zD@fYH-H+zhm)KC3c?fsZu}}8`YIwi9*4zTCLws%PlenqVv&hs`0=;bVlNz%Wiq*d?
zUNs=?!SjZ~7TnR$5>K*R%~+874vG1-=Ff!zWmck0eHt>=nty}@wdNP45<ESy^zCNx
zHRcOQv<mN^DSR^uU*W1XPvh=(t=Wk##zXLfeH$W;s}9a^`6E$0`*=}exj)&fDz)X^
zkSTIEL`T=)ru;+}_X8>JUR4}2o}bBBV}2!*?Ur;lZfP3mHE&0n>c0EA5i@g-3w5UE
zVlS%UYB?<Xp9(hTY|5QFZDU*P^jDHcWqhmqI=qxwh`Y^2EvJoZviEh(p72uS+!|=_
zBUE$1HCF4$m-`cli9r(krU3gFeH~xZQyj~gHEVNG{Nrnl3vU^?@j2td_{U?6^Exh$
zf4tZz>^R@L9}-`4MvDy)xjXW(uBG9i42&V{a)c~%xe!V%!P9P|VDn%U({EGJlmpte
zQ(6uip7;dKxbOzAc|J^HvzLa#!uzu#*8y$u6f|Q%t=H^=I*``#igDiNb5R6@Dkekm
zlp3%33K9?CUXXgKpzM<)OAX`F(+Lbuqc0o)m=f!Ygf0?#h|oiX9wziK(AjEhUE713
z&?xTayr&o(5G&VOTRug#$rehsXuj9n@vK-+>Rv|Vd~%?VR@$TXyIi;VTr{U}Blol1
zazXs#s|q*1PqH7{v8v;>t!&C=9WTW{{&L~Q7nyJlHGX}^L0i92$TvD3g}-??{*4@5
zYuA`xW!07w+V;@_F7{)0C!WpKc`**X5AΜvyG9z@Xc|0o}H?oI#!mPZzc{0k!lP
zrB(5Xn$aimtlQ31<TW2oXWCrT)3I2|-_ldqQi)76?Hn#U#}KcXP&uwcJ<>5FA$ws<
ze@BhR(Dsi}HB0#bVdB}G_IDA2FLrVKNh(pqC|Z$=jmJP<bd=Y;8s#QWw%*@~n9MlX
z(0QZPuj}!cvM6;)%?h~M^M5I-PhL{ndhY|^uQBhJ7_8fdVWo%XnTZ1fF%EzA3+N%U
z>18P(#E!4uqpfqr=ecrDS3f$%AeEb{ejz#2eQ+k+I-b$7*K1p6LO)L)fl_bdO-rry
z{(EfE)V17(&ajfL^z^}&`;f-G2V1sT6dp6Swotlc%U1mLnmJ0w)V+i?W;0fjn4J=B
z1CuQ*8JoT@p}b4DNe6qPB@;Hw{KqpWf_ueU`1|kFljL>o-kd$**}~S}qw3VXOiD`e
z7>QGoEq4P$)~p|!eDv$t6Iv;4Ve7v$6CVGH@SF38ZF(mD=c{6~5>K)Ti;XX*?qvb&
z<-(2sL0*w*v#aln%A>~cR4c3F{in^t&q=<z@fG~~1WYq3pO3wlIB=%p0>xfAq_1&K
z{Lf#Gt+mSyqt3#g4Zk>fFYB4nBVzW55UD5G>fWu}G7;8w_D10TvM9v<DGgiqZ0sE6
zoBCVhiJQkaqFga6yYKQbhTt!B+-uRyw-2$K_=5`0^KCIt`%vn-<rHGPwdhHCPM;Ev
zcJ?!VV}k-=ew^8AQcp_OgRVs@G(IU@`3VaeQj@xu@f)7z+*xDhi21o|llOKZ7W3a>
zRQgHsURIK6GMpZM4-~^MMVL2maEhx~%l_Q}e@rkYHYoXOrqS|Kf*Lc#68EW`$s#u8
zIisrMLOA9YR_Qfo;II8Fhn9<|RjH+?#Jqx5c7Rz<$9|QLJqHCMPGPT<FV93<?>AAB
zL!b1#>)jm{GQZTcuEwN)8(Zx)pU1@(3>uGQhjEdWKi?dI7}Y_;l)vd2Z{APIu}j~D
zZC!1AR;V_?$oh<z7d>OmThT`~W+(nS_PNE^yZacNO!K5fnTN0dV~@QKPHUdL5jD#l
zKR5$#Eyh&sK@lodz324PIfm<sTRL*{<5;>pdjJ;g-^Oh_%1(6t=AT{q(9h)->0NDd
zPt>Z%ZT=1gVbzk3mS2fsF06Sxj;Hg9$^6To{q*TMns~Z9F|h|vZ~41b&RMd!BCiR9
z;_qDt;&;L3CD4ShFj5_OYz>c;t1XPyE%#sRS?P;3d2YHU5?JDy6le_k`AhdN4bY0U
z;$rP8?V5mgO$7fD=-M?kT13;vH27DI`MN(6vJ31Lel-;HG{vHZN3UDu_e4S=!-L<=
zuL}Abmiwa~Bjkz1nmvZz7)5kwIeylEsVWjb$(NEoCqG2{@AKD(V`G{O{1Sf*%B@%A
zi0A-q0bVW8*o+_HH!t^unmy`u0iF>J+I7=sUN>#-yy?}TYAgy8u>PyqfU7+G`Msyk
zQy*%MhJt?2GJhZx@q1!X7UiAmTe(bcG%oGc{J$bU-YrnCOa9+{5ATh@dE&1;m;NvE
z$E|!@|BC$Ez`N_O;Qwpe(wpC@56UYqtr%Imz_)1X>;+S+7R;`#9;GbDFxH|w?IUeJ
z%lt4izbCZ1*&p$Q0s`t|k%+(9NOvjB5wBjzGRNWps#L4j?PAj*jRJ3`Smm=AuJzyr
z6JIoxvB==C?PY*=;Z3tHyy+|HtU_Fm0f8aVOe1Qfd0`BM^~U-r$_dvkgPmFVM-QlL
zZt%pKB@Tk(JsJ(LU_S&@x|oUAN6eUa{en>zh8b5cph4Ra-ZaDY3#;Z-FRbx-r!JVK
zjfq7g^2Vy>SbfkRi)yGa(74<Z6NcSX7p~FkBK`(XGlXqy3J3j7&>HYszj5gRZB<j{
zxRIkgfjSJzh5>l>h7pT2dnS8I){Iy)K=aqFQFKXVkZ@Txtj~rG*)ZCemA4@qE(>R+
zHfBL+&`K?5wb87^XjWoF7J^%HWDI1X<ypud2-am{q<QtxYekHkJlcqovNaxU2^3=c
zAU`}0-dHl%-*l~K#8nOI3^r&rtLwtqF>`0m@y(w%Z-EwBrtt!jSC7TnhT}k6FcCQ5
z-^ssg;O`pvy9WNB(g3a}<Qn*M8^x`Oj>G2f9d5xJB5bzjwz%A{<NN?;ZmY{Z80Td;
z%WzJ^IUnaToDrP2;`}zw9XNl2b05y<aK4W71Dv^dAH-msm*FhKISuE0oXc=VaNdgZ
z+c<aN{0Yu|IG@A$I?fMp=HlI5gK=Jlvkd1nobz!m!x_POE6#7@+=25aIQQXv4(IDQ
zKfsxbccTr)c^S?!oYQd5$GHq=1Si{!%ME!)62mXx<P8bF4x<1e-;F^Pj>P*c@jF~?
z&24x`62e&tmwNz0zH4b9LhQ<w_eUb&#&~Tj<{sWLI)*}rAjIo{<UN!RZFady--U26
zLJ!V!aZ(Um-G-(k9(@yH-jfKQNM`y4QN50T(MpgR52-b-?C!JLW78uMH_6Ju_oKxv
zI^dug$CC%|oyAGu=)@T(fnyZf5Elw}z#Q~m2mOwN=8u?d{_zfav4dXapugpyf8wA!
z9P~L*s$FK8gI?^Q!=P`q<lO9_`FnvKRy==@Ve`D`piKvT#z7BtW%!-td>%dObNE*{
z;%~O-i@popg5GDz_AStM8&5dsp)fo<exZZ@wu3(6pmSlMHva?%9d^(=K-+qF#G*&y
zT~)tu@Qi|C+2w>B^c_N9q4D@UJ^cTP|1rv^Y}1Be{8;pF@ta9ox5r#a#DIxwyhD~P
z!%&I$Nc=TIUn+F9(3c5)lhBt79T9qj&?%v>6nclyr9wX@G`1PxcwXqSLU#yVE_5D#
zXc*TjguYnlaY9!LT`BYpLgNKvI93V`h2ywg=*dF=o6vZ<8jha{{biwF6ncu#?+HCs
z=zefQac!E=xaI&|C3L0G(}li4=xU*Lp=SuaLFk!6|Fh7ugnmfq*+Tz9=<9_(2aYbT
z-5~TAg`O|;RH18x{;JRmgpLS}--_T!3H?=}?-N?x8Tq5oxM70B4aXbTVnSao^f!c_
zEc7~||3T<mgkCLlT<Gr#oe=t`LT?oMIiYV8x>M-QLidAnk885mNxNL=+a-RA(BBgJ
zA3)O%U!0Mn-EPsF3N>xF@CZwm{lDvoAA1hVSN0YWTJitLLBHvs&qKL!#iGp<TG?2u
zBmU<?E1NkXwCeW@G5N$b)xVWOtAbWJ==+6M{q?-isxQvPWE9tyNQP3ORo-R?y~9Dj
zCG<*R8a6m1^Nm7BB|a?l8lgYW57=XQ5bP@{{AwBVeW8b8Hpw2>4@tZlv%eJj3Mv0>
zq1E{1L>kxB_;uF%1;l%-zF>R<a&oTZ8#jyV)rEdEQa@%{bj-Acv*%17vz%|3yaq3Q
z98({SjnS6Z*O%cwMpKv<^2Hk72YRhBvSf7WsL2rtCYF?xm81`#((&nIB3|BE7ZLt4
z#a}jRV#&nPvhfq~qD{HEp-LP3mz5T4=B+v0W3Z(tcjQaUP*MUZ#-@d^>-tRQioYUr
zmbBwC8A~0tX2^*pnc5wc)o3Z}Gt!LD6q+fBO>yWmtE{LVir~(R)gP5Ad*!H!*NiP2
zKdy2j|Dx%N>oc`YQ0x=f9pfr0##Vq+sW#nXr6ra`B`CABtWtGbx}*%BZ3?9<tgHe>
z1%jbE%S^0(M_M^jHM~a_x3821Wjei*Num~KdZu$r%g8_@4Eookn_P+xj8@{6vB7J_
z5=WPe9$PlCv8iskg~ygLB9qY}mfeNpEV=Bmo%P#2GJe!V5zyxOjG&h8OQC!v>8em;
zgK8u6OxY%k!oBh_jm`DJSc9MU)#|T_u5DTt3Py|d|8@v2i#6h%@r`3E$Eg>`k5TvG
zkgHdLu!A6Cr4}Q|Dx5K@-hjUjcj5f3(;-cCZFEe1gFj$JH#J7<$2jBCw*uh_AjGmU
zA`R~R>2-!Blz(}B6dq$jY4Nym=~m*cwJ0^aE_u7IU&SeUOgbuvrmebm!N^i^F46MJ
z27f&|Gw2J4XylBCF<k|9mW@(fjo0qRqPPJX^+o+*ivc~(PG77okAz}j+(5PC$CZn9
zG#ftN;Pol>+ldp#sZ8qLZ~fX{$*_K=^VP{`6KZtnI5EA&8ad7?Rp|r~i|M@uD=QPp
z7Hi>9w9&wAJs(G+Em>KGh}P_1j>i+d(<()*#dOMi`*FRmp>cVm5vBP<M`O!MMpsTe
zTYM$rQJ=3q>I+Bw_5KEbI?vc~NDEV;zGYBDxUSxB7gt^`*_zLmt)dKRc(L?ZvOzbh
zHZ}{L8AaQaeB&qwGWCuhPZ=gUZFEiAN?^E_;bh|QQe?ih8HzI^v3i3xG?o)obnG}g
z3GG81?5ED2wI)_fWE7mxRSe;5)<msh8tRO?YhhyOG^okvt2fq${k~;V1bhxnaKb32
z(kSd?BNPm+_D6&X-i1u1qeiDYH^UYS<4x8U+i0tMC-TM4stxp;kO$6(0bGlSS1Jw!
z!?M92j*f{nH?H9rU4?OuuStyY&E%5?+@Dt?>+{%_!8XRQEgb66#;^N*QrS4_3gVWJ
zf)p{I<=9IrtmsnI&3KtfC|m{gC_0dM4o-=MDl?_fNvddQ7SR=|kgvt+8dR+nh+@Kc
zCOD&^JVcLUG>WdYxv3DSv_#5rCO}0@5GfH~I?m3ad~c<lA(OzF4O!rnrHZj-b`BIG
zW!YIADXPh$B2+T2Je@_gTEvZIr>KUj_TjbWk#rU|oaz-b0U??BxX4musdPRSL<Kjd
z6^02$GLB{Zaz{K{igF~r5pNW?$|++z5ie5XCF)jxqyN}WJ3}*UXk|JJ+i9nS0)ceA
zYNpf>bjGuh;Fl(ZGa{9#&XrDyW=suLtL~MANU*UfU4iOfsethr4VPK1Ru+*~MwzqG
z0lfFzE@`aQ>ap|yl|J7pt`FFxtkGXOkw(LbWL!CX4PGSg?4q%%xguqKR)Vyb?h9G?
zLilv8s=*?EboH`eTBBoCgCzkkS+CC|I9eQNzyr1DN^2Y`i<aI;0^Z(k#ak^dM+2jn
zk^-3cIHaX@<!Eijw~a;f*yKt!u(YI1HF2eXtu1c3vS&4D!u38!*OjZb%jiHm@DBNO
zCS}pm6qS<crE<%trI!NHUKyza$RmbmCpz*v?L83176WIcR`*+ZRiY!Wr4-Q?Y(JAy
z;k163tRuxT|1v4l@Zt6U!MgPDtZ=Btz+3mT6P0o#BSw4J$YfK>fkrt+(JdP~KW7l7
zqZY3nRuN;w4O_tW#>iu{^>*&U9<A4L^`*n;gz|;!uq%QST_wGAwA_k~G=}hrfwk89
zR~99(ZL2O{pe}0A0-0~T<iqgbrwC#){g1VlRfxmFNf^}_vDeY*g0Nnw=VcvA5q~k>
znnuT~X*8S9o|QFQ41SA1nbdfh15gU=LniA6e5s&br%1Buknt(2Ijh~_P_VJyZk`g$
zP7#GDePBp)X6Dr0*sS}Z5mAq&6}8r5Haw=c;;aQ8b1aY5MH=X_FswK;+KW46fNU$p
z8E{A{)mV!FW=tm|<9N>BvIM|F!CC`Y9L}QCv%jqx%;J_G8_%hq1;M^C*s*-z0%4_;
zZM!X5oA_4OVbv(>T=s_5_K9h2vq-1LW%5J0oa>_H@O!bQCR?MH!PwHI{ROzypn%=m
ziA^zl+rsX~QVt6iia`)9L#a*p$VAj1S><nV+9CyR!cry1^}M)WyAPXuvIj$&mu`e&
zUx_^p7PsAXO<B5N=ZO=~5-qFE;+!BJ?Tpe<c1O9r+8t`HxBNP?C@+m+ZI>Qdo$=yG
zx4H?Jcran~Q)G3Pa5BHJA&93tz(aehG0I3KLB0#ZHKFvNeKC^G)4Pi;Yt3Z+41;|=
zA}o%Erq`^HCLERh8<sSdk!I{hHPfj@wVZ&6v>bR2s=-mVbqVC_Rj}<mZ1u@xhC-A<
z!ELYRf>RmN1Ue-c24<Mm@UC`b+V-%{MYO$;E4R40!jlAhxmIp1P&vEJ!~)8hB{R9H
zluRDwzv<btKDl!3OtDma{Hm(zTF*#)rfrnRdA;i?oiJfS$=K5JF>~njJtHNtw79gm
z%oD-)ZSakmQGd_uxIyqYt}r~-kb^g2OG=ANN)i4o#c9R3bz#&kLuf=)hzV0suylVU
ztQBKRmcMxFwAt4fb<4G4y$+vJDsEWYjEpM8$Bc@XH^+*(g@_*>asnUHV7JA~Lxv)j
zMX}9@G2tL$c-vT0Bz!1He!2<iAzn12bouMo)yJ5$;(8;*T}llqkTM}iT~lMdRxAZ$
z)|95yEkh%~A8O(@GSvjt5r4to3&F$w%Ec+)e?*Ae-swYbr~~m1Iv%MBpM0kg2_9hk
za9ITVJP#+!<FoIP<O8tN8S><FWjw+WK0Xtlh5PFzNMK&pNgh0IkniXrN%;5-eGP<|
z&cdyOygc|c%6|UMXWviYS=Toa$8vZu3r{{_;`4ISd}cl!&k?+!ZJBNUdc>g!$-`&v
zcY%+#%=95vNF2mz^W6i!d%%askHUAJgO5+AY(75A=d&_C<7atzyd)vZyBR0j)E6iB
z5^O=@7|`}%%eN5`Hs2HAdjfoXMqwZ1<C(;1^YI&@aVWK0Jz^AA>X^qJIBh=eU04T&
za!-SO*!6w~5#*!(wt;UO_#UM4tixl4eANT_DAH2=P?6sU9ex(RoesWr*!!?<zLFc!
za@h6$5Xdf%8@1!$vwaI0ZN7&be4D_x>2vrVckpq~#a8fjvmonWc|6;2vM<;U?segJ
zOdkMkH-$Wu<FFNyk8k~)0z-R&O0o`*6+VlQ?XVB>O@~d>W_YkX+QSPtS(bflyb0sO
zF)-~ieg_7dChtSd*q82zu*tWPhHB(s`aNOvpM@FNe0WTkRqv#)sXZMwtIfyI(LC+g
zDoyhs^F@dc;$%B$TeNv+JGySeGc-K!v=6&H8#_b#BVzT1Tj&}7L}67k{fok?2Ko_&
zS-aYEqp<2NdrwRs=}|TQRl3p)$GO51XdKT9vlY;78e{O{;P_<NM?4w6Q<lc;K~28N
z%dn4pMON(zQWy_#ad7-7jEAx~I8GE+qmtu6VfG5jOXI<UY2PIJSRR{ptnd&?xA$iC
zv33~IE>$``Q|9O+JB*yzwni1#N4r1>+phX#c?Q<cStN7x(S~OLs6Ma?XFt2NKlV^V
z_P!&22f$eZ(=T(BVDs;?_9>D78l*Q^`r_B@N`Y;C<Uk+X{h&M2uLHL8=OTX{u&v)5
z?6NX|yR7n=&Yc4Mybv{!gYUU+La2R9>5u7m0eT$x`@lg*ee_p$f92qdl4om=*Xn<^
zhyKXMEdSTQ8?F9ie%5DL{7h$k8TpGe{;15}x6Jl;WTg)}tN!Wd!G@zi`?DhCudVMA
zt9?v&7GS6E`fesazw1d%7e)C70LP(^2Z7l?gMs-?4sMDgz7UvSci>1Rz6_XeAht30
zjxBcJ@xV(Rn4gH?Yb<U4uK?=~%<rZ0s|0pBzn2<zU;}tR<o#Dm-dll}{*(INEakrg
z_$~+LcUt+|byePZ^8HhO<=|o~|9>H!A2qPkp8)3f4s3iFm|q33@o#|nntvPfiyv)B
z=e|4I+q=MgA-|n|3OEjXWHzRM4B}Q`J3R+3vEln_k09kA2)qV(p(WoJfR6&-VBsr)
z`L0(xe<|?jo!IMWrB4N33S42~1>~pyK)tMg3GrK)hmlU~2j+`VZQKORm!7Kfi?p@C
z;r~?Mucdr(VC_Md`#%s6r+^;>-e}=FflGdvN&i0Zao}?hlK%$?JO9h&?r&l4|LgiO
zzF%(Tm$wmv=3(2b=Vuvv-4Fh)PpR+cvb<jaKLkuaL3|8YYs31`!Y6?5-sf`vvxQFr
zmp_enZ9*U9=O>@m{F~bAIT&~lrlcd74_1Po-uiN2=l5vKfjf~-{W5(9@RoaBZrTO&
z&jY?^hw?wf0pOB<$M_Nc0&NxWru)_RikZ%Ri<2J1_m{2w{{-BP^2dVzGMqmEzG9op
z&Ha<)-wkZf4}&m2JOw-)_ROi7>AwX&e!%6PVBxoc_W%#E@G0O!d+@V43-dddwm%sJ
z|9uYd6!8Cpm3}d>^ZUDB1|E)mzPt`#`{x0V1|DJI24MOhyFTuNbbhb*8^AmmaJIY^
z#2n-gfo6Gk0UKyfz2E|E2k?<6)!tjS@29|v!GDFte*icLe8R%qE4U8$VPNX-UEnRi
zcU!m{*n|GC^)&!XjP55~?xT{wKpO_!h5lJ=;W5DZus;N%-!Fk!{HV)KzfF0*0(=k3
zpAF3V76U&BO#KiCfu8`LCH;%HS^!s~ex@=1oxqEM>1T;|0v`cC=T-7N1>6byq^_9$
zYhZrG<8}+b1$-R*6D|JJz+w1rG!wI9k#+`n$PY61ScFBfz5W@D_0M_0oyb2Q^|QW_
zz<Z#NX;%4P0^aY)e*<tg_{UiF)dRbrAFjkGUkvyK_}^};J?nw<v9H^f?+)OT7$4VK
z{PzJ5NBU;Ln#R4UoR4k!p9H?^fsFnS0FMSg{Uhz=7%;y<xC1oh{{)!pC6)g?tpI}Y
zHGej~1UUR3F83M9U!WBO$Dv<b9*F$YfP<)y`e%D;ffpeC3JV8-=b%3Od)sS?Eq_UU
z-wM15`MJ_${_g;v-0yPFwe<0Cz>AT8s-$CYA@Ejwi{&OO{TIMqM|m#+^ZF0$D7`>C
z0USjBXMow>KLWoA`OwW$UlBOhIpn(ncnk0@i@yTcgnirmvw=H*0(-UUUjTf}G2WH~
z--Gsyw91bW!yc}*@NK|H|2fm%yMXDho2~M`4?N4!o*x01b3VdBf5W}D{08Mn_$BJ=
zDd2pJ2it!f0lw#e%gvQ6(_bP+d+hI#p9YRY9y{HQCI1VLyWDSD{O1E7cgS}o@Po+D
zbtmnI`*n{af2+lR9k9Kg_dw&dz=vSZc7N)?Payv&EC1Jlr^DazyBw77o4`kqZjX<<
zfo=af7+)#>9`JFbPqy;!0`9ah`*SaFH}IFN^yh({--mw-xcs2YeZHg@XxtmzjsCIy
z*%{#dz{)=tX!#I)IDQvl`=g71o!?_GB}V&sYk~652A%`|2D1`;6YwPDx4(Da%yi(b
zNT<9lz|QZ%e+T%AhhX1U|9=noq{E(m415IrY5TJ$fP*N{XO;IHu!;UEv+92pSbx~%
z<~<k6*A6@y{%@p}{t@sx<Ub@B*UAGi{vW}+iY)%~fv2~*+~2VHF9+TNel?yotpeC-
zkCTAy>#;$&V>BQ59`HYd{A}+s;34m1>~}fvgGgt8GJOs3jrY0SC07012YolzV^1QD
z^8YLF6W~9Bbn^cY_z3U}Nr%4&=7&gZe{~eN^B&x<vGTtJ{E)+cb^;HBJ@Cqn<^Kuz
zILf=zDvx`tk30Os2;dih?f#tt+zI}*7XJ;v-N3fJECqhk(SKh9UI6>B{l~4q_o03z
zZ=v=r;5O*{MXUYa1I~y4vi1FA;NieKP#@d>G%&wKW%uVVf$i~Egz@(>a5v;dH%t58
z1zzLuCw~SWjq*4jvb=l@gdy-ha0|kJK5zr<+x8Dv0=t3j^2PyALjHAD{_B9}0Ned}
z6Yxogzchfmp$}Vs31Iv1fcQ3W5cw$!{R=j#H5$BOjE%>i*;g#vk?SKy)QANFU<enN
z;j!8D1@q?n=FF~H;PY7<K=B*n;;~3+2>F%=L(8y1Q0^}K>SAjUTRqD+WB$~+)xK%f
zGiP6qOsq~l<kUjTR`~0U;!1qn9&a$PA}NwZ;-~w3@E5{f5Zuf5`KlasJL{91+E#tS
zQ+@q()MN>310{w+e1ig;#6SFHG=EMlx6koL13c2g?|&(Vzd^(A)P1Y!natM-s7Iwp
z^F``b`?!Ng<4zI01);XOX6m$9z=xMHq-ktM&;pP=SRILkB2{?w)Eo=rm)Fpcss?xN
z8=LV|*6=OkvpcN;kEaZ5Y!kruBKQIgTJ@Snqjp*~3Qrdt!S0C+i29dnp<n}EZJ;C~
zjjiEPiNy1VrpAz><%iH(eQ{}JiMG;@pj2D6ybe1kgLP{)KDG9(GJJLQ+}4PF;(qLm
zk!Qdf9tlK@SeSYse-!VC2xE7jVfY2(!7`pEq@%)hhF)AYwp?2l3m_b?!txT0@1O7*
zk>axQv6^T($^aRma3Mo6BOPVYu^@IHKrhQ;%T>4FSNJ}w!<w*p6Wtdz!u8>`TC^@8
z`wg23__O=zcwT~T!y^@A1|dy|FUx4E!y6nl{9+!P2IkdN#UjyAWDd6a8GP^(iw6Dv
z@RTVt=ggi~<tr;L(VA8^G)9~e5C}cuj6qrQS_l>jqDt9H4L42HVBZ3x@$38rAurx>
z;m5-p)(ssx`7C*+)itl2I!z1sLxElu@C^o52F*A9tJhDRJG;utG~+WS#tQssb<jT*
zTRX@mKTof%3pO?o)vdx?0Qic6x&Ee5WUc0d)#1?*QmDA=K{GGLPsG2xF$xn>PmiPr
zoN_gW!a*m7-PQ%U3CkIY9l^_CPr*<$E7}(b`}EZswq9avIQbz3lxU47%EZyY-t(fI
zs20GBNt%r;^?=>qyvkVycd*uFi53V1V^Q77!`4Rpe)ZA>(NSpH?0Gfbc{K}&EUWI_
zNz5{*aap7eY6BP4EPbX$F?8#*tfC2h?yS$K2QwevJ0np9*yh6}c)6+CFP&8vM3Wg;
zgOTm?K||O=NZryzd*!CRsrO@eG43>9M)I^jsMq1BoY}C$7*;QKiR{;_7fPt?^m-ch
zc%wFF4wQ<Q%)nq4VebwMw+Wls?fg^u>j+zVG%?zkRT;9P5}N*0Y`L_|UsV%p?xiB|
z!oe(TUKYeSnBEu-(=owSHicGY*^bN$qJEB6c+}num>m57gY9BBJba9^k%)n+oiUJy
z{cU#zAlf&trluZ|&5Ifvpm2)?@0yP`!uZ)n#)-M7$E$A*TxeEZ>?iTj2&tZ4**Oen
zG)AIo9QGbj%#5u-%R<-~#feDfAx45|3^ejJ6x{q2F|+{6j`nJiW!P-g0u0qE4zF3*
zv>$}=`Fw%Th#CmPE%zz|J4Bk7Lob*UW8ycbd*{xEdoVDQLXMbhR?Cc8)yS%ObG`V5
z3>hGnjJ1r-BL)KxTcJgxX#O<sbg|}oYv#pF==0$Twbinwy2fU*!h$j*m}*0NVA|LW
zgWq&0Uhp)YW!TKc#x_{-^;mhZAoOh2`~`5@X$j|IdKZcCARJ?_mkLmER<AX{Ls_z+
zG`>fPEu2~}9{;mGOW7>lY*a(rv8mWuKK*bb-Vg)t*yM~4U>|0dTf^YMe3#9V?P*Kd
zxJVNwF{LgJ?Tp4y^&Ia4=@#K}mLxXZYw|-`$YQw+*f+Mgi{n7NIE^_lCVvB_6^#>C
zugu7)hoT1GR^_aRoKB3gdRbBxdO~@BRewYM>ITgF=#{9yzA4Mgf?*kU1xAD1V_}!H
zhE!%Hrk!O1$Jh;WNU+nDqE=!>g8?4Je$(cx>Bi@0Ut=fJoO#ox&hgEgF$1sg@hzA-
zZB8{-w{Q*4#=vhjs8{_sV<C<;3~Ogjm4yQ9<f0&rp)9o0nF)OjBX!2WV|~W5<pozP
z4W4wG(~lxb)-qHa7fH^7Sh?TGatSjc{;$RS&Gq&)mz8Myi$HeYm1+&K-n~KhlGT4Q
zgQm?SdvBL$AslQpl<Ge_Yyz?~&nY_nUfnYK6*&E@F$fJ#!<)>e^UXX+#2RRoFBJ80
zhc6f54ZW;W>0tIe?;J{j%nO?vp@G@cEr>Pv)EQ#zMm<t{&*Uu8DVHj)CKly5m>LdO
f!N6#lEDgWLYp@p)*x<?^A&I}nH4CjeyKnwKM6-2g
literal 0
HcmV?d00001
diff --git a/board/MAI/bios_emulator/scitech/bin-linux/glibc/makedep b/board/MAI/bios_emulator/scitech/bin-linux/glibc/makedep
new file mode 100644
index 0000000000000000000000000000000000000000..5451b2202499abaebd300b404406f7f4fb395c14
GIT binary patch
literal 58623
zcmeIb4SZD9wKsecCNN-dq6WpUI<}xdB_tt0AVC8me6%1V3Bk75AtW=LV3J8QXZWz7
z!=0oujAOCY)>?fEqW5}R+j8Iff%wH&iQ3juYb}aZw6r~GsB)D{BSz=>|JT`P<_usz
z-uHQa&wbus22S?=@4fcgYp=cb+WVZd&pEf$%%7c;lcU+cTy2m>wCfI+yA0vFr>&ea
z&8rR8#%Q0?E=H(n%qxq62FEVMdF0`6;TVMDI1l9UI1h0i%p>n~ZOGGb91Un150=*o
zRDKZg6UfIgYO1D1tKCvB^K+54?tkDY%5(F02$%=uVjVo(sKmX&<>ui9=3(beXlY(P
zp`~ejOLJRfO;I>hRBGjcwa7N-+Qo=j^+*JNs&RZyfkG9sz7aSm4}au;5f0MwM?FlE
zn5K<GcqI-Gju|+{;;?_8Rgq629E0P09Qi8k5*3ypJWIu?%h5Qf$5A*g!!ZR%B@X_s
zwgT-c6*8EHqe$T@6*3s6;uBO@fp7?pnK(YJ(%cBoQE{kB8>!+9&c$&l4))z#9M0c7
zCs6T=5mL`*`prh-WE^uGnd4P_BEsp8bVjdH80Mi}q2e_vyikP<Xsi64Z3U<Oy+Ea0
zu0k)up*UtK%wRZ<&nR51LT6C!1b-*aezSjGMA(N9V7yV^)F<uX<;^ZP+sice{gJP`
z+_V|yv#zQMd2ZU<Ij|P$VHWZ?A!I)FR|d?!Wch1x%yrOT58QdX%Y7Ij>HRqNC0*_t
z6%HaCh4Pe(`K>rQfnPvKeqkJ=ARq0F`8VNc0>6;L8xS4`J#C8g8*#Xh&psqh5+i>R
z6hV9^j#=PG8z#O7$0MMp{Sa@(!5?jq_5A=x6ZCaELgxPj#{;0hTj8Au_W|4do&|P+
zp7N3YXE=@{-`3Bsn6LCr{s(aw$hX^n82Dw#%YI<~pK#Ox-;a>|QaJdt<)iPJ@6h+z
zz>k3bDbTR|2;e)x|53zQ{u1C$$Y=NW<-mo&-&FKtNe}thPoyscegxQ-uL5|KYA^X$
z0T*v`xkn>B7nVB*VHxu2GnjuJ@Ntyqcq6_Z*g$>j5GViT#E^G}%3lH81p0dsGCzcH
z7WmPpu>30EGL*OVeG~8z(EnV~Z$M}OZw4*PCxK^y-j@F^;4<X@m*U5Ij=&!2JIQ|=
z=^gs~KJfN$xZLzRY~Oa^I`F$6nEW3HZi4*N5VHKU2#-Ks`X1&V0Db`VJ%>2+e*=7{
zgZ>TRQQ)^$<sSiVdex=In@4*ecpvEV5VCw;F8UAr?EV`Dd>ryqZ_Gaj_yN#wN1XLv
z09*)ckB?6Q*P(p7%D<BN4u0c-Uxxg16~8IO;BVXSbkZZ=P~~fZ>wxY4_yRD0^naA6
z5qKZ?+v8dD`&YDv+WcXop~LX|HB67KoE9fD)@a4TMn_}&TCF+MXtZeU9nEb<PzxJP
zp@^Zi23lJ~s{&eUq^-4~9n2bywe11_a&1Mx2(+!zBH@-mpj``w8ynh!S`evWmLa?L
zKu1TYgM^XhCM_5U1+~_OmX=VX*3sJ3+@Xa7ErCV@EQ8H$%|;-obp#rkm=O%NM8dk(
z$_gP`TVq2w(Ae6pHR`RQCP)d!ty(ZGXGdcLxikej0xO!sMxetV>}Y5W_?z2;p)_~4
zr@4*n@LvlzuV`y%kqWIEATE`lDhgYzK}{_bKh$n$5WAtpXl{ij0<GbIp&5<HX)wS{
zQXy2EGzwfGYEz`0B^y^aG0;O{qYWZyVI_31u_Y7^XbnbSO|wDKpeoH$S8#O)lmWTd
zpvTxQB)5h9tlwx3wP{iUI<vBatXK2TTZsNe`}~n`pb2HzwW`Nk8_;Z_Vgq$(w>^SB
zLKDL16_G=9-q?n|HyV*HjcUD-seb>NbZQB2_gjk=><9$3IrHbutoD}{m84_VOqz=o
z)ZhCz=nNF6r{$c1Di`ZAa(CvrvXHZG^31`%0*n(LUL5B%H)HxAr0HrLk<&#gAA!nu
zNxqa5`dqC;(XYW8buh**=j=Qzl<3Ryuqff2oQK5~=Zd_`u$~>C=N^IuS(G6bGMx-D
zX>MeAji%kk5EX1@2<Lq#Lo9smW;jOE?qxV$)3z|gBH#gr81xS@g!6ltAr>~<8D5S#
zgdrB2I~bm)X-_e{0Bd=Mv*05bVzKcYLoBF%&JdH_0fsZ+gBYHL`I6xfO?#c;U`;#B
z5YG7sLpULm;b*bNXNZOEF@~5tjx(&%v_6JjP3vb!CklNH!NS+Y(1mq8Ll4%(459b}
zhFD}5GDOdeWLS!Mlp!3Pm*GtKaE4d}k6~D>X;(4CqNSK2CZ95fSUi?9#N=4X5Q~l~
zhFHAMVhATammwBk^BIoRG#^7O2J0BY3182!NYj=w#3ErCLo8&Q7>>|1o#8l5Yhn0l
zO>1WedoUQnMi$5aP-~*u+Lt!${r&eeE%qc=5So!^z6UAdC(Lg{3Fe~DYg*!l{^$2<
zsYwPjl^VSUe_1RwdL3dqqdkXH_>HCo>CEdnAefe<(=>Z_38qEqXo=RdT`(<6_Y!Xr
zObgS;5N{TICowdr^+W~VO$^J>dfElwOI$^~OfW4_pG)i$OiR>##8rZ6k^1$-#e!*>
z`Z8j#U|Oio2K5vOeuTK4SQEU1cn$HfkC8C?DdH&cVZpRueIxM!!L($3Gx09Lv}pZq
z;_ZTI+4>gZErMy``a{H<1;0$Zoj5A^An^|3cEPU`?;>6%m?J=cj@T!dBSAkvTqT$z
zLO)1cESMuhKTPZu%n_oS#07$n6CWei1osj55g+@A?e8as*FyURa|G!$qMieSIg<1O
z;$4C{qV$o(+XZuE>0aV3f(wYp5N{UDk){_DM+I}l>E*=jf;sZ^D&l2=IRbSqS9*Mc
zITCdrag|_>NS({ho?^iqnffwfui#>0owz_SN2=aVtO@3b)z=Uo>u38pa`h<jVZj{1
z`bOddf;p1)&BVI|b42TR6K@yHk*#kb-XhpX{1EYG!5r!OcH*dDj(B|sal2rSe0>-3
zGQso!`g6oS!Sn?B0pcpb^a%Pv;$p${4EkYWui$oKlej=IJ%xUZSOZ4Cr++1X`EvZN
z*pWV8-6H)etWot&EDW!!*N@!ia+|-0vW{=g`Yn$CAvWF33oDWGUQhf)(&vhgZ~-T@
z)Pb#x#LBfu&yG5*PrG&*!}O&vEpr?gb?31dWYC`98$SU)&+kpHqVL+lwI^sjx(^eX
zRp5yaQz<+D`MnMaK%ZFb?sZo#jSSkKJ7MOg+|FH*_nzO2^xDJ??o^~870EX@!OG)<
zz;g(dto7!W>=M@}^`;_j{aa{iY7!?>^GB#^Wsdn<h-k@EiwZUk>wMn$OyW{bv7Tpg
zPt2;$@ft&BGCA@tvfS|ly@Qj+6`EqaS?X8iKI?gAw^dZiMb43OMj?_dM&vLU99;1e
zj`AChx*+V5`r5?${6wUn8#5t%|5i#GaVNX_(I%f+2y>0?%SY4ddM82N<bCvLwfZ)a
zJxUrgi3Wir)|V3*U7HxZ`>;Ew&u9J>?ThVmrv@vkIVXu-VDywq3BWXx4;}-HFMZjs
z`Y3kPm6o8U-)G*1T&X@XT;GK%&4(qym5TK1Sk-8Hlq$Uu5+KDq4;*(eMfyiS%mP0~
zp6-1Ou?HE8GWK1@4l{NKV^xO`yOpsxW9u2)!dRHG`x$FSEVj>UB`;<2E+#Kx%=<cG
za~X>=cD3X(RwlW>Lu{PnGUi1Lz5gl#_Th%3qp-k2A9Qyeg@OvuA<6stky)F(s~@e2
z-*p7Zi_jZTr%!cCVsZW=vk?mq{RObBHP?YYw(pXzU7oIw(1qPyCd#lg6L&FIF=7-3
zf+yK8%-Ma(yI5KLuEY5IOcgTqUxHD>s;gfAwQ&6!F3-jG6~?C5jlr~S6xQl5BV8GB
zPoMNlLRc)SHS=bW*d6Oj8Pk2{HY{e)*EH-!<~t&t+vZcC_h#7K4>l#cdcI1@9>K~G
z#Z-0Y>F;I8zACl3H|*Cyn3CpYHSM-aG^&S}B{qLj<EfA2)2BARyX$qRfEp+{^h_1n
zxj8jisUdL}vlfXmmY8d?Y;r1NiBlP`|JA9CC1&3>X=POT%x{TmTuVe5Z-FQEq*|G!
zjJv=lF*v#=r@?dQuF({@H?Y~J%+kk=QlUGx-&Gy^(B=8s95jD}H06^NbSWrkHoEpk
zx(`Q#%MPSt5FUV7G6*f3yb6nY`h|!a>ijRuEH@3VTxz%~CqzcnCzI4;Joz%Rt~1X@
z+1|_G1(j<sKl(u0SRcQS1hwX+R`1y@xhP>3bZYRP6QaSS)aFwJ=60-oEu->uj>Ta2
znV+j-ipyqop3|1<g$GnScM9y))437m5L;iMdAe>!ESc<woblul$_xObj3*B(z=4*0
zU4S*vYzaQbYFpMRXd4_)t$CqW(`ro*PCnobl3jgJAx32%TIfqY-G_!R0YXK-T5}J|
zZV~{)DHpz;uJ_TaiThYp{Nw1;9O0Vrsi>6Hj1lm!n+BH;isV<%j#gkj9lctMyi+0M
zp3ZNe=+uurotqFwznYq0jEtX5bdlB6SB(76Un^;@se2>GYLm%6C?lRc$R?Ssmj2@(
za{k;usHoaHCREQ}IicSC-f`)z`2MaFk+=5`(h^pwC1wyT5|+LamZp}hM6T88&E?d<
zCB0W<QzR@cX6R-JU17<gt;>cCcTe5Be(W>L&^?Mxz4;ZZcFYR1tkGSq2-m$n-Nea6
z<XrtqSgiS|w815rsxao6Jo56T^2po#8qFC!t@U1P+ed-ZiA+XSCA*RjJ_n_wZCz%+
z!md<g#7Yfwxs1^d&@0xQ^Tn=|=dN9z#|~Cp>V=P3KQVp~wZ`{v*dIlWn>imZsh2W8
zO_#YswZkg1?oA8~Qs~Pv1MlJYG3EltMF^P#3UIyzNo3|DF>DC-=`+7A;~bN3WTf!e
zLRGwhc3=kiHk!ftxQnLDnE?{`l6TQe<98iHnmuWVe3Nimn;1bo#qT<fOqitQ4SQq_
zU`9|=d@twcL!Qq6gc4)Zt2m5|(8?kDZd6-qehn3hT0C7mGti%xRIlBEp01rpO;!)_
znPZ&H9zbfe;?t3w>RNM-v<GVdPiK<JYf?y`yI<2*YP~lmA48J1(yjki7++vl7YV4U
z9);TA4xo+NWVPF8?xu}fG8;3Z6_t_mV$)|)=*Yxp#18VHpOO=(_m|=txc0bke^pAW
zPgn|~W@^n7vQQ~VJxZO+U|(WhBvnE2p02}CXkt1wXHl3xl04Vcr>V#FS0?Ubm^KVr
zWW9NXwMtQ@F!jTAN0Sd80a@DaHXO}|h%)bU4aJrx78gvti@=k72M}FJCwo^P>tCFY
zZbKw~A|c_TgrqMrpMXZUv8QZ5$$JysG9ZMfBKwxK(WOesC^~ic%&|H$w!Tm^3Nqt0
zuX^g<bsv@-s<@OYSYMuansUe>7W=O^UqiwACHi6XnwZ*)$HctS!+_=19o*2xa@O?3
zMrK-j+gO=`OeBhWWX-(cXrZN_t-J^o@1hpE^Te}D1ErrC>*D&6O|{)LnAMscxatCp
z)NbXlWlN(F!e=&G7L=Wu$|I3kfeSObiAI>0N&{eLo=%<;TZwK-biuEG%3>0KW0Uky
z=S!Z>tsvV}ozsaD-$FEca=fRD22OuIJEyW4^X9zBEy*wE#^0b{_j;Zglo-LK{)t&L
zbG(s)YNifDs$k=o=a~w4;`(ek%?IBT`_E2Q(yzy5s$@8a12|=j5Lt|~qnP*%cjb6b
z=PIf=NxjFDNAWiyf3MSzvC|ghUzb?mzRvs=FWz*=_7%iZwVuwskpGq|W2sr5&W9L1
zJC^#$)A<+lN)P|UQu92W*ATrasKZ!%%dl9g!6@u`Q4+#NT`Uzb{5`yzp?`>qtYtrZ
z8wBu~PfBZKh}}nukE!|>CDGNBK#JuLtWF2idU)Grb9WxQUT{#b7=Yk<E1%0%!Lx}I
zavl>cuZk34Ep`w3E-oq1RD5smw9WemYqM*&a)C@U;Y!eFR{p1@=&aOK9-&!?>xc38
zQF>)Xt=ae&A(XlEu~WI6u*@i%x5cIByEG2*ciHltMElPqU$z<Ft2k$+Dnl@^bW6*(
z_h^=US@dT8-{4XNE@)%#;LYYwAX0KpF3#>exBe7vBr)Q8C^%8$9($l`*DYt6-$cGj
zTace9ydyfTDsoX$M!Qd6cG*yOa%PUtOo~eLduMiAegN%HOedp?_3riKVS>p^o)CYM
znwSs@aZf1iGk^51G$OXwH3!7&-cXafr}Jen(Jy>6y`Ei+)|POFsF=>KT0iDVc4w_#
zlp!e<h2(G8OGh-vqFeVny);8nkYPe~feBql7L&j9QlJbI(t*j`43nRM!jeS1<@)hY
zQW4U=EKb|9ISKK)-zAdtY1gG5rN<N%V&*~A+=umLLWU0pX+<7AqcPZLUJ5JZ!iF=I
zHNj+Gzpz&FJjs`?oBE39_P;=NvFS^pe=Sm(aD96lqjY$0AR}5n-Wb`PC%J$-z&6$M
zE5x|oNzToQ4`&w6Q^p(TY-MzlmJ(`Q87Xv>gR!J~zJqd=(~S2#&m6490?RD^b1H>-
z_-z!Q7MW>Dl>8ic(intW6xVYK<IhdqfAiA`*R3L1Do<=~L18>6!@u`R%9AcqU=d~V
z6AKEv=?Ap<!QS&T$ur}kg&hzsy$FM!mg^}C+=(0VJ&(=EiS2qS)>q=W^*1P<8r2m=
z*Q)c=)K^^k^?=q8UZoL#i8ujL@FD&(aPQ65_$F>3Zp+{%;xA{gPJC?!w-8^Q!R^FF
z8Eg=LDuY)OpPj*91;%;}#ueYwJ8UPFkeK0$kL-F0*QeO--n<>`9JxegwSB`;-t4zl
z!`)qV$YiPHqe~HsKkAdebMd#kiz)itYqXL>Phh^#DsCuPKP&#|e558<=foeKg-FRu
zn_L$pByFRsBq3?ht1masnvr;vO!m7<rp3BQnIGGeUp)gn*8L(OwIB<%UXLt`)n==7
zy_H*^h~(qI0&6tnkMHJO^+C$`>@E4R4?Z$R#Xk7hxT3cy_Q71^>|2J!KDfph(pw+<
zK#yFv1B>HS&pnVg{#?&D5yaMy)FQ(~3q3L5#G`C;{Z_HFNPep9Yl+Cn)GM;8`p9Uq
zY%3*->1hTf7DQ<Hc_lA-9&=qV^*LiG8^U(Hn{<6?_u<^=x*<82N6t;m8sh4vuhDuY
zq7>~z8pjJ{o6rP{zo+YbW<FSszcPTWKEbsxbVx~xF7op*%w*V|tj&op?oTZ4k50Qh
zQka_Td2EnRpMMzLf39txR@zdenU9#_sA7BbWBc=CHU0VGKzAnt$I|Q2*wK9H^!$=T
z-8KD?Q|qqbb$Xl(;R5wUTw9xf0Shr@G%-Pz);i5&i5@Kh!OcDBitbHAxcZ5rWMaX{
zdGQ6u6N?LDdt93<y+-9N!zzawlY8qpUMoKxncsED@W$5nYsPu8^?e$ys}9lP7lC+o
z$)VmMsGs_ZM*4Gl$HY&NF5*RrOB_^6#$I>)MAxB6Zv4ZF$no_<=1_*n?Vvq3Q8RMx
z)cxy+p$r6%U-BQbDZlGKz*tMv6vT_;$C3f_G-nCFNk6dTD<r$Y{fnrK5J`(o_m1Ud
zg{~;_R^qxN75x66&~%)ExMLrtaDj3Q)23ilaCxBBt~?j#PTch-f6T#uq#{S+5?Q36
z*4+393?nHp7zMiX$er!(&Ksp-TgM=RyL`t|SefQ%+X$n>$Kh{*oaUxwOVqd%BUoze
zp51TfE`s&N_iWfh@<n-9;jhm;3sqy~fw+B*J5l3K4QIj`O0vwNJeK#Fzk--{8L2gW
zoz@MziA^uV)pjW54Tx_31``F&z?c%bVr8!WYpUY_s@}#lF?DL`Fq65(M6`tKiO3XH
z<>E@{O3i%Z2$Z^qnmU;#e;fQk4n+>b-9#yI&dNc6xm4~j&HVQ>6#8MhP`+Kr(Ifeq
zX`G?ZnslMzb|I@K+)n4NI`f({6soogb>~qXh-=A6e|_?XzFM94<jp$#N!0WOx9OPU
z5)1mHKP?Exhpz;vuU(mIPC|Bkj}SDGpr${#Er`he++XaUnM0d-wgs?cSN{`Z!2A6l
zJo|IN{wLf5qQiTEqB!S6z`9pz(EWLDLCJOKylrFT<PhuZ_2)~@<;<Dp$XS`AYq<UZ
z%|C#q5y1~glKD+03^E^nn^Wac87>$fJE~BNvV$GyM?1cRH$>vE#eYjlVQ{JUe)QL0
zC9g|G*PVx}RYUi?E}F1^)_FNvGSK%W`+7g@aGMWGvu$iE0oDh(sRQ&tS3y{H#d$S^
zz-5mu5D7ADoo~@$`7;da>&_#FD7GxI>5>qcpckY4`c?Ronlu+QW;Zq%Y-6T%iN{s4
ztG8HpJq)FEy~UL*i6B+HATffa5;ggZk_#P2fmDn;M3i9+x!{WTEx1^MsAjB6O}d2D
z)qI{8D@Q}r)FdwxN|BJ7M0(SMRQ>Q|*nF-^`3UvK_KiwS8U@moE|q%a?^7wO2Hsl9
zy%{a717UX_xlp^^c~YsP%}0G$V&T3gl$N|<d#zcBs?1uD)|y)}HWN2IEcZoXM=O`q
zE0H~2*T80Uk$P4}$d#yE^kWRy=h0wzpPmCyT2qoCoB_hbaHhuI^2CQ<1=+guim43z
zq?xKYJ3yFRzwa5gy#EPoj?mtJFd8^;JW;c6bROoZ{JeP0zWp_aa`xA}rtPnJQ%lzD
z^QBevnpE#yIY@CE24mPJ>dF;mtK^>`8CSMoKg0D}ie0M2-pKxa@J(ob<PTlYyg3gU
zR@`GwPsel2l62f{j+VlsEV8rA^V3;_&0&aJ`j^ojc#1c$tZV1Dp=nESJ7*2_P9=1A
zty8hs^hzoQE^rxTJ6q;|T+5bjjO3XO=%eHf(I>np6@L?h==~ogMzFWzcNt(2dys!G
z+x_RfL>FV8AGp4mlxln!*jlX^3(j$Gf0O>R>m|?kaOLtq{6O--7Ep7<!DcfuY@rOB
zur5Nkrj6ltG{<}ug7tJF#`$_v-j=dF_r~4Pw{F=uoY9A(#*LoGcE|cA8xwCiC)RhV
zQ5owSXI$CC-LaUj`x>ww8y4#;H_CcwTd}?-V_eT9#N_-ZI-1t;*Pc;|zlGoJ;pHCI
zXW=*HvLvzRF%clP>qx9`uIE->Rl$P%We9Jrcca6}&)vh5K`Ae|pl4qe_VzrY@K%zS
zxv+eGMD90PI2X%jC(hYMve@AvKIhP_6NAX_y>Z7S;MNnxpUp}?dE20xo%iF<{yhHG
zgzrQ7#t;kVJcQf1(c#R>U8K*>3?L0WH|0Hm^o`O`)!yDKlsxdq)Veb8f3YOMncCMI
zVJ#)QY`?h!+oYuZbJu=kr_mkvPB4G;I}A~D!&%1pu|Ah^j^6h+dVVBQ;ZCoEvFOL<
z<!a`N*Toc4lgiO@eMmj;b2K7X+`zgg9OnwLqie*^4F5g-%*I;tVUQ(j9s;GW7SqMk
zU~QE;*PQVN?myP-inwL*&^vsy?nNo{A|&%pbf+!rhNBzN04yoCa*QO`<iusLU?iU{
zcHL8riH7~#owo}f1hj~8Y%rFLY^k>tgxW*t+83(Pq3576N`ZHvVoSD?M9r?m;(hVm
z@n3Ivi(8^&zt=W=z?m>|J{Fbdj^^l%y{*M}5B-&=YZJ^<1QF3>Q1;O)--@}mku5S&
z?KY-korAe{q#k8zsioy!1gbxEQLhGxe5T75#&cUa`7;Y$d;4bre7dFHXsx*bWJ>%+
zhv3nNqo-Ep)|wG;jqizzi@+iQBmTAnAG0U=eEJ|%u*lp73Tdt9w#Sg;c^p~hG{i9G
zdA7d?O-xPVc0O}1IHxA@l7cy1qOw<^6j3Y;4!tJE@-l;5^A`w|Jolpl75%o<<y9yy
z8RW4tXXRl1VJhRUbej1ZSWue82(}r*Pu=6`JP(3xWA84~2WNWhO|(`q9rF<!(_iq%
z^H|NUZ7kXICXh8tqBDm2%n~q0<GS<2)uMU&E>?X%E|bfduX2W&{RY+w7T)(t+;7-X
zIVcw^2>8j`?KwO5VPXExlRw4Zo&0lj<8IGm&&QtkZhY>Yov$&$jKO`D?Ap1Dgfc+n
z+Vz>sZg}fWh?6Nh2W7W=Pc17qUBR-OEK3eyFWqIJ+xfiIKX`Wah7VI12sig|4fSQU
z2IC1_1k1yn&sl|@CAImd52>fYv*Rb<u}k&ZH=XSBORnJ)>v8Y<iI-7C{PV_x@fY6N
z`5URvRe{^f7u<YQ&JEef<m!>C<#BM|cn~L|@0d3ux^uS_7;Jt8U^Yq>-uw#gsK3ZE
z3&(@!d++T0rI6&zK(3oSpP_z}3nyE-mWCzQb@S1kKNsRT6|wHhCFT(rhPe%Y>_w<8
zznr^btya_Td2DXQ#^-kKL9us)@eZDK$KMOSyFKR}tf)8nrbJ)xdLDc2305SHe3DC7
zWW{!s$7_y@6p5PSp2y1LeNaKF<~Z-I-~6W?8VZOl1m6`kZ9fOu&rm~3O?zX%zh&b=
z_SRqHCxkV)dLAnq6hB7gQ-wWB8Bb6NQs;QoNq=_cdfhkwspQbJRCyxOAKPzh{k)UZ
zI+&V65%WBD_QvN3`f***Qu=R&ccst#1IC5Py>9ktE^J!Ngx3+iRtd(qIEz`R*1Y9a
z<s;S)*Ih?2Rz7}3h7cy6X+rR22SFhTerFNXo4kCY43TRe+n3uR>bt>>D>k*}Li8QZ
znaQu-JX`n`z)23*g<sO*myB6rH3*e?&=zZ$KAN?z0F|l?b)|-LfJZLaN`KL{>*lk4
zmd}V_e-%o~7`Ekz9WAh%9*jrc3&w9amaIAE(+lg;)51+CgY-V+pA5={5b>fzGj8a5
zP>3$AbslHlGqo9ad$9yJr`a;>z;;~woW$g+L5*2`65I5X-|%8+ByYz|Ad%U`1fTNh
zyD;UOkAewi6ARpn%j|kB$Sn9gw6TL!Hoqu%>$@hQ*tNf97Gie$WuvKH1x1;q%wx>X
z+gc}cPUJjvH!O;0fm{}CV{#rRL&aa6>BCQ^a5;Vl&$&fjQEVpjZDc0DrfDZq({aH;
zTkVP;>-F2$1TM6%2|NYi9oGbmiun5*evitv4S&SdjucM0lAVKi<~*7ZQ@fn-=d2ur
zg|7MR%g_o=x(4SQwDz+pqp*Ae?m%wf(9l+$1vXW_MP>^0R$uLaY7x!a3y3p4tTC`$
z%`x(O&jXJgeHa_PXYJ^Ncd+<NJ3&X9k+%#6`B}YQ%>71T?}hObJDwu_xjWWKG2k^U
zi2Z+7oiv68B7r5JzKs2TG5TFeLt6$-4^r$tL0wWOhfhYex4x4~?f$(hesEAterB$*
zuiv@FXmfB;U#`fYpO%2$zG&6?8v1lAFZWERTa4V)^E?u)`w`|&+&+l+ji%BPk>iPP
z@xsrBw|U)Z=$^Qs=)dx+)4R$1`(O}S;to>84@ilzR>3sA<U#XrTf5(J#fx#yOb_-)
z52O9POE$;4J+VI>D>;O%Aamn2eLKnP39?t~qh#5As6&fKj-SXWFg%G|sb*@o=U*0~
z_Y};5*WTlb?RMdkYu~z`<K~CDm?wQ}O=?f@qFGu2hrqMs&<3pOa7%PlViI*Bb=w?w
zgJJd5_dT7wMmY7Ckv}CXMUd#%<%%2btyV~(^>dT?k5a-D8zjRhPuwc{*s}pApHN|3
z^oKKbkCyX-l_nSQh8~CuVZFItZbG?|)foHhYLaDL!tQGpyGe<!WwHDEC$kg6TC)i3
z?1??y{)pT2_y_}6gc6so!{7Lup2xA^8vY35&+R_!%IQ9l_aK1F_)P3$S7hi%t^K`|
zIUmJ7&W)V)Q4sJ-v5${h`g<=W$>9Fh-a?$;F~2|9+N;jL`dfCt<r@3T4ZnvkMGdK;
zAI7CdTO!!EbsZbEx1&N^tVtr)Uq!4-MXVe8xrxFd*{IlhH|qW9eF#&5cy46KNAFXz
zqL1E(RAWRwp&8cyerxYY8|OxVA>k0Vr~mzy-GP4BXV>?`xhN4oj!W&h21kkP%i(F=
ztxpSi=^E<m4bS5zvUIoK*4;(1lq-_=QK-LnTr8CfQG<wH_EB4ZujIJ;L%ruPV_1JM
z)H_7v>u;mJUbOXfV(9yEspaqKYr2T?v51nbue3C2eL;wfz5t*vh?K3b(5d=@fR?`6
zL|>8q4R~ynU3y~ZU*l5yne=7#t-5tka>(=eq%Ba{?mxN`!|z2T=fzE~iSh2rVB`V}
z|GyrH9nOgc`ad38(_h{D2hm6TWc1|wk)hEA{kgrp@R9Mp%45dcmG2pER9<1cR#{}c
zQaRapsq$*$#mXk*h01`jzjB4KhoxE~p8?N@a*ceP$KHjdNRJ1;4RP+@>KTMM+e6CM
z$aIVH(+}ksXRmabD@gqohF$yw&S$<r^lKo}V@Z2rPmY1>aJ`QaugvZJ5oBtMTp>BR
zD4%04!Fr}=t5rV7<Xv&OsU-FFRfZy0E80(!)o@hE{Xo58i=TNRK~VWS3YKFGMRkvh
zKBPX#d^9p5n2-^CbYos8RM}f*>8r2uFOgCu<++OFFWZFTT<A}w1pgA0v}&s#dKaJ#
z??lesB&-z8JJr3DHzWPs$Y*VSTggXdzuWsJ`8kt<@Am!-*Gq@zyc(D8m6Q6c@gr+K
z>x!)&<5YL-7r6YWe*;l<9rwpShaaEBdi1TC)bAh_J1SF?c%@t4p2>&`ImfB~Y$kQ3
zq|(3XFJ@Bfgb6OBa;)gT%VbmtIX#YkG?O}7Qlm`$Fq7)Bnb3aqVSh*qe&S~w4SBS0
zpMGH`{SBn2COt&zD>JFjAr%*OQQ%=IFgcU;LyHleo==~ZNx#cV-!AEkGU@BntaeD&
zvP{-;tH@K5-j+%K9MV&h9ze3bE|XejF;d<0b!3>=p|z?}@V#)(Y<03Mx8zW4pPTlI
z`<oMe`aKyY@4mo><>R!*bMxDZ)fTcE3|3idv0CmoHGhjULSAcl3ByHa@0#DiW$E}{
z>-q|=J@(~#x*kU6?p`;}ZV`!`C3e;G5aOGIiQ#NUVgwZ&+w*Z;B1)|gIT+8+1r2-U
z@6oVnf0M@Zxa&Ti6b84E9T9-Gjpa6srWC1<|C;KV0@ZRiOy}i@)S5#u`qe`fnCq-_
zahzmj7Gf`=x#=4?c)AWZa1zy*$mmQ|7i^<S64fKO(Zmzgh1+P<iE7t2+Hhjfwsi=)
z^H{ltCk7$YqgfKlQbZ&SZspyj;5M2Y`jK~+&ZMqxSFTq2$y!JZZz2~c^>5Me?i6Xv
z^Wn<GLBy*s*~*s0s|&WWCGqN!TiKF$b>UW-xvE`T*_8O8;8r#!7_au)Qy$NwsJ9#V
z6iP;K-@+Y(Q}s4Tsm-O-=2mLUS86M;)CM(X>ka$cpt@w1>Ub&H>fHY$syl>P%2M56
zOLMbbmgZ)=EzQl&w=_4qz|!38LNyj*Z{-Bz*N*f&KG@cvb#4(ms;=jps>%7hEt0xC
zQiju~;^#2<YWkCWxaP=yob@K=7H-(xf~R4@)4geK!N<EdUORkKRsP1=`8^R#qMpYK
zpQheCkLN#4jl~!A{jchkV0?s(+Xa2rbb@>I!9-4Q8$Dn!F=KFW8+{~VFl)L##D)d8
zJ;m7n31c4%PxjCD*jBcM?TY6Fw@Pc`XxCP0O&smoDy@m5U6!9yeVahnrti1P*uZHN
z9>uXw?ry?mg8x;$kf?!rr5|eYKgp9=UN@LPmsp)MJKZ_6)15P0b<Y2OxAQ$*@UnVh
zkn%ce>{P3<Q?14hypedF>cXJ(L@*BJTit*bsBS<DR5zdnj&At;$n5d8;V3VNh=<SD
zw_(cDALP7uJ4R8wdx_jJ$73QG*0ttq`|u=)q|}-(B95gE_eSeKL4jKH=ub1b+mTzZ
z@00YGk&ZRP67%zjfIg9%GdTGmx0k2)>)6*7>}v%}GBy!><20M-mgQdFLf$N)cjov-
zcZ;)hPAYjbkzvnzc~t<PWC;KJ`*trb)hE{Dv2p8sEc+tJzx?hWYGeFT&OQHKTlm%q
z-aPJvgqfa!qt*U<OZ{0$&E=h6u1z`Y?wv!Q&?iG+cewszP1UeEt_yH!=)bk~)!;6W
zSf5<Cz>ZmNpXqvOy?Y0mpXwdE8N&xx?$HcfyyAusPNm0vy0##{YLPi{50{21LoWY`
z{l<=7MTfE29bf!%W~e@iyHwa8x5zBrMc=`@ajD1<JP65Wyf$zzf4+vNfkB}&y2Ko}
z+bV#qW0GQChy>g=OI*sqnwazm>}M-?|7;Vy_~l@H@sVWBL0_`wh>shkcHxfDf52<T
zr9fN?VE3e5*SV|<4hxl;&p;+D@Ryj2QHMIidoI2AhlZ-grsVydxb3g((DqwUBQB6y
z`|UE%AxHA{SLjl|`wS$NZTjYBxm(~epTiyzU%k0i+KmmMx54V5w|eU-rX}V^D}!D(
z{$Z{8@6Y0L`J3WZ-;ws<euJkAS2VQP)AGQLQJ0X1Z5Gv=3v8a{;HkfjLiJ`d%GaA$
zN+q~^V2;hOuQlgqnBS3Mz6s1%y6Vjn*c4cA9z_>Ji`|2pI+|B?&vpem!npVGiln;0
z@SqfwCuS(`2WYX9_iCGEq=M}JP1xOMu|vV{WeVaM!%VRu>0;c{be7K?3@NSdJLMT`
z&MXV^u^HIa^?ZcH!#Cw@%$+e4n<r0vE`C79w{=|yw-xc|QR0Szt`o-i?0sGHroP&7
zUM;kD3#!@gnyB^W%k>GQe1sJHq5#+S=xaRbRfH$K=58v8o}6Y}e9Kv#FBum{Pfjq-
z@BLKt<Wj@adx5$h5?%8#H|EmJdgb{oTu28GjG-ElWdRpLi5s|=dHAMt!Dh(Df~x)6
zw5qP>4R3U+W?X!o&%7XoO%*=q-%aL2S&?hMwzLY(7*_8yxtSh$*eH7brt`o8LKTsq
zsH)ay9zy1RTnn;puu}dFM>(>rVO)X@sTiAs;Q&Cy$4eP6kT@QkLcCDoBPBi(@ocpv
z*QRh08tiV)dzQg|v2rch^%1JI9&=i<$Y+j2zruPF_fgcG5AiTiNy^&q^7&2Yp*fyT
z?q|8>!sy9yp3Zj}9fEeO>V0c7oAT-2SEDDd@pQhzjI*inYkRwG{X!vM?R^6N=Fun~
zyN;YyYkq-MD<`z&ulu>!kK7%5F<0lwIP^Z!XZ{%{xex*(^?Vh&O?G{ZGE?_@x>|v{
zQbvh9!89oLqT4Q1;4>dh7ur;t>RoEdk0&a-%28;JUBYFTDD;^ztHkF~k95o!$nNPH
z>Zs8e(Q^`2lgoPuV=w0P{23wWB6y6JO4JO9QLr-CdQifLj`EqG1z+s=eUOhni6;}^
zyy58es$bXRHf2HLvf7n!wO@ZqR3E>rK6&3mpszK@KP~1`YmUU-Gu+RN?LQ0SaL$v^
zLuS*<b33J2bo~x(oh!P~m2;xzi7JD!+(gaG@j349IdJQ^1j1ggPtJjUYEaYuTY1q^
zOFnq7Et+*Mx8Z2JC0ogf?yd*eEd08=wx}4Nw(g>I@vhDI>oembwL5ViVXfJQJ8Uq^
z*sinUUF3|%*1in^lQ(daPHn;}gv~PNB2o5=b(NvI#M7j8?%td?^+ivT&x9oIV^&<)
zV<c9^yY2>ttlU1}*zP%RYLe1=lK;*^xcw`_Z^|FJ@rCFI<05loPqPV2jcXG3kpX+z
z)A@bUicFhagJ+i?FfK_XSskxGZMx*__?w-0D3!bRXP5sv@=k33$GsO?<mH8f@s!&K
z*F@IZeA`i{=b1}B6~B-5%ub1zDG?&^G<B0L?2De;Dqvk_ZUn9`i$XG+S)q=|*_Lk_
zs>Tx^yy*mAF)O?8@-c?sFLYdM(adXcrw@}EOpx>Zu86m11a;kY94Wqf^rYOU$8%u7
zJ?!V?qZ$~({4|JGn|NA^cDwNOHSZMiT^HEnSev+y=^OU)`Q2JGF6QUPGxvQ+#r(%g
zKaAhUN-|A`)59|ocpzCS3wBqzimaW6PoO5*t{Yu<*2fbf=fvO4G<yH6vpz-*e<H^{
zR>^n)oAQ!T-Fq<{a~G@hnX~bi`?fK&c)Bj7R;89yvH39A$M>_yiO4V0sb2#_q*>S}
z{E>oQf6xRchd$|f*SmWs$^25AT#ZTpR<_z_{u(D+tZ<hxl8Y?76=O6~tPUEfo`;!Y
zj%W4QrH^NuBfEI7(0cM(d;m``QWMRSk5g$)sNb>AExO)4$l&~#CmdxS!UBvv_C-*t
zdGdPHjA;_vDrz3`)niOO^Oy*gsM&F1Z;s&_bxUt<eiTcW$w*HIws6~yWhe3w1-rEW
z5xGRFUizTwahr=F6jm+iWO=F!^HJ@S%W!u-Hl2S{Mt)*Y>OgF7f2<;fySIGbmbEWI
zJ<DLip!lAy3T$>Te{469iD&-dHa0vI=YTW+iW<VLT2bSgHTcusjz5h!wAnN2X3U@F
z9UUH~b!Z5@XD*D?#cd7CTLNAq<mC(eyd8mXd#EiO@CKV(0+$a%ez;*pV4AnJ;l@By
zpxyhW@eLi}+IbOgRY$m;G&guFL(5m<C5z#!hk^XG-)bH2O!Qu<Xs+}&hrNa#@V4MB
zir!Gri<dQetvsm_nIZ4;NOMb*P@zV=@-WcWxb{q}r7pgKv7=SqTj)is$oqv*#ETb2
zdhwdVw2;!g<py3;C~TE5QlpnIO$>X39ii4U*3poy5^qNX#P0wbRKY^RurY)eNwzhi
zRc(PH@4U9gmPnJO!mziYBXCB>N>fUt#z;p;pv~~&jfl`?sAH`+)ZtZmc3Ly!47Udw
zn}f}PChzjKQuVxRtLHDCRWnS(n=+d_LT#<&vZ|q@nca%VMu%w&+xb#Q5oFrwl6bx2
z8!Fk6S9@o)Q`?q?A_iXJNVT!EGL@3hJH~o%C%dvK5NwFF7-LW8Ya0UicX+MeoIqOu
z>I*=lE$FaS0dG5$sq~NLrhA(W9n%&vyy3NY*Jdm9APNnisT%MPEB^CVw1r@6G^y-@
z%CyD=R!s9&@+Fp`BK>N`4CQMpq2a5&-ucQVo%)6b!hr_7)RM;K4TmBfjdsV58DGmm
zfcnBAXuPGl=@aCeSBVDvL;O`kZF$Gf`}-9@{>Z8N%~B+ch#HBYbLHiu-Z3qq)he3R
zgGCtoT2V(MrY~u6bK44OG`vSqQIU6;77Rt&nuclY7!^e)XZ(k}J~WWsi&Wa^FwC$n
z6oL<FTdT4gV5GFA@a49hd{THCf2WS<*~Z8y9339ZXQWU6Wy*_xbMznzUk(qa_-XUz
zT)S{ljdxa!ujblW+Gp(K(P7Jts&S?@OoRWMHg8&F7GACDXuWX9+iW>(*fOowvK5Ch
zVf4`<&r|LpJ7=LdQA;TtrlXs*(QCBPA#HR-8{GoX0@MQ70vtquV}20t+I+y}p7Wr~
zU4Vn(0fiao;Z-5yhfm3~X^wqDx}E>G!l){%sd_g54PIML$tzW5wj-U7u)>x{H!5SM
zrUX|ubgaPOAwJV@LQ`PXgqs2#p)+M7jnhGE1e1;40Eg2Ng7M-7xvN?NO)KDKFuXe=
zoD?t;+B-rk@KWE)HDQTY@CwIID32cg+vOYEBNJK;ymEH}_%>QmwxJF$7H)2X`@`r8
zwRx?#1bfljpPx17^D`GLoK=HZt%@o6$FTw9tO>fo+X!bKf*W2Qz~~BKo+B&Y0{@N6
z^=9L=@kIImvGRPEurB4hw!?04Z2l*Yg8!HF#j0G@KT+NX+GYO){Xg55Q|X=hpuF-T
z>oN6p{v|W!)y=4`n^#{m*0LPKSc~qoe`)(!jzt#c($H#5f?W9!*t5Rfr7%Y>Tb$+y
zuO{}WNNl$0kbVd6rC#M%1k<?qxe{wDuI8L2;lMBc(%g%`^tp6ViCl{Tfg#XFBjQxy
z#TaPUn;XO6(=JOx#rUdWT;W90%SF6Vy9pM|HHM{&Ie0_#?1k6Xja3+CTvJDbwiA45
zf@>F7&#zfr>-Wv5o2yNTggfMm8f}rrmOvz|p~7JE3MD2CyS1UcR>v}`$;+vyxwX9|
zz*P?L+JFHMzN)o+@|dySU;_pv=BEz447{VwJKbBnX7n1YiyGEg@#69p!sXepF&j2z
z!*Fv}*`{o`yge(oISWFADz}W)Vxb@sSyF_vGMlmx+>)bUFbl27LV;jQLncL<*BG8A
zVtmP~jV>--<JE598G!OZ0eBv~uY5tE6?59SChNf5QoFjLJv(K=ocaDm3m4XD9m_Rd
zFy+<KqHM!)pcb6?IN)hfoEr}O1~f3BfdLH+Xkb7C0~#36z<>q@G%%on0SydjU_b){
z8W_;PfCdIMFra|}4Gd^tKm!9B7|_6g1_m@Rpn(Am3}|3L0|Ocu(7=EO1~f3BfdLH+
zXkb7C0~#36z<>q@G%%on0SydjU_b){8W_;PfCm0A)xbAjb-BNeV-t=p98nx>%D^)t
z|Ce^?fY<{X7|_6J8sM8$PD^wq@KX+spG|*ixUMMktlbMqm-{swf5veV$FSR7?u&4Y
z!!ZrV=Wu)x$4VSG;n;-Z9vt7tu@lD&I9|i?XB;PS4Es9D;~0ly8jjE5_#%##IBvqR
z3CBG+zK>%kju&vehU3pTPU0B08Rc<|!!ZrV=Wu)x$4VSG;n;-Z9vt7tu@lD&I9|i?
zXB;PS47&s6ag4(;4aetjd=bY=95><EgyS9@-^W2!agM-ONhG`oAz$d!2|Wx)copUm
zs&vc-7e1V#X|9bf_h5ugG1P-l$17FNLdf!b2{eCv*GfB{W#rpd`oO#p;W;=iz;Ro`
z<z~DI;kgLM;5ZKl1;N{aLWM|2Uxio}A4v&CH(4?Q{sX^zv|=#BOMf*!IebL5&yKUM
zO2uUg!l;Vl@&9z3X*~GjyU3!9;CB>9lo9;KqD@hW;f-RB_-;r1PmVZ03Tx9(am1H8
z;;S6-I~?)<#}V&!#LtG3ZJwo$_)<r_9r1rra&B_O`TeE)RXRU#Wz)Rkh?|c1$By_2
zSBBon=ab@NKY@OwBmHI-zw}$sE#iBWY<D1TxACweJ_3elr!RKIzu}1g+!4=(!P@jw
z9r1QY{C>o3Jv^@BV=6T5XAYXNFf5x-$Pxd##7AlTeUcvjzoh>M_*1r-BQ@=yivRYS
z9MKii54!LN11PF}ACYVsMo79>(#K2ua*5YS{L>QulEgnF@eYZPmUu$qS4jMRiI+%x
zr^NBvcKm)V@re@em3W!N^YG!us5VLBpOW}wiI+>fT;kVBe5%B6lsFWQ-|Z5gF7bbr
z_|+1BM&j2<{1u5;N&Fp&&ye^KIHjmIQ{sH@QdFy!c)7%9N&GsA*GOEK_-u)9koX*l
ze@EhTCH{!S=Slo$62DgBXT$MDwd*8)rNkFWe1^npCH@78<0V!2bx0iF-oh^-@h?dH
z0f}30-uO?6cSyP$jyS4CB>owRe^uhsCB9DLUzGSQ5??LxsKmb|@tDMaBJoa%za;Tn
zC4N-mn<PF2&OWNiyW_RbNc?t5uafv368|FNw6|Ag=V-U9_(qSWJtj0ll4bvYcBD@{
zoBS<%>yWrb|075Ih$DVJ_(m-fZK1?18%sLUe=2dyW)4f->i3H=8AUa#f6FCqF<Rw_
zKPYjlzkV%ot1r&O<P_CzkOCzVx5~CT;`ck^e~|c%LNxN+jLg?dJS^$$5?>?nPx1q{
zpF9Wl6&HGIne#n~kHl<}J+2>-bZgB1LgJ%@{~sl8jbBczQOz2^&U!CGx>xlD)0<F|
zb7gZ|vw@eM$%`by9gP!~hbPQjJa7K22`gHfmp6_tEh?GN7>-QPRx~!2;yoFy?R-&0
z5#Ib`Of$w5UsW=8dWQrR#l@w?=^s$Zl=QDcYs5P!guc|GFCAM^Tv1Xwr9x{7$;&e=
zZWI48Zjm;=`UUT>u%#$-luOG{Tns5DriHNUI<4@ef1+@fw39OhOB}Ukq7}uN+8r^~
zXyJ95G*dE6GmO|2hd#4-h4oMe-t3|JqueT9KDJ`~#L_8~%PaU7O}D5{t8J=9K9$`u
zdD5hblR#;yHr-<-#Y&=L@GL1Ux4JFODMM$QLJ66bP6Df7OQ=DaiRyRcl_6Ja3PtdW
zHOqoBonFo?QHwJ_)43(3B%l$t1lFXRT!Ib^mv;mjTBeC5UR8Y6#L|l9)`k@dPb_6Z
zrl3PCy9*~PxoqCf`t2T>GPXhlv}sNgRO!A1%C{t46>4s>+6X;Uwy9&aqM`}v^;mpw
zOXK+P+ScWvmT-~&H;16S)^B|C#PZ4G@t(ZMnhDl>UQp^3hOmPcq)IJD3#)LZ$gAKc
z1Op9t%S(WDI;6pC-zGHTopdU>wK?24!I_qR)eJlVgjha7q`{kI^aeu-6<E<2hR2v%
zQZ#vTx|Mim9JprJ#n+wT4SQ0*6`zn!YC+RhO{*JIBF-gTR^EiS_O&*&_}fD?a;C$W
z#zCE>W38?>^iU*>7wm-n;Xu10K##N2muf3ILXmd7pvO+1Tqf4hX88F6A-|=5J9Fw}
ztC00>p~khRWW)NI-x}gugH9Lfs*=fKdP_A@oKdQhsUjBhPZg}RR3uxfwTHsZe8Zog
zBhi+ubdreH7FZ!~|I5xR7qOPoDf@#R4UPV$<`vCGnC1^1O)M?Gs=VS%>E%dAeg4L<
zza6hm#7ipEWhPEWUON@)Uk)|2H#7!pc4cK!tnEz2CY2(u?Tp2s8>==p3!NE8+bsDe
zQw|h5HGK+YsBqfonzWU`aFyX?()@la$saa4B8>)ZXd)-5@Wjb>7TSk2*iVB!YgJ6D
zU=p0rIEHXGYr=|6Q-jek4JL+8gPQ#QMq_Pzz`tBrz~|5er;cSVjl#}0Lh_10A%b@y
zQOVe=(w&<jla~rAva3}0R-hJDIsGQ&f%9Pi*COJThy%f}#A^z}6C!QRYdA(%VVu(`
z_~-CVR(SuDHL^a5Y&mRW0^7o&9&WxV;FroKQ&$kTY%HXR_?2TXnWU0SP&d<MCZTYX
zs7KL(q;qgeDpZ-_LMLe@L$gSpWHI?lq@l^GbrO=8F@+h<WGD~GlbH<G<u)}H0+kjE
zA7=(s#0-%V=_Qlx5|-~Rw+m!4IJ2P$oU&9gvD7XBCc?`u;>fX@EGj}JlgrXYtX7M-
zk?b6+;a2+^nwmP&Mc8nvSIh(vDa_ZADMgk@=TkvcaC2H=m|&#fM5eEBq_d^qBk9d;
zA)8Mr+lh3Mx;50K`WyYncG?BnU_&>ii?E$`PAC{mr(4aG8d{v`Y$WKV3GEq?O0CY7
zP6=mB4OLs+D;XUv&8_JQtp1e>n4ZyascN-l5ou+VIvX7fXR4m4T0M~-pxp1rTShV3
zpq;GIUs6G%;Y2dI48F$iZ*q3gM60<XWn)%`w3qG+MU3Xwv`Qyh4Ho&stCzQ=H9FC1
zuw*o1jAt?&Ee<x}g>B&*)i|;&T6!ND;eb89REx{dz%ZtyASONzX=z;<TAT506VW_2
zxtt9wDK52|cw=C#t?n|*o~=RC-spF9U76K(869XxBjy$*K$&IH(iAHv(@SN_sHK;J
z;Zq7y2arb$(av;~b=rF{j5mQgD^=aE%37I@vPvnUE!ci0XOh$UVX}@KW&WkY)9{C}
zC}~I!&q)r|82-p9nU->-AVzz;ktt>=2O8xRMYn9|SerJ5>8QnPw_6Dl#0@K8dt;Qb
z$xe0dLLP3^arULd=p^QEZ@^nOInkBVONYx;YDaUZquE%i*1xhSfo-e0{K1B>K?`KL
zDN+u@BWz$%DAWH$wX8xK7EVHFjS+htoo0mfLL*P>z(xGU6g7=bv8K^%I(t^uY%v-P
zTWeEf4geR}hfLN@0i&T&r%1Buknt(2Io0m=P)l>8-8@SyJ4X~^=>tQWGc%{|<~F=|
z8e@d&Q(CdsdMt+5J*qUdz+;IOk%o>YdMpep&W!fr4h10Fjp7VABrVmbMF0z?vr%vg
z=Wkg8V4<Ma0E)uNIz9W_s=+L-9NZL6{bU6D#$d<tfeVBig}3dtWNqSK-GEi2taI5L
zs_hkNZIh)_<1+byFXy^&8T?+Pwbj<BG8kK$w7&qgH7H>Bc4lkD2&}O@1F|_R$P|Mh
zTnetOew=3nI##8%t`^A5X~Zj$ZT;DO*y@*ed`k1ujbQs){Ws#BnWuDJYnCq9dE&&g
zM9XTkI46ilJEL@z-NE;ic8A&;m0w2@%S&Te+uS==XS_J_RX5=j4<?L$>R6p6oXjt5
z2-4{e@KQ+C7|Tc{V>L`P&|x>;J{d`uIkk(GwPuQ*Mqr<h2#KSi=`|~)X%EZ$L6tPh
zNHcb0HPfj@YdHZUqvgPJPz?^==^oBzY&#EIeKMDTiDgi5+pD?Yv<zt~oe~BXW|-CR
zu6APD_OQ-Hvb~TiQ`B7HNrt^#D^m+p&TezCfN~beOm0?Ari|sk>DlqhRle}N4bC6-
zJ4Z&krp>9Yp5`4h=i0?%z0UJpZ^_iDQ;R2-luejVr|-oJ({VCfQdCk@%6GO08p46G
z1BD$I2>$=9Fx(T7AFtpRmlPG3ApGy1rWN5@h|#bdq0wQ5n1QVrhEAXZAIQKvgabu0
zX3iULG_25y^oB65;54mmLqRJvI<%q{ZIL3r^A_Jt$O3-kVIUN(2pLvnd6=)vM@oAO
zQg|I&v!Zayh~gc|&Bzb&EF9eBZ$Rhujn)7@(}C|ipm>uN2u}#o(AtbocnD)m!_t(7
z<!A)x@s$a@_t<KJ)j9vz--|)UZp_7TJnC{EM~F-5>7QJr2jW$E+@=#cH}0GBGh1F@
z`{z;-nnE59^5gyWF`%miu=5%6;Js?x77{w%cW=Tq`z^>|S=LD!+``a!XAD_F$NTiW
zbH0wu)sM9N@eY@LkDd3|qqygAC(_7=KNjJ^yH>m>&p7YP7eWXh;<n5-eIwFv3(k@c
zbWNb6i8H@Yg~Tm5Y`PZEwSdm6^3PWx>3GM>rsIBr+d#*C1muTXRuYo#W*lr2Zqdqq
zg-+aWnt-_dv*qhVf=%}b_BA{Lx^!bzl(caN-7ee@*@b&ME!OQo<XAdp_;nmMKkkpX
z3b&59Z^HiB_1=X9(ouiQK(`EZx3K~0=T#v;$4xr+opu7f7Syz*>~!_>s&E@Zn{Fxg
zS1d(AyDpO0@gF+q_%WSjprgL*pH24&5^R1t==4vZd(uJ2eI4zf%V$CLBR?LyaIi1f
z4(_j6_dhi4A;f7f{E>!oJg-91RZYlqSA7rRu#ALWr1SS84o5W_>1JVI;WoJZ$dBrL
z8HeajQeg}K3RmkGm^P2!A>WRZ^pPj<eF%1r`q_DZ1m^hVkNK}c0o0ZKv*}<SS@kBL
zvi6CbN=JG}HQH5sG%X7GE=76=4z`2imp1Qg$HTwDH$-q>)Bf4@+SnP=9}y2yEu`PE
zuvIhti-oNk=tnHf+93n{g@vu&viIE#k{-3jzm;!khWmFcEP=-HY+<&-+UH|oI2Zi5
zpUA=(%=mE}TG$#89B&rp;I#G~Sr|8k@#FZhuu=%e34Vh_a~LnMOAE7CK%d6AA&MXE
zo8chkv1!K^riZfZ)xskL(=IJc&y@KMl3h$rY+Iw1Hb}crBDP%(%JK}XpR-8jH%PlA
z0}vYot8n(SOZ(3hHDvE)(zM}O9GL%U2M3$}n9?Wd$0OgR^pyjBao(}@kpq2j-f%ne
zKM!n|&qetLU|YXA*vVx8mw&_3Kl5(^_Ca6NM2>d8wh>{KBmYj|We$vCtmQlEqrbBI
zD@Qw5-I+!res+5_)&Fb{{gI7X|E~a>RDZHO>l>x$na}z%@)v0Q@SpvzeYU?hEB~A`
z>YsidWcUr&KCmM4*OsqcwU7CO(1B6f4~8D~G2GFiHhuB748QY{e?7k4LcWyuGb~?{
zDL;;QVxF5Hha<nq2<@NEZ`nf`eig_krVAv$Dq?)3_+eo7|6E}2*gQ8k_7PtP%rCIh
z6A)hyT<*Yr;7SK>1+H@7wZO9+I0`)1fo}tz@4$Bh`yBZDzy{>~u99~LaKXR3+_Y25
z|5M;u4*U`@zh7+0d%pG>u<K!$`%{Yk55UEa{P%#ba^Mv3B@TQR`pN6Sg}{d==efC8
zkoxulk8<RX1Kv`W$7P-57X#l9Y|Fzveue*G?Q^93Gl0hcFIMvTfTO_IDa?I<yHKB9
zeg*LBkGR~WDt|R_!J{tsB!xGT9`&JessEeAlk(hA<Wt`70#|{bjkf{UIrRNwVDHoT
zE{)>%81Q!B?<>3;c<D1Pcc;S710M#q^M3<;+p{kB*$COb-yytrx63_LVH4p)d#&{`
z^Zygr{@M0=;FlSDJ&F9PU%A|)RDC&^qMCr|hghC_9k&C|Quut}xi7oi-%<Dq;3L3K
zKp&(p2A=<K*sltFF7Qm^d#v^lF9061!`jbE%=Pp>%ttqZA7_hIz%K(=ApU6_w*nsl
zrv91#9pK6zyWGD~{O<>zkN%?nBflqr5AVdfU*YG0H^M($q3}z<<&V4Eeue)CeDr57
zH^&9bzYlyI^{o($^%D%kg?+^nK~H(O2XooCU2g6NCH*MimtjxbLrOdm*xuiK4tC{M
z0{{F6)_z{**8$&l(B+=0>Td+rfjJX0|0}>%%HGd`J*@&>^McDAQ~7aV+aI2T`DZim
zvEO2kvC7{9TnKqNPf*_7z@vb<q^16T1zZL^TH!we&jOyNa364;qG$P`Y5|F4cqbgd
zO~?-^`cDIo!uW3#jQ$5+2m9j6gYB6CY=C~0qOSw)1U{^A5cp2uM}b-28sG<j?^bvd
z@B#EES0?0lH}JzR;u~QK|10oA=+C7JKMnj8>PH~-+>4rz{^h*G@&|z*0sncxtnbgj
z`+%t*;*-EH1Jh4aUmh%~P1MgkmcJZ0|4HnhR`yZ?d<67dS&(J{a2@<T^>q$3RttPD
z?47z}`2g@n=<9Zc*8(3$dE4GM0dqdH?fJXF`%vD-KLobdbLZmB^e4csue;ofAP?*R
zDX{*c%RN)^KLl(%ktzQUa3Sa?AfNPHZ2$aDmz#c!@|^`d3i)<_T?+gN^vRVc^CuwE
ziTR*kwSNk58R%{K=K*iQc(m+kxb|h>S;*fc<u&aq#Ly?yEc|W)u0#I)z?A1cV6Oix
z{hhD<nDh?38+hNnm~T}5F9Lg?a=AZN{C)>q41Luq{GY&=pg#5w<>$)Mg?y`h!!_>F
zZ9@IigdcnpuovqiyZ<Ht&vJ~%slZn$f6o4$2|V|kF84PSe;;r;>a*>?5x9!$ty0S#
zRswH%#pPb0<o_zLf%<1idF)Lk{SRI4FRA=3z{QUGegtf<*9*{|M}h0`4Z1rN{nNmm
z;P(RfQJ*gYAAmhs;~(}9d?(s(>;JF7OC9#g6QMgD`X~f`0C>CNHyU`ZLmv}?A3;7&
zzo1`Ds{y_n<I(2-1>k%4p?)P_6Y$1gX7sZfcs}$sM#>M@x`<(~S19~#;3)j3t<ML5
zIe)b&em@3wL;u$(`X_<MIP~=b@F=ba@uR=w-sNSGU&AJQ`q#IBxgH#?_?f^*?sK`T
z&;Z)YUx1&2e71i+$?}&CO_z5;u=xjF?h94@+(Wt#`mp9dYzqS}Mtki1D&Pb6xZLln
z`h38hzi_#asPcZ`F&K~A6voHEwA&o*=O+YT27j*4sP8V|*U|p@iatqt)R$Cv3$R?*
zK;VVF{s4Fl#xIlEzNZm60)Ar!YuYb?mkk-79)GU_oBx{e??-@-gWmQZCxGqw=v?h=
ztsmHh=U}EQe%z;Bs4(sEGT>3bSF8LI;4<L<Qn(uU2=sY@;NjYQ;D@1q+y5^GHh^t=
zUI{!4<!%4{Rp9Ngcb?y~eH(!5klzl>`tJgM9rn*1@y!1ra6jf(xCz0}0ylyFUi1&?
zUjjCOHzQ8m1KbJB_7Q&o9EHBD@s0D<eDu#xF`iZb4h7!w%Z$D+0bYmp+4I4bz;}Wl
z*CXV|{pEL~zu_)Kp3eb~>~^^iDt>jquOr_cFUx@+K>6o{9@jL0k3EOyP!;{Z0FQF`
zvpDc^tmnR}_}>Nm2+CXjP}Ba6^p5fJBVhY{{Ty6T+y}f5^e>=1<$W1AIu-55kK^lA
z;Fpna>*vqF?#Ep2VkOT<z;m&lej4=D|8R8d5zzk}`Q&#Q@bwOVGzR!M@@EUZrcDE$
z>zEG~0=w?8)*~z*1fK86Uk!Zkk6i98QhvA=1#WW8Pu~Q74*kI^0hH%n;6m{GreIC`
zG4O4$7u%ox9JmwMwwFHvj{^N#Mc)Tp25j5o5L`mJ)6xGUfn7h#@EZ%<^r}7Ic(iih
z_Lp4lSCqbLfM<c9-9Og@*8$&;`q<u;z#}nV*!ExmS3!UDSDc^L0o&uh05}f(FyzND
zmG*uI_<D!Gd<eJ+{BK7-`9BG~5Aw5vsh|D8g${rA8{i!det!TqP=1{%e-gM8*tUmZ
z9*hUa{O}pzhr!?0XDP7#^CB_>_yLrsEcAEST-j{!o&+|_pSBlXw$L|r7-1t441%D&
zs1&z)XVooS<exvUw$ATYo0jq2#iEJGX$tvQw1k#pQ>)y-@Ha%(Ahl+$fA*po3u^o`
zYv#<m7KK=ybz@$$KD%91uF3rml}M3P6rVHY&FT>LFX48H-(T&h+gYF7H&OKo4L;b5
znv}3Mu*9&C`g%E9g%36_j|7X#%QbxNG}O+=2C)Am9PlH~yFIwkQZ%^~Qnv*7Vd|pE
z6SekM5b+z6{4k~5*TJ`8aq|{mQl#*KCJkTw^sj1UHb2a2Z3;l1zoTKbpL^9b?uo+p
zWb12cXUvQQ{otLBW7~}uM0;CmIyyof)ws#p7HP*fETLDc8r)K9#s}Fu4F7W8rPi8o
zBi6tcP67PFtUuVK)vReY>Sxw~d75zt_6cP`IIuzswKU-)v6e)P;~|K!B;v+cYjeno
z%O@qZ#-ft)V(rENf)Z`jiU#ZzZfRJnaesz?mEmt_<mO&H5fQ*1Fxl+@#Wi#ok#_2V
z^kIB$w;lVV4I>~JTPSdwE1kp-e;1WbEYsK-r4y%EVOg=pFZue=2c=~bHPLdI0SZFl
z62&K$(@82G!PmqC(98133aeZ2JyXBxuvTnSM)!q{_Qv+LTDT#IEy+el8v!h{X%=qe
zq1$k;&zMa}!(-p$gYu2KvJBpK!_I8%g9>QaGK0@IU(4Hf_%JE<&Md60j&y`W9rLjp
zTns1@ZV3e1tE%SApEtAGUs_bGwcdy?Jv$R1ExOB@0$%d<T{1<a+A^eC?j5Sd_8lhU
zBdB#DA3h}<z%569+?8UA5YV)<fD&wGL)(orX40M;^{m>1fl$y{H$P7dp6aXAEKTl;
zqvoIWg==Rlm{+a1&OXgjK@T;|hA=a*7m8%^z0i7o4_)JyFeWvu!naxZF<E?i6yLVj
z{IFo$A4Lv3;abGW03)~~umT@p55T5*i&T2kDQk16y~T+!1{zwpb<vr~Cbwqw0QM?|
zvq=2GcE7$_!xzyp=A30A5%jOdDdpoRqgD7C@VRF#h)+ki8CmKBd7y2TlLz;JH)M$!
z47NnVx|4=2?+65}&)SO8LNn(rto1Fdts_#S<<xFvk@?NbI~t%uP(km~%UT#Np)t##
zV6j;mFd9M34KSw&0kTDKH9kI;5Rl%(x8g&MOsj>*@cW@5Y{I3UY2D7!GTtZ#4Hl0f
z;LfxUqgwN4<WGB>MjdX@S-8;}bG2{?9Sv{{iqEyy7l183bgmj6nn2~wqF@i#3|m^l
zokrE6Ry-XdMg}=%@Npx%F=#Qi(mIQRqPD{ty+Q1SY|H9Mt0f#^GqAy#qYNpQ43V}|
z)QKE8xy5bETQJIIHHX{j9O158L#wjv40PfSph)bN`rEdRZ94F0PH~X}^*dA4Smj_5
z@n{fsU$HLwquNF!wk>IHLSG<_BtCs@xEUjb4P%;&hx7>duYvE*su&OVv_)Dq*fCso
z?b@*PsmvCbmzwB!I5&y}P-zx-JbnjnClzC4&u;DrTSNQQK}svZp1kED>`>%9Dbpkq
z5or!K^LxYGh1g+mp2ip8G4>D%JCzZ>vAKOUK6x&kuSN`&Q3roe&2c-IUK>{32LHm1
zS?Gn}X>AR*V?uGV#cmFHJcULWrvJo$XFm0(H?*yQ;xXGt#OcrSEtm&eF|bBJc0@Lu
zX1oTHAba(~1wK6GMgkxi?U_-B6byakE$I_y`etctpb@f~NY!A_$oc~Fz2A=wB1%En
zkQ-=gnh(FJ)-)J2&26j)R;xTrR-chS6cnbz<?~w>A5b@E4RA})1=z%j0VY$PJi#?9
zQynN^a@C9KFjJvrdZ49UHE#h{J<=RH<80%i31Jnc<jXRiCOBHvD6rNsu~AJk8fDHq
z-SxsoEnzgt!w?H&U5l@OXODW$G0pfUIlO(Vvm=ApnVsdPF@Uiy$R^32IZ7yXN2{`M
z%Qt0wII5oStCLO^8Yd^2X*3ylr>q7nH7n1DL5W9S#Qz~(eBXRna-azlr_B1N6h@VL
zC~R;zI&0$$?!*|-O6F6Hv>N?nO>LGKO^vIYWX*uBey2>LAXtt~!{HY0m;w+^YZ%Kc
zU$rwVY~XiVI4o%r8r%at3kq>b-p=_Ve3~cr2WSY`?>K+q%o+3j3un*9hvfZrGiJ`O
z!TALInX_q_44SMD&O1|4f$|9Tb7sgoigj{Pn#NEa8tW`XKLJ;>ik=*H?aZ<td0OsF
zgl)Gqo~|g_Z|S5%%{MNGqoN3yHfA~}4J66>kV@yO^ptWCBg>`D?g)G(5@>6*=l`rs
z+usGVyT3$hiexPYP$%7ER^L;t8B5FFHY%!XZ)rBH{yKdi24&N)Q*^qkhUIj3=y9kO
z-dxV=GNT*npBV}nv-oj&WMb90${z~*WyMGraf+dXA9OKqp>IB=LE*)1&CtZWSqkFh
zXU1$9H%23JPhIMeqf<VMU2P;x*EyrTy&6VJ>n1lm@C$Eht+KF(p3gbTOoUTRdb8|4
F`k%T@u1Ej?
literal 0
HcmV?d00001
diff --git a/board/MAI/bios_emulator/scitech/bin-linux/glibc/nasm b/board/MAI/bios_emulator/scitech/bin-linux/glibc/nasm
new file mode 100644
index 0000000000000000000000000000000000000000..fbd335261cbac7c89678d8c6326b5bd02c0ce976
GIT binary patch
literal 263498
zcmdSCe|%KcnLmE#N0I>sW`Lj(1B~)R5JaM&1QMP6n1Dj+Kuo|N5v)ST6cyoK)JnqO
zO=@ng)6MSI)^2M{mbPnKKP|gkHU5GG*bFM&4QMM0ZPQBIJ6_sGjbR9p`Mlrf-bp5)
z+kJgL-_IZ4z|6hp*K?lpoaa2}InQ~{nH`~(6%L0(O8+?}m&8!>lWxyKJOheLBrTKz
zQnoZ(nkMDrDM?IQ7)2g@I`Ga<7Cvr#SfY;~r13Km@BA>0u!m|xn#A&oQ{so^CBKy}
z;<9o)9r)xQlO&_TA?jti6WQifx}<r(&hhZG2Vs7Q7wh21gGxL*-5!1d2=kLpyL!`o
zU%YzLy;p6z?*ZkJ`CA{He~py}&;qw*U#P~LRgZYV*GznnO}Z4H9DFXrhkw(phjgX=
zT!7~Ud@jZ(4<FXazj^pvE#9mzFCO#p$;GDtA0Iwr@wo(_^xssxjKSv$J7PATbMPT8
zN#nWr%)saK{scWgFA?!W{g9EzlktB3>o`PA!sjA<CgU?2pUl4i0_+3QaXdc!Bi;Cy
zj}QB88a`9-nT5|Nd@jd_e^*(L5#Nh|prN@v%MnYO7UGjc_?vcEMY^ZO?fDX(OmD@r
z2mC;qk4F#eLO2iUI}v6*gZRuwm~?0UJfts1n7A<fV|<n)Ok5aViO*Vuy~xLK6Fw1y
z{~b?;$0Gg_gx|5lTkvc~_&PiP!w5f(@Sp5(Kf=!<{JfpN0nc`X@36x!;duz*=kO%H
z*Whz9qdoHh$H)kO2kFO<e-a2wd|qHW!d?)J;UoAY5&i+53{OP5M|XS5?eGRX^AP4(
zWqJ$JXCwT99j?N2F~Yw?r!xIXd`@N5&vq|I`awLIz69mhBK*JX@Iwek5bm+Vf5P(-
zg!93?%>QrrG$Z_D<YSop{4~PX;K}fp@p%?u@;t*=AYVJewRZl0M%*EUU$Vn>cpgLe
zr*{5j2pb4z+v$Hrd=lYw|E@;72XZcr?>>a{5Pr`t&vLU7F0;d>c=l$r|F;M)Mmqa}
z_^m|#<p_Vv4&Q-r<E_~?Kl-F;2(LwYy8a--5rj=UKY~Ml0laZ+KZ5kMOp(^D`_lan
zKCo`9eD@Z4-8u<k?0$-`>-ct$^|n>sa?j>RrOjLJdqCbOZI$nRP?4o=TkY_=b@#}R
zZr-r&i_(`i$QvHm28bviKe%ZfvTxY(z}=gqjY!!l-M`^}0Y>5b-J3Q&c#pJY!~G9#
z+aPV+xJlU>K|u?W{GhUV^M)<b-Culgi;ViVY`G`0McO!2|CW31mXZ114O=#R>AtO~
zW8KCrci+DO^=*7m+PHPYhA*?w1NYp&*?I!^EgP%~w{E@X?gutX8xg)&0tR<)lJC2J
z15w+$L6$bk8#Zl{L=4-^@^+;g@7eU=)(vd?hAms9P50in4frVXJ<`U9x7;UhkTyJW
zABsP?dBX$Jx|?oUCzAMr0{1<zPT9KQUZS#fGm_Vlur|H#zx%!im|(S!gc+v6rUxGe
z4c4vutVV8269Wy|0CX~^on<R;DlJ=g&HMr>{l>m_{$KxdeFg;1>x68{VZKv_Q&#hD
z{C)S0<*afPOvpID2s@<{HdD?9-)93k%GWFiSjwd=2zkn*EHFRiLKXmWd}LuVjGoBx
z<e+RLpQyB%PmKE~`OJc><`Z(|>wIEDeVR{9KHuRJ6T>b(F~NMF&oPh#d}7jkj!$5^
zhfhpMKj#yZXFH!j{8c_NL3Z$o$@L(gn6wV@iHYklpBGC~H=mfG-{upO?lC?wxu4(@
zlT{C&n5a(jiHX?Y6O-2|J_BecpO-<$;q!9H6+Wk9j^UF77j(#(iTR&TOfVikF_C-u
zoDKT&3Bi`jCj?&}pYt$J@`(v5z~|MF0enJ1sMh{a6*d4@x?|^o{i|J)uKpZ>rViPe
z>W*!bjHMv1QTm2M(rX7_KOm(RJpxQpGq>ZLrBXB5BN4tPdQ$kC$)1TYEzvE)?4by|
zKG7k<?5PM<n8Y3tW{*Vz4DS+Q_FQB(!>uCxG{fK!DG?Rn?=ZZW;msn<9*qPUUN6Gz
z*~oH+!y?Qcj)WNwiZFXRvX<cmBFr9-tY<hN!tD778<g;ia67}B8J0x&RfZp7xc3|)
zW|AW!QHFa&n4A%5X1H5~$sv(ehC4)<oDzAO;XNWuj*0AIc$Wy1b0W_&+$zGy7~aEh
zRD@43+|KZ35hh1PIv8Fr!sM*TA%?>uOb&~5GaM9Qa$4jV!wW>192e<fI3U90yokZD
zUxbqk_cAPr@F2rUhI>C{`^k|J$N;oogvpr^s>z9N5hjO5{0w)9FgZ0s6)CYtgvqgy
z0K>aPn4BA#&2Xy-lY=7*7><fCIXSYJ;msmUj*bKwUN6Gr?8tJ4!w47r`7Z5u>d9pI
z*42@6%$bpAq3EruiEN6wJ;pvXsIRpZV?aISQHu{@O&}>H<|Oca+d%|kVYfDkFS?ZK
z7BT8#Njce0WeOu?ta`97vL56xeubLiSuBrwrPmK={T9sE4_MFkJgdY6^<Xm6M+8N&
zzYeBSuOG1MxAW#!=^>9^>uowNUyR%sobLiS-|9vi=kRKdLbYLII$rf!W2mk>*VI($
z3QNYb9vSEH01qjiCEIVr^x#j?WGc=^3W9X^ok&7-oyT|<@?rPA2*$HE;ro%}Ie6P_
zmu#aX-o0F84j8|ijpEIaOGK!~_#q^zdeE;HiyGz0YO$!$*Z5~jjdJ8mypK21vzufL
z=7MZqfxr5MLlgx;Rswix5i=M+cz^&0MO5TezdId2=LgIkK#~BI+U$<}pgP+VtL>;V
z5`sQ`RmR~ak*STSt4W8i@fFa(_xMeiCe)<U*EAlepzby{GV(N98Trn&;0V&CPKpG7
zWA*bZ!N25yFo9?>UnJ$ybfqF=m6b2JFx8EQ$FtrB)+9BNCWNZUE5OTm3O#Fj(QeV!
zOCh+CTU4wE-Kp-T4&{$_$U{KM)S{ChGkW+i3MMuHW0Z}DUM1*){(_W1%Em~(8U-Tz
zQB9TcYh>R|8~`3brvZ(sNDq?gCK$z-RuFBD9>y}Bbt~FVpz*A7ypdZ!k0Q<?iX^^?
zY{18HPE*=ZcP#X3I2LLT8@sV`5*5qqL2uNaawwBUYlu=rssSag5WV9!mume5N7ZCX
z$wDqU>t$B0y@SeA%ByQqN_)hC+-)p}c4W1Y9AV?!8M1yr7uBW~F}2G0CEAQ~RmMTV
zhk;?TY6qH*`<kjDl`Oc%KO;vbo&9zNzQ!!nk4#}>%vt6J3lq5HYdl4gSp4j3q$ZAB
z5pqJ}4Fp<8FoTHCWQb&BB3dD$jZy%%yC#4pVK9S304Lo&--Q-{ij9A`4>*$fEpF^R
z?Y3CbYOWs4BZB}1Fqe@H4Ti(O!jH7>v&O@s0J%4~IMr?Z9`MXrX{?R8f`oqX&N;MC
z_KO6(8WXGpd&tUJ##2y7keXUV$zc2y%7q9~Fc_a=+@oS+mF|#?FcunV6mkkWOb>XY
zo&6cx@bn#bt$Y0d!j|0At37(it5^EtOqQZwaZ2(`b-&ZM*Qt-CO4nar;t0rNwf<5>
ziGcEn)@{yhg`Dt57fbS(xG*A_mjEUx=-XTB2uA`Sa$SLOC-kX;4qI+|A^+l`K~{rW
zn~uuaEzZUc1^6Y7W84>A<!kyr$A58NHv75hn+UX&I^1vh_I9YrmA)r#M?`8y)5$v_
zRxtLmn2%T|zJ-KV!H_}>CNzeDODr@PPAT4$;xWd7<+KAF3deno_aPlJyd~_24m_w_
zgz*5OfsQxUgW`!5NCo`pz((bI(6`F??sg1>{n{k503jSzd;ne*S&v30&H#Z{z0|8q
zTB$$bOP3AHS<!*b$~XaFeAFQ&`XDl*1Lcgr*N%UU@h3!lHRBaK{=S`vKPcjFV*Gt}
z{NL|D{BwwJ2|9{4DU&S3$twSn1mgdI6s^A~q%1^&Eq?Aof;~4t{P>z4K%UGA1I^fl
zW|)gwiz<9gVWbkME$h!b20Dpmqit+C09=JEsV#2EFm~}Z#-mXE6M2Y?XOY82e~dy9
z^zVxV)<C|@J)KIu!gxT~cM>$*i&ccw+OFT8?TNl}0uhp&)&2xR;nWLB1XByIk9-Y5
z<HLSy<afEt)U)n}Ul3#m6OJJP9SDHYN1Pj#8KSN`kg!jbu!XhVipS6j^HPD&dgl4I
z$kP|u#lY7@AOHY$l5qq9<Vz0CU_H$8<<Eer0w#yKDE3dtp!LVI4g+_q{rD!F$ZW7`
zB#19#mH@&^HsQ^hyhYw$lNQ#r?gc+5ej)e?%o%hR&6Ot<T_uBuk`V<!65n8&Af@SS
zB}sN%gS6DbXGm4jqr(+8yh2EDuK6{hK%c98U+-vENoRAb7^4<6a|LncOpM-=%(dxu
z$ErQ6>m)sxFXm5xxdF@$NWQ&64D2U?hdCay3Vkif6Ny>}qA=Ds=K;zDt)CbvXf-kz
zeza8&4aPPYLh4w0RKAb{eNogJ4<-3v_wi}uLSATHL%}QtLxWv{*4oGB720p-oYq50
zwWGf<-f)R}e=>^N5D~61#)_h`d<<DX5w7&C(%zf%5fbNghpUWPeS(!Bw5Dml-6IXY
z1bLA9=%=TT#O@rED*Slc52BByMl0XLI4JyBS)f-AMhhiD`8sKpQEbmZ6b2t&D)2?C
z!p0x)p6CGL1xH)5^~yfAvtO(1HM3evTin+)LXRpMD|?DY%kHAd%BfiXHKrT%U(w}~
zP@&(qw<^_UN!YL>pcvZ6zP&Dek`+^G$=otT^_L@{e1e8T??k102GT8Y0n&MmDM>92
z^=_N2-rpxEQ`xsll<CDF1tA4#0H$(qm7!P!N&EmBc57_IG0{O{PVm=Mb%jy^z1Gv>
zLL-)e1<RU4sWP*;ReKK+lb3{2^7z&=kvbLurO(XP`hiSYODMJ2C4ZvzYQF-$HDSXw
zgsiimp9PdxoBHK3NUW1;j6Xo!3f>sfk;xl+y|*h%%!PPR!NY^xMz+Ym3uEb@K1@?!
zI^x2{HntA39lf(uXchtSz6{Z5ajMeeYovjWydQV#Ik7cvtvVT99P~9kiM}IP2^yE7
z0xX#?8MzF#=sCf#5%}1eH3CijR1f+h(^>!RAF=+vx|FdCZ+gAw7Ays>F~^bj`)Z6A
zK~akds|4U0<40+PmERyol~E`FfK8D*hIg&rqt_=<M!(pe{gj8IORiEjMZe+*DjV&Y
zte``!_c$6{`Z9NTwNVVgPHg?4=ejh~HO2!3XU%i+C8DzCv@&);U=c72i05EUB#5?P
z+_uA3Vonz0c4Q69Sc7014&kCF=7c<?WfR+H3jj`p$;cNiKo0^?nvp<j@Y2pxq&tWE
zkS-g~+SO?3x4^+ts*XW2)j23~W~aJ$bEyHmg-&?>62JkyVKrBJ@vI=Sq4O~7P+z7b
zRSzzBCCtLbq6TW(m<Ozti_n*RmSEJH4xs_2S0B3`xwRNWx`@+Ui6vMr0r!-E4*;>I
zV@M9`Pj%z5+GvK|%O<+7@tthstw^cK9N!Z<-l3XAzL*W<Guo9}L?u4;JfVp8iM~<K
zrj&f-v*IIB($8UB4dYd!4*DbIa+*ro6t*BygJ|HT3v{B3XDB&AO}y(df{r&G#y6?p
z+dEze6)oOhzQ*BJ@>?85>*R}y=3^?kQ65(m#AM)mp<8>31zH>!&MS(R$jh{|t-ieu
z-;23r{atS5DpBYP6q=4g(~5%frTtwV<)We)fHECW8syPdmF$8N0mfalM0r(xjbJ5?
z70e4(v(~~!nD|F@7VwW2E>XsGIi%P_4l@hk0*)Aq3dVPC7sHi0Mg+M*9<iLOv6Gcr
zn9R8lv}ScO4F4GpjPkIZ=aM@F8zg3<d@E8%*GYEDvcFhkGU=DI)MP-JIwEzBmAadp
zm@r|J9PS%wo#>l?M8_xo6DeB%|F8NWXrceMAL#pl{^#_;NK%i!6S=wd)2csnK6gzV
z!CkkuxWHXs0HfRtMyas5>yQ>B8<^L%f}vKCq2?mj|CF7qdByA7+pV1;4+rFz(rlGW
zwu)L!a<EB7Kr*@%YeH_!VXlll^)@Qjo;rx{{_<rgdr2$jCFGHPzP%Rm{pHqt`>vS4
zd|-e7FbjV|7WLRHia854>M?>_Rb{lmnoPm|8Y_|Hiv*Kf*ldL%I`LCjw}l+d;8V<j
z>tJ+FbLcy_5kw&IRb)k95Q4N`a99B$Y(liL6;=U@$#yUH<#^&vCr};#z?HCq2xADi
zKPKYCh&j9uW~0~t(IF<m0Oq3QLh%3O3V|*(I6=3dRnO}%oud)ve39o%vtd|TOR33u
zsemC$MWASo1%B}?h9n4<xR6McFm22(#B`zqiv0f}kJu9E{}qo|ZT&U23le!iQt-$G
zya;^?eBo<!6L&I(ukj2PZRrH%RN@0`4W~av-j6Pk<hkc9hA(Z6l{zf(tL<lo(L+n)
zKU$?)sJpw1u2LprRZD?u4~bGu0JUf<WHtrpUXoSlh85~L_YU+7bo%G1)7#Rk5F(T_
zeTVX!7E!ACt5oL`L0~G@8N00Z{@IK6&PF6SMa->r4hw?*4Ck-1Dm}Qs*6MvtE-PPE
z<d9W(4-1=E3)p-q%p61Jx7ahM0HMmB2r*kdFT`~~t$$9EZ(RDk7yMa&eF4@%{f$=_
zA>fdwP_{1;#)+q~HqiFBanjbD+7>rQQG7v#Rc!k&)Ysf7vC`M%1|{^TSQ8f6<2X7_
z0=a}(BSn|YSNu?j<}0INrGWBw9dOl~STRjoMg2|V@fwh?RbN|(my~j)-b6&y9%sgQ
z#CYMPAT}1BpNC|#j_pl4m92Ucw-aV^1HPDF%H8T~%#l*ora|7)-&BH#fLx)zcBe=x
zR$seUye!P9gmthMZg=QStP6}N1);S)d@DOAkoXE3YSa0gMg9V8b%892^+-XVTE<{3
z#5pJFLP=R=X*0%OVbh}$0wWVw++g580=nKr8p3=B#e~79NSMyw!_0b<eE*JFYO>VV
z_$?&t7^5aj<P{0Nx2nly@@6%;Tz)K}F<kr@YL}~bOe}tsFZsp9Q(j~~2waP|^Zlmc
zdOjwYcj`~EVXWZ|zgdNOaX6f3mW>Dp%xg!47nsvWgcq9=Avf#4FUfDIZ_GBcTVKWm
z4r*AYGd<{EZ5!GA>baC$;&`4qo2}=`K1+EMa?6}4bX)x?W>`H!`>Tg`3i_sv>Q%;*
zbs_?_=rN9tRmMe@XiO`RmYp<1f&5P>XaE8H+Jx#Tlt!yAZ4y<_3_E8NK~k6b*H2QZ
z3<IZahrdpY4H`6!d4EJ((BHxUHSG@!pl5}Z9wxtk7WVr-47i2JXX(-4dlJVUTi?On
zCa_AI4~6Q*IU>R(R2z-xV#p5{*ntAOBS6=Z=>UfE7wD`b_3?lxF4X8pAdHN4_)3%V
zGgWmb7vLjRbtvd*(!ydtQa9gfNjNh{>;D|uCf>o^c!6GS_gpX1hV=3(%5PgQ=f*Si
z^5*}!UM}X!z}=XWUB)vxR)@nrf1W<xkJ$rb!qUE}|N0tV0v(H%_!?ivQ|J@E#vh6(
z<-^1?cp0H_zW6@-*{^=KKKd;y)zU|GR5h%Rt_Nm`yTJji!*$Cg&|xYp9p*Zy;h&fb
zM&Kr2hV)tKm4Q%yWEWJNVXfzVXg$8B%TN=e(br=3SXJk;<e0U3nL$1ZB+i1Q#(#l_
z{+5p7yg)~p3EMOmK-5u!sHMu_#yaSLnGJhR$;d9W&YaINjI=kAHmsXG#ZX!|;r<`<
z_gMY(3A!IptX_h6k}`CZl|a|lQDT*QG8alCRoQ%@%6{HLX=3A1`Ci}NkF;ce`DU17
z)@uE}7u}ot54x3Wq66#XtD*z*<=N4J8|CTIfuKCK|DZ>?Bswrd&W#RCmwnNJ5i6z^
zSF@w6q=i7Cm40MffdE(jG3cMxc1N>?0dTG<>tktqrWSh{6qQUP5$rIGh6Z9Aih5B>
zFY#BQv8%9~C&qqa85kx##_OE6P9WB_r4X&dI>9uNFB!QRwUYk@>-iJ35DGoxUT%F{
zpc4pL7p`*}ZL3*LppC)>mbTk;sZcDWm0RMW=h!c?=Q$&rK7A6i2z{W?sVo)+u<aIe
z2RnP*QSSnW5H~_~ID(azkXC|CWUtA+3xESONhlwesIPIVb2Rw-n>O)9&WZk@6fZl5
z)QUHeS8t+PL49q$uZd%ns)Vm;k9dPRAqMNPIx#1$P6R$<UeC}TYA}a7l{+rb9d1hN
z4#Bj_aD7^3nEx3NFVqw&R|;C1Vnf>25ypa-DK)S(7Mr8P%i*-5kU8-gm&3cnAtotK
zDI8Ky-(vx=OeC`3QY<uK2}#eLqCj}W+*tzk1@)!{e%c!HN36bxj%{$c9Go|z*mt2(
zBHcE)_$ZSuu(|C1ym@mxEQiDMX4`kfJQn-Gv*^SOTQc{QxP?{gjV`%E_FyaN_u#Wu
zt$MIE6@n3Xkg{1eifWZ!1Q?|Zwqzq}cF|IKhF(l-EAdjWZ<TGW7+<N->^$zGrOF?=
zN?@*lx*r;BaqfGTqcID6VcfZbc{c#_Zmm43Xq58j=#pBj8=aCi(Y&S=Pi~iG?x2my
z+&`O$+_DF7SZV;dZG-d0zy)>~eNqqb(%p|YJ4#@OR!+eH_Yzeit!waE>Ej>D6Zh=_
zCYe!+SM2X4-e<0U<looM9GJk;g_P0l7{*ef6JJc<$8-qJjC8P<lxVZl4_;Uv;y_C5
zwA0_bFrCoMdr42gKgx8Ntuo+)UnH~KPCw3c#@LMle#F+CVfDwp-!Ywywwml|$B<4z
z_iAUHU;*2Q1NLgTRh;g^0$Nh0Zam#3rR0mX-kDNLk~))~XuH^A@-^K8&N$r_L@xM+
z6w@x}@HNqM^>mk?kzCKG7SWF)l0e;t>jdg6Yqhs5u~mUg;Ad>E4`OpY88#{=L%C3}
z+c6mFMFFd<aq2xwg@b~o3>y2bA*+3?zVA~oa?>@OK>>53de$YjAMI*g_n_J*j|<fx
z7UDP;+m`|-W1)z*%fk=h>mnRD-4!76P*JEdqBW9w)*+8;xK};v#Qw}#mwdCi)^a#u
zqPf!EU>DZmu<=s?#nwLCY}ALe&lv;<OSi*#0r|wd43pcH$Ywl+FYFs&V`s=eX1H}@
z*pLIrk&$M*w>+~R@|?5Tkj>xfKfM<1?Zbcgtbk9$#&cLRT5=0jzKB3PtJ!X$HYJKT
zR3|L;HO8YrZufQ(#f^N3Oq#cWL*0Zn=1g_#p}gIVc(V}}`yBQ@6dfZ`tscTo!q-6}
z>XCiMU8v9{DhwM-EKI<c*n_&#+Jow|_Mq~2hWac3*oNxEHq=)IgrRMy)FPr~ZAA5n
zji_hd72OLoFTzd}*7|7hGbjYnbrRIp`p?_Zv9_mL#P(Dp_nElY@>%;!UG8hpj={RD
z$U3yV#<+K=qIy)KogT62RgwxD|HA6Twn>_!BO6dMR*@Ap-Vucts7aS{ElT5mm2oNU
zSjLBfB?5>6>l@P$hrzy^Jp)mnI1cd)I*I&ok&`^%M$*@CMd3|#YrW}Bg0v47VF@}J
z0aR=A1$G>F??SO*UxnN%QK`px?;Y@>wa1~1Cl^Gmu4Z<?KPH^6ti49dSF73!ZG>AD
ztHVb9F^p>4?`O5~cL2pH3T`Q%4=Rl(Py!swx$9Q|WBWDu*HmGzY-G0q(^bYb#4`@?
zO)1L+Hv&(@1EZ=nh6zwwlAH<0j7*v4ja5()3LA-E4L4Y<Pc8&BSc6U1Dq|gBb-AZX
z+Of=iH3-N`F-Kxg^KyL=J$9kL!rs4kqMrMW!rZSaIVEMBXiR>MhC-=i!E5Al><Nt0
zCowy<PWR)5?w0KyG0#vAQyz2lqrWkpI1!@~#fyR5biCmTK$5S}i!<uFNYDLdVeS)(
zx1?ePa%8ctKk_RpdV?gp(F1N&3I%tl&g{>rbC^zIzp&C1$0)>KJk(1W2Zt8&9$u<}
zxHD5-h964_8gB2YMhmY}JS8Z_rf6@bS4dh{i=#R8*M4`6N69Lhq4-<HKCHXKqx46Y
z&X7Nh*8g>Za&b$Eqv#P>`PM34%n_VI)J~_l28lD2(RNIUxvZruRkR%0BFb1ha)o&f
zXjZfekq?QooY7X8Q{cN%inuR|IL_58%u(123Jt;rAQis5H3Bu|$T^|AYTX4#Pxou_
z^sH1rI9ka;fb%IfTE}B$aX;#a4qV-EO{}!5D0|!7=)n4hF=%@%{3GG3gLR4>e%%~}
zydtT4Y4zatv3j*P?j$AAA2%1CdpJk&F0D>(M+JQreFuF%>xwOOmWYbnh3{_phFaez
z$$5}J7$o7yE)2*>5b8pkH70#OQ+m%E_ZGWUdv(QM&=DuzlH*8Wcl|W&Ev^4Y2&Lrg
zcs8rk_QS|@lkWwGqkDz&hxB|C&-y-wJBwL!OdEr-uv44Fm-M{Dxuup|iJ?}b9h(W2
z05a^hw>j#QHJxWYz88*H88;!EIbPILpIz=UyPS3mdW8*ZtcZg=B>c{#-;VBo%dW!A
zga0D}BjF3ZwVsWS-YEH+z6!L!tlC*xlfk1c&SqC>83M{D+~e;rJi9G>MRe(W1$*e&
zY#9yZGn?x^Wq|co8IhyuNo5ho5?YH1um_!Bj%r1YNZ?+~g?>F`EeAPEjEdZixHZOi
zfttycCZK#VO@`s|CGf2EU~JBVB#L-~So=RXfWgugYw&2t24CWlfscP;^<TV#_FKtZ
zf;y2GDMnd3Z^2Qm8@a&}AOA#~ikvLCLiWAPXKUy0N3T!@v>G>=B-2-f`x2P`H)DK`
zkd5$lfuAqh3F){Fb(mMR#x{Ejj)RZ&YzS#9<rgSMF?+zRcDdO*&f*mGv4#_NXAJwJ
z&@UIfSm9Q0kd#rKJ>J6oJ4Tt_&YsbQ`x__=uWLn0!<8{^(+{S$xmT|-c6Y<N8%pZc
zgW7@E7d-mHZ>a~p*o{AeoIBo)RX~9sa;yMeLg$!AF)0|bslWbKc1@IB<FdyIkTq{W
z-XZ$A&VbgTlZeMe68B_MQJ+|<hfZpKeTBR8ccZoCZfz}O{7Jpctx|rY4W^6u_iq1J
zt+o$w4YxpR)k21VKbYF;uF<QF)y9ec8fr%9lvdrVhfc+|t025ry;0(%*r&UehmAkO
zOH|7NBKkC4=>@nQFUP9jbmZ6E{|413w&75wPA>RH@$5V&1wd~xXMK+iojBZ3_UsJf
z@+80>h?hadg8VLnkro4ft9KvEX~}P$KBvKdM=QfriJtxho@82CAkKA)q}_ooO>;|{
zzLqYDP6)K>Q&A?hEnwV;D)3rkT*tcLfkAJM-;ErP&=b%rWo|v33v=_F?xkhkda4`1
zFv?2zBMqcR1`o2h!g<=NJcj&Qm0K_KYo$!HCmp;5MLSskR=;uM5P)!iWtQh^Z@9t%
z*9xzO*KVP$r17`urq^Szda>qgO8LIVy-lR+HEz8$SHImq=Ro1v2B&rwb7-MjKPbtU
zxJn^^2C)zxgo1Mz{pqM3G$){polpmvw+P(I-oqGOn>**XO{s>vtoH4Kj~3cj!S+>*
zXdgm;j7hyhw67xFKD-RKZ=2s(Hv}LIGy;h#j5^ev?i%nt<^(P1i3j1LHRO9Qw1ri4
z1I^P*^7Y$u=N!<EEiLiZU!*&=61o^?W7y?m{wop1^b(JLTfX)lDR-M!!)x~)Y25>3
z3gfqiz-H=q<!kS{ZVu3^b#?BX_t+|&4$vw*@d^P*J7hWwIyjBkx|X0hJaCjW&HFJ@
zK<_n#7t)tm$Q6DJntu$M=i5XLL+=e6cm1cJwqsrX9B>w#aT+G-%UItsPkfoE&wN4a
z&!B~RO4L{D)$4OPdSH@({i2kbW!BQQdG%0Ju@-@6H8-8vVMyKLF>_k=>%i74^@?0q
zMPA{7`d;nW+={%Wlzc65y$j^CxWZK-c)`N10}^n~Z@~>ZHXP_F<SpocGTP0#W{b5L
zI$zfRO}ys)U*To(=<LtK3yiY)Gx0+I)>Ek07|&Vm>M^jm4{qs$b&jy{G~l6ukf%8E
zU|Jc#K|Ler&bcHtb|JRZ^-270n}@H|!d7Ey-;gd3?;$2h4Zc<*&e_8X?)WHuPQ>`7
zm{YJ|VQJ(2k6F~3N77@rmUza>fK~{pVgbO>S+mCIJS@=caxazI7NB@x7AxC+Sr&KL
zcQXbp=<IRA`X-<kqWo^YWgx5-wWdTdYso-oZkvziac-GJmx1$4PnWc6-Lcyp+7zZ~
z@6nOda^yDJ7}Jucbv7PXCPGWH=5Z`Ve+`8Ud^M~Q_m|heo2VpucAZ=lJv(2%K6>^>
z`I_k2AWYw9XZV`VL0|RlEujlh1wB55cDzpZLtF8}HN*qgkfv`SPdvm`t|Tg^AJeE*
z=wwj%Ip_ktR2EUv7tt_hX4|23qkJzGRcJ>}$Eijr?+YiTU!#I|QNb^Zf-+N}5h}04
zPw7A4r_>2QrPn~wIq$-G<2JA@#2ln*82#f{>rX=O;&MTtGUu3@9OL`D9)z_cvD!ZE
zH(b9=f=)bai*uC;W1I<%j2cuZ5`e#Mjq#lv=x&u>t%SSUO&!}W4&pWLp#I#>uf*TO
zECyPlOynTKk>_$)Yy*qcdNoYfqL@GKa<K@%5_h3UJY<kkLZ?Al{U2W)hu(YV{AK*=
z8sjUk3$_Bom+7xC*N8l~j!Wt4A;hMU9ITrfSqL0f8}#vk+M|_%?|`~5b_j%pwv-AP
zYQ5py*35Q}iAd;?8sq28oY_vbqe8TlMyGauCH@7)q5HAS+o-U{h_Z}mBnUGh?&7)7
zc77$cBP-URFF<n$$Fxpt_fPh{P=UqCx9MJwS7$8zExfvYFVwj3oFurD=h)l%l_(PB
zV<j35DJ-dWd`%h4a%#tuELGt`%0#gg%w;KlC9+XUEN(d9+WD3E7|KLz|9+2hW9&A2
zh(sTC%z%Ghr&Aj%n33axE0K17C1}wTV0l2LonMKc5r+0(Vqsa~@F-(i#$)ft*Yqj+
z?>rXn$0|~urcWV%!`9Os+v3m`iE;Un7?<uckCL!Q$9!d7dT5B@kb{xWtRmUB*ROT<
zyQ@6P2Q4M3q77I$hLq756IWq8%$0vhzCW{SjdAx`sCVpREa@f@V}2z*#ZVMHnVfSd
zyvis-CR$Wr+w6t2bQ>1L>8=hK`=DQ|^}QGlJi6whj^EC&1ntSNHG@1Au=Imtvw0Gv
zonMLXh_vXy74oR)z~#QC$A?K_5fuY*xwpk(ju)+ot+i>7lMPthxEFUTe-a7W{yA@;
z2Cc?}vnI;Kc=mAhg;pCZ5`pVtp;O`2tBhT6a}^DCV+}imkJrX$DR`pNYaMohocjbB
zK!@nS4a#(M`whyJ;cjPRM-u?Q5^v(GHCk9C@)c#~BYTWuK7J*3TluaQ`L52)N2|mb
z=Hpj_o)&;NQ{<bOnXei><z+s8C914^#UfvEW<EBf7-VhdS7NS}&%*D5cK8U7UkS<=
z)O*>5@Ys&we8&NFsJ$cVWjn?Z9={UQPLa=|--vu{2QSKK=T}0v^377FfzGp(ONQyp
zcJTCRJHO10(Zah#p1U&hurDSs55LUPXyJC{YQWj9%o&D5{Kqp7zs#v(j1GxZa~uo^
zWDBP?hDNMcpl_KjwS#L)d4c+fTarK0am+`ap$;@ClQ~X0JR)MENc?c;zz(?c?BKc(
zb}-at+aNOG%*cR~M>v;Sa9D@ON;7R+nyb}5Bb8ZxtsZs*g%5R4)9dmI^-O(3P(9P2
zjBh0_jJw{-(5s%=p-|Vi@ekPL)B(rC<Lo%ERUgoWe?=y~)ok~EkM5-QsV28Ke55X^
zhr^mMVpw`jCQjKF9Ch*ed2Bc;tQQmXQa7M|s80a)S!lQnZQIsSpmq+|2S218@<-}d
zK<!iNk_Lr)Uuj$}&PWr;Wvd<0w9RoOUZP)E4{%?+Lmnl}lH8-iesX$!VCmfZpt+@>
z<<qK~bTpKrzF6)JT6d>0Etc;;au(tbJd;}ZG@2YXCUx4AYJIl$8`G=xH+Ag5g46VC
zztwu@BmrSZr>HAK$3#JWQV}HdZhmRq>H0-{kn#K)j&EadNPkQ3gLo|%Am7D0CNY^N
zZmjDXJ8XpHMO0+3HNKP(5pAps*>I==OXNC4a($z@1aK|89ePj7%mY2f>62Jr;SphH
z&DOf-9MUcl*r)Nd*CuEMPm5^r5qiW!Jjv6Nr=G)3`{Fwnq+lmLd%1jf^z0S#o&V0g
z-@41u&eQ_qCm^)YCuHZpUqMy40;iIe7(=QssEll}Wl)fNEg~b6RrKq~)jX~F&g&gr
z<=10Z6w86d8T7UBQ#|MGX55DQ`mjF8IMw4G6E?d3G+ZaNZ#7*RyE*JQTV*_im|-;<
z{D8IUFfCR>pN@sPwa}qg;F~95lcd#J;j0~kD<17DIIb&)P^KUit8!@72Vwn&OUP|n
z=y2!zPVGqN@0{F+^+F+j#P_r6!{jr+!#&ma;!#KLIJMIaJ!_eo%4#^S*B(^QW;MJh
zYSAkXshzX+Rc<Rk^y#D8D!1A>xI+10qgvlB)nBStA3{a{g!(pW?%Qw-EUV$K7}^EE
z1sI9rVS4#@2OS;SyL#?-J3sKLzlZ4*$5b|I<?GIssb{hpek(XPV;`MurTM--H>RA7
zhq}>TXrA%VA-<RoQJ<NwTmm!TDC_vyUEB+Vi~mC~F;-xGTiRVT>fwUuzyj=X)*r$i
z0z7<{q$;~{o(e!HAq)SqH9NY$yZNFDK$(^bbz5gnu<wpjWzrVdh8(GP65m5sw8QdD
z3KWH))of69QWu|CVmVN)G9KG2_{$OM-WU)4N{Uj!Jf?QQTyn7Rz*g@@nupW_&cXv*
z`lzs2ZHR{svnhJ@!NRwE>eum#ehZx}?DBo}2?U}IIJMww{X(qzWZ|#2J;I>;kx1Y6
z<=7WeSO@uDjK|zzH94wb^ggx+`+pc`sb+_E=q8rxe)zqOSdEYKy%_q{#!)W2)g*>I
z1s(S*hceDW7pR%z(8i5N?*A3#RI2ju(%OT*$LYJGS9d$A4>ujHpB1Y;rgfh_2Kz1A
zbNDa{v68p8e7Kk6Sp)g*0}L`m!<B%0OxhKzeUAtq*g9V8Ptzb>1{9IZ#W>&HkFAH=
zV|u9jS%)l+k77z(ZH&c=+0p9=9mcRlw^mgdX9r=!S-AN~eK(^}i*g9Y3LR|hk8OBX
zFpjWia?M+i!WIQ8koLlqE6s(nM*jmb9CAxw->US!l^hkv<s^b*i*D22(LQ|ZPi0!|
zAX)cq0Ss*cJi&t1-i>O}DyjZz#N7-=U!@%=+o<KQYC77Gy%GMc@&~YC991T4R12l_
zRAsu+wvHitkb25GN9NZR*jT)s$!RmCD0J1(sTwM{Sl?CgOt8~36rgwdBws8S8lqm^
z8!H8Md$rEk<DY_R#pke0^F8q-8n$!)IYhufN>Mka${0jP@YP*ql%Pvs`RWh#1*|iJ
z4xIaEKZSaCZs_w#IB65=?dWlj4)rxJ%hp4^@N)9KSlu_OdrasQwi23`<+OzQo0qva
zVnKAed0AFVDA~Ns$<UeRWv-UcKywZQXPcKf67<ZCJzjv7jGDaG_ry&I?%e+oP&@se
z*8Qj}R_fCZbe^TTyT`5lY7Ta@lV~-jh7}gV?I<bDIR+O7#62P6xM_Y7OjmP>6xh9;
z)Ost~w4Y7_$vTI~>P1!<PTkSUPoiiTWkE~m6q;nZTk(R1A&TtZXElm@SDp2zJR&Uz
zP6<243)N%Jv6gbu!Hsj0UCZ2bSJ*MpPVv1^9{L3B7v~9=Wg*RpG;|CQwn{n89PmXK
z9NIF|>~b!v9M<P&T|0d3<a)bYj_K;k5z)DJv|Yqu&J*w)5`B`JUT@$4hy*Qp^ec$f
z32|@$);7Qte*(|*_OAu6fzj%{ovCR%|3uo2V6$&?{dCZ8vl;jLGuf=PzW5vfKP;>J
z8*JvnKJNE0{z!Ufm2pzMg1J6{TZib5DkF+Gi@A2BnJWi9p;!BxOPzwhaxDHDl>~c<
zXmC+~vtX&y&83dSG@t>w{Wv9|n!L#O#2@&wUm0eiuFiAVjv*7hHHS+>%!Oc>Yzr}~
zPcW3K`&JvJ7KVa}j@wMM;<K43j)f-JWQd9SF_#aFuI@8kt=a%2Omo-?9>b&=>Jz9#
z=j%*)G;Fe<WiIF*J8~^n=_NZb)@foLjgnnJAIX#KWYN8%lmmM=Ob?=q+1H=Z$CHsU
zPA-$o(adX2^Pk_>eqp=Klq+j8<;st-&oJEKZpxKVZ!DZb_rkc;dhSMy*nt$55D)LL
zdmJ+4Q;SQW$kF4k4ibcXV-Gel(0ZF;$gb`kRedTwtST@9`<g4VDH}d%t`I_`!WJSG
zLWoq@LZm_n5s~q1bA==EIEBbIDXTch?!UqJ#Lb8p?)zZ@^3EJMFeKNAejY7QOpXvB
z6(Y_OASt`=Z@IAV$tG`NFAK)!bl+1hRCq*Fs!ui7i~?IgR<JpyyQ?BwLfC7!%Np|)
z9Kge}Ldb&(x1IJ`a-_nNBNd+^M=ESNQt?@Gq{5OT6`vtTvLQ#ZKSPdGIK-ZQR|S}C
z&INMh9mtWqp*>Ra*~WMUER`cTOw6alYk*2Wwrln3JT>W7ysKBiuKjlyJMb-3lQ1xe
z2;L83UZy5T^Bn$QI1;7Qa;1)<wlP}2$g&JmoUP&y&DYfPYQ@x8pHDYATxmuNf?ugs
z>+@1dy^0erk01de#uuv|Bm!5!V;NJri*r@zQ}KOHe1p#i+l*NrPn~<US=l-w+fb5o
zwRsKKPx9rgC#c|7CaVx!g3LU|1>_t)7AS0pfLBum@8$H#g=FL)_Vgni_%e>*fHMXc
zpiO7qlc*azc2r|hi<lv`h<Syl5mgtsvNOvXP;xa?Tx8RO0o<Er?=oWy2)Yze|HXcM
zb)FsyX!U*Y2?0K^cjjwjdr)4RL@2x2QoTA?FGaU3lPh;z%Cj_=@9>IaH#fuBX|6>7
zl*(6_<#;ZaujlETapv{5V~V*L_2HeOM#v((b6PP2Ry<fjGIOnW`h3vp=4*U{Ge%{u
zuDyyVt@2dU>-A9G23JLTn#I;J@w1M2+<(g9dwdma$7G#7KSy@G`qa%@b$3(0uaOPH
z2A{ZRso4VVz!|9;zdDeTg|GP-4ch$mEfu*q?T<mfdNpT$9Dc@04s%5-kjZMe5*4@K
zYL$j_O#3Rlh9f}~taG#tA!5!#8vr4-EibhVe9Yq+l0O`)$PHsj7hYrVUN9(3uKHec
zH4kr9QskxTQmJj;)HYDqgYET|$fH+yzjYd0U2h>XRuq@%mA!M`)!wvoS4B3WVhiF_
z8{%DF$8Wh)<`ajx)cR9W!?o<O$4R{9g`rctEW~D69LZQ?Gg+U-#93e^amqoj>;|RP
zGbwn8L+?opLYF|BtiCUP5wLtsK6E3tGtR;9RR0G->{4%G=wyRSY}iBFJ-I5i1(ykt
zYvcbWxb_tWuxsDt&Le#y4+8%x<7FgbUtVxEeME65OB4x-*Qsw}oi$j8qZE3jvC0Vk
ztIhm^1F9k&g7A6>cXcG*L~i2u4}wjqd*Y!JKoiyUiK0z=SjkC23nGi!bP1zqGWVk^
zPt2)2DS~5gW+0;x7FjMNlsio*_5L349Q9-33C24S7G4G4Ky|uu61A99#afZwi%Vms
zqW$2fHOBprX52ExW_&}19x}ojq!0$cwybtO!gUUj+4%Hlz}t5AYeyY|o)M{q9H&?3
zr;f%$J*b`S5xA(bP{!>J1)i4A3kHz-5-H<oz*gwrW&jEf0|ToLERpt_fsw)p8{643
zP^&uE_p=s3>&lbbp~M%!4Xp+JdVW*>8`#HNigS2_LdQZsV>rU9{$(tWh-LC#U(<ha
zOy7~K)gD7d5KFnMaRt+=HRNUEL5Kt`^fr6yp9r5c>Zpfr74%Xz+XbnVIs!<Ejeyds
zn&^N#@kag(z3qUDN3x(lRt0tAaN;eLM|@Z49A$#q;nv-I)Q*oJwtP>hNW<BvQ-F!|
z-bB+--jB@fxX&YW?qgFH&-vyi@w~yjS3GB#cZ%n|=B?tn!CWbx*O}$$>w3RmE<))q
znb+YxATJQ_SBm%<c;9GF74doEU7T;&V6}^UjCMuq&q*?mh>>R~gU*4cC=v=W;VlC>
zD$tutAIkMTIYaa{=$k~2W1wL!?mO{^A?>ldbpUj9)xRx7N5eIgpgT#<<%I|Shcck{
zFfMBFHT??&0EyRbu@5)sGg)J9eV>*zSGP8Gz(Jr(J&@17Z_4Jv>YT%NDjnul^9uEx
zlha%>@{ASB&NQ)RXH<t3MLHC8#5S~Ntc`b`@`8UjO~J*I?jd=*DR0RooQ+cA9<4cG
zLQYADxCu%DW}<PNs77Hf@-^*7<FQt68vH9xuj7vtDalhi_Ccd~cs@9xPtS%fEvy^n
z)Yg4~C7Bns?h`ZAxYm7QcFJzu$C-%}OtX-Adq@?SqZh&+21C_=Q^_tf$58$cI24x-
zSB+z*kA3Sj4)oSL9Ro4<WQRaNAJz1_a@hB?=ZTGGefK8r0~_1Y^$5VeB4jJj{QI<c
zJpdX*7z|cHvc_JMuurwd`11b}LXo@bq#<SM8e=0O(Hl?{`gu>*;2I%PAu>X^tu1kc
zy<^E$_zV0bEmSeakkJ;Z)p@C-2_83LTj+RDhJ36Xua7)O832Y7cu|Z_n7cMt2+&a!
zpaM<M$oI3SNgnN3;_vv#kPh;8;L34dWmIAF%#sVrIzUft%_SeNsS(29i==MH_Ajuu
zRk`}V3Thv1xEcmT?X6aQygE>U$$Q`?nA%f*c|0SQ!4y1jvz)D_0*WJuj4PCPd_RN#
zr8!m=+^IBLhU*^~p#88dXUJxfS8yC&gucdY=#3U^uI^u6QT#jL;d{csHyGvMli8kD
z#5=ki2h6uYAH2uPgU?~HNPaB$&jv+uc)0Oub0P7X4gWmmX$<nP^oVRYpzN1D=Ga!`
zQ*vk=Q!y3}xD$_BV|xwDiF0899cy&XIDz|EjN>?p>o|~j9r&P`zNVGPT$ZT7H{tli
z!SAxfbqrUOCFb+VA^b=%CH%l60kohF%OJK2@S6k3A%;@<TRnjLDZ9P2qp@RqHF^Xk
zQ+qm)75W0#c^x0Pv~IO0XBe$==ZvtSi++TxR)nms5mneqks!EvrK>iXXtQ_^)k0%u
z9@ntqlxVd0jgD>BjZB%o9neohdDsT^H9m)PHPBUCuxEZ?d8t;NXZH_hPV|raAJ9MG
zFUn6kxayU8kc(8jPQ#<bQJd%ZEu>=Nc0d77Qi9A=lb6Vs?LeQ6gT5M6lb6ZU)Z_wr
zmbq}xxae88GHZ_y{@{D2@_q82X^;zhviUx4PY%}1doJR;bI--ip;P8XmMmM}I<jpx
zK9uLDgie|G7z*=n{WB=0X3BXuVbLEwo2BG*g-*4Z1+94O%8dJwIfZf0rt8`DH|yc$
zJjAIF)Ux}m7Odp@K8PJQBA^)v)G}V$-&}pFM5|=)rDq;sTI+$2{ywZaF!L-(%tCI?
zb*Ct6GID{siRq#qR&r<XMCbc%a$HBbp6gOSh-zI}@`Hu8317$_;w%mKJ4g4eV}j7c
zeT~PEOLt!@6hc@#$1GnR!8r8CpnDJ(aY39_M|Wl&JNMI_K~#gMRgL5CKd%~D`ERN)
z@3-I|9D)z9Mb{3aANYK@Q~o=+lUm%@f<r(#Yi$AQ3a-4{x|wQO;t(jvx>p9<JAX%6
zqV5lB2VlijyUMld9ucuzt3IKJdekCE3cJ5W<5S9X-CckchC?a_bK6ZXI}gQJ`5o<)
zJGl$AYG~RJy(dx&{d#3jYN1CQnuC0LGj{7u&vpLZt=B?^O)f_d;4xc!6T)mXrPLU6
zBIg3=H_GU}Vs`W(EN(MY&-sBy$oN}mpk`oV3(A!2Uye^O_EmH_mPhPip&PHlyyiH~
zA^IW!q7GoBJ{Gi3k*sIaGFDr*qYxVfLA7}~C6-vOYMpvXFc`+@7HU;E0-T5V2<J{9
z{nfaW)r3(E>0Tb(MIw<KJs>y<m6AO`(i4n84ag|`Q&HH>!V@hVEuLv6&%k9dlv{YK
zD<}(Y-*q0sgkL_Ud~PV8Om0MrhdJxud0AUR1{g+onh^figPS3!*+tMlRyu=AD?RdD
zz1+#ZV*6`zQ}X2Ht76{-L3^+)!ig(ERdAVgu8=JoT|T!u-)bBO@Of1ErML?!0Kz1e
zP!WfZ(p#~{)#-VQsC#B>Z~YH=BKGw=L@A4*R!$b!uCh66FECsnSSgFI0lW8P=kirp
z)x_M_%t>Z2M9@OYVm0#Lbr%0|kA&QM>*SGb%H$|9!cu>xjuUX4PHez35xh=XuC-|i
z05*14*w~4FPZP5HJVL@wE;!_TI*w$Jm{lWg+)I1}z7ul-b#qpI!F2AmR3NyZHU0-O
zL%e<oC}fCN42#4;(8(HqnDD=AXA@T|z&7E>q~G$HMJbsz6y=)3*R;{fvvDMNEEmj(
z1siZmKQj-lAmui_%ko>Ii;uvit~$@@1cP!49tn}TFXBA)@yK{Fn>=*NTE`@gK~$5K
z!xa6ztsGYxU<4$7j(8Hv(o2wGZTVa8<L270X-Gh>)vIG%y#;ZbjkPkG28cp?hE2Z=
zdW-ML4anJeeEVgP2G|`PQdTN+W91GgD_aC0-en?EDKn~bQ~%Zhs1QQ_RYK1(T~^VB
z!OlOrW98SN+z-J%V5H{SlhAX-=pLcxK#y$+4T2)E(4U3R7%bGEHi!Nk3;jhq5UV~l
z2bLVsuT@yA(G0NB6pV=z1h50i7yG{UFYKzMQ@$5=M|oZ1X#~M<Ai=HKf=Dy;^6d0*
zuf%X4mpMOjoaeKTDsx-P$CaNq*N8RbCm)Ck%ghqwYr)Zq4ANXE^?(<oTUt1aq4aYA
zaN$4&M$>Q8d)O}=xKNh^Z{Prrujy8}$EUrGgsqVlE0~>@tI6_*OQEeDeoEYDER4ah
z8;Y$Jv#3?<Q<)1}g}L3F*V;}*%o(lim?I@KztuV|ol8A0vI`)F^hmnfplzZq>hv%&
z-isozePX2usu$weGcF4Q<9YPu5Z2zMH)CMzL`=c)!Z+)$fTsYCnrQ!t6m|cMR^9!*
z)7{gZ{RdsXCYl-4{R_$pKi+PL%r(6F9F{UcbFW@rFynMLIC6UV5|1*j<<=!097LP7
z<ko^2a^OeUslvke64qSljczZP0pidV&Nhy!T?-&A%9hri+WvE*hBFpWve(O7?cHUZ
zZbK`OyN?ew8I&hI41F~qk2Wt+lj~)lIia=SxH;BxP{?k51*4dw1C4&xEsw?SRowkF
zs-uneS&!_sBACfs`mA5R-U>sAN#@*w*ZcRo<*X9=&A>NQ&Us1X8{NMj_XobjJX+<T
zR+-c)VO;ZI75%JBUM58Hvra5}A98~@AJ;EJGvI**+W21ZK8-bUUO`7;Z~atkrXWu9
zJ|4v3oFwlJB|(p4KNObxpw%tdrMea?eYI-_&iuTIN}}7x<Es0M^zuo4r@MuJR#Uc&
z6M4dzOxo?|IuEwi44Z+y4-SI??ERpG^K^IrLBCR2a8zLJS(>#LLQKwmiH}ls;0oUp
zNpRUx_unfYiqHoLjo7zn3FUV5xV#<F-{*L`6G5<IE7*l69&Vu#Tv-j1DOR34{F1Uv
z(4M|vSh8C{)UyFN=~eLRHSDy326z{}6w2-FaWQqYH!HzPk><@#^x&-(PTQzqonPMp
z!~7uMcjRmJN%4}a)t?eCd9c}I!zk+|@K{PcbE$lbdS;4zvwCK#98%8&WcbeI%S+WW
z)8*^bGndN+>X~WsJaynw`3iMlihQ{`FcsI84Fq5~8OVp>1b4QKQwJ``iez9K<{HX8
zv}+y#UqQf^6YvxQ&LiN71U!y_M**;}>EF>ndMaR5#R5qdNU{L96{Z;$NU}hZ1(GQ6
zI0~R0>JGQx*Ql`cS%)&a@Q^&4V5YJ1$+TT(!&Sj4k14D?rHsa_Lvd?wXq|;`DA_Nw
z;boXbaQ7z4PGA-*caHXkMU}HoT&V^`M}foogR|XO3FCHv(Qv|m@!;$z#lzAr?Tr-#
z;6+ZwuN`@LI{FIlzQ*5x3b8WYwT8vTSy9@9(m-uoLfmpdWBGqE_W*Kt;RV-bpq;)a
zzK@cSb3NY>at>qkDr=0+vc@QEO|KvaZB4HT**32A74ErXZh8d_0C*{!T1LO$GMl|~
zDbGB?rc)1g^I^vd=k@wKUBaiWpuf|h!0~f1tyDfdS!Bx<*~ayEI+anDn57>iInU-x
z)PRn_4^Z3%L~I64RI|bG5o9Z7_@4L;@}m`-zlpUqh8+q^=4$e=b?Dfvu-=8BSYo}4
zR?WBG1<zk@y|Y#3Mb^7$u^0=XUbZ?`ViD~@t2+17w8<5u%te-6ZoX}oo7K8cK!=@9
zK!%-8K!u%7K!lx+(9k_fmY_DTg9z+EZ^Q8?F#*8Yhu{^DJUQV)kg{`<)i0pGXa(rc
zIxPBgviN^Ne@bN50P*3Jb2Mz|!f(Xxf{vc-mg?M&-@82BUUzeaxA_=iv;h$@I)wf3
zv55|phi(Y~7`oXUx;Y%W^Eq_K`<mt;nJkK7%EU8FJj28@NTh$YHR=MsMy^3f93+8{
z#VrS5u(2%c(cU<HwBSg=8-xp2)A7m}MrRki!N|fle2x1pQd62>1y7@3tYiQq#rM@`
zMf2wS8owuA#`_w-AzqLzhL=|?d6kkwoxk(M+@p(g#^W*%^iy#*U#>7Wwiaj4$J?Z0
z{x+1d2EA0J^;`XPv)xan_V~fMTeSY_9cX&C95CmSF5@xE;kq~N6~QHW;5jj-O!TqM
zCt|GeMq-|~+d*AR^fU)qz8F0hiP7U%&t}VGIMSH!TFi_8XJZXLoYAeGW9U}wN(Noo
zIH9Lmlb5i0312Xrl5?Ey{*e?6Kv$q<sF!&4RUY+G%r9BOrp8I<GEiN~FX({%x#_5{
zaVPQ>zUO<&@?tg>w3%{v1?6xB<!}k*a1rG&_GhQd*H8{$1vw09iy2`$XN0Mo5ia43
zkV}~Z8cwH~^>TLqH0;rx^$)q8iMz<o28O~}sBeTXn(&e9SBv@c0Ju{T^li!G5vnYl
zo>Jx@7<~knTIO<}ES;uIV4Uo2^UTKHb7;`M2VfV3fnGm2!Y%hv*ewTnY@9xYIQZr0
z!lgnuH;&o2@i@<tXT)i}ICbobRZN@FGp9?>e_p!6<1s0#X!quE#?)5aNB9&KWNfhG
ztN~35p0Jj5m0@4X^>sVJ*Z3Xs@PRztr6xb+$UUdLrr*I+;xDN6Uf3t2NRI(N{`N&t
ziSAyiE<UGV_ZWArPsO?Lxv#>Oz8}$An2At_HDsX!Gq<myTO%?q!LJCY2pou=aX->B
zO2va%Hi9RRHHf_t@us?$=D`c>7=57AoBXy76=(aB&~qfr{#b+H<{po6CoF(CeDpdl
zY%B3Qa1wPq+y!xBbQKH?e$8*q6~ebLef}>E1M4aqMjl{5$?^9G{cd@*Rm9?fjNd)s
z>EiksX&%TGr}*7PL1j|(G4!*~ybU%_9PiI&P+3XXZ~)qiJ?-=!27M;5-wOtShsQf<
zKt2H|AAm-S`2;W^;2Lsq#6Yj`>?Zf5i7@hvVm+5`b&eY2cGhtKN0`y&&pLPq5^fIo
zJ*&Z132yvLOo5Pu4yL~0(5m1GnvdV=@Mhsawmymc3@3G8OE%8nT_$kg8HeZ%^C4+5
zFUw=~G7ATjzV^tPE3&fP1<?jH)JI<#<X0|dP|g?Z&T~FuQ&9TW5EeiVs}T*yx%@aV
zhhHhO2a{FzC8BQH=2-U_QMdi`MOC?MT2D3?lQmolC*gtQ(#yPI#2+!#9tSoKalI%U
z!omA`bwDq*t~um_IE1qlew64qzXZ$}EK#GE!doCs;9>t7o>fiLcL3YmpG#kE+dl=q
zZS^`p(R8E62`c5GQKR^K8lp`@l$<EmdqImd-2NtMz_YG+86`Z1PDUH+oFf{SH==QQ
zBN~UScB@E-3))4$BrG7XlBgWQa{_KTo(~7@pfW>T%RAQ0=N-KlGr&U&gR3J^fhYDi
zZxZ&OI>%}w0f#ZMpD#KF0>mND+i@jmJS$%2r`my2%EGQdVTZGgU_Y(QYeMHL6Qf;_
zd+5xBC0qAVkQE$f9kzUV^F`F+o+jj&yaCZ+gR4i~Jxx<7kdS~qCS12XtpVO7eG%@h
z8s9*n-ENGT-4ebqrsu^;QYju3w^hW0u>B*H#bHJ4;#rg@K#=#OSkqCO8NiD}{9t8c
z(Si<vDdc?q6WV*R%?|ps&<9*Skf$y^rz9anfz4{;NuvKAu|KZ-QR~Ir)NoiWCRVtO
z8nE?AeAgxsS=}kn73FS4IX2D8stjF^09??0FWmrKV~=-F!8i0)2}3`nb{IE3+82M^
zKqLfND*kvc-uO3y#*|-h?9TY*6zW9U>5LN>D@Uhv3!zevzS=!!zt&xNsD8l^br-*Y
zHtlaC%9`Io-SWANms;d47338e^sq<W?~N5XwKH%j%Mrg{Rf0E18Gb>eANQkVH#;gy
z_-<7hE5YSjS}7bw(;XmWJ|-`Sjopg{t%~qH)TTSdMmq0AvX0@$qaC8rV7B6g$Y}h9
zM?=JkWC+U03`EsQ##8&jAOXA&`HRLMr?SVtcxiwS!EuT&UYbYEE^z`{9B5sP%?U}a
zE#`4FxuTdnBi~re)4|HcZL<LohradbAh-$Ij?<4`=KK-~{1YW$8xg`4X84V+5)0~A
z0kw5!F)<-vUsEe;Zd*XaYW<ok1LOD641qDZBDq9dHkWQqJe_9dVfcxAgV&?NNDxZD
zT_;Le)ev!Ilv+$&SIRTiq!y8=IFW&i=-WtH{N7(`0YnJCEU6S|BYL#xmVpq!D{fux
z5m&i|4RDf0hFq;PK`p&?=NXd4*VKU|eF`g5&xUb-GJ+Wmnvg~s@&$AFBGLwKgm#<6
zRroNxrH*O`+SqA!+ZXUxzls1J+*oCdK4dF0%5*~Bbv~7an+P#98#vZ*Wk<DN6Aol}
zhbzvPQFl0U=rfC<lw>XgA#hEII^f0`M&Rj=NZ-!rNl?}Fw;~VxakTtaKu?tlk!Q2n
z{Ep#H)5nsGHf<VDVu<cMBlsp?@Qt3^B)A6cJ-wfdgVl$~BRK6&kX?N&7cOvcwzxW8
zmdCRL@v;Eh7B8D21^6f@%JH)0<kxsvkdMSn__UEUvog^J!ttQRfLZi;o5Vf>SK=y^
zwt0BfO7eFOh<n3l?i>)egiqNyK>00C+BxtTpJR6pZ08e7^hza1Q+mbkMV)h|b!Qw|
z3iZ-fRR$|b33s4x!Y@|Bi)9kMSir!`<uSH<$je|-Ae6=7hjShF9vH{v<Lzt^{=_e(
zLDtq|!?CX}-*^$ubJ_uInpS&?M}*jDF=g_!dz#OAU|1<oi#e7gdA4x{t^~(KFb!Fe
zVvRAa3|B|6y=C6STEv1!tU<z))ygR2W89XC0fjpz*>(6;yVZz~hfWfJ9jAOj7l*zx
z7`t$<-Ra25J^)I^Ho$+j08X|JipR6aCRY*vEKvd8hU@n=on(rIE=9&pl7m&#*C$yD
z`&*fp%{IRPyg^oF3?e9b&0@?$$>kzU7a#K~&ZmPfm*O2Ap=7<h25+k)>oa-6o|J(s
zngX>-?Z}6x+fKO1fzq|7v}v)je9(*Ok9l1UGtm>)m`!c<3We(=+;&N9<I|&Ta{z?P
zvHK;1IQg#)kBG!Cfd+9O765PyUG-Tqpes`bz|qjx_)VPT0}eIDxr4S05PeI%BW}y5
zGQr|dM%WAHZP2%nece#@1;CEkMYQxEXlNP6F0$l{chDgqg13oao=N8;I$%b2Wzr1<
zvE?I8eDi!w;{;+uGY!{AX}Jv<+H^hUY7C5>kL6jur*tRM|B=iOwK^MzXdPIiV!%q@
z!S2z`ST}+1aj4hVcn9G=;&xJ}8jMUqa^y<pnPuf6b5A}meL2&4&La)uV!)tpldo|s
zq0s@wZKE4y-uI~E!tc+3eVRygAhIrKPa%nS!Au|kW$4X;#G455PP;y!j;%{*VY9W`
z4j~IyYN1z=OWhyVs@s|8n3bo`aU8#`7F&1;Hlg%TN8C-r1uXlo#@)DuoWR@TZj4j*
z$q)fQfI*bM*~k$BVr#VrX&U$|7+usg!-k^8W3@@G_R!7&-b&$X;!$<*mXNJ*toJ?9
z1+es}`L3{Cs`bYt<$gVM&=u;#MtRh`*kRs9USxcAX1r6_14VpsX1v>^Jy68Y%#8Pl
z^_z$vn;Gv188~{)TZdy;E_OJ~^5L*|aRBEmGs8i1=7@0AoCH3`<|2D0tx#BlHmwc3
z1S4^p<BA0_8v8Mm2rgBVchEjM%h&WJ-~xwRVuVP@ZT^;2^@$9^KXd_{rXaH0iyO;2
zlP2%OUj}IxfV7#oI}(2cbnspVm7R&B7sR;}+&CYZ&y)D^1#y1yvx$^tR{PBc{KkM#
zFOs7lt^)#hT75fIpI-TD)a!AZU(A55*CH;@VSXVqt{S}Pr{TdW;WVKD*_@%*A}ue#
zv}%;}J54dc2cG#{`WLnj)88Bq9s!wA9FG%x2q|(1KLJ98N3ZS0ePsu+3n{!U{IT-M
z;qV9*s4_2gL>npo^iX@h+vUKjoRee+V6qn}6sIR4T!fyXp25!m)Udnidoaph<68r^
zo$}NMH#QY;gxnp=)KYQgJQ)e2QLx=}-mdze={#O4KdE4*&a;GTFMF^G_EWalo#c{d
z(l5;+Pc;`}NGewk6M3iu_?rR4(UqXRCxFJ8;!Xje_}|dI6U&lx#Uyg=A>5@dhzw7^
z{||{g1-2`j$e=COr1d8x{BYlyTKNVN@xJpo!{S$4A)JzdBgJqOZNsdgoG>39k?)h|
zhub3L5-eNg>X~`+jp$f>p`QBxuAb*J%41^4XB|D}B-C+ci85}8z)=Vwr^O*Sq%Ub7
z;yQj#mU``TTJ78R>G8OI;5t1bw9p>Cmgo4iJN=9G&>>vUpx5rv$|n}-u+D7XaS86X
zqsuVNozIE;NZ|sHlPkPf(ZM#CkQb3}1}^=_mJ=Q1OWZsM?Wa6_)QwH;zd)-)X|>ZX
z!uv^3#P_uik)S5)m7?>J;!r4u6BhpP6uK`@6*qEd01V!hWa0x*n{^}`lu`O^ZVhhX
zOxmGbGDHy?46*XMHE%hRAZv#chAUt*Xn)?}``Sam2Z2J%Pg>L?&qH$%_n|%>GdeV1
zw1=BfLy*+{IOxtQg61XX!xxAPJAwtP9Q45Xb)YX7veUnfPEY(hoa`=WKbB?Xd3O8r
zhT7l6-zpxeS<hXp9ohLhjqsXxG0D%}x3{^^%Y)&gcD^A6*GpP1dNnQms-LrPou^m6
zt*y+%ny?#~FVrg!BUGNa1LU>zs&8Wh1oIFYJ}f)QUICN`X5}Eggr~qPjcFnu#mV<j
zy5gATt@4iyjn(MNr4CC6yBpBSape=sMeau##)73Bu9mi%_HRR3mWwQZ!Sp56P+ud>
z*CKARg{0_{U5MQ2T`C2lQsV1)2Oc-n@5rWnwETCTC#{#kflutwP<qO+*=_%g8`{N>
zfOwf&^czX}i(YxqRoO=;M|WYt@gJoy)yi4g0eI`qB=bcN<6g}|{i4p_JI6duiOW#7
zXv_F{uo~t2UT_x{9<wZEJsi_%eGAk`!I=j8#J;b+1lJR&PV9>n0riY?$CQ}+Cg?4(
za@UNZyDS#i*&F@>@Nkx}ego>Z9X{*FpB5+bfDiaz{Qi@#@e?#!{05Y-iCbotRf4NN
z{kC$)aqYJ9gn?+}hls~=QKW>+(GD$KE__!<l<0il#Udm%$D(aD`5}Vf4@+<E$<&+4
z7M6mZ*ojPO<{r{%AcEMzx8<2I`q_-X6pYXDYlnyOnlYghiNWy=IM`+6F~4TXRneJe
z(V1+Iz)!TNv^?gHVzF8ZB@Fi=SU;&Q?0qw;tZVF089k_AGrF5=Az?^@**ZCodel-}
zcHM#X6o@AA{?B8>{yO3wQuP%o_L2<W8=>OkLQIu0V8+$PL%RjX+j;OC&$UM8K102y
zpnvJ2^0#t4_16>}2O7GXivY|sYmCyb*n>qGW5o(RLxmmGDzRN0I<c<bwf9VD_k|G+
zcHgyL-1#cc5_HjBfLCLD^k^Dhj_wk_X$M%meD;LB_cGir+G)9kuXqcNFP$RL<5@_w
zNOwOY5L^I|F9*=d!X!v@C0<rXc0n_%F}^LT36xpow!fJ+@uB>Xjg|L*!ae>jf#f2}
z7T~x*;EC%?Ex4``aMu`RgbRcr34rtAG*|&s^aFlv3#0=k&|Zn7BwzdzpS*>)RNcPQ
zEx{H!iFxpI5=@8J1emM?Sl3NVz11E?T*h7Wf(F8lit{_burAM-(Z*Fu+a~CAw2AU*
z*+g|*H(Tn)9i7@&;PjuXmHM^YbJG~6_p{hDFmDD~dQv&dW<7#$fiS>3jEA0uKCm27
ztj%G3k-=L<zO{C~c-G3H5&`4+?;}GP5ynsWcBja?-p*irlX3ToxQHEx-z~=*L-_d#
zeABRi-xRmsY`zrdN+uCAeJpE>xyR#(S{rjgBZ%FZmpXmyGFS_ejyG^o@to>D?YFLC
zBG^WdvF(eQj#KEc9I!3MPkuzULx@c=o<T^TLKG;rVdgsx9B@|;EJ?Uq1$!A7hPdlk
zFU!T%MB9Iip<FrWd!c$z-^z6%Z!-$`UMO*N_IMoo@#~Aq1caQOJ$}c2yx;=mJO}Rn
z_3DdAmcm|TluNV(zbC&mi}X=EuIi-V{iRu?je<i?*x5kNF>|e)Q^2R`ymQaXI|q4j
z00ze>n#Y%P4tT6@6H!iuzn9ZIo{_5@yx*jG{Q0e^Kx@zj{Zcer{P-cbFSUs5U{mTf
zD}ySiDdD!@`}-VQ=pQ+h5dv!E!vYG^w*F}-!KUtGHUyHJfQ<%`JKYt{KV;d!aBn;;
zBCr7=I7AMht~S2vaF4|v%+J3|VQ6(0_cq>7A9F!IG46)WAkk$fWle9=_r#)!3~n8B
zuJ^$69~W)l;QCI^K|x<5?=$4s3ufj`{0XtpmEh+ly5=hF?9TT^sk1C)L65S8)HVd&
zb~7|@!G_7wN$hoH6ylcS#k>~VAWNr+Zf6|%&z#123Y+ASj!Zyy3G~j0I^kUW3slWt
zF$^sgEF~8&T||KLqNR(7q<q!sF3t<Q!5rqCU07O;w&tQB-Z6I#AqsmTh+m(S<cC-X
z0zSg^*QK~umt1W;aaMFJ_#Li3N&upw1-{CIy7R(Q{ItWKpN@9n41OqyVRQEns7ECo
zx4RQx2Xb2fPTZ`O@+Igq+KO%rSYhl#5+7gVeTYZ#HQ_`UZ|K{dg5cQLCc5Gb`3|&Z
zn8I1@UqKkZ8^AVZbcO}j0-9?Bt&<W1AW*A-8IZl=xxm-NNO5M-icqqIV-!h(>5cs;
z-(ZvaI-At<ZBh%rYe8ypZjo&Cd9=2?cG%xFIAjVUUykie^fHN@aw|)*q157X<4Wh`
zm8EVHd!o93kaK);ZkgMnyVfmU{mr3sbF18)19{EWDHHRmpuaXSo0+dH6NRh2x^qrO
zN!nxAtU@|&fBOaW0LNo)Guu&237sBD_S|6U5!{3qi|n5B+CyK1>B84wO7t;j5Po3v
zE(o+`aF{9XJ*>}lT1QydXQqwRIq<9W@W-RN$GiNcHqts#jNU?<YCZeDiIV(@x_Kji
zxlZAJz4-0AiRs_2lY5!Z-Gv`)#(XY*8%q546E5a1CQ#cE7-wyfyzd#n9hpbWSE0ep
z$ZF0Pd3G}o7T)%6NO@sn`QOaF4}6rxwg11HY(jwGt{OBd=&EQz(SkxtfM_5jSQQ(H
z5VfM*w%Ro9ZBcfGRsx|(EDzh<roC;i{dd2l*j{hj+w1rCkF>TDz!I&t;-71=T1#7R
z`)rrCs1yRG?C<?K^E{hP#QW#_{rz6ApDmktX3or<IWu$S%$YN1INj(Y0^Djf-zZb7
z3>D*Ofp`efR^EC)`I`L;zi54nthU;04sD$Dla!NxaLv!x_~=<vzQX_bod(*mzO-Dg
zOKIwU1-Q2W=iHX9@E^HDYdvFy{oNS6Om**deNzWuVP0eNh@}g%K;a-$b{mYhU@fg?
z&cwfmkK0el>n)av&g<<$Vm>dgw+nF?n4V4jdeSGKuJoV#0*kiRUMe<c@$x3v+EHAm
zGg&b&jmCrFu8G#K06~5k$z1d0(8skb%bgvG*|0M_msD+=KTYCCoqi`Q;ul7bta12%
zQE!I`T=p4$p)7*Iy@d4TK%Nmuzkxhk0NF=KUjt<^%5vErEu=nD2yHHex(cBu3ZYLF
zLX!%myjY0)QV?S0@^{h4+j@!cw=1+)p>HXaAR`AXh3xwa*|!$5>v@0)YQ+=-o*DrA
z3!vDx>3q3{{()6*+YAGl6@Uzs%?U!oGP2ECOyji;Yp5D1yDEUdsco}=4;#dRvQ<Pe
zf(hMR2;EQ!U0(<_1)&jd3s63`>U0{4y0Cm^X{4zcueldm`PY(9H21%uVPmDtR?oI3
zpB)2ZcK@s6uERD)2Uj^}_#YFXReVCg%>iK2zfpjO>j?orRREkJKx^I!0so-@I7Wa*
zkrM)b*#L{=?+Sk!rv!9KtH!0jI{45C^xtD2ycJ;wpNKaa)&8eGq*=|EW%we!Dq*MA
z26XBI=5}VH!dPJF50K0Jr=9g&0F=hT1=+2No5^l|I45d+lSh9n&p(EF6cY*ZXh``}
ztx8JJVDgXC;85DqaPr5J9F8BmFV5trZ(+nqI<Zf~8q2ahJGMcJB33!prCf>s={-CC
zd32hlfPA5m_OD7CW}ks?RcxpG5>zkO^U%O}#(cA<sOr=B)~R;GzJZ2kHIm?0_TuJ0
z5_T_cN^4>dcz10f<UO}TgK7Aozj)UeY9v}i$KDULH30uLY%Yk_KpAdJyz6-vtzl6d
zy~{;w5EMs$gJ@X%veteQ;JO;z7-4-z(Z{*qBLBxbG&MVGZGy(T(4<Kh;fxT+<X2Df
zUvD#Bk5aPx3AJ!#bx+z>uA0IM=RM_Kn3BD%t#M}$uW?+eI$ZQ->w;)9ebC<s7jaqw
z%*i#wwGLt4ApB%wArprucEl?B#9?{k3^xRFi1RkaPqRPwp8|xOUx~<lMNP|Tr`hbc
zu=T@oa!la-p6#(UWy;?p*p1<FZEsArSK7ugJ?pAF*Hxpd8VeHH^~8Y*JNIInQ*J0$
z=-3ui{6=`?sO0Db8wDEpHi*B-u*C#!`92S~7dnLvEOW8sW6$p0o#@2j)P%|szOz4o
zpqf`)N}8zQo1R@6BVIOPePY`jwtABl$jaoUx3hLDVX*y}hSFqx<UXqW?UnOtHIUPn
zRF=E^i9Rg=mS2Hfb7$>-{zlSQdy^F~8%3*EW1D=ys@_DOmJrLQK<+G#@cE04qBmIq
zcaO!Lx68E$dWeK~cSY``nf;x2qZBM<K5_!Ca~9p|Q(V03>k1*A#k;l=nu%~-y#+^h
zz1*3p-V!@q9?<6})312PA^wWi%jr;V{x|ub{dCyT<sH|QmE^9o<oQa*y_J7gm@K!A
z<XaHtTNx%`V0ukiG<TZ7SG2Aw9w^8M@-8rc3`oh=VIVkns<mZEb}Wbu#Tl|M1buZ4
z_A%A*hhwK_CfakV?Js)mPxQ3!_uBW`EJ&T!i-RAEMl|99vKa5IE@aT>I(}N`T@&-W
zzQldHbai0d(6E2>=w~oIu`JWRw`J56z_~}#4pGkQ(^U29tC>Iq81ItL{Z+jTyZTAF
zw=*8-$IFRd;m6ToNCXS+E{>ck_@EHX#q4&l?Eq{5cRDl@o929KPGL-@E}1t`V=HyR
zyonks-0R^<sM%WmnH9#V6Q5&gasoi2PYJwQ)Uz(?)hc|rzN`)x;Qb}r^kvqnr=w4|
zx0cWz71KC$0b@LNSce9hZB_p7|IX&s;%cwjyS3Vxv}6`*x=7Y@TTIQN)XaIa4c~L;
z%{F``0<H)!J%&+tZsK-M0Q1}l*nUiZ@oCQKKQ!R^FwWuYE07KFfWt7xilZX3zD#pN
zG6Yo0FRl#LQqXw>o=6(3MoTcv59ab%o5Hzsyu*%w=?a^Z)awYDF0;8t=U}gtI*U#-
zqqN9Zi}+bqw*Y!I8>qhtpFqC`x$LKj)crbdcg>oL6te%js^E?n@sU2H`eYl5O<~Qe
z8^;r0Hm|uteq`{}LS4US1A7*k-&hw`omXh@En<JP2ZHR%K<tFqQXMGiAofBuOGzvb
z!3L@<)Ewfe1*mfI8m=>hq!~dM9wu6uKucSu&VgUdHnw&4yfSr?zKtE7G_TAUQF&&z
z*bHuLY$sP&Obqq2VfW%E-W0n=VK=bQol{GbXvp2d<82{wVZWK~1=+B@%6n<k@96Tl
z)0VKm%cn1JTljd_FKq?IYOWZO>;SRiyVA8-v!oyCpgq{aNsnSpQ(V8|E=LfZH^G{x
zI65zq!!*e0QTD6gNU$;orKq8(4$|`+7Tn~68zsM11ZWA|A9VNPo53Ye16*a7=5q_2
zzMw9>$aD~wQQLOMIKj>^F57-11va&=DlQf<mfq}_VFS_GG5R6<OO{0GJf^a0xeeS_
zWhf00wk{c3fhr`s7VT4r2Z|qg@sM<X1{vdBXYzGqK->j`eHyc$Lb6Bs?3LmxeG0X5
zBZEhVqfEtYmW0lL6Puk+@}B_z39-mxO`ug*(@>qBj5b$cqF1y<oql51>tz2rF};0~
z(%%5r+>%)`xYU2wU&Tx8Or`IJ6TpEYw*}e~fP<9XvF=+{fK#eO6jG%VIZT}<p&0M&
zlPqubP8`NhO<qMCg7*ox5-dn#kdWQ0*3!z&D~EWaar4T*a^_hGTg-9$)wztih%4(f
zVlIY3*;?uR+-Qh*YayH0Ug4(B&s0fqKhc4wy`c}}Dj?_s-0nd|b;5f1V(xBuLC^<g
z_n<z=t?V6cUlIMudafhJ0%ffO&q6<?PAhapYWy&@t<1>%Z%PyIAdM_pfOn3{EhkUK
zR}Ir;uyl1S6P<Q&r!T*pP@=6ws_(;1)(;mUNM|pB1dbl)$dbkMcsq6d&*%{oJw)jb
z9{r!vBPM!?lrxp}|0Q}XA1s0YqSqWZb?0U-WWNe>rMkOQnW^v|orcGKk%edo)f96v
z(z`*O(mP|*UfG$g-n_&_?U?i>%lttmcc@7-o{cmy)F%zY5qv0=qU7aB$88^f>O|u{
zsU(UM#o+u0NbD24=<F|@GPF&h;k}a9ao9Gz64mNUNGXIetKshWDs!jKJ?-=%zA#&O
zXwrf0{?zcn1&3U)!`DX~T%h1R(ZNL{Cke-NW}znJIENk_OiwVBOUo3+*+wJRxBk25
z55*Wg21elFd~G(dT7=6<NH>lmw22O;40qYYn<hl=iH_l}#F*%Nd6V!{TU15>n4c|-
z{C0~=7DbD~{_P_{MNxm*C{UBM%(+NOlRvvS1IHW}j0TpDh+F4P{`g|ZJ}Hqb`j98&
ziV@Lz=D*+CUBKD8d%48{%9iId0$KzUu`liD{kPdy(*KJ64YGz?W&DO&MTHV)sA;8?
z80y+gFND~#%FY2CRXNe}o5`o+BhDCh9r*=L;z|%u>JuDUjn$ErOs24#E=iBWKqC?{
zKiL*SJPayZ=EqeAt`>C|^OYi93Fp3s{}drJ7eR9-a!_KP3Ayo3U5k;d9Bl9|H9@pc
zD$42Yn@7@)<IIkicQpB1i6`8-pEVD2?s6nR8;13IdsDIaHa@9%e5!dNWw@KT%F0cc
z1U+Xs<#K<qB?ORd6a2T2LI87P|9s*ash8sb3EuIK%?(HG@Z8jSw~lC$tMsCFC2e^x
zvQ>0V%!YSxe}p+{`q(0UsC1@FVW@%5^mOWS{Z|BoBm`?3DC?kht^70qo->tD;a-Z)
zL<%q@1TaWf#W3#Nw~J!DiJSQyDBD`YmX!Yn%I+_O?h8V66xQ#zG0L}nlc<5R2Z99u
z^I*B{hkW^;RH&bjfTR8#0Y75Ej|RX@1^=`65d9q@3iv`V{~PAKhru9({FU!wuwZzQ
zm^WDnw12oyxMgDZns-E4m+pAljN=NSOZr03nrP>`1l9$asxM@&PGq78(f}^?yFTWa
zOb95bH20zoS)n}D<G<TMc(1wY)_;n`{A`u$FSaDU)N22i;dCa#n*6}WRW@I0w*M9T
za#L6h_x}a>;y!n8&yb;QhX1#loPfhQr}~m@?WXq1j>wGu^!VH)3nJE`><}sc2xWC8
zCm}!e;k^T$li*B&9aYtUyM(|lOL02bNd9xN&MG~oPZZCU`KNbNlJ=!TZH$qMCQR#_
z{14q^6xzdW4#o|e;64q2nljOT{W*-V&i>>!MY(4sjWECIpc{?!69s0p<Q_`iGW99y
zs*sr@w-`Uy-T+yg34;yUAz^B#KDv+@C>w=jb`}Gb`J-c;X$57N+wLdc{H$lBcBy9p
zJ|-&ef+=wh2PxPKXpD0KYI(&T?ubFk;2_8jZN7lKH?pdD*Lul-sxRJkw@Y?79LT<#
zPuk?Ygo<U^$ZRNdoL+A3u&z!Gxmf2>3Y<3*J{7``3*mVd8JyRG^9uhSXbh$pws8Sq
zuywsf-VsKo&!Y)RQPB;cc-Lbv1dD50m6h48JM-OS+2$6qoexM|akfvpY;}yi>^+1{
z9v*DH$MTho$k$Pv?<SW|V>Wx;aK0^;?<X4r+|w6}(&G{ZG`r6W>od;Ox)pfS#96&M
zIeX4ZI1rW)?>;zOtuv3=4@B-(*S>SU&iUDf@)mz_i&fdNzC1iXt0T$$rMvU97Qbr+
z!++%Y8FK-plmO$DcdYI%+r#%0!Dhk@8cn>_`0HTk#`D;hrf$YXExrJb#Zq%Sk5#0m
zbskHks%=cK#t%g@U2ox4ykbt9EZh_^n|%w{MRLxE2XkOX=);3>GVo`kxsix$Da8X<
z_dl?wlC_g2RQoj6%fXNp>Xr;!;HCZp*N3BIEapu%XZN|k@ors{vt!4!n8I-yHLS=^
zpE+_Mq?X$EjQ-qJcJ3Mb2G9k?eR>k9Mctp$FjCjs886}Fa39H~5Z_I!Kv#F}nRLtS
zZ3;GYdTaWmunigH?W?NYSJk};-sfIjEiTWiHciz!KR|01O`Ee8O#y8ADweh;!K*Nz
z3nkT|LUP_thxH^Z!n3vXbnc0nhRl>7tCYQ{XLXD{#g4JhwqtCJOgP5gS`3wKVZ`<p
zUtB%%RKQ{80zEQeDW>0#P^rJVi?LR8+4aa%(Ful)*f`_jVKG8mJZx?GK3jTkz*}pA
z`Ehv-;klF+|CHs{yPfS-5p>>+-QPsL77SZBRUId0y*MFX9s`SQHJJI>ya_f^E_ZZE
zpr2}}oVTztJq`#O5n&I!Ab^QyVj1Zpn<~?IEPZFf94?I+SS%X}22E8-ssi;hUYMNv
zd2zJ?u)3kA)ap-ORF$?2-o{#HG5|Bh6rJ3O9CDet_P$tpHtxo|MY2Y)S}yY@LxhV&
zU~}N~lUm`?mtFl)NP^OzyW~~qCvU0>^phC1IsGI$|C577k4t3MzQ55OZy0o>K#N%+
zE%wa&XeD+yZjsEL7Sf?A6Z^Y)>nhWKjy~pHQ$cPrqhhZtk<aHrZmC)mPlFGl%%p)%
ziK#7BU4?<288Bcoasb|Bf#1QsPT)TxuubxgJLQ=4G^w)&@F#6!0ToX1xT7*>p=8>#
zvqC$iM%y)_yZR=Ka|vzLJtugE+MF>4P_yz-`-Ne%c`yctx|O{PYMyV$HN}BU)n<^_
zp!lP=Tt>c;G!iW@pAI#(m9$E5@Rz{psJy13!X9sGT}4go@`t&h{FP*e7yiuky+f46
zyw!!V^gA4;sds2{>=mPG-KrA8Mc9%HdN$eKTg;4fnd#ZEHjdsA%ic=MTtVqsEP+!f
zOdkGJ+Wz9wh?jaz>aAWdh~62?P9bYAP8y~%i~|K*@?S<aLAlU^EY0d}aIe*ae(gJa
zV8AE;P*pgyvF<Tl*($PUe@&|Nz(t8m48$1AR@D$P7JLrl3-R!-Xka@tB2D+G^v;2K
znn#q?8)D9#fz&dQUu<4Jn2ARBnW@iF`#omAuM6oO6d=72qRC&(fX~+OgDsUz*zk+S
zfNf2Fi?ysKh(lj<IuOjEn&nk4y@~X;QvBViiRXpVr#qWbQrLv-OO#39xc1_6W=R$9
zdfvP}`1;^!4n5Ly8R|xBPfz<`SpH1!U<{Kcr)GIHvTt+4Aa+Ryu_AXSO(WWwYoT80
zsty(Ds`gqYDPj(pBF3p_Ad?g{M~CC5?NuBqnqweiDw^o?rlfgY@&XsBQ9rRQ7^~I=
zONO&YIl;c|n;YJ+ZyVl=3Et*FPwdk@vwmDffdggR;cU!Lxj}rUy)iREA~NR&vCntT
z!EcYZdMZH_Zr<wY1aMh{5qQt6MqUIxJWw~Cd^n2GW-iicC6(0IJhL8og-xk8My=P<
zm;U?AmN|&Z&lbb?n=KCJ97KzOM*Q2B*gS6XKUkb)g}-tXbe~~u{J6=lD~6?z!F4KR
zxM=vg6FBjnB;9C}{~Qqba4g!eT}S^x>%!(NznXRZ3;EUT;rONL{6YzSV=MThN$uZD
ztHb3S3Q=V!&V08Z0o74%p-@ru!a|Ex+6+H#;_C3$?yVqLRMKw$W3Yxoo<3WT`(wOo
zXN@e-)E4mFu<&5_R@lG5Ic3P+p5V%7aOx0jzBIHdxVL<+qq*xaj@_{VyTYP^!dLje
zGV|AAf<ogbEGmF#@qaW5LNm+1zZk~OYCks$jDk8x05w3?nl}PnI09&Sa+%rhhLgeC
zioS@J-hfKS-4wI_49SDu=&TV%TvL&0u9QrCj&5I_WW%XvQAOVF&UugW(&9-RRidZ&
z9xb(T-Q@q`u92h4Jd$?ajkHm=T{Ef4?=T3nOip*2T4~rWu|b|y-u9+_@a1c4+!y!3
z4_p*?S_{1oxvsZ5!ggWmRzC_YR5JcsM*>y(ze|tAor0dRs6s*2{@kla!r)xYzmT{h
z{g`9{kYS9xukE<ZqFVRDfBk9`1(H47eE-$V!`{Im^A-BqH*WuihS({sTVVve_haQJ
z3Qatv+5fqV(%ZtrdGM_I(!5#|3fJ0xiRwywZjCmp!eF{>xB0h~L(t-R9wstJ{prQc
z8&0V3U*M%2G8NFMT;Vr`Xt-+EXVk_>TPdEH)yC)4##v!qp=RYQM7^1kIp)<$wp??K
za19erA<+tv!v=1m<C?1M2h8Khvi#}<tR=s?l6x`h5Q))VF7toRa*A2mVpr6i4~7Gq
zG0fOzTo>PUVUNI_59#U#k@_L6zx5r;o><ZPD==+o_Iqh!D5Z|rTa3!r8s__r%Xh=b
ze8cO8$+!r$oa31loj0*+E{nv3YJRs(;%A_2KQy3ytS5dU^l}gqYoB8CXWJlA17#7i
zIN+fG#E;Qm+bW0`aMb@7M)0;u`-JTb@hsB8f906c|EbO5p@-{88u=XZQqK03!T&lS
zBa;?*6B48hlpQFbcBl|K7=+wFYJHVz?8n~)BgPbxj6&7_B(|>GuDzOFz-%?UHTmx&
zYy)2-pR*0TU4Tt*3ix^enDlD}c>S9K#vX7bCjBY_-teY?;|hSeI{>`-O#u@Hz+D22
z(Ts4I6yyp2NxbaXKvoy~-Hipkrh2pegMI2~cD#(~3Yq*KVhLMkb1e}jnO<{x#LTqv
ztEc!kl5Bj{^qkYB=bTQ)rT&-x*2ZmSqAT+Yo$IEf=af=Yb*=x5p`kSYPJ?82Y5e#V
zRv+Vn2n`wk1qftcHUP5WFfQn8ZT#9Dq~h)E8+<vfA9p+_`$lF~&&MKk|27R1wt*Tq
z{#QN-%@ks);Ty0_1E(%CQ6M#YH$JZE*r&Ks8)i-ZI7kO5@he8emo(sCz%oY%x9RW5
zJ_ydq+UEFw{Xig;vO%p#A=GPPd}a-iQmhWtoAA|BKi#XxJBOQ3p;py)gi@fKMwb^U
zP{#JD({tD|`a3>ML728U8$UPXpEM@No8lu4-~2Vgq#lCve=`ZpuSxnB(GKv?mcG8q
zwwRMx_0h!+)X&n4=@TQUDYLFThkR1WD$1#3ty|wox!bJsCko64kf~(tOFspbY(btW
zvb#^J7Bwh)3^wcR?zhoksV)CUcK3l}+h9)`N=YaI`OoyJ@_jN=4;t_K9RtMaPUBtj
za#PTU9>_k<C*$b<JAJEkj+1C9Z!$qbdVxLc(w@e0)~j)CNFvuQv{;V^i{)9y`Re6P
z*j3#P2jgASK~J(Scf?xjD1{A_SXzE>07!XR9o5ijtsk&jzSS1i67N_tRMNqbeAfA^
z5X>D0vt<;_ZG(T!?t*}}hPQsiU~V4)!<(psv8-%l9n1!USy+G>PhGK&+Xi3HwMzzS
z?Y8vuMx;k6BZ@tO(leG`GAjMH!Q;7FOaFUI|IPcuwv4C4X=WsNtFQG-mcFZy4&e@I
zUOC0)rA!W{)Ua`GYQARJH_7z<aX^{DZfdIHzNa|lba7RRdw4`#ni;|7vSL~5e&P!q
zuw7b}tolbA2u*-?d_~f>khkVnCryR=w^s&@NJ)h%!1d3&zwvInR(yiF-<D`A&n;$L
z3Z0Yw_Xx&N*%m|I;b}phgt$oQRZ1V$rMh$^03LW4hd_pn2x3W-{|;yLf=UJ*sbk|(
zhI+UG;}y@MxFrYCn-)0z5zIK244r$`B=$g<C5&yFlzS`fl<xE`rr+U8)xn6=87N<e
z^{C*42<XOYp|(2iA{XgV=gTI0vaR<Gd+7pMXLZcE6o2M~<zF`5{TU0D)Ww}G_MRPD
zyodWM-gT*LvG?rIQa#+=@vhTdv=-)Jo{HN97p-NuI6BLz5QS*bEslPgX!;(DE43z^
zd0BZXM!$hEw){8jkl2CAEx(-R{4dKgsLqiAbJG8CZP5Gi|MzUMUqd7~kuA2UO@|NL
zVoTl|ZHxUa+kuM<asG#uTyfI^TkOZB8Z}#N)*SwCw%AGk-rJZ}*kVt@7W+ZCxNNZ}
zb*`Hf+G1}bPE%#nk|bIL^4<@S4MrtLP2Mw!zyyXkAl@GDY%O4@rBmYu8Y`rJmVZsX
zNQ|J@XzFOwQp;EWE2yXJh=;J!J8Lz^BI!laKTp(}lg7scD##b5g48PO-*nVErKX`W
z&^U<*rNL;W$$ct8p1$Wx>8TIYn={-nPIv>R_D<l3tWhco4q3dz(to1!{-o)=6X}Bs
zyz4j?;BMMSb=&{C#6Y91^W=CHbnU?4ddT0?un+Y$hSPhYE#9D3n1UW(O|rRz=~ORk
zP5v7iw@F;b8oRfrYPpzB&0f5PlggWEt*b~aj7%`cw~3)7|2*hYHsEE$?7K0d*-(KF
z@<mcJ*Tt|V#buvRNz1G;KRW`MoF3hzv{zuPfryWHBJylHDl#(*mEQ@0i?$49>SlS3
z)fqzG>RD=(yIC2Ui({L+SPz%Q;stwgX&IYaKMmH_?AzWOGWhb2>nfbRcysF)l`MPl
z#xU9J#o0nBfoA)cgbCP-UsoY}afpcb;Zf9}kdFDMgVhrnH}1Yiu^srcJxlg`OP+8>
z;1la9q+@=mvjHy+Y{30{KBU)FWV#(6!)3hv>H!*|yAL+su!6+=J2d?+nsKt2PMy;y
z#^5zh@@5;KU@qxc?Y4K*-HplIEUacOXYe=sr<)!?)6(gCM@&nz`)>9x*LJB<b28}W
zK6RVdSXH-80iECH%d}0i@rB7Y&QI(%-Tq>_geKc=A5nBBlJMX5H&o!xL}utrWX1{3
zM0CcX?Q!nvK$4yLv`v?qUG0;x4A#WiDV^l!=B-Pl%X=1<a<H+m<|pg_D9h~d)WZf@
z@_kUUpW6?N1q=<iR#uT;STNQO^fAGi1{%O{Ccf1EmT)F6=Mp{7lQ7mb|B!D7?fij5
zsRZW_&tZ~$rIBKCcix>fB)?rWT}<R5ujZ1yZ(C_^5c=|AnU#kRrRj$1*_m6^QFS$U
zSEk-h+ul{p*JXTRyZsjF>@$rzM6h>#nks9Kg*M!k&W2mgOU;Jc3bWJp5qMz5UCS6~
zOZeZrRa}4(l36eVGw!7`0yA#>2+53_$NI`;$-Sh?yBenpoDo%Ce0Qa8V!A~Yd<(KS
zyMKHYbli5N*hcycXPwL)VPn-;xI&NYX1a4`e&%D2>opvx8E8MJK;eVAu?yxcInX{q
zlucL6yEBpgv-fk3Kk6V`aI9lIwfs=PQ!C`7o5QA2JT({R%{NAeD|vnIP-bzJtf>|_
zoKg!YFTXa~x>a2iN)FCUR`=WG@F$X6WDzsuC+U!weeQDF><UQZdn+n`saDGV;!>=G
z4>3pGeQ<RA(Z#W>M~SkNp02YBw+<w~GjbgWGNP1Sk!^(Yaqgje;_%T$;)7Um&QNA-
z&WR0<WbAJ3DhkTF^KopYp$BRa=~-L+kIP#68-QaMEfs~?9iLIU7M1i++c=HG7XLkh
z(OqBJPKPi|<e@fRMo}RP0m!|-PYMakPZ}G}w$c^KZ)fIxQZ2Z$m4+MK6+BY7qQ(Cw
z9iQlCN^W|e^b`hTIBx}K=kH0qCrX484-5xwD8gP0SB%5N`tC>&@8IUr`klusyjM4$
zYJd55pUqJbl2fG~jIX`JE&gGI@a$Mf7}!C(_efV27idnc0(x`K^r8ryuBb^@IsW)b
z!4|F9hSn)i2N&^Xr>q{xy+5#%7U}RbF4~Sk3eMfsJKT1oYs?Yn564KXE%Xa^&>{J;
zgDz0p%I^n(z&3m|t#lAoa#6z}JB7L!Ka7JqLmG9|)`mgvAYGZ`sE9EfPGOtB>yeAy
z!!q=QcFAtb|KguC!v<Tmjd3wQv6!SHwU2R;-wnXDi*YgAh>>|@vZsA#Ps0zrhI@OK
zZ1<LYsiy&Vw)f4Ot!deQNpHQIn!LY_awk<)Pq9d_t$(4V{wga}mWcvh|LmTIe(}xL
zV<fhgd`}M=e|47Fc?tf_^0TFoVn8NZ&mzhHqEdoG9+%=r;B+eAL6-UlZ+QdA#1SA7
zzs$bX*dSNLf7Nn@-*x_PMwb%tpBw=)%m4TrK~f_?BK~_vgG}|87K1eV3r9g1=cMgT
z{?uYXRQFAzAc?9S1#(FNB(vmRR-i96`9Fg-c@6iQNo&viFEjQdK`+f`tb|*$f6LTO
zXW0=&nliC}>+GM}<S)_&XII#fUK0n~g-#pjiOs`sxQDm=`rkR_ApXc3z7xd*=~b`+
zJPGluieMMkoM=CfZJsR+kblmNNP~5xQ<K!}qyOh`q1Ma<DcpFS_5q<?7vTFo@U>h8
zq*19WKM14yhbzYZZRTTWD5L3;OvO@*Wv59Rda4I54)k-nCy;4>p!kYsbjbs#;luIx
zC5IV%ADw)E6JNWThWl`CC9Yd2<z-fk6P8kxIX_!!KC(|#YgjUP%)a3PUg`9|_MhcW
zw8ir29|pr9hF^p2)V$<=@X)gb1q|N(pOs;*$|Y86L);d1Tc!YkkPzomfXF*T_Gy{P
zZWsUUp6jCClC3st8&1@~!M2JvZe?s;iZsSZ`8LO+B0PVmP(Eu)0l}Rn7tF|{x4Ol;
z=DGEs4`*|x;X4>du+R1%pOMcSJs2z80A^tL>sx~Pi+p?kQvYP;YR^|W_H?gz7t3;K
zor&0b<*#AnV?Hu4M&mAc=n77qQ12aR@;{*oU!KU1fp_ddFSe)Q6&~Jvm4C1C?-2j~
z!oS1(JHo#~{vGAtG5)>IzoFQkhQIRn_$zx%`$@TScxEME7MAQ>;K>wNY;EKFc@Og-
zd4}uZCA>W)k%j;Hzfw!ze5Pks75KbRBMO!MSo7O8BM~ToHr#8JvkmVCaLIli0`wkU
zpdH$$2yTgP#?5%tmW)^8I~L#-=hgVb3raUPyaqyB7F2F7S;#{}N-tSR`bqlp@Pash
zwk$|kVxo|Eic37z5|tsdpu#0?SrFS?f>%d<jmA12VlADPbO3=u|F`P1okVp%7Vo~A
z4jxYW4oO)(Y|EUtw%7ww|37F;{YvYB5$!muxE<Hg4hBZJ2!nr-99@Zwh_PDmj;m?*
ze}D<O)BqK_XCRiD=t&RuW}11Ru53f1&$eLwL#3urkM7zcUpe?5H##>)<2&lhH#e5V
zAFdy>xv_LhedXrH*v{Wncza9htw$Tnf?#5EV|i(Fr5y0AU=Cmb;6#Sh&BC^#Gg1*=
zjOb<$FiM7S=P1>g_DPuuV(poUny2Pnu>@hqn^oeiFNt|Km%y?O04C^WIz?kIVe>hR
zLH_mc31@g1$!jeB9mQa*ZGSTgXl6fmWXt-r!mu_K1Go6I16XN!#`i3aPdOMZ6JP<6
zd^+hTiu2^tQ~dl24LPlO4qNQ7{G7!VBBuMlAR;`fDYE^WnV(lHTC{(7=3(gNNYXj~
zvPf!KX3=G_o*Uwwzdbl@cjx-cu$b3AEvRDFWquXIC3h<O>p-+=$`iT!V&TFuxf5!d
z9e4Z}7u&g~l0#xuxBhdZa5;f3(AJyYU<*V)jJm@So{bHk4cD<$_}97$SF}!-9M<g5
zFKRvGI6NEHaIItgfYk=?#JJa~2I^!IL1eZ2Gf966=W)*GOZ_AS4Q!V&4AZ?^&G|Kx
z{EshneZj_F-oVgev~!#UMcAqq;J+8bSNSagydXcIDJRd6!*&-db)ekrPi9|Wf%PFs
zI3JbH|68Zi3V#b%x|;kczzjsT-d;B1+?_RMLoCB{ZQRn_zy^M{|3l!|SvOXD&v@0D
za<3Gpi@G9C1lRJ{Ov-Qzxjva`oZ{6_$uv&&>Zj(=z;W09$Z<06rcD>O52a?J@&G$S
z57&)*nbT-5Ff+rA>`>43CvjFf)UvF}|HD*tMt4_ucgKb=F&DR!e5DPQwSQ%`-Joik
z{W{^NYMhqjg!Op)j9}8+peo5=sLFdXdjop|^%H%7!G}B|eabZ#4_`MYrssjgXV*wt
z8*GVS(LBP@dzQ+-@8(Gfe(QGTDhPEhh?RJc7V7LgVB>Z;<8)=*({tT)93!*zVJR0I
zr<d|JPpatT+0@{2`DpwQlq&pJMAZ}3N$tqdu6_%b7I5KuWDzd37aFXr^!Ck~QG>ZD
zn=*_8kIL9_mv>WT&|s(Ia`r|mD|rAdiurh5Ws*MJ#6~a@xeM|Swk4bVf1)uW|GLU#
z>NG&4V<xG&$$t!7o$pZlycED9Jao>&hOhJ3M!OK=?Zr>y&OcO)-PQ4v4!jn9LYZaz
z|Hxqcd%K#J`tKy7=-!;QVbkj!)V5Z(puDNgjjM~4tHoisb`sI8n*dnmpF+HD7z{RJ
z2Pv4#1(T25g+6$&b+f_z$w(lWpx&Lot?23OB8`IYAd?|)>znZt9!)w@ELiK^;K#2a
z|5A0-RVr-&rwyI`(|aoCY(8TF;kxKPj~J*`y9)lsTR@qWL!G;iuba{vf4Cgc`IopA
zjeTr$bV1`aANix{=a?AHE0+3CT|jXK&tc)bHXcKb`889T{jUi{JQmbXB?gnXxgpAh
zz7(GTHrecdl(aD4hg`n#^=x^PXxubT^J}Iy`(tUsaGQtgBEQNG^V^xBCdtTp+UlD9
zFQPL6tX0RT&3+GGVR<9(<-vAV2F|g(*`K%xP3Ytfez$cgIB_$-{-JlWmFgvg*D-!6
z5W|%R3Zd^1($_%Q4-0Yqg!F|?Od;+dA$<*$9V)~P64KW|*&~IxM+>1R3ZcD(^fgfS
zVj=F?LTDc$ePJ9_h}&NXy-Y}717$<}GW6u~OGCig@!mq{-a?MpyIg8t;<+&u&Dc`6
zMhIY=8oWz4`VJyIhMBCPx8Q6{29zsPmy}ygB+yS#tpDZn)f>sqT0=VCC4sp&Gh1Jo
z@@@Llxgm-1W^d+}WTq4?yRu?c_&m}o!DfH21(JeFV^(@7f7dMkhb}RH*Bt+U2g&08
zU$rpf-0Dhy-u&fdCaa4wrQ7r;D15!k-|Vjma@Q&`l76PM)_OAa9`<V!6~wQW{*aIJ
zjj(uwNxzh<%}iFeQnvmCWhY(PI9K&22BoV-34e@BX!ei4BOr-#Mbba$tUaVa>Zabz
zWQ8bCf2_O;f3HCsO@16?6j{D+VcKeW(?53a)K7du`AfFxkKz335KJ-h1y*arBXxc+
zTYLwrKL&ey2x}nemrM>Co->aBn2p@zXUT(BJ+SF%$*-B=&q}IQIuaQ>&{$>q-;3l*
zHvJMiUk83E(-PR2Ur~Ua2rTPr#JdHic&Nqy%~kNpvn}7#Bx(8fHdOa%j@Yq`0;A-!
z={lEQSrt6l)cJa8ysK3j2s@olH`!~bS9h$#E#)F_&-TcJoEmEecmrlbkUky7@U|g}
z#ZR6$F~S7MP9u9SJWz)}tw}PVTkQZs;~KwDgpilUb2RF$n~@ztyy?^Iv$*9IUQ;aV
z6UV(xCft=9IoQG7&&inhVKR@uR+4z_H~n6j)BXuOXg2p-+7`oVclUjVayZJFtiSFw
zhh!?kFO2~3aAn?~G@(@LsjOw2enT}oyynX6R<#QMI(BwxK5TFsM?sPFTxy>;p_g#_
zt+cC${W^!MU#4aL1t@oERpD^8U(GEYZmyfE><jJ?!f~*dEZ$yOvmut|OjNjk3wtci
zp^(O^y<4UXqph9EMFHB-mi?B{*0JNGrnulhqnNhYe<PN8_ckhvF>bz~3jfg{549!z
zt5nOLzJ5_?hEqRyv-L$UaeT{Qq4{b`pO_e(!C`kLl5Q}-GIf=?F@!ZRIR)kU>h#HS
zt+k<o!(I(D_fE9&Mn=TW!E?NZmmRhrAdk)_=YqLzqA=2w0Xjg-w$j!tt*~>>1{!Nq
zAl@wrptGU6bmr5U_UbLXIM}<;&Q{0GPp1Ade{AZN=yFK`97b6(XRq~Cu_bn@oxRRY
zzk+i`PEM~hQ@6pU75+z9$D%9Ale8RwojZRn3Vsey?&3YT?IQ<iF4miG09fc<LYf`l
ze$5Kg3|(yR2ry4w%h@VeDRrYt2^zqea5Oh&q3Vsz4e`&tJ7|BbwLPq$p-{oqRspoP
zvFLoizG)piz$)6ju?}d&c#to%`E%3b7kbO9&Evm!nCp;TyG3C=hp@r_6q^f5@FuuJ
z--BA|)ONIUnzk~saNhHs&$}+-hV3kH-2*#qydmUX&d#Ek5;=quK;DC1)#GHI4O6Wu
z^4hC&3nVML9{B#q9x$}&r7C)<n!d0W2Az8lQg&Q9H(jbe(vc;{gVnrK8}I&xNk5er
zuYCEb*Zah>>8w@M-Wp@#`3?18u&Zw`@timAb?S_5`UI)m9PcorzFha>)7*s!@|^si
z<=M150;xD9V?1x%B}a?1?(LHl($f_6CMw|V)e*LEgpc{b0riM!+jHBa?~?0AlTnQq
zOR$o|u=LbTzonB7x)Z;6*N2!p63kW=lPY_IVgo+K0ui248gtqVBc^FJd)$HF8+el~
z^t=nV>9zw_(Qj!@+*|3(zj@|Lj*-XKtc|7r!uh8=rdP$qylw6L%;E$xN2bB&Xu7lg
zKqS2ymdgD#yfOaWccF^y1=yvno$u#f5d&h&^pJLfC>~Hmt{l9pR8Hp?l}`tCHaUmb
zPk!M{0QZ$P#;{58*w*eVr4p+ria&ae<`Bj4KDF_y*=B0kM6DcBrcQH#B(EA;4993E
zldPk%^yCo8nz6r_eiXI|5LTKEmYDp(sBy@#XLV3CZ|*Gjdu~4SIEI)|J*awyp5l?;
z{2`(lW>krn4+-SWyq8O(bK_k2H%0&|#IVd;elVzZ<7IZ5x6+;FU7$xQlbAcI{M!)`
z45?M4kg^;XQ)){-U9FS8pndVrxJTA^?mr3D??Kq!Lg53?!&`VuB6lG?$AQ+R&$P*}
z{rC$1fj_Hjgc+=PvGkuS{4UtQh_Pw532Ed6(VIqM66fxB7bBOgq;GqX9Wv{x7&e#q
zGgb5eyI1d{Rh_%4aMqS-Ff%G_ofao_*dtq~#fdKw3jBXhgO2oE<e|vsNaQ*yDoI_X
zaUXf8X!zwWqb-3!>_d_J455;A*+Y>o1#wFujg}Uo{iU2cK1gFc-YlSLgX6g=Ae)1!
znWf2Tyox(^H+O@_835<(j0C;W;w?GI#cPn@?NbSBWX+ZKO0G(sU9(1W;)T>iAk^PD
zeeoI&WjhIiQ{R5T1q&ZZomsQG0@(i4$-puhBP^r9=5E5D>%pD=IXzV~o;qfXYSS?>
zkqsvUJ1rC0v`dU7_Xo-&g8T48_|l5NU@}#`-tq&PWeMh(d&8`*m?~-^_h94QTLdl_
zZ7C2PkNcU>J*q|Cs;Qc~F|*`AW`T59@04GflX#I*55G4Y%*xQKbFefmn_5Qefy~0{
z?BA<I$#e(ucf?vdRBI^J0oBBi73s2j0P8J|*iM9_A(&hQTfe%dIhKO`(l(>#X*KnZ
zo)dU(*;{!qdk;CV1rQy<?Jbt237dX+lBjW7O_QVP1j9}QJ(ye0n5%}M07rL?B<V@y
zId7Pxd{vP#DPqQYGj$1N$EHmqtba5urJ~?6Z;OA=AHxCEelVXp#m3e_;(y0UaX7HV
zy;}TdgBXPI1!M}f>~5c}Ib?R?lMzInfA)d0!lqFIX7&<9sF|$V^3$89&3We1l8TO+
zOH+Trl?TsqnBDgupwURX@AO%MWylX|CG2|403y!V>-Wrm6TiMqtWI~l;Cq`vonn5F
zmkjdK0VkS+9eQ%hvy_wj<U;iDq9z=Kz67I|0sEbjDF)*YmjwPruZue4vD01s4yZmf
zI#1;sMyZ*Mj5<~cuuEMKe>jn=vT}y8NyXz2pHfucZ@i!3#sFl}y*tDX3WMl9y^D?h
zT!3KTG;~TRc{Fq%-k{w=)R}=re#j7wgp&B(lO!haW>86zvU1~k_3lwrdM|IXIsheQ
z_TQLfHpkQd2n%eh^Q-33yA6l>q$bF$JmdvlJ-x|_&|GutZfcA_?n<U>S)Y1PR>tTc
zKZ=(}lir-}LoFCsID=pQs9OHm_H1CGsh|fIR*U5iES%%gP%Y~#sXyLRoja4>)l&u*
zPPNZx^h)PV)BS(X!mCu<{LWqTy(VO&LzxBh2O=-uRtA5YKTwz03Opfi-4r)=I{y@n
ze@vSYXx~0qtO%n^dw4RO?!V4U9}v}T><zjuNc~0AqaKPf2%7yl(1qqBC~*t^P@qfC
zexp?73h){M%JpEp00_@L#CzFlWA<YJvOgSbT^1Jj`?+C(EI}%eo`_^`3gK=H%iB=|
zXXS~fW-kljZVk)(haxzYXC%&!3*l}H%lmK<oXXQvW|8b~z|!#hKv>@55YD~rUD%PI
zyL~kvy_q#JZ(!Ic9U)R1_bmTzfMs$=Oi-<9e*7CDzRNBGzK}ZKN)Ru6(=tp1xSPx)
zWUq!p-VK#md+<*(H1{q(1Bg-muQeex+27#UjvFrJP5!UuxRq_etn6{|ck)!Ueo=YU
zrH_rs<L&G0XZQI{WzhheV>d^jiR!sedE|ERvtgciw;b5eqcV{T>&ua<Nu&38S(UJt
zKWm`gdBhN_ReQn(1OTeZ@apzp9p0GfgN;|=1~1-q1I2DUgVibi$$iA?$+u5DsV=&b
z1jgE6BHlGiFcUDYOI@E8e}k5tgUQtU%&5^jTpOV`Q|%j1uk9c))nsqK$GeWJ6l4Y7
zf`{RzR&E?$8=-4b*XQ7GwR$-t{r>Fpq-&f;epJLtY#>)@3TMA(>6pydjR07Ah=yu8
z&wdsF;Uly9ju9{#l~t-Hm(rXeeW%hxia?HlKjf~r^tQ3BF9Kk6pG>#7={K*K=3|@u
zwWMfD)Qu#(jiAWGMdgd)=>u#s;@z*IRA<s*={~khI!$%>L@8-DebmXt7r1SpsWP#k
zkkQG)D%H~8)P}6Y#S8i1c>@q&D-Xd|>lhIgO?{gwQ3{~suqHN~M)9uu9i1|FSIxUS
z5%1A+%01212+2LOeni;O5MFdBf5(h`>hfy8d_qWql?-u<`u%L$QD21(PiFbSOf2Co
zy1befP<iUk_#&h`=*7n6Z8*|i({9-QfAx&kI?<-ERv_z*=@l7ns_fhoTMSC;H)%%4
zyWfR~^N@6CowfRnq*{72rDo5wh@Nox>6No;|2DK&u8(+M=a7qQ5Qe4nySQMcR5ie~
zOQF2;NLI!P_wGr0{p{-$)%g*YtO;xd2TGH`=f=acL!rU?$d;{zc)}ZL4?AD_JcI^R
zMtgRM=M-J?=$3mfE|$l;zePaT@6AVe#}${R$I^$51X9Pu|F4Lo&g68%t?XwK&)tOZ
zJ9V%Sx@b?iGI1tClq<_g94GgV%#%i(Hmy(C=PB()?5TG|mIHbc%)e}WK(ct(Tj2l3
zLw^bJTC16u{^rXiY4yDf*}XZ=h{mhcm;ZNfCuK1W_Pv(Mz<m$Ccc58hU@=+Y6tzBp
zCmNxPD;S<j4lE6Z=kPfIR!6ie-c=?>lRg;8I{2Gz*r)bRroG{-0%sMsbwM=we@35z
zc=I7!Lm9)%B;HIO7Z4>_R9<GyxHi+0(6C-?gMG=qOpNy^$K@9%GA%aT*^lV63YR+4
zJD^}$Gir$EF6{O0uFRgvaMtK#tLXP%1{LwBjl)VN%s#KGf&v-A*}rgXL|=^<_G=i6
zZrs-~?(=J7Zh)^I8xHzug+bp$xi;uod>QoKy5bSfeb2&}|5k1?1NO_z#Nk_OX?zsx
z#Dz|X*t<B{x6`4$!2OfpWJ+aP=y<oiafRE2=Q)&;l$snR9iLP5#=}C_N2d-8o2hA`
zSGiI7QqE6akxx1ASHYa2l5?me90ht;uBeV+9Jq@Wsf)tmnJ1+q=Sfi>@M5GjR7ylH
z>$ox!?5~UYc2<vo_p%?P<t!^wAAfiT9k-|NpeDu)Z?^tA^{%=A$5Q_91klI{W|Ei|
z|L69J_-d<lvtO@{mtHO@y1AQeY;e%n{fj{+vLCZL-9@Bqnh)rIbQJx+3_qEPGr|`Q
zv129iu4@5AZ|-sF<Z+ce%3ojl+!60?{NMG-%9n>bMQ?kAoib@e9sieoVxA3JBRep5
z-^zfbzcb5U*0!qqY(A~2FLPyPssN-IW{>}pLkqp-q#}lKW>KI2ALB&-wN9g|75>-X
z8qT`$oln+fbwUVkO25p~w-nOHbUv93<c+qn)*4IQTS%Q9s8eiY3^sM{DO=%R$Pnn<
zf6iFbo#?f=x4}+UwAQJOU!<afzbwmi2#wPr%JUj{f*zR<e^{$GJ=p=AyQzABA>jt?
z4=w>}ci*4}E$21*TXgX8GJdJCJiyw-4cg4|{mcAwEC$QY7rkrrOi4C};9|0o7Le91
z2Bg+V!><GU3bIsIPS<<&2I_Xxw3=;-R6rA@+2Q%G)A2x8voMC9<P^Tf5=3Y7boxf`
zQB%=WyiuR<&Jp^A1%WQ1sfz5gaNdGHxjJ+yvD{4XIaZq1lP<aQyu;h!xB1-UUgW1*
zLRW4)C9@FCOnQv>Xl{(gQ(Z+}!A8i=3rG0W=ztUY*OpsvuV~#y8)g4AbJ+UJbjZ>%
z1PsFe_6zC^M9qXcK|?}iApJD?{!7*uND|BZR=|)r2C$|yFc<}<&rAJ7FA4^YGcF}8
z)3+^?_=x43F(RKk&6Uu@!ILC9+e2+7V0r(^6^1RYs+?_KNpn*pT`AHcuB6zPD~ug8
z7@lGvtU*{d;8vVWv#feP5$15yaDl@HC(9^xWKV*mNxqYa&gl~`!<OwYpsDc)*2?zL
zU)ZOU=x(GR+_AB+&VXz%cM5p_*>Vr+N(Csi+m{Fw|6Y9p*?|Jz?;z|wQ0o7?U#fh8
zgm|yFm_!FYdD^8r5@O1D^DtsU{MXMHA+`?0q$<)&C+r1+o*8Vb!|ul#Fxc8B(yAQa
zBCK0f&gX-2EZ^q<qRKW5YIXt^=vLjar26V`>Q>P_f7c8v>M4lMh#|#Y^U`sSBkO}j
zDRUsWOA$@JTu2E?yf`2+XOZ}^wli~16R=e=SwT3yKg>h;42Ql>9MUijH?}^wFC3Hi
zs+nf-VED$nmcm?nGaC|_TdH^dwxn|da&lSc<I&s%`EH9w(q*{6dAuak7)-KNwRxTq
z+i;=n>d+ABz-dNne=&=o;Eu=pb8n;XYbhhLp{(Qaj@(;12jd&YbUwZc$%MUT>4q^K
zk8jPLtZ-EEb@s;l<8CnQc2rsk?Wvgp|Cw^?Qs>iVw^y>^bCWeS814QH>nP>N89#)W
z?^314LwjQV(d}ph2>WXEX9qhs%wm<+O+em-fe?`<D|n^LO1+&M5Ff@mRp2m;hDnXV
zAns9B`sX%Coxk`8j)Sy~mM@6bL4U=&^!yW2CgLXhPE>;jxr~buK+SXQSM*HMZGQNF
zK6Oqt0$^*Tzli11iHi4|F%2A8bWXKEH6`@6_1eVx$E`UyQ)Fmq0Bwa1cKu`C+N$=q
z_S~v>x&UcaR~Qw>Fc^r)&-%6@zuM7_vZ~hqJRC6Fo^!K@Q52VVn1G}8QU;1XY$gjw
z@f-27Kl5pZaA~HAqeFIK*h1RAci|MwXppe4(mG<(S9JRk)!CdN2Cc~FK*m1Racx{c
zS?0eFYFZSOy(XZnR6sunC&WMgyF*SBViQ#k)Fr_SGt?>i<7{lGw+(q%S3?igESxHv
zTxj!Naw?89i3L;Dy$&z+;RVHb35}r;jR3QqOZ}fhl@PQ4Z4^q{#_C>Srb1#WpS~}V
zS!rgnY;&kZ%&?l#1s$+=O*c~grjH~(0j|352u*(aEZJ;jQRFaQ>du~!K%x#f>;x^l
z1xSWX>k<!yr8M~;S1C5|6ggaqsJ^(UlqSD@xM|weaDQ^J?QhiP1K{sEhjW<EAGy2I
z@nmlpUIeQ|HxkAqa#P*-YJ0bhzONTbpnHYyk`NLyIwGwF1nk_B@dsv$64cZ^&sc)#
z^v8DA$_^%P)GDl{aBSLQ`3GCSLMx5xZ?g#NCbu45U=ePCdfp06s?d0sDGY1xr(j2J
zw?b2Dlm80TgAT1a3@~i=TZEO0oCFP@bP&2?LRaq$lO67NS~Zkpp!bD|gRQ>}vFr`9
zbH+$pzg2)}E4M6P4w5gj(%%y%yV9#hl-?L77L|Tkko^oRy{Q1<L;?TGAbE<FURIne
zYz|rZj$rpcEkank>kRtmu5#Cs;eIlRGY$7&2k1G<JY!#$JjJm2T#(GYCdjxsOm?H8
z#;OzHRP+bJ#Gq-)&=O=n%dkloAZVJhyf;Wb-%7uzI9dI4Mv&})#}_B7@MBiJL*-jf
z6}4PN|I*>+S}y1(hG~NvBuf8%fW0gI`Qc=T&6f(v0{*+<WG8~P7m`)@hr?utP13Ll
z39~FrEF#PmL3Yl+DE;OFL_nBpf@Fuv$;HWnj|9nX%Dg(<cDG9W+9Dh(pWQo(FpoIg
zh6(fS;p}G{Ha~L^0V@5&$qt*&Lb6av4=0zoJ}o4RFe}1jhs_wUdFUL+;^s~M5|cUJ
z)4^xJhulCq&y_HY;mKhkgDCW<^AZOjb&I<C>_T!|Fs7}|2&RiGoG`LCB!Zigo1TQ*
zUI`!LVwP}N--!cI{&qhd@0tj+cMNAdp$zx#@vQoD@MDMuylfz<B|?lBj+S<HwfZ5i
zcyCyjgd3sP>>z}#D6(#JXFg-;4zu6?49u*e&rse#v`K5xt=j#uD89EBEiyJNC(A^^
z(es_aiys%S<1CO%wT^oWOwL?Wxzrz`!ESA^h5MJ(XrD}U$oUmg1E!w-a>&sC@>3US
zQiKlS`^3{b2lJ^JPJS@k7}?lW)-<wD^wL9xx8O!fK*&tPlv^jtNt*viut=m<i*vu5
zEKB{BbfiPG?F@Vohe(SZ6}NDiku?=I0+HQTtM`Nvg2%TBhnY?Ot6?Fu^9M$(q(k4#
z6f(C=g{~hpxj)!iJs+0BVwun)*iWvISfkL;So~vHfuX@V{9+hkXt;&+gJB#QW(8PC
zEc&<^DUP%8*8O3LYSPE!y@j11pm#js`oLs<D18pG`Mc)(H(I;}k4+XxQstz7z1^%G
zYRw=UpQqZyK`L({hrKppIeUtCeTi5D<noHC){6nv7dru9FB9~?fRHmLlhT&3+1F_)
zNajOq+VPW_s}}tj>>|hQg~a@wZgcvCYcC-9?U%b=&4~vsGUz3n7VmIiIe9J#$~x1b
z5RS;lA6HY|LRU(&N9+4TJpm85-d&kYmv%nMl}xJm1mm{F|LdXS`OKOMU7Gz#{CiJJ
zrBQK#<m%|ID57%!#~3t|;-t&Qb9J4&r(-*g?$`STbHsZEA3EcDdFnhmu<#w}BZZ7d
zezocMDy_x;3>Afz#podh%EVbn!Q%fuLi!pg6W0+N<XxOX>Ng4LE4+&!oA_GGoVr!~
zXR^ZH^O8eT=uk3CG0^rFz#E|FYiGHUGC?q%A3;*x-=|<Evdv-`HykYd)SyskK4O7n
zP<;Bn!j9mY+&Rn%+0ReaSR>Ep!#uq~o()s6pSSULD6kbbnXF`+{una18ze>n*0vMd
ze`DD9IvzB14Ekn9d(Sv!LCx+rG1{|Pkt?w&G`8jz>8gUqC_8qt1uM4CGtyyS<!B;5
zF7iz-t%Pig?{xU0fBKdAsgpAKyfc~gnC89F)nbKG^j3heCGv|(J6=0378>}*>EYm^
zzS8OO`qb%C?ddP&wI%#LXHdc}?@sQjCAiFmqT5?o8Tfpuuf!s=x!?|mejmQG!v$*j
zAG7<lAdb(pbfsCPm&+<W4M%;EI#4xs+A&Wg{XX7Bkaq3XPM#FJ$vr8UUZ#&Fg&wb$
z0rngrR^?wJ#4x~~E_}BO?^~u9X(J)kHbE3wkJ~u-Q8?V4ZIAAYVdnPS&OcRb`pqDN
zyiY}8ch&VMADz1nb{?C$_Wk)OpS_=Ml8^F)rib0h&b`aN$LSkAdL)O>UeaYgBKK>N
z+&uf{QS{*ZV*5s`5qU_3<gon#p3~&WLn=giP`=L~h%52q(G6Fsp_TrkYMQY#Gf{|T
z7AE5V`jU5JjJaeFUq<>gJK>sno2Gr5mtKW8L4R?^&M(E`y2F3hErE`5_-+H834^QL
z*6{)IOzh%U6-NDy=Wqci$>%`X6n<5}K-ru^XjUOKpOC&>wyTt_j?aOz8ww!T7eY4^
z($_%QRfV`kh0wKy(9}X`xbo?RxK%-j5$#{YRM<9y2!DY>O$xnTq4yFJP6_`zXY<+0
z=Rny9`BhVVe-d%41CXfyDS@O6WL*Ga)8$ZWl115{%cKwNd@KB=oN!VwXOckr5B^#6
zh%eE~-$^;jSSyM|?5>GI+)L3P;FkHvPBX?AfCO*Ui(-Bkna!SS;`J_%{#c$pVIIYV
z@7k+Hev?&5^=gZMA+2(F=VzxBF_Yx5uSdRXuMyWLy4kz-{kw_}o6}=m%9Wgh?Aftr
zbed?acWFp_LTOTx*;!ty=v{k}zxZ8yTkE(*I9v4feqL<A)N><94=u&{p5a^z&V7R7
z`rbB!F1-F*bVnK|JMzyU`)sq3*bgS08+4J+F01HZ{KAe6(M!|GjtwPsc3)scYjSrH
zR5l0VCdWfRqvl)|Y2%?Qd@eNPz0!hP`y@OleF~qVTfj7P*Yf^yt!S9845Ml&Z(gk^
zWN|t<HUGc!YDEx>Gq!LtaFkZ(N)tPPQ<mUYwZ1}m_>j?CeeC|abXjFb$iOPa2`_VX
zrY>^zq|S3?yBiU+HNts*Wi@~NXJGs`$n!SvL#8*(pGCv!=myAG8NnR65f5OglO@ij
z$4A#CLLUhX!M19D*QugS1`l!Eb>aV$9G}%%5VBW}b}$hR&4#e%yAjjqd1XeSal!4J
zTtlx#8j0}HCadE}ZidAfi4<of(tT2*@s(_i`GPTW2rb9Cj+uqF_h#SRF5CO?y=9rw
z1_s#0J<fvX4D;2SlS1qKGzC&u>sCOsbNR47G^{I8x@%&akJCcGqRv&Ee0ml76~7*8
zh`Sdy)Y7_N^+tm67?eWwX2d(!)y%tD)S7&x2+$Ie>9Owd<y%6(Qt9j6+sjLwAF8@^
zlgde5!L-?a3;Bal$ivHgV6RkMq)yc&p7LVsT29?z52nxq_vq|ZG$VT#%&iyEe!khJ
z+hpoj0j0x}NoCN{sC=;uoN1*X@=~n+XYT0?@dOLG+-{wRVLPwB#Jm3klF&v#)sZYS
z`OEBf7P6pxPi<}(%9O~dN5fz3_qhFv8LU`l2xFrnJ*Jfq*e?l#d4EMKxr4F;`Xtj$
zHSK}Jt=T^wg*phuyY#F%DBK@SFIQ<eo0aW7Na*<$IYiRI6%_jQ5G=SA+E{yLq*oTo
zedh_vO<my{YCafRBZ3Gykocpk35m^`?rMsKHLazl6YU4|fJn%W#xsANa^0r&n)NC(
zOe~R9r&ruMKUxt>#|IV~<LJ{G8eLeKxjHuf>I(1bm^-Gd=-eI4&7xg)MzVH7$4~1>
z>)c(YH{EM>!CY}27FRAAq~oXk_ECZ7BC(V^@7Yv4oxkobx@ceOhGeC8SYIVJVmH;Q
zdIz)VNuv9)!pc>Op8D$O+*1Nk+{)Ryjc4}!eQ=dRRNF;<g|Fo_S%~Ucbop7OWm*NW
zX)K1dhL)BIrzZc?mNJ|xZ>x-7Uz`E2AD52;YhBKN{_<j|7QfK}9T@=OsJ&(H@XgOw
zUH)50>!<pcz5*zEf;fw_J5jRyX+|KU);>Um@B2)feTngsm=LQS=7|?^$%%)ujl3
z8V5<&7xB(*;8r{q4xjGUtq`Zn{j02iB8njL&vJFKs$3B1m-%EJX9A~exVARZL11#N
zB2yRT<_{yYrqW;gyW@Fmjz+}gPNp@djEsxB!h_)w|JbdppTn8l%DxsBK2Wxv29l^$
zZdr@F`d^C}V^U0Mt9Yv~Wl|wKU3c(5M(j~L4@hpUv9eO{-=-olHBDWxaSR81sd2eQ
z*r28^c0RgY_aV}LlQMGiZC(a(CH}pNn_3)K>USv)8+Z6nQ|tSS=Y1dpUaPwR;Q)Xy
z;)Wjo=;UH{f)>vgEJa|GV7(4@n&ecg>s6Snyc1vs+toqaHjZPdJuUl`c(06PyPhF3
ztM?(`jcakrgvYxdGH<-sI*-?FD0`@m<U*C$`0l^5l4FEl-~tpZ(J}t8$yJ;(NfBj0
z2PA10SNma;zZ=x1y#%Z1KD_Z;*_Br3#!4}b#kTx9rm<MEW`1qL|I+cIuFJIGqoT5-
zb0Y!??l~&AHu>+hS`l(Z_L6wFR=xsm`L+1nio>5@Bi4;kihKt}npQ9oxU(4ZkgfYT
z`h@pH?y7K`r*W)9sj|S?RWO);(68cEec2E86Wp}1Qdu^P_4ZZ9a%G~?zOj4pMfY3L
zA`vE^R)kTdUjs(DDqu&%e$i#&1@KgS!#lVb%gx!>OGl0ywPy`*Bjx~czdvcz93XBy
zwSa<7!|}OIlY4Hvf7os%@JllCP2?un$$$AKvi7HGdS|fh(iQ#+hcv_I9J=1yJ?*t-
z<XY`gzUfl-bm}W&dZ{4gX_um>mAe?vJgvOKf0zaYTSDl9Oc?s#3HJ-kF$P4dES>!y
zV;(4mi0s=jBx#lZhT%-MN0!87>`8>M%sm1DL2l0tH80K0r2Os|+Q(<gr|qj9Bxz&3
z`-Ke`a67QvJ~y1{_rMQ4%cd+XP5ymE<o=fN^ZHO~Oy}#zQ<vth!jJcLvCL_BZ^@S<
zDf}m)+~x5HPZx0cW{e@rZ{K+gmkSomok5wo=$)tZ;CSaWe165|=F1llv*wjhJRa5w
z*z+EY$jK}6m$yZG>Ukn--ETC?23O?2tv33oe?uY``^_Pb?C=7hmjNm*)jNnq{#eYv
z2XGiQ6vOew8%FR)0}aXy_vqhbzIhWL;Mc#I(Y0->Ldz7oPob+6x?iEUVZyxaI|@x#
zXuCq^DfB}^owZ7d@ETRE61aLNW{I@}%Z<|WvlX46EvVL2drX{CoxJ5x*3aMKz8|@#
zOp=6?;2Sh2_w4vQS%(dnG41HjT_O9=|1~mx>~_iX!G7|qN;}bha=W$!#rsL4U;M%P
zakopuUyVCeC%FpWXrIHExp@0icWV^3MR}0aNOKLcqeb-8N7-6f+}kZKspui~auA&y
z2Gxr#23k1`dc3E8Tp0Zqq`A=73iG^0Z=dhI8*Oe;%})U{y5=8Q+#72Cngi`=9<@`}
z9@)_720-JL9Z)bvT%9x*39G2mn}bS0wj@OMszRkb&72e!Z^a80Oc}1g%?G3Rh@zuG
z(RkE}h1C7y>u;pPh)hoaKtxY-^i3-M1^_|JY@d3wY~r;~<(()VfC#tyxM3X8&)V*v
zZ`=LJw%uo1$=I<N%A6O<`@!_i+WT<V5=rB{AG12aM1m26#+wutNEV8OTZi(o4VUg|
z_-4uNUi-Jyl;nz@mEY`XcmSK9mu$t^!<!H`ZBxv@9DcW%)id`rJX`7wZf^K@xvgl}
z7iN4`-u?a3FyoNRIKZIlx$RzCDjYBFJYaiT+RdI;ih6E$cXF?MlH0zz{UcIEuygIF
z4Y~MJ$2*Ug++}ZAMjkC9Pxf)QrybrD*A*wz(qL13yd;gICK_KSXYY_^6xa?;LIX&q
z%XVnmJ|tk5C4DWmqc^A(k8pR}|IC%OcdG6N42BLA?2beX&Vdgs%YWNA*!H8gY<B)R
zy5{BVISyC$qd4jh{ayD9k<#H=O$oeTS-CVn>$_IMU6hdh56Lx#3*ISvK`f}yikXcg
z&M2Or8@LV!zqMS~9%IpI81#;9*3%(Xw|h&Dlh~s}q0ieeP4+B5*qJX$pF&+D+(YIj
zjgGOM>#O$rny?Go_TnIzT?1zHtD{`JTjyB?2hqPB-83~C;{!Q}HjWl~tf(vLD{IKB
z9lPo_FIQW3{;uR9wI)C7Z2xY^K!flp$~}M)?Rku*mbRl#smvs%9petE?Xia1j>}V{
zvd$8o+E#>katU8DcmdB#g+_4~2v5i`{2b~D5j}{THKTbkp3hL3!;|B1@LXP?`?&$0
zyb2ecHV90BC%zFJo}W0Psp7897=NgO^=MsWPhXy&y_MPPKl=-tmzjzE#ADZc8ctWs
zC;<O75Uk0cZk?OZKyci&9(<te=D-E^U#uGs+wYM=>9L-bEY0hzY(!Jl8DxI~oD5IO
zvw`)RMf_LgHTxHjEX?w5EGo=a^{@Rm3w!B#lT1R)EbnDSh1t5X$s$5L*Ayii{JX<s
zwa$NW9|w@~H0F2`8w}h3Y&syjF~^p7T*a{XzC;330COzUo`|L|-qXDvjs>*`5jA_h
ztdE}Vc78b{H#9|j<Q&GU8A93{(O+!^U<40DP))QpQ3IvO)7JP{=#ws#Rh>+2Cm6h|
z_qPZvKPlIV1tD;X+&)k?m0(nXi!5%SY<iG3P&R|mhYWs}0U7)pf+d2VYj6W)^X;!r
zKk5jj41SRT8T?fQ^LgN}Hn@SZYwfS#lXtjRaJR*X@+MaBOS9RCo{u5;w#Wy=&nkV!
z_#7y!;8%#d;RNVlnLx?uzq^D<v&Vmz{_OUz=MO`c^TTmk(oBSdT^wp+GtdE!OjXq<
znQaPas7z=PgaWbO=1-tIeHhxy!dQUV@}kG(l6#U59Lg?-C3~-Pt0mrb3Y;wd@R*`|
zFzJcCx)TxaIs!2FH{2z%0~Yl%QH-5ErFOk0-t{cs?&eNMAHih$KMYLw1Q{xA99w_?
zS)01vE~f1qT`(tJH&d7SEqM;K#Sc)S>O!j4r+zgw8aC7+4?ti-pDU;CJSs+<YYtXy
zlsRvHR(IXcaqs5OJZ|-Hfcg^2x;OPe2MJnYFAJ({=6wySly42IQ5O!ITO*GbRr#>?
zu)`J3?4M_S-o8@%-oc&wWBCU(CV9W!HH+%rsw%jtgZ5T-1Fdz%<rylmOoxVVv_Jbx
zN+(JlX?Q?nuPc20S5<<0sJb|Bh)ZX!hFzUxo1wP4)_%d11SHz7PBteE=x(@A^zk7Y
zxT{YYK=vWw>Qz<ygGTBh8dg|?o+uho#D`h1sCep_*DHK)_fpjyBo5y0U0*$Jpd*}R
zZopqw%AgG^D)D+X_SLdc_aEIpH~wIw6Y9rMed(U^^4p*Kkdxtgj?<>XS?~chFWS>6
z8Q$W?SX?rQmaJ>h2dNo^w>09~cnA+R#?(h^n|b44<q+$L<#^a~SmBcTE$-_Um)z1g
zj#6%qf3I;oDr;3$66V?rL}sEUSm&-10HShOug~JS7VHZ?P!Q3r@Fj%`ZAW5pHLgO}
z8k5{D`aFwHn4{()^muR98fHw`e&Z9!+b7sbSdmWxP=t8>2*lZ5INl%bX>NaN6!N{U
zeC>`4U9sNcl3VJf;D=iE_yc#;(o_x*YY7oM!4AX_d)t43Sn+<_=oEIvU!&pZ7)B{;
zaiC<w;J-t-2gz|lx)kl<U4M?KyyFCwf6!G9Tu*b!8@D~y+N<8Ix)bh&sxm8O67s%W
zw0=t|e#wsFR}Ep1!z3nZv)_C)<ZhLi>%iCG+L0WOiw(9;F@Vbo0C5LEdL-v;_hE9=
zG~GkK%IrDuS?a1{sO$yQ!B~;Fto;?02K%e60*i!9x=blThhoh)$UxbCWDV7ynJ7lo
z{q%+_5mTQUtg%%*b%FO3mM8d>0jlSQs5e;wZ(q%$?bYzC8sk0bUmHWJv7**rj~S1u
zPmN*QHYQhwul#TFxIyLZUPI9auKj@)|L(m;CvD)0H^JN~i!o&X1>V){=h@}vuIc3t
zOr!R6TUJ(XUisYUO<ntoE&iopVMA{ytekzI6?WJ*w{D{sj9*)S@y6Poz;%pKfIAu&
zAZrEfKNDenyBI8MN<U9zqzBu_a09NUB7LytIlV{2`o@vpUQsz*^Pz2bzI{&5@}bWB
z@pNJfjbR=>T#vW@zjBAozB8qcdEn)pX?mPgpz^)mGe>wi8_Gtvi-l8sOEbGHF>L=n
z*29oxo9qzi{cz=Hi0@F2nrGV2s+lc>Q>S`Q8Rp<!U-Ni-tY${~P|Y)GG-GVdM<BfO
zx3NrYp0UdR<V@GjY=6s0Dfm@;3CTpGI`UKYzco+gai=#ygQ(^w?dR9j8WN{_OAZXv
zZ{fV<2ihxY=A>War7v^@EWl(fjP+~}1@;c_lRJtNp=z*CW{i*6C-;v6vy-uKpKJ$X
z#rxzrnj_<*vn7{hC#eN;?Q$xCo|Olo4Z5lpf4}LO5+toTkUiq&7JK5U!+YY$&qnsR
zsLCkMUI=jb{!@Cr!Ozm3kyj`xwADp4Vd<Zbt^#q&du8(y1`vC&hQc1~4%-dc-j@yi
z|9tPeVwr6u!?W3V_g1>BaE^NZD71x^Vf1xc>^6l=)&L<SFLs&uk<xK;>KvL;?j7B{
zL`|@5`X2Txc8E*H+y%BXKH9Oft_b2jAWGB0#`jg*__Fs1Hoh(9TQYku_*rkU=hfDx
zfNSk2Tn(EMd)`%}APj{;?Rg!U{~hk(8WrwzgZ3KwV*=!Cx2ro<#k<`W|3%{#MSETG
ziu~*tbIa{^ldw7ecaIwr>(g*T=YFnjc5ze3Lu?I$GhXg^B4!0+dGv(a=7y_UY~~A&
zZSHQL<n8&sCa?7ECAcey_FSJB*SV8v``Y?HcJ4y@V#lj`m-%nu8hhb0KU*S>f2zeH
zdj(Lz62JMc0%fylE8N#ub9A_!oHtohG~V;~ka}kR;o*AkEEIqUIMn2KVZ&O8%HK8U
zud#^XdH_4#<gXk7_BOwJ6jc5}<6g%Qc7=`ms<ss{**OsF+#{oUL+KNDAs-iN<kWF)
zanXEVG^%K#eueR@HB#j9{~0IjA&ZpW^n`on4hGGCbI-g1gqr+Qf1*0vp1G4T^Iz_n
zH&a8fXZ|_(jrLt_Yfc0H;_wBQunn2F^YEgj(IgJi<-IJDI>Y-(=o754rz>N#md@<}
zBQ}adGFF7~n>(??ix%MjV6rk+dq3%|=gJ|kSB`fsNXk3rk0+n5r9Da>2IUs5u1Cna
zCw8i226hqAV>qP8sotyvN=)t3z8m`m7nkL#=$?btc=k^3+hVyk$4(vL0n2;*$TK(!
z7EeIn^UuT}&uggI6XC&7d~ud*FI!QkIbYfO`G04f;NGBpqobGG{ND|P#BK3!A#d)2
z?tc6mr-$6x;t}>K(*|{J`^oER`7jC%i1wrACVJ|QE6$I1chXLD(aCf>#c+bVy9DDE
z9?{0fJC)gVq%#LwzY03d{%0Km(cK;M&P$ip^G;)aOKGm0H%Yg|&N08K=cNy+b&IRe
zIseJ+Ne?x1?{u)K_1hG&!hhO|m;n&jHu?VmkQ!h6M47~}G2TJ5!612s|GMd#9pX;5
zmnLU<#mpCGKBf+ww&M|s%*>W=eA00i7yn-Dp7_7UJ{jG;a6#wM$#<0)VER9P(4Ek`
z4o80L?VGmuDL=Yv=N~vA-nqYQ+TLlqJy*l<Sz5Y+>j24K@3qX^z(W?uul!M1B4YU#
zNa{X7uv-exG)(nBG9Pn{Zm@h0yji~Btio!^xLWkO{A$Yx`ygS8e`lC5-T!1Eq1k^I
z(Zy$PCgarB!Lc%9w%MPxF)*3|ZHn4*L0DLokJlH_Q!UN@Nfs?F%`>W%BjO<(DG+S&
zUn39-Jgy&{&cAQfozC?5pe75asPQg2<{(c~XPMGs{$8?jzr!Ha&2u8i1-18eAx86#
z>*^QARBRI<XBmo8G5EOrdnZG<OytOAX4f&rXv(hxeF=Nu%!UdC-MQdHeOS)^EJsbH
z?%)^Ozr~pP>7EA{gZyiR1crZ$F&t;^CG86MW6D<P|AVsa>{}$FHC1{iGr_&36$1-&
zd=T-jqKJf<Vc(N|H^l12Q4HuRO$sOz=@`dYW4%-5?D1a9P3`r5HI12wJG8?!0~;o7
z3gKAT<s$kf1MHdfc9G+eA*-2J+q_>)dli6bdwHJW!@F%xz(%TSUSo@*x$t4KaVmMY
z`tnyJb^tez&)2+m*OrdE^W)N8!20*HKSP6|CY3hv;_qtP(<MyDgnsLqn%C|e$5w1y
z>ecxZQh%EH^p^5mY~hyJWj24$Odr}4y9}BR_T4}MGRLc{#1Hd9@9-OWNIQ@B4v83S
zmg!|vyZr%06ZW>px5P7(<<_y|=mqia1@vhA;l)v};o#v#_0fv-MO#{;9mg)g0nM?C
z({o8Gi9Z;tKm15VI-!`UhaXAu4DrU2NP2S5+Nk%7#=sdAJ~<)0IwxCAMZH$K<m`@P
zcc(AxSzEGYaY=5RcX$iWLFF5_lv|tH(+Br7<|Fc`w5u_<14l%v3_0?^;YVWW){bMh
zrry(W?9$XN9mlRr-Pm!gE_J;yd1uG5DXFVFj-8)s=s30^Ro8Ls+|;;^V;2bNDd{^L
z(pB|`_r%gusCNFXsmb#%O`S3S%GAX9b*YmN@4<$4{*+Y3{PR<>`5V%8YRL2SpV|_C
zuxf!azP6>De19ZgmVEy~zF#Zfi{#r!zGvreNbSvPnvxG?rnl?xqULBU{q~Ndx27)Z
zIC^R7l8&QSrlxir#Rovg(JAS*qOwRFOP{)Bag?$vDZ7HQWAp3MH$pq876FrvjZqY#
z&q@FnPDLoa#ZWqzY?H}$1}IGwN(oS^1f`1k8#opspImQYtw<=hlYV#$WI1|X`ZCI<
z7M+Vzzl}NT2HgDvIp@*zE0*nDd}NpNqq-lAHH+TlpOU_U%;m)>&IHIB6|1j^cb(6d
z_Y3c^t6bL!H85feE7E_=j^T@OlX@3L5DZ(Hx+J7YGF27kO;ra23SUSzN-E~hi+BH+
zTx4ciYp}$-<b1%@l|GiepAXtOFMVnNA{>a<@g2UB2E`RRj$WZ*8@(d+k&dJDEjT~*
zp^l?(wcuMBW=Aiu;0380LV()Tk}z9sYGKFGS_7y}(Z}Zo!RaCF6{&MOj$UZ77p6|@
zIJ(|~>r>-9j^2_UOU1XOOX+|{l(r?Q8^qxf{&%s8(?vC25k2JCBjOBf)@u@f>}kn+
zJX^^f+yHE$yL^KzFzxl`mi(PDKhkgPh%$H|X-}*);vLaU@2+OUP^1}k>*suy=mGaC
zICce+q^_kedbu<fOD{kT$d#IN?M93}?fK&$iEDy}7THgL0o)ljueWzs_@Ch$whf=;
zO@Ml1$TI$R_Gc<E-Yx&L6sncy1(AOayhfcyEmQE*P6$SZhj~i>GzEl@?AiM!<m*{o
z!Z!RJl|AkIy!I!!=QAaZkN<@o^Dmo{IvRZr_Pn&U?m0w^h9|f$y~CEnO#2hV?AQCr
zk*B>QL*HkD=3o8Rk*9hVjY9^m$A(SrdXrSHtlW=#*ht7X&jm;9!<zhgLEbHjGY>L%
z$5_!$8!r9GQ<?T>d)CMEUi-7oDZqEx3PYPr!?Re_y@+j_*RU6F=X$*dX9}rHbcfYh
zTWP8JxT|&KTSPsnlk(=9;aMz}GYxx3_$vy|^39m2H#45=cx<pdBs^z8-~CwnB<J;u
zqZadX%8Q9TO=|41=v`0pxRkf6WA2pn866+RLCUEE<z@8!cKu{ul+Hjpx6*XIx1tiz
zjyY4zS4-<vP#AB|{#6h|Yu-Tlsmi9G>{rRQ5O``;oPM&O(z2T`PwQO89k~2XWW@Iv
zr!DEJx%XH-W$86r&RjTBg^9Kd>Xgs9xrDbq2Fm4tdb@tIS5Rax-L0eBo(0D_!+GcL
zU6Cx(IslQQpVn(Z6o0*oYT**@&4hvSsLIe!_833Co%xD*ca9L37(4qPNl%D>k5?cG
z#0Zqox>E+q^+@w}{bY3`$~$bJyF$=i1yJZWPN4e9isOn`s@SJO*r$qNb)$N_ezL2J
zU|$GfUnqu^<FM`e$?DPVu-x4t?CxS%S{vD}pR8PUgs_FC74S`+VaWYIyuAy2l-0HO
z|4c|AU~r-a#R_%2pispE-atVE7^GG-5DA`Il#m1_7?POGaItbTi8zjFIj5!8_Snjy
z_qVn7X028YXo*_e;-xlRRI0Rn;$TaaA|f^K_qX=*OcI2)@Bjb)|M_J0v#)Efz4qE`
z@4fczwGRWK%u!`1qf47dgED7f^vUm7MU`O^H_R_fpPsnUj{bucS4L)40CRho{q}4b
zh*zk1GBR_5c>fc|`=8$Nv}X9QjLgS_cr9VPmfrDn=l{bpGTbf5yd%{=92|kK=^I&J
zLTqqag-hbO{{8?g6=y$QhCS%c_1%Xx+3nFyu3$JDZP^TUR$q=3`?)NuB*lJ!Ej?Jn
zd77X03eAb%Ek=y^k6r?i)cr6vo5Pkp#!F`=^Vb!xo>++dO8us_ePt2SRC`I8$+Ulf
zoB2TU9e!scMIM>|+y2^$oXmUVI{=(Dy>w2z-9fGZaz^Ka?6ggPCS~Wb*Y`#qd`S#f
zJK><aJrTs_YUGhF#@cBzWw(u$U)C*X9N=^M(K%4!L(TB6t8=<nzxV0HvGk3Jfm?D5
zKfdLPoQOw?Ub^PTh1Q0N4E=d@kZE&o$@mHGkQRPV?dvVxG=hG*)ZhFXjhFMK46qNB
zm-(xHZqk?TI-xGF%wOQpCR7UPGQW<xz!Bd=er0})=<1Z%HCzhSz2r3z@v6R~?tX(4
z%w1AuHote-N>*I=#s5Nbe;lwn@)U|p0YBkT7T>3!lPnuNK;dhkD9Z7Q4%8iO%eK6=
zeuxVZ(jLX_IvpIvD^6$b{hk`n@t+y5Rqn%i&E|b<EU-5$sf$7B>vOH~a5m!d5y`W~
zN6FKgZD!~t#EpwMO1;LZZPj<K2Gh*5;5Em;XD^-lu-07^9P~2PM&m<c+wEYqonecv
zch5hR8V5u}D9Q0$jPBk5NN|rrauga!FEQ-WrUI_bVi}kxk&9A8?S9$WMeaPV(+%<B
zD%#>N_u-l5Jys^WmoAuMbPNDVIxN=u^{0`=Ni;y_YZFeo?ab!Qyj8$5@Bz*0bGV$R
zuzRfk*H<+1DNM13Sx7lx-h74)dKLSWvD*3eQC#_)B`ZTXBUW3jg+~z5d5;6xOP>T7
zy1!xTx(6sb4FE00Y2@?p2x^4d%X|0?EOtz}^CzxK>0zu$FOtPlZ2O}v*HD?bYQpTX
z&oxjdgqgn-W}aYTh^k-p9r3qaWGqB<+TYO<xZM6gq=D&Ey55ksoVi-I{Wb47*KL47
z2cZ4`>@YYhy7mNyL)~Y#j@i~fe{6SVcJoT3i*B6gkG)^wbmP1Nb|J*J4akqLcKCe4
z@Yz?^^*5#w;JHC!iE9UV-N;WtZE-Z@b2sT<6mpz|&R3Bnr|aI&f<as!@Gjd;f%0RT
zh;&Hg%3ZI$a5#}0DYyzPF`n(daLzOh8_!I944fX8OaRI;$-IX*i1P7vhuQ-d3L}7)
zgBmi5%_};F1!ibIrQ4=K(>6lfK<RUUIm1vorU#`MC^@-O?k_zX^qA9gRk3TTXKEaq
zpFBdPW$QrO9cZ#y!g-yl$S!RhPM^Z<#Nu7@jj`!^ML|CDXhp#Y!(lK7D&6J9M!ha+
z_q9LM@m>0p1<mi}^9)+Rt66r5wu}|%l09fI7=&>rB+_F~W~R#UUL<klgy*$6(ML^6
zb)jd_Q266N3Tx`*%tx(13Iew52swDbSZ+$$qqB~C3}BjVetQ@`FE3zxvk-1h&vcEZ
z2a(oNNmU|%<>7%z^&B}|m`7>dv<lncXp4=|R}`ETZQ0=Ha%{9!m&3Vt(KHEoXN1*(
z)j;ZP7=;&QU{&kWa@c!AW8;qPNaAfuZ8$S#y}<bVz2*aFEFA@pKL?M4S3lmZ$($&<
zEHCIU`ygk}!ybKzcZCYhL?WyxC`j<!Q^DC*K~bxqkyb&4A(NoP%+SUTbnORI!4RIG
z4DoE6y(f631V-S{(A@>}Vd_T;3QOG!SF_^7ev_BK;c7LVt?H)67=#r76`N7xTIFe8
zv6mB1k_D^9LZ1KYabj@SdrS(Hb?vryrWd=l8@u@%h?|-1a4Yk#MaPPm59D@ciuw0u
z(qc>H-Y4np??E|woifXrLT-N(g+8^6Ht=cd-uvvg-q(G;zw0d(f{lxpo+)f&;J?V@
ztm5Aw7;iAKLC^a4HG4h{*Gep*+Hd`dmeV@a5q%9`RVN~PyoN)clbho|(biUR`IWhM
zl}6g8?3@^h-jToqjZCyf55IM^?gWPZI$C{f6Chw_2<7A~M}F$3@<L1fQ$<Rzmn*gP
z97}?-eC4J6)+^v}t-j=*w1+?J3<eYQQV%*9E)xW8cc3`b*3E+StXw{Mx|wxIx^$TC
zJF24}X})zBljSPe9#cNUqAhc>4qhL)D(e^?ZJCsH<V9P?WE~%Mnhyt{f3)SqY{;q6
z7EL8w$be{z)N#%ci?;kV>p*q#de#BaewTF&3~r7v+)j_SX!+Lx7!+-JAnQ0IXrdPF
zm}rX~dNaqF(U!H@Xa$LtF7b#&(pd&4YMte*M5VJFoA{KooSm5IEK#0bGFT%Mmpe-#
zR{)#OsKjVzIgZJq`FxBGb!Iu9=3$l-5(Ay3C|Qvn@@XlhUr0=JUSrrEZjsKR`!LIi
ziPM~A2o3#K&W{HfoD@PipPA)jVv-LyW5rl^X>NSpcI%F>`nYW}ynC2y_Xci!bnOke
z({09qXSR8N(!Cq@uG#Uhu2`8fR!ERl^s2T?`hExOALk+GHlQ_98~-JKVzw(@4n^~5
zwtq76mD+>tpV)r>yta#8fK8evF1QFnt)~!-X9E~s7RG4~1`Q;Dv6UzehTyVSMCo1(
z(mnmVQ2Gy%_b$8{f|Lu*2gnlLw-7oKFe&UDLJFn*r`M}Z&+@<XCpPh2e+uLoEW}f7
zTk+Pt5m1AUWFuob8ujY&=SExakzJJfFx50-je9#d@%~HN+`9BlxfbzQ0pZwz09=w7
ztVqR*r0Wn4r}=6EC`@WJh50n$;3#sB?Fz)z-KWycw6=qt6I$`FlOVN8YKb3aH$;9U
zeW578RVUFl?GLq4V%M|SjE>(SN!no0o%*+ClbsSK%Zaw#r(`0My>w-LZ~OtJTd%yO
zZJUx!cS4vhcSVgmz&zjb`HAAUS$xpz*{_+6pTA<l<KmIbIE(*CAG}_FF{tHe>r}38
z3G*1VBJXjnlUn5oHg{ff7)(y9w3*!(iV4f&dx6$=9}At`Wq$wf3Dy`Q@n7b@!P$>e
ze>nT%BR^F|>lQdWQTizA;GVV+ZT*12u5aSGZiBcu)vDNSKi!L&Icc5ajkN@ayzv>?
z{|Rrzc2e!bjW@2%O|?B}dBaM5ImC20^AvTZwmP^r>e^+YnCE^44H72Sr;9(1qeK*~
z)UO?WB>vc}3j5C&!Y2EX^l;;k_XGa0Lpg`>N4DNRl}&a^m@MEAJ70P@e`NXU^lZ8l
z!gTP5yTGRxe`NXT?dL=Evhm>$ccD)&{>b9BIgB4|{p3lIJtz|V@o2~&hD)jc-0O}%
z)~oh7?Ir$58}VnxkAFpLy?^>nFa9X!Y_Is^AM6T<+^00w)Y!vUY>|I%k;O^n{=F9S
zMPiDF#%L(8R5OmOJdL)#41lirHrBs994G;YfzsDUiH!?gCk;z8V}8QsvlCnAG3N3T
z;~v#_of`@0iHm}dFwM)=9Db(1z)Dq^ws8b=$>xbez2r;1oa4R3RgVi^Px@iwxYR3`
z-Poqoed@O=HP#~kJAVjDN$dE&dG`i9#!Eix02ik$yXFHQjed4Ea-eGx1v8F6xu?uL
z({d%VqC6zzfk95*wNv7*Gj&EJq`@vngZoDs4M;pFaRvf&YU;i{5RB!IK4<9eyyBP-
zY`vY9mTFZD5N|U}sUO>KPG0qG{Edb{HrCNSGm<S(IHp4WREhjg`~}!j)rTItrJJ5g
zvr;7LWRJOvI;Kj8$ZayZbczohC+%vumMV#7D~^kJsix4L@WCf-W5d#}JByGNMvwfE
z9)!;Ee|j3p^=d%2hqb;U_9|o<j2v2*rOQ0Lz~j!d9bIf?<SV}h$=0VSfX!pmZL+2!
z!Qw9&NCX^9+0&0%$d&mUt^?E5l?B~-W-*NlW$gMar8*LRLynB!{lafCCrWzo+vV`{
z&ocZBAL+s+mtwD3-}P%3l(EyV4f+0Dun%xtq=Ia=M5$7(aEo+p>VjwbXT1hH{q6+y
zQ6Z1a6F|?u%>fK%>A~ZxF0YCpuRMPv$p!5(L7U@uz6!LpKnrB##r~|JRKb9-63W8r
zp+c_2p2wokoZKm?^~QZK_En<YdBq^x$rte3gYPJ-Lyo25Pa7t|{8aj?`;ZACk8;_8
zg?s+bMjXb9)1EVVC!8Jg_-6{|7mqibdHaAV<H@|5z=w8}lNjvegpG$v)nBG<HZZIE
zV*d$owKYtqeCkEjt*;2zm}|YQ?YA8hK8mWl&;=`K(C}HlfBvtio^X#rK6?z@6l7*@
zYI?ruz?dquUJQZ{)9Ssh(b%l5H7`T?cq$}GyXj4!i}{r(ljA>jrehV`x=@_&iZn<?
z(g~a7ac*i-oZnHbXNkScO+96!AQW#M`OtJq{ogZbJ4!kIojr4$Y+;Y3uvGY;BdJ?+
z^{(m^%OK3}5w&o;m?`fO`fV?@wd;oC`0UT}pSR2S@6Z`N1+b#pY<HvrbNttO1*WIx
zqfuZ?KZv=NCRkhtK}Aw9(aYxXwApaz8HkM8g?;jz=kmO>7ucRWQ!dY&U0`~Mk@Tv3
zI)y2cOEdkyu~)9^Jx<Ys#935`(?Yp<1&XL|ksd{qgEAt3qVY;!X*EEDh(6M4<k4Vx
ze}D?;|4xS=hEfu+SahBL=F=Z^Z`Axo6^LwV1T8n=VGE_2y<s#))w8Mj50TVWybg)v
zMAA;7mFi;xw`0l$atX-A{(li6MC$ONcmKqtM?<jKAvhicHwYsx0<;{8O|oZ-O+FlG
zv({58T&J)x5E-SosnSAQd@gj;EKhe5*)(gl1NsJ1(`0(IMaNOoCuu6J_1)%MHEVbt
z8+QgpABr@$zbLioWOTOCR(nR^5{N!NeXS|W&PMW>V)x}xx0);paix!4)paL;q$B8t
zr{3#tcT^m?VnHi&on%9=@`(05<pJHJ6y`)%7*|bPhd5zM!AfIv?{%x<{js31iTNsM
z;%pT%d0JS&--QKC9-I1ofPIl#7+8<B1m}>TUy>b!2jU+Cq=uv)xNUlLAjhUJ4-#3&
zOO=~b6O`|FGP)XOLn09yjkK$?FoHCNd0#bQ3ZP4R3NW=`W&h?|QSP6`n<y$y|K`u&
z(*Axjj~A<4p8ru-F1>Ll{r)$>_dLUQq-DTs2%%8r)YzG`+Db>x>TZbn-8SMb%naci
zh2tyWz`5=TgTU)tc~O?2SL%8MIe@P81-+eQj8p**UB57;?>-SkZv(JSK3ovn3baGO
zdqiWvbnbDfeyL%{b>t}|gc?YY6JX`^0Q!l1r;<`DQHz-;Y1X=%{xB>-cE0;_@<~6Y
zptkiE!M#^(J#wfF?7mRiz$2*wZOuu;nnu8=PFOiO1tdPC3f%lr;~CH?_s4AutH|az
zt5tG6MFjm!j9ouW?}wys7()#YYW@t@AHPF&7zehirXqf#7ql}u=9}8wuk4Cc*%iy9
z?`}^w6{oh|`|by$UQRV#k)C=5PahN$WW82b%Q4n|I$B?%z#?Aya--LTkY46G2Ujot
zOb-zAeVUoPO4!chfR{S}VroZVJ*09J0$=~~{}los2bh4sk1(tG5P>U@)Px&>pZ|S`
zs?$Tf0f8$twsh=793*ooTlP#c(<zA(9mU2?dVQ0>bekxYnobj;#@eM&bdqpNs&rUi
z$r&(uM{!IEJBp3fgC1$tuvF=o)b$rQ>h}lnbqEaFB9&^m6$`gt+PD&|3j9YllT$eG
z(B?){j-_Vic1$+(*xv{OAeA1h&3=^FKsVnylpBn+WWlp9lNpS=lBTC#5OzL6!^>Qe
zo?c*kkJAIuyMKgT9W<ABtn+^hkAcCPxEW)&d0+>-<<SQ@+J*zPW?o%zWg0i|$m8f=
z59#ToPPAE2Kejj7+7Q|wtqon}`o8g@5^r=e|KV0L)ObuwMx`$Nl-}X$wzJ{!`$fD?
z(_f>rR+n|tE{%&c^cSy~uHCxbrWa}7xwb}{YJJKDXA0N3`9t$2G!XK%Db;hT_xID6
zrylzSwvN_LOjYcMu%-TJ_<4h~<&3sGt9Yg-`w_OVGwTdHvuNvA<gH=GU>kM!OJBZD
z=b_aTJg34OLt!M-(L6?5zbXA%oAPhoG%$5-LAT*z$){R!r>DF)=sZsd^UE&qB)&jS
zL$wN(4f}nFi`ySlyqio<*V@Q_m6_;+405hq9jy-sWp{gtQcg_%bQivw-)qeSIc0Ly
zB*udDdeJOpnhf~7-08fu!nAU<#<CVwD_3a2K7CKvNRLmO<V`;&C6=}UbHSh~ELg{K
zUzdf2>kZVxbek|s<vYQhddyq~MC0;B3>BywS7BO18leg-El(T$O4I9A#j{-9&-80y
z8Kga}pgP@ZMQcy8pnE9&n4-;zuZBc)juA9(YIea4<#z67vOa>2M7eiuW}$`g#y*M4
zWU%kdz;!ni`PaGFnU7h2t@}=2V51i&57#Thv}3+VD#sy^VyRVvEWp6O3~;=_Y0&JJ
z2{aN)H}-{~h+zvE&%O}JWM-5uMtXfG@ff)UPDi%sMa~(Bv98~0smJNo`i_1FGTjIV
znqeCr)~5}d3~Lt?wV;>nnXh_(G@?C+I?BotG|zVCCcT^IsUjH7_NCt*p?Mw$PV22H
zZ_Z7vxArMjp=!nT;%&x>nQG!W3LXc~&2eR$usLxod&&o<<u`T0cFs6V@Di86QCi1#
zaa2{$vYoM)2l^jSaTVKb;Qen~4AsY?NICBsJGMxhkSX=gW2S1{6K!1z+jafOKME}$
z)8r<YNrbcv*2)8U*t1q{bApd#XDP)ZCU<6^$jst*e-(V%l9PA!JNgoobNNQl=HDEF
zpvXHX8r#tv89nDfSSRn4?tFhdeN3vOPiyZxDEhZXL}LIp$DaoZ62gp#Vj%sY4*Nkm
z2*>B;e$1V2MPRd0qxV#;hX|`7Lf0}DCsYxI{(n76n=tv*0mBOt$J^+sPed15nzn#a
ze>uY>*F3qu)Ws5RuGK`cf}zb?6HC2mW3HJ_cQnVJ1-ClMaHV4y@Uy)Ft)dwh;X29i
zX9f(JPpkv57-~6)VGTK~$iM#A2BlZqfBBJrzwJ*^IeXfE+60EkW;~)Yg!4w1V~3l~
zIY-(F#$|`K_s>g7a^&@{{s|cUK>Rx*_9}?&<`->kzQjn|_b_Lwy^j0^SZy(7xxE`h
zzwsaR8~MpA!#>C+K~uCd=K||iq_pqv`kY+?{s1c##>eSaLACkj3o7fAA;8|EsNBC1
z4zba3>UxG`g=830P3oVfFvlN92ao=fSf&1c+dQV44i~jv;;D>>rP;7oPTU$!JF6nJ
zs!?dh6w|cnGyU%plREEubWea^d>3mB#ES&+0!{kuLA=dDIcyH&Nf6GmISk#0tu9{h
zm~F-hmgRqeKsAj~+c&;Msl)wtZts*m19L3P>oyk8OS3&nSM#Z7jkewa^4g!shSbCe
zi;$z^JM0lz2H9^;mmapaBYFK3h@<YuW2DP)8|aGM)T^1C6sNE4xY^1vZABNm<?~^M
z&%X~5yDzve)~VM#*&LMX*Bc2nf_f_T8eJ7c`QU?OZt6fLFW61sHY>p&wjc6pHU@C{
zSgPcuj^L$Vd!y_WW_fM1cco@O4Zm4Y*cb2`qf}I1><i%B2uBbOj%G{zGR}=0cUN&_
z;)ukc+^rJ_M%QXEJ9bA0r{`VKQ?omH-=ieo&5;_0v9V-0yW5*rvL39xV(BGg@ERmH
z^QHYx3pcw{^V{7l@KS}BF$;uux=sW#=S`IV=xEEGfM0c@4vBDP<eX^BUff;vbfdsr
zeUL-DmDoX}KmMAlE-8+G0K9YwyA~f_=NkL$r)T+J`Wbsg&*y!GlC6~5MZG%Mi%!%w
zi^?l8okE&Bp$))qO-(O`TSG4E@ONkVO8rTnv*A(O_1)=fiYNT)wp{jn4Pk%K%0b+0
zIgMG}d#M-G)5fPKehKcK<39vDNi1+%;j#b&-8-}He(JROV0V)J`G>eK23LIEpBY2n
zWb*2Q_43Iid*%Df&;B3fds#ML+t;EqlJOWBK<?i%C)APL!me*X56)WzblImJYGms#
zcu4JC5n6~)9F}})Ukp~nk63CXz_lGE&ykQ<FdzYa!b<kqr)R&UV-qhijFfeXc8^M8
z9Sp*z<OW@Vt#o#mJeQs}Jw5xmON+jA+aq>4cDkff4d6$_2Q%i~CrCQX?wsX+&3R=m
zhnK0vl9zayWcEw!$Jcn3ygn6z&J4Gm#1`&&Hq3K&Cn?<PMsFb|fZ=+t^z5Cmw{<
zr95d=V$qiSWfQm9wz|{8yN8!FALySrBU7(6*GMv+9zdK_PG<VLV2*Vx;mMika3pY(
z)77$hXv-C<0!6zBuJTC7@@uv~5|p|=Hvj`82K4$7L0ISb-!V&!XxdfQiO3mb8+}^m
zAr#UjJHtz8-M%8p0UA0L!1WL`d!nBU7%JxvKPGQ>yv}$j&Fy^ojCDDBz$x;{yeyK>
znFOmUp2m7QHNy|~j~by`u19VI5{Z#2*{U5!?=W2#fgw!$KiCblRC^z|@^8l0nf^^L
zSToRDTw~jjURofehIrHFmtgBAfK;pLR{*#r({G*jKSx`>3Q%j^>;m69OPeEg`>Hsg
zJ^2bZVsOtxN6Bug1W~X{ANI7dN9YN&6=D0kq}sIH$M1moQyo8NRvcVfb}<KyECKT$
zPJM8jrH(B4KSUV`a%KLxXjv&A9k)6ti308#qHlcsbB9A3rNYcMb>Rt6lT!OP0fnuz
zycO1F!>L#odPMXb(2LrV(wUnORn@QC20|W-+B4IC+3c~d|0b%*Ws57)7E_2`y^pJa
zb5yb!+K-1O_oH$Idj)&VYX{&Rv__8lhR?l+XmpfxO4STDoW<z;p%`Jec!05ne72a+
zu5ch1>$*&`kSt*f>Nh#MwR_blSdG`dn<w7R8@5xsq)(O1Cl1`SGd*K>D)&FTJ|GkB
zy9Ui)VKW|)s)5?k7OA_uiRUKgHm`WjOU?meSvL@8bWWJD^S1N2j370m6N09G#lyjH
zFb|DaIXv;?0Q0U{{&fyZDyVO+>5^R?x$A(>iH3=vNsa{cu}R)2066IWr<XkO%I59}
z=fu@}^GG>w!>4lZ%FLd)BFQjjWx=({flpB3-5JhiPaK&XfIgrfa%tkI<Ul|T@1F78
zvKidBQp8qFMrOe-<0h%VIOi&GyVALIoSgvW#5@EUn4+@O{kGDHTcZ1&K)%c+qTJcH
z>du0!6Q&g;-|ox%dxEihdvaUm45RbTnd~M-FvfQQE3QL5{$Js7H4t9BYhGFCu~~FK
z-R?-^x!s&$eb5*jD$Mk&u#?_6GS)SY)RLk3so8s(ogI@N1jcTExfp`;Z$FTnV##>`
zR1MCNrJC|Prs+J0gaI00HkvOfN+tIi2GN!u5FnU)O<v}&oC_sVGxl+-BJ@t*cDrgL
zomjK;nq_uI!m_zW+4M6;G^wb5;syEX;IR%P2kYk6Ra~?DS>9y>QQg7n&^*@Aba@6x
zmuYG19E30}XdDBwVw;k^YG`}4@=->GhlIM41hR`zmzq5$CvVsL!#0@=>UtaHC3v!I
zFd%sbZ!iWk_iSzJ<sZ+I7Itk>T-yI^9~m34L#W$?NRX+-@7h2l)vFEx?`1bPZU1g)
z>&lWjAw6TS*l2I-GtriW{M8WqxmC(HG?R<A=$`kWL{BOC47p1S+NMY(FB#Z;uz$2w
z{eF7(Q)!dJfLxy2a~?$J@X{qurI+>c3s2+y^!ro-s&(W81E#&muX2C!T2aY-fE0lh
z%l(==9OY2i(`9#)%5`8WMvlDpm=~no%h`h0aDXun%rxZMhHc5(yG4-w+J?PKm}+>v
z1PPd%YzT+c+2dGlN~05D*V#6*<`qwQiEGm{o<cH4c-vQ*rkR}BG_bLE&edVg<T$PQ
zgMO<{MzcSJ3vCn6vO7JJcq*g)hqIreJs5FY6Es`~I6Urr2#)Le6IZKnZ_rC#qL#xG
zG?}v{NnT1t7)qul^9ToTTdF@yQB7o@JmkN_Hm}SC`hj48ak!3~B?^<r@e_Pbxx7Mb
z8!a({(GfG`>Psoz+`}Du-|ll~rtZ+2kxxT^CNVF~>@M-C)UPrFSuaZW!%^770B^wn
z34g+`5)&wDe)@c;Qvkb}zV-;EHsSrz)USXuREn9wl%F-H#4*j>0`hk(IjQqgPxrmA
z!QEx0K27Uf8y<trF9_Gdvi<lapzmZEk<^W!_H5XVzly&OAKGQFykTMUa&#io7`+{s
zur>NQEk`!5Eb@{AFD);Oe$IBf^M-u1b-M+e=_Tg$n>KR7<`t#zCE8?$3|^_IJ>h@B
zuiOKPKweppIzS{Y|CsRPijk_n&QS-_<!7dIZ%^gkOGa%|I8uKgjMw(5$b=_v>r}4D
z!D)pPN)D{-rz<>kE|RSz`xfQ;-}<gW4~7w(mx2d6a&ISdwO=kMV!*pMGfm?dcEf9i
zk{^_P#4};pU+)@%#97y!)FXerWcWEY>@k*UC!3ywO2L^foeh?}<?M0E0XE4i(~goo
z`lPm~+5b1To>L%55$9&cDg;F*?mjH{FV#?^#D_wuZ8V_UQtzf#>`h+`#y48(+|;{<
ze<`l~<hki`H=W%QYO9kcldCv0h&QrNDjhKBXS-o$miyYK=CUHAL7aNMT$51V!%}DB
zrIHk5mu!-Ko5Xv^>MojHHn>>lp(k9i%e`ez$F74({@LF#$&>2f9$D@f3e!bfq*c~@
zZ>PX@lyvHorjX01Oy-BXro#f95b3lQb-}$9_CiBD$BH`2ih4#^)SjbE++G1pB?@4s
zF1WWN_iKW#i_K@h1fV1`YelD*C`n&q3+E?<V0v`_vn;}yOrDabru)-6ovPr3P_FgF
z<l3*DI&C7-X8|>br00mzMcuhyqib(V&t<wJs!hC?R>5tN>bF?5%KJ7P%JYG?dWjg~
zT@W9+6fRj^RluT>5dn6cLCAQRI5l}9BuY&#?wEXqik4bF-EGyHe6`!E)iJqL{^=>h
zQj^D|t{Rq}d2VX<Za7HOq^}b~ox1Gr_?EI~KZ(Wf!6J24LEC>Y<Jg_P1*xHd%BM(^
zdY6LcCWpHtN@J2m=pM#!NSfgdf9Vx_5xl{iWwZeIJM3zb2jw|6w`WhCYBTvAC*T-4
zs*m5TKK>@r$NI`If>`s4J>Cj8m!z|v%K39p(ivD+hRxqRY8iC!U(cFyta*=@oIyX+
z%uPCj!#)}oPI4)@#!V{(<Vow}96AA#jHIOgBvO2c<o#QU7d+XyFFiyHiME(W<uotv
zwUEe@k6SGuJaLY$XU(2M=!{fI2AUY#o>k!XGO>**C%K@lgl?LvICVL*$27OhAG3lE
z#wvzls74V2Z0_eNIGrcoHxsY!hEg+g<0pY)^KXjFH%tew?ybQYmzlPGte1b=H+<I2
zvu{o|@3DJ%IBmF5={oX?F~txfP0XMF4OV-_pKg{B4v3t#G+6UQS_S7xx2}Xh?miY4
zT!PV-8(RRb%>N$HO8p<1syC(#JpVBqrkd&~9x7f}eNjH!-@txZ%CzWsAGIkbO~Z`~
zwx{(G?Mofo{&Q5-=ty#<I`TSfXO!36p8JXAdpd06qIug*Hdkmr`y}1N<8eNSH@aSr
zq=x7&o^;93jjBpcZEn;_CC(Ua)V_tDGdxbu*tHh?=x>V)bViq3%UO(ecQ8-^4Bn!j
z{SLWJPfZy{N5cpsU3@MPCG4*u;W`z!z(4-$P^iP{;s7+D<4S9N9akF7+m_Po4yFIY
zn%$1XWwwc7oKhD0of}En-&F$}Jb2)hgM+S5pDm!%ayzC46&JI8C_z0e<7TZxYFt94
zRd=a%Jr17hY=a5xbfK}6ohg_nYWK^WvM#`HnBz`bAG;7&D=^0&>l9ak(E8M{^wcqw
z*bu$Y&>8PP0H$W0=zspFYOkv5?xyMfdIB76!qsx#G$X9c-(m3z1E`RI{b(xPOuxbb
za~ozO>Ea^WFzXO3EzmT`)k8Hb65u_(fZ@?~>EdCOu3vX?DPk-DoP~OfK}7>z?vMEe
z{T|94kaQOT>3t?$1Z0T4{y#Q2?)ow$OYQeF;F)@ogKMq22q7JA=heXKiqBYgXQzkV
zo)bqfwPdy4e%6ctn%(<rMX}A(58H8Rk%@oa3->>VN2y=!GB-s2!|dE1rp5^09Y;md
zN$YqNG@N8@BY9R(aoYLWTeN7&z1+WxrN&@-fNP!`<b0b40Uv;N0SI@MN`b#<11v??
zB)I7*=cXd5Te4S0U4@u0>{_lws=Lqs$Pp0ha}T*3RFX3Po4`=a8$mVPqf@E_OEGtT
z>}2h6)L^aLzxl^Tq^>gos`-`G9mgGqd5PC7!pmA$U}{6$uk2S`7M@Wa88f29Vovi&
zfJM3gQGlg7`<x5b8S9YY&w-saBlo&Y-8zpc9dNrZR8jp|hDeOP68`69btlP_Z;ySU
zEqA?yNvdOtj$c2lJyl5I$Ms!D=TUS%TK3%Yfi%k>>`Ie5&^+;cFZnuO+m-Jnrm7#^
zlK!e>7yIb%&{uiGKFjY98cmUZBLsDgrp%vj-i3g$jrd-&od(o=kj?Y8>LwjGB&LgI
z#*95|CZG>43xF2-CmSGFF@qh@Aa(MWnS9dw8<lNX-jI5|?tIf^Tzh=4{Ti&Hswne!
z$~rCAU0l#Vb)haW2qqs+uPM4K75OWwbg0+|%ifVf{VaU&IK<{Vjvrs_Zd{?;l~5!o
zUbK~NcZs4ia=6mwST2#9fPGpaS0eZdP|+v>WA0LantZe3Fc7Uh;|^t6;HQ-3<_)@S
zjd{SQ*gk54I5k8*Vd=AXRv;S|O)}u$Pa0E)MVTTn+AT*ZE(%H^=G?&@>HSnXOY{?Q
zWPjR%^Pfaf!V*?-*3JKdQd&7^&Q@@nU#^h%;ROkZR^WHs*SiF_9=QZT{iz=8?i}Iy
zStSf`zFl@G@1U0XgACJN_-*0l41b?u^}<gDb2YGCAs<Fj6h2!)SqlF%{GicBb<92Y
zn#XLQq=uR-h@VSCZJWEN%wMy_*tyKF3Ue*c>XKa&(UX>5epwTZGdXzmq}8$nM@6}T
z?j@YMxPOQ&sja2)VnBCa=;QK>P##c2L7K!!6;a6-ozQ*ZR=)9RJ#qae#f@c#({AE3
zB}azEXY~X>W5I<Rc9RTAJiPQ_#c7_j3-`cPc@LN4Dve){srMQkw(i;4n|gq>I3Qv0
zDG(!mKO!n#)e~o45QoJIE5xEf{#=UDk!J*eG+XkF0@=Gpq=&F8k2GeB1E|a&219QY
z1;n21!MJNRL5m{YFK5cuZOK!v9C{SZ0Ew*=n;4Z_!n1xm1Dl#cfq%|d0J@rV;jqz-
za*8ckAR(ZgwJ!)GfF8r0NlN1JQtc2~c%NGzAkOkX1warCVkBSnk8|BmP<b5?!riAD
z+^3N&cvL0teG20UH&}hpeBk&cCyEvuj25MU@qgw<H~}Lh84u=f6ax^A8&*aWB@_?6
z*KSaTfSna2+A@IQX!9f^NwoDKI{ws)Yu<ohds8p3VRr!U5bj9ML4@dv=^X?=(E|5F
zkGoE|b8EYwYx}P5${o)I;i;|7yP{_O$Ci>05Dj(@l!Qt#T4DbffK3%$xRH8u*E&FD
z-&%@kfKu2t_qpZ|a_Qp9eM`yS8@80ZH+M_PLGRAl&uJN(M}B{;FR$YKM&F@#mi+e4
z=kI(vMB))4c2_RJe@i`Wm|%VTuBnkQf`z?<M;N$|2L}2C{vD4naQ|IX`}GNY7mqOT
zfE8|U*F7K(EgZIg2iyI<vHgFEU69B5E|1_g@OZkA+(vQ<^eC6x(*bRs`8RSad8SW^
z-npyfnKPq74eGI>AjeHqfU6sp#@lfy&)wwt7J2@K5<V5=`OBa_wgmOjabz6+*i#>W
zx~t@ueQ@|Q9=&n!?<(2SCqfq<y(7GNS4l^o2pK$jN7!Sf*v;ZQ{p%MQ(Pqvz+7;V&
zf%5o9norx@t!4hJ4Qi(>{V3vMB8Hk!*H*G^{YKZs84RAvOUcrrtjLcfruT003*AOX
z|7-?mPNGq1w17kL-}6<+a6i()znUDk<Sms1*&uPWQBpUQ1*r4GEZr3xZBw`uCbIM*
zovazSda#;kBs0KSxIE{;!w*vu1?D~c18lsDp{DO|WXhbWTi0y@Z-b-~a(%3h)g;bo
zKG-jLmJ@pye9^i*g{N{18<uK=MeNKd#_3#`ppFFzIq)b^RmPNwzax|(F*CsbBM$!&
z!vBNJrK`>IkIXpQP4{3?fwhQU(sLM@AtkajA7r>qn3B6{Tc3WjFd^|fN^{lj!E&UB
z$lUNCQlR^Sb^c5111W3~ldSwPZdRcG2qAXIS4UovfbiFmH#BP-7TB_7%ADTZp1)Dv
z5Pj3Geh^ye{Ih_wQ8v)spx_AxWySO9!Ge|^qA-{%mHRC7^wbs4=5||z;C?Yd(_J|J
z7ZHq^Q=9$O8-D_NmWN)SF<du)fjneW9txh2r}B_TPifPGl~JmIDpy$Q=^i=-W2tnq
zKue2^f?r3C2PoHhGC_GEbO%@P_<y9Y%IM6=gv~2i=s19Wz0}`_XS#p$7GaUOG_@c7
zxP>+4&hptd-<|H){G^4Qiq2tLZojFyb`X}^)z}7SwP_JZe_%yoQTha$Qkm&1N31!x
ziftjQhELLGWja$teM*1LM#WW1YG7^Q;dB;F-*C}(>Kuy0t@|Q>j^Y_=2J)C*@%+yd
z7WROYi9Xy7F5RVEsqF@NvO!&S3AZ7Ld<UXGV98}lE)(;UnwRHBlE<YZ6L@a{-QoZg
zkn~$#^JY4HTGarD&vR~JGq|zZ<rC<t{Pk|ySGH)S{{U7$0!F5-apMU;8BPlqt?=6v
zLA!plW1#RJ>N0;DDoLxj#2}v)!|tx{3lCN4wP8pSEd)<mAqp~|40IJINNc;9blM+e
zdJ_vi7aZT+41i*r)2`ugb@vmq{1P#u-d@#P3EXMN^$u@pY_%a5x^!>lqGRfwJU0~J
zo-zxik#5TIe`Hz%X0{Kn5KixNtwvk(YOJOHqZSnNkD*Y9>!<)^l2`YI*;JoB8m)gN
z8LEPVe859>d|^zPUpNwT13Gu`*vRd@aGOiLjhLnqVY=ex+&@Ec*PF$kL=);L7c+X@
zlMR<%vdrHYhP$)2#l4Fx%4r_IDjP>`?t%{8i30z8YLs0j;|<?^*3QcP#xQ~gsU(;m
zx`TGcnO#U?#a=T><<Yf;(H4!7QhP&=?U|Rl+v(@{Mk{8fOwOXMZ#i0N=gGgM6>mX^
zP*6xWx$2hfGXJxv;(7>G=6^XPjP1KD_v^CZB2>A5YZ&ebwfe(^D)Y;;aU9{Mh3>>L
zzAkY{J(-zcJY*PL9fq>UHTsZ5bh$s?`K7iaqxv<!9hv1n028T-3mv6&5oEMwuqc&P
zoKXH=^WR>4<#uC7TmRx{_1?cjE8|MztAJeMt2zEnriTkf=N$j$kURmoF3*NLa(yxk
zcjRjSFuCUVXJ_L$a-9^q;j0}wF4mE`IN&RG*@47IvJspzYEbA#PYeZ_cUr0}v9y~a
z+EO559SGT~_dI)r8qys97^GUz25mj<9g>mn261Lv=~GbuV9t`^Yu?vgp@|`D-q%H-
ziNR~$*Cn6P)+aI7{qwdu$Nx5w#C`3FuMw4@5q%$e!x~0RT#9=Q$D@opo8O<5$afhf
zuQP^t&1n;12j@ODbZZ|o3^O34d!opt3pagt{f^pR2f(byQ+QaKbQVT|?RD+ao;>5r
za{mdZ3M9YjU>TJ4wC49GCW;>ZJC*24oh*9zZ5)}w55KDq=b7H)TN?K=eIzCok(mi?
z!1JasPp(O8en*`adiXE8gDaWQ>vS#X*meh;A?Ev+B~Q*APaVk5$ejlY4D}$R#}?4!
zG5#Y)vrM7kUFxq5NXXF1s%^?ssTWzRiQX}vyw)64)kRy%%`SLcab<R^!j{Xh_XwVB
zTMFflErW(~M@!|%=-2reZ~ikGJ;xW#`^udYok}klgOvHFhXfBA(tdPePA<8IloN&@
zRX{VA?*p^k|4ryd?)(>9E08;9^~jx<2$e*kR-VB+@X0d&6BbF==9oCXjjO%-NSF`H
z;{U5O$;p;kOwGFwS^U*$mHV%wUh7ShzhvVh2e^z5-plsW#4{MrX5+Yq@<`~0CM&f;
zqYq8m2@PoSQ><g5$%PgvOOqS_f2PS_(44t4yYd_iX%O(qZ?fTzPqv5QM-{kb{zKU~
zjwas>-Oywa%KE-E`5vJGO*UXX4Vs*0k+L-5j>Mz!33XsSi4MyPi1pc8Bd6`0%jaLV
z9ZRj|88#pFL%ey*p3dH6c_So4K$f3n!&&=)b)F2vlbk7KcVTY<1)Q!_*p7jHPd2V2
z&)U#UfAq<}8+kN0SktZB?GgoRx^)Y7;>^tSp0>4&BmvD9%ev{sH!>f!vhFkVukQ(;
z;leXz{;&24HdIYp>uX#4F7in7@s4d0Oh@eJL)rALK)|s0Z++KiU3t>OZJ78z#}As{
zADvwOullEXBy;`Kqs=7BCsE?0%-D6LqknqfZP0-Jg_%=by=6PFZ@*(5SX&SwW_>1Q
zIdD$m?&brd6Ki|KYL5&FdE*9@Zvk&4KLTGA<96`lKck+yHab2@Uub3d;A32p_rb@x
z|L%hkiIdiRplihw(KR1vts&Z)lTG`t#>{_IZ_mhxTfh=`H3M~-)y&E-_hqcRoF0=N
zTQZ2Zjk4jVntM?go^)s2h49;|jQxVCHaW*XJsSr(g*(uVYNh!k<SV6#w)}=PtBNR-
zyE|Bk&+0lvnbx@?Mq5g81jV#Hj9std;drXd@3=QW+wMA8WOvy5Z#!H|=VZ=u@#gqn
z%f<sW-pDh2o(<xa`MY#NQq9zkX&673`D?=>+dOHGzch45Th9aqwWnRZ+f&zgv8!7r
z{$x*F4bd&Ti+lWbJ3qY3{44NQ-VkVlteaDvsh7vT@b3Q9rkPzn5yP^+8<rv3`t=az
z8$Ev7q6`#+xfkyM<{xFv!tBykl>o<Yg=v%5TkiK{-Hd%4oNxEQxi1Tcy9YomQySuR
zQ#PIC#vK3J(2d+U!3di<&&4&|uIqvMiQX`0`J1`uT3C;9&1g&WfsaL7Mlo?{J^-i0
z%pyL)GD+;u*j83+0WA@%AC?vFO<*@DYUUu)w0|xM%Ka_s_`!jdv1rQ+w5p)3m-)Zo
zkYm^8pq=p`&Kds{RAJ^WmH8kqv#hm>`DX*Aa{t=i*-9`Nsq(%Qa`zzr8D&2;4Ee27
zl(}IP_fhSk`PpGC+cRZ}_n?-1my;2-N~o71z-P@tJ>ig?_fJu$+h`Xjhg5hDiD3{I
z0Li$j%)iofo*K}vVoLcLwS{@Y;U3~zxko1J|3xMn#@mEGn@zQ{u^wQQJ4d)i0H;Y@
znZD;Jx`0$?*Jz8=cDpB`av*0((VByL;DRpdV1Kbm>wB1fJ}dLaSa~j9|LEFZ;LmNu
z6W`MPprE_K)C~=}i&l2sOOW|7vI>0tH#5MOc2cS$?NYmqNN!h0BQ}etV=OtW(c<P>
zOU!lYA?FfZ%H!nKFq5G$NgM1FLmv4&MVusDlgB>tIqZ77;E^w3nH6ux>@})G!-A41
zZWzS6`jO<(m1N<dsg&&O<6IP*9}nT}b^RP8wco)$&O)@8m`m*MCxCt}yHhqOUBQNY
zs}9NsQ<bxKIeDV6b!9JzcY%%pUB_LU_U1u0$b)=cU$y);j1gtn&9XW_@~9L-Y-*)a
z^x_{VQoRc2nK9TYOzxliRLJD{mV9--^xJH^E%TRi=ANyD;G}bJdhr~|?XNEN=Mf;^
zqpOJg^+a)ZOT(LIfMS-I!L{~*o{fQ)-T<9ZxKWC&)DV#&HCR;^>VQK%D(`I0E=;c&
znl6cr-M`Uz04-pLyIthnjzS8^{bhgtE7z`)dQVIfMB0LLt~(1J8!jDIYOvH<sUf0l
zx@6eKT>BPn6lu~qn%$|Ovu1X`Xu7V<*}!nN81;5!efRE_M#JVw(gAy>@1E1EeQEUB
zq8lrm5=Dn=lDe<qpNtje_`hIs9u7VkKxxVzVGIpf)nplPMO(Dd1eD7CPorx!&PfdP
zWAJFEkv&NFa8%wxzx!WdXw2NVy4b4Iv$PehI63Cqk>t4yNJfHGd|uzm%3NUmRk?o(
z$+(QeD|R(sx@eVuJz4nw%kmL3@NPto_73rW;9>d>wyRk+mlUQ3U(H^+)Q~GMH%`as
z$ScJJE;SX;+G?@M#k&z%zh&6u>d3ndQw-gaw>lfzf=#ZDymeW>JF~XCvB}ku_XSLA
z6M4ni(Eko>8^-J$kUwiCca+DlaG_fF)=-~6wmsy>BJEV^PUiaup@yYM7sqTHSoei0
zn?HZH=*?RhmVLBEmy)2HA1-HlYW_xjn?EzgON>dEjX^d{9RonlKi=k;h>+x;GDYdK
z0)?ShCagIOD<F(L{E4CK(h@lREVMcZWp95M9%cS@frrB&*^)Vh{D;Jqf6hjIEZKQs
zEctlJSDPmptrM3aGi4*LJ{C78jB8PnuVzkWk;ui-$Kt&D8CQTw@&TSHoqNXJ>}XA|
zC}I~S0!r7LmB#OPoF-Nf{p_XkF+9C_Uh-p4JWg28Gpo^7^%dH2`2}UlCe$zS?fMp;
z8&utZJSNpp-1S8~)X%Pv*6s3@Q+3eucKpDPOF<sHRb#OY;w{dW4$(JQJ!s?zXQ2*C
zmK2O2<rC~G?9wgd>Pvye*@2P*?SQ)oKUa~cyoU+8hN7GUDVQ*|h-Jwec;73*n^noT
z6eb>3&ISHdm$NuHRT$(s#9WQJYEHZ<eWk-7GfjCKy2n}~?idoX4N6*e!QuE$9h#a_
z$f*)>v^|B)-GkPcK#3<=({l?VPd@+t2Gt1tN(F%9xrF;aT5hCJqXGI>xBX(HoS<Xx
z+(6R)Is$KNmM+nXf0k&?lOCfMR(lx@tlHdGn!7=*G?n}1ZfmZgKyduv&YG~}nul&b
z=C(Yzb>e8tXN+i!?RzsvS2e!Kp-Cnyk{=H`&_y}%!GB@j(L|1Rg7<`ye0QIC3{T!u
z&oWlp8ba#THGiTh?p^Z+#EPco9<aCg(yR1prk<6ZaAi^QZ`2*LC8XftAm$!mj{7lI
z^O`g4#*li`#wXE-`j<|d<NuF4`%YNXn_UkR$ovVjFi~h<Ive|rac_DjhXtXQ)&0sU
z(hJ*?g7i?AEIEMwx9!tIKL}C>PL9GHDC52G1H3rHYb_-_EqgDyN$Bv*ovlUj3i&K>
z%0Q|E*jLJahCwOjGWSfR(cXQ~D(D>lkMy15LXdwed`ZXElUoBruFzoNoLo3(*-|)X
zYA#Qp4OM^WJS*k7nWxrZrm|eVj-gBfz|W@BJXgzqt{VX76~nYFHn90U+R1T@jyp=|
zM(D5(;vP+9<0dyRwc^kkIzrlVR8%b<wKY|;w`(s}*2&zvcaBog7G>$k<gV<$YJ&uA
z+uYq5?$3q$qb+U3m{3}j+$+aw9O>erfU|gx7i_crkO|X^lKbF)w#E{^&yLTpOFgY8
zj*If2KWMFK%|S8x%HxPOI_<65EauO=Nm=n22J+f)7M`<i&rRp915oBNYuoU))p$lP
zbH}~E_T|;g$;MalV)^&t3JT(0R^Ou<MOg5L1a#_pN$o{c{FS2``I50H<gGy~4dsSN
z&Hluwrzt8x!n+stZ-RcGCss%%5I?(ZW;X;%M8VVD3p+&g>Y>HnE<HYZ6j}@sS^ojV
zEIs~Y^oX`-8ttkn+YU5dh_9xM_WT*~pxFSTb$zQBO70xFq<cwNCle2c<LZ#qAm(L`
zU6*xJJ@goQi+&GW<lc!rY8`$ei*rzi;}6THfE;vy+}*8O;={6s*YDoUNkRR#A6BP4
z{FK8pEj&8ogp0SgZ`~eVv6A57gCafa0d8aMFn@m&jg7tf$%0hJp`VLr?|dUYRi_D3
zQ;O0v3ZhR;&W}tT=DG?FK<en*)Izn)!pxv`=@o}kpD9dzrXZBa;B0xAOh$Hav>7?4
zSEV$h4n;0!D7xm-BG(zau)n_RT3l9d(y(w2m8ZwgOR^Dy0ewmS>hb3#{>~OcULAMi
zR30Kv57Fzl?p^WY)=ecSu`>HU`Cd8efw!ffXF-+G$4{`=&G%nX8i^%+g<nf}77*`?
zPj<ixEy2h7!aAiFtmt8|cqt8V$)C7anQUN2zddi=l`tg*nbqA?><?p!2BAm?I9cx<
zt~^l_FHH^N#i~8-BSyL~Z28Q&qOZsmgAAF0Oj0^>M7i|TqONn?yx+zJ$qnk(ukbH!
zr24jOxLdvBnBXi%+qC?R^6)QNLg2Kb)XJf5Tr8&Um{yF*XPEnF$DZW1b`o9^(-lQ_
zNTvMTj%g#s^c~a2C}P{RF{x=61Y4zp#~G)Mw~+Gjsq%^1=erm+@9jAx;(of<dJYeB
zP?$HAd8hqak!gUdtAi?gGi5LHAEXG5HiOAiAiI7DQuGH0;%STV*=&qxfK}J$h(Vnw
z&VN~)MSbE(V0PWy6X#xwGp%==b1kPUd*Xb};+)<m4xwJx8DX45i~7gEVX@|gvD{07
zpkaqqr}i)Pe@;+pTFjMbK*uykV2+3;P6-_#-42-E0y#~J1BKC+pON9JQC!;=ZTX(8
zx<h-_r6|yEyQoV;f0da#6IwopJ#z;4Clp6pniX+i^MP36HmxB}T8%q#i&IN1va#{*
z-nj)>WUe;)9a=On-fd;N`<AdCI8zgpXJDz{g|}o?u`86lq-P_I*x&jVA+_Q_vv!%P
z^GaQ)f%KY{G3zr%bzdm{wt0{?N^yDDw3uMFmvToNO=QD#f;l~Q#)l#*Y7wVt*x46E
z>Y0)?ucWmMwk8q-n7w@$N*YpygAe4<oO0$1Puu{)Ki8i9L*Mq^`DS7O+hDXV%jq+6
zS54cJte#cWc!kl0NhkV?GlHIMF#Uo0j}yXvY!H*RNh;#19BtO>y&i9G>!r16gy#v1
znaTUtPdECO$E(3(PMJR)$s3AI@>{d#Tu5R^7Y<p1CzPsBGn&jjW^oexbCKy(Y`mR)
zWKYQWP_$bW?IMc?EAETmDfe0C-q&{DAx1%E{+ww-NWo?P%_VRx`-={BkK+V?cOw^<
z6r`sVLis60d9`#4rSZ=T#2Z-C!>@;6sCF|Wm7pn?mvujczz-Gsr^J?Q(P?qsrlT+T
zjgZ--uzM{`r}3hol^&w;RcieKFtd>-afhcHi=TLjxYjLMrSVuD=jU53)?+g15Tr0m
zTf+2|ku;Y?bg3$dSB)9_aR1IRKc1QyNIn0!ER*x&8PrGG(swr$w>>89;T->??ye07
zWX-LPX~)kwyiDDVL*qMy`m2Z+N*-n!+q5gURDpX4%-lc;Ka@23_>){^DTEd8JuANf
zf%;rOZvhRl?uMc9W8Nl%6}>a)ZXBjWCn=!HC2}cXMn?*UO05TJbsIFFrRbk_)KvfM
z=rSvyEZg;toiL>+={Gy#>AoboARuQaI2qO!4|QLt8F7f$(0G;d)`*45q<GZX4Ip9{
zEA*{6JMa4jO$mAjNM1ii3M-Ab+t!<CSicuCnC#L1z;vserT&-21Qs-_?;9FCDqLC~
zPYQzthCz%`2zoW%NafI4dAx;?%n885g9D1Hi}LtAihgl`Fnou0WNOhQE%dKMb{#UU
zG10!Ow9@P0hx2Dj6>+JiiD{#)bEvTo5i!~-7D*46s>6t&5<a97wt8B*Xx&4R)PJdb
z>*Zkoq#BL|l%_fk=d7T7cQ6PN^Z%RWn`6;6@BKe1-)SyY@A3_o9wsPA;%cf%`?S{k
z;2o5qRd(*`qtba?LFG9@9ZicrDf(?<l#=G)2#YSscE>E|S(f|aFDQHi;f`~L&m&tR
zGWXL)(Wd<JY4P2PvXUr$#l~yBc+GYL_2RGbz4%Lerq=HU!Cw3&XQ_XQ;V%1;aF6d-
zzWpuV!|0#)&Jp-)D4zcB8S1D(9G(8>C~XgajaRA-E>&;(f2ffT63l4pN8mE+g93?%
zCql8|2tu(m6rG_^yuyuHTpQGp#%Rk&@Zt%_!qobGP(d||xVb_o9Scf9Yi%g732N#f
zw;1(ryQdq9ta;t|;lQY^k9t((s3+TUPYs&HRl`!-Cp^6}H}&kOgWPaeUNq|9gzYPH
zQrk_cSvKvtrER&F@J9PB8W?I9-@6@x%GLR;iohXZ`(C=TNS!76=V63KI(Sjp^wO=j
zKm?oXrk))2K6)KcSea*-9G1zYWKv+6^o1-=3c8136FOG#mYwqTl0R_F`Ja$QQA`N;
z5vflgQi&74S~Pl7&HEcqlk!7%tkBh$4NGn9p30kq5bbsqZ-mk8<xyMEN~nK*pKCmM
zT(o&Jy1{}wb5FF6KiEGWtZU9iJ9{A2X{R{YsBj<U#$(g_`O$}Va4Sa}?jTjK^O2}Q
z4@+0=(xo~#9mo%1%{0H5!QXVCF!a78$RaZo_@fVlzh;ltVi}LL@v5!e5RlIe0YqX?
z(<BB9eMk7WbZftC;e>Zrj7krd23+rUf8pbbpW15qH6J*2WlrSzD<`~r+aFUF1$4>+
zEq4JBxg!9A_j>ozF2=IGf$>?Yf`tIfoVIR*z~^c0d!uYXY2LMplWmG}1yMTk<V~>G
z`~B~^`IpWuh_?I~?^GwxR<g6Xr=DINwIx%cs-7<(-B#~~Pn=3zCr21#Mjy&Ov2<Fz
zS`l6)!c<Co?eaI2Xp#J$b&06mQJoZZ)ep&zXBR`5TskBA;JJcpyojT97p8}O;NIaP
zeKNV*Dm8%2QIlSa;X&PxLH#v5Kl(&tJ}+6cm2@`0Hz2xJuUmGX*%sT!xfuH2DFs|5
zI-I(Dx3e@}2a;`b*;o2QNDU@k+B!%dh33354Ekaa^p1$MpFszM!1!%p=&~SG+Dgh5
zePRkHRa~64#OeAW{^_d<Tc1&$2gv>1PIbmJi8C|)6~)k`#q?3Yb>2V5JM$U&@wP=l
z{JAhM@dHR^YAHv#LY@yp-k#_}W(jwN><U9VgAncCc6dn7*n`K+_?ya&&GWojQ8066
z{7{(ktCljB>I7tYX*>%3{DbNP*}%<1tUYTrI>tDopm~xe44fET&4n~4u8Te%Ne|hB
zGJ<P^Cg0g_D!$1KiihAW`k7_^jll1<e!*;9189iB+~d>O<l^QCOzH$b^@}dF3Y+UC
zZH*TdwZ_B#y-1UurLGV^<Vf=*gPa&68rU$Mv)S@ep*fp<CtFCd@@BhPSXQ$5$rsZX
zYW&Ue|23J@mG;K*92K87K1en*Og248wsO3e+>u^Fg5*1HJxExx#^aD>k?ErrlhcV-
znB=R0=mK_DKNQ}zxS|k+qwbjt)kBAC<iGotHJ%A2g-#=1Oa)~Jtgwkg-t>DyN&5G~
z3Dcy1-|tjps}E0Lq{$qEeu?WBg!xcrDBOHzBQ~8PJH?@o!e(b?j`&jxFVD_H?$K`d
zv16_G5N@XbphCEbj;nH}YDl9702q<H;u2%n4mt(YqpEH$H5;z4WygsKQQm(5^{PCQ
z1%byO%tMg6mkf)Ows29d3u4YJh3!6c+`Z<w!5P#Q=-i6>MO*G8g;Sj+3%OSDyyPIR
z&MD@hU;LXVX?E@<Z(D=7Wb&F|-kzv`w?o{QTqwu<EI(YoZUQ~?C-vHVQX-O-uP1L3
z8B)Wwij<x<k>cDq(G^dm5%ng7<S2w3oUB(i>1jh#_F|o5o9~2E-|X4|R}8+mDU-kE
zb*TV12)I<hk}A!c_ck9KxpY?dnd`spWE&5E2w7X-!Y<loE`hhOGko`Kj}mq+J@ky9
zv1{UQdkC=euu7nNEiN*><ol78lU*JE=|&329TZl$DMhLO;L^5yql~vfEi_NNJy4Bu
z?-8yIYM?2$0qEP2r$m7Etg*xA;d-ym5ItJODsb~8ncYq&-VcS}lZTow?N08yA#B5J
zR3Kd$Hw5x`!<r}0x-+6a$iJ5TXz96!o_SLKNB<KcB3es0%3ob_@%-w>(e+EJ8yD2p
zFZJph8{!ppqiZYXSJyUqiz_M{>qj?L*Dh$RUJ$q%DjF*mH-+FxU)@+!8LO<XYf4nq
zC7NOj8>=f4)s3+PaAISYO$+|Q1c!ZHMzM<8`nu{^eO;`!rmngvwzMV@uTLgoiN=Z=
zd=|#$U2?WpxxBKLoD8R!a2gF#)s5A4mDO2v4ukGFoMV+0wY3gvY-wXX@apQ%i`6fP
z1!cMErfX+kS33K;o2FemYsTd3Zn|mG2(IWH(R4{{M3cAlLoj=LB<m{X*H*_8^|AVf
z>be+6H-Pto8vN#sXgZs5-v|{cHlnuboDo&P8{{pW-wQx}L!yRa&l^3W^6Xe+^)1Po
zM#>N6DjF9;+PXxqxJR-k>l&*o>lfD5G*wq+bFXh)T#>N+W20lqrs~+}_=4Di`o>rV
z^lj<`va+JCu0G+A&th$Hs~a0hvADXasbb;L37pOUR`Rc^o}XN(#M$hXX-JbE?_LE-
z3i>6nx{9X7u^UDgLxQFTSgG1bI2SJnn@k8ZIjj@_m%Y}?Vj+WKz5Z@+ByBqHyz>-o
z^jrf~SFyO-qJfZQHoB2CLJ!VwQWezHEvO%4QAQ_vz)fyys$Q%buBnTaRn}ZrT^WyE
zH@R#E48ORcB2lBD#r0JV_UMH@39qcKt8Szr1Vj;Zk;UaC_N}f=Kr-ihp3AqoCwW6-
zbwgu4oZUpLs9hc#xwNq+0cQlngx{JHRXAevmy^SSieznKlmk-H1Ei|H?(9UY7pRdH
zVQ~aBNHC)(!NL&f85K8I8#`20!`4-_u^MGw7vvhysbr$!T&DDm)m3nAWg^y>ZPYLn
z$D!8LlhZ$m?+O-V(Tk$huBkaDv)U54(bGbPiv?7L%Pr1A2@Xf!0N5ucQe|<&x1y?w
zW`+Pr#KjuIGZ9xUSJo!09QRqEL%g)7pipyk5K91h3U|dslT4T0FlpkFirQrLWphRO
z(NvC!v<fG<9K6{<T<}jq-6O<Udd`CSdPgo-Zp2qbV;w~z*ZHb=!Y_@DUOHOws%n}f
zhMH7{#e<f{k%|gO?$yQSS6?#7t6#9dtFQ9}aKz}b7d4G&ij54|2AMQUUEz`c2K8x>
zO|d5Aa&48weWHRUK`U5XQCDSR+ey=EWPj7Suu65TfnGqu@4Taf_Xa_$n!_YllWHwS
zW3QkXBj<hWZ0ZvsMe#yTr$oWuplL*PVod`5NYKs=Mc|R}=$pK^0HY8lIv2zyiis|Z
zjb45P00I7e5*qqvBmKkHs`LnCE6&+RF3y<qCX7FC%-FD4+3z)yHKB;2)<z#y3c=Ae
z5-;>HHFW_UT;~FB&l|n;Y%eRTt*_|S@nm!Ruw`*Qbzoh&YP6;<+q*S2R9Dt4sHv`E
z(dNH$^9#TD|IKd~u*2Wc^2q(aocG=9d&;7`Z^Nx`=@)YI=kb$0#N}{%=$=QKtxD4i
z)_(`~p?n7q`iQ5x^%^}jW>|M|HMCxScnusjzUb2$-3X(u{wURApqi=|Y7{}Ahmg~V
zgrQFYX&sIk4$tp!cMVN1p?YqNRWGB;)n`>K(D<(8`s+$&U2}N+!`+r;O_SwX5j4+m
zXd|I}!<0{4S2p+XR6Xva=YQqZ*G`#ybx+JA+m4=o>a{awT>CHa51Ud`&8^k3EYCyn
zm`jgHs;p&1td@5q45*#|r%4T5Fg}wcs;jSK#9LcmS&^_YC-nh4*x03_DK>dZ*|k^C
zzOE#O9FTW_%+bq#Mah)eS7t>;(7D8r#guK%<XP8z;+iYzSJbE1EUE4*JF?!f8%8wE
z^-5;Ww)zE~%IYc@gfWSY>%I9ERk5b!bQQ}?CKB;*8fEF*n@<^MG%!+$C6?A79{+H6
znBMV`7%XY?h<`VImZ%>hpy=?gp@jJ#PX2!{wdehd`pJSB=Y=`-5WhE>uK!AI{!jSr
z`tRKQ@%QECpZV3?{4aeiH-Gy5x%sgTx%qp)nVWybw{r6v__g!f#c$%bbMyD`yZC##
z`GK79npEGga`iIWc%3)DCeh?AtgWA4QR}I%C!}J2Q+;hRQSDiu=LL-8X;6Jh%wy8T
zR0m7okFBAiuBMW2VtE51$PK>ZXB$Jrt7{vwUHRcvYwpA3U#|{GlEt&h6=pEG`Y?!p
zDqM+v`200SA6r$=P(xyJK}|vxaQ?WM(c#0;J<kToCR{6OnfO*Mk1<?sQYzthNjL&n
zT2ougNX-02f%CwN$>EXG$7#$+4OKv$8u!0|5kfl>a`@F%FGMyiVK7$TWWxiY&{$D%
zlg%f*vdNQevK@;j7gooZl&G_4@|G=Le6fs+WLzlY0vYGa7$;+_4EC5eUd-<zei!n)
zfZzFEQ{rNN7xBB0-v#{SH;&&}eq%gDQ&WT2RO2ZRWuY9Df#3_gpbPlICT~HL$9#}q
z4L`5CY8gMQm3-&xM^MEw5AUibuL@kMz@-Wtsv5`f8_REuS5@ngrYi1{s<O$e1kFmK
zR1&3<;7S-f?g0&8^J~5NaSw=adqv#4)obz^>b-_)ufePL>TdPwn!LIOuMT@{H9xOz
zA)kfN*sH7b>gMyAPdngK;Sr(MBY2@#?NxdN&G!hX@Rp%qfxh*P-m=<?#C&gAWqhHx
zY`$oY;P#d_HpLq;7dK(fr^(}0QIqf(0WOu%h#+pLytx(_W{JzPxPFP3tQyB}te2#f
z)<9xL%L%V(c~fJxeX5rM1Shpy-6)GRB3{!H@@-mDTSeHCs!FdZIbXGtoDWn?s*AXZ
z`lh93R+%Z^#mg$euPIT(PrjtQr7@wTe3W*vk}R&NOVrmAE{jaB$#SYucJbr_MT|ER
zPKlf1iWmo_g$i9DrH%)Zf`dsICRxwtS3&fOTJofpnkwQ8yv87R`vSGGX)!<L)!0O-
zP-F0`^&mx^3=%*T`pBg+%yx@xRWjy#ja7*z5>*MU#;S(Jva328EA?xjl$go|&S_9Z
zHYA(k3zoW1mHU`k;ruF`UxoQ$Sp6-Pr`f7*32pNgUw-jyXgnJlS15Jj%p|zWl>}dX
z17}l>^A3E;gD}NttW`i`EqP(ezfss>%3f=swH8`yq129oE2@;Av}}pWc#n<79D35G
zv(_<LD;<8;P78uW^$h}uNq(3zgaD>_5WT*^YgoMGR<K>Xq|SY6-DhF7eUpaf;$*Eb
z(I**v8<$o(kH)3IQAnfcK&x2XbhF^q)WOU8h)jzsmYJ(!nR6{Pzp5(HoC&;3OH|rh
zL(Mqhy8t3m1br}#$=tU_rC$Iy)QBR^68PW*5t%i0GLb0_3n~{kEKCGnWQyF?)W`xg
ze9TIUv0z*cc4WV@XI77b$!oB5xa~`@eVu>xEzZCC7Uy4m3;q>LR47bi55DGCEwio)
zbTBa}vYEz9xLjn^BF@`*32*TdAD2S*%9}~yEKNNYfYGIqR%Vr%^JPk*+=PMDOz=Z`
zRxk7*4b2FXAd!ixx^<b%q&(`EG?@cnvOAwDv(J}#i;TKN@Np@qX=gEz^-F3c7>O2s
z0&jy-;etFd1d$k0V8RY&n!V{}%cd6bCq!$TYQ5U}`i5K0q#uw2p|6iKv5IaotIV8_
zSy6?I9XI}>(CXDnEYiRd9x4wEI=EViyIQ(AlsEh;7-?gAwe)ATRZh$@yYOly<`yk(
z@D|bc-Rdop!O%Rh)XXX~J$j4UhK2gzf#{WSzKpRl#+Vfi19pC3f}x01F#0U|8h!YA
zHL8-Ds+uKUO{Kcn8ud=`+Jv`YdF{Am4P)KcTL6<*RN}j=NoX%v)<{>;$d~SP!Lo|Q
z-U9VS4GqE9eQE+{jdOYn5(r>xU<6n@lj-buh@mj$W;C=!pGxz=MpuIg&h;86fcJu?
z>O=$Cs&4}yhgE=7V_lWXy`X_L3e3i8#u)a&WIBZ(%NNRwk7dMHIn_BRV%!BN-{?da
z)K%AkJ@6QmEI?gYz06ZvCxYm<ptkB(84U#1R@K&xv(G~J8AozF$AMif^J>adTcuoT
z>9{c%Oga+iBZmqueLea?<xE+fmt|CA38*G$Znd?bM)bzP2a`tYEnwY-%nak|#jM&a
zP<-OJWSGt_4;6>WtmR-d4QkH;#Z=wtV<rY|B<VhN;g`JRt)Wn0ao@lhdQ&(@x5_vu
z&9^M)t2p3HCWblF3~#}>Wz-XkBAy$!SP_skv>7@^u%~gV3}!MPsq`pw)qJn20-uTs
zuX1S>qc0?T<&p%$lW`PLwuYv0R1dbSS5wV6K;e@OLiPi;vLT5)R-qNVxIv?}@$*C5
z1+?wJQ{QA=J);JTXI7<O+yGO_bar52Hvld)n*xjTsjJmMifC9uA5G`Yr#kSdz9sOf
zzQy^3iNZ996H8JXqzDs)@c~!K(3ghIni@Y4V?<R6RV(T8ZE&boKOYG=pW)s7gvS`8
zf)O$Uq4`Y<JT%aBA{C7d43z7Hxq24&@u)sBS5=yct<tNYMk<gA74-KN)C^6PP2b`b
zZz)ChnCZ)`XAD?RyS~Mob@fdRwJ?5NwL~DxcCbdHS7l-Imoo!R)UZ6os13=Cfnb(d
zEz=CI{`_%X{a6X$%A36k92Gd2=`z3uDgz4d8Vpo8J<C>yPoom`^(gM^mP?skgLscI
zePW@MIaS@l(GB$o73sol>GSZU<~~Z?OPC(A;D=%?oYq&y(ITN<YwQaqT$ueo%{PR?
z5Wa$GN}w1SQ5BO)0~HObH$&|v!#<4t;cw((FY>!0FXwlIyvR#@U*dbY_k4R~&F!ao
zTlG2FYmcnH{W$OW$Pj!YLr(T0MY!4{&9@I$41J#86ggqKx7Ex|k>jT;__)am#cYoh
zPBw_E9mLfJakU`k31S`)a~;Ih4k8~Q_A`i>n<6;|F=7xg+oO}cZ8_2F338tu&fz{n
zzQtwLVp+8)s}ag-1X-QwvTAWz@gb`-EGx`Sk<%@!(=02@_DF29mlK^$keNBr>&%MT
z9;u{Un<DcqG3N6``Gp+zk?S$%;`4kYn*TIZ$caAEG6cf7uiP7zm3=I9Z4k;=?nhlH
z9}B%B2<0pHk6kDq3vCTT`O5vjTqqw%(tW$C1M>wl<<o3F&F0e#hF?ByC^Y)=$wR#t
zB3~XpR6fH_#q=+bH`cAP5{C5!=ldms@AV=FyvQLh!kNZse=qWPWw&PSX@b6Ht<}I<
z)xactB9o|riLM6Lx*FgE5id0&Vs46DVl^;9$VV{SBjc^MH&16DhU(iaRJHR6EX&4>
z5li5g6GqDMTo@jq#l?t(F(N?>JY0-O03$byksHLo!^OxAV)PGV^bca-;bQa;V&sJ}
z@`4z6xEOgsi~(Vc0YMBrT#NxO#_>Uf<Gt;XZ+hFGk9^BT#NXoKzZE}Ms(vA~egQN*
z9JGGM4L@|;zz5cN&~ePSoF5<jzG-I18fx+5#^abd(f<+nkKuM7%+b!l2k;7UA54X~
z57Ewb(fHschx=@WU!ISA$%~xrMLuqfxyIOV4Hf;t8t?gh7=a%w^zI!Bz-*7~ze8Bu
z=pga|lpOAp6J6>>o*p^`;g+*)FTX!{k<Nkb82K1GG1?<LS7UUp_9CyE^R*V7uiZi1
zU0%Ph?0DUaY*&KqO0a$4R@r0>d|Eb)9SYr{&>afhq0k))-QhwzWy9D$P=;)siq}az
z^1fYp->wvU6%XSz*<O>aQz<%0LA++gYxZ(p-3DUa{PuewXQfe0Mc<i!Kruy=&O20^
z0|X3|A=^%(5V}^OYZVGLqQ?rzE-&(mmHbr^V!Mo2h1PZ%uPWp1GF}zn?J`~!knJ*F
zYn7oCJ1m(hYCBA_?Og$WLxBRaL&j^CK#+DAIFWg~j8_F@d#e}OW?1Zy^A&;Hwi-yj
zEb`jcg6mCwUHta&dy8L&-(OTr=-nxL@5G>(LZowzM=_uFa;U=`NR>lLb3iI*n<)Q^
zO0rEjZKJMV+a<5HguTP>0KdQUdz;@O1%PJGS4few?H_>H&G!R-Tu89(pa<~`p31ll
zBj+oEig|~ERCzm;%PT7Mwr1#}ynsd}bPj~}o%t9$^Ht8BB1dP7(DoH7L$;knAyic8
zgif#G%-OaZ@Jj!R((h2*9g6#!Y_G}oifpf7%h@iH{n3kT8~8LvJ|x-p3^+s|fJ~So
z^FDrm<M*By+2=+6W^HV(wJ{;Te=Y5@rua0>n~M?6*iXik9r;`{{d9e9o_?&l`I_k;
z(MK+Ib3bt193M5?Rs*Sm>~96wTL5{>i|oPrNBSojk=^Q`BHgR4<%<nISWU|>rsWrV
zky>IdCgNf*^6Mfm@|+j>4Q!mRVno)`@%)zX-x99h8zXVZ09uPdYq9RE#e58t?pE^=
zDsNf`_oj7lZ(0ZUrgd;#>fmJE8o~O4SznMfk{RhmzGh`)2%?UikH~qui1AD7voNu@
znH@9ojGRxI6I0~*iA%~yMNrb5=ue#=ANh%IqERtcG;)WR6CJ>heTUxz=kJ5m_q}H#
zuaESemhr5NXCi-)6XRJK&qQ{~iSeuq!SCnb^O5UE&c#RhAY!8LPM1Wz$w^c`h*CM+
zhmg50gb!YFxDRyhaKpF`8^&$XFfRY$)2O+JPxkU3#I-4sR&FvkMeZX1_DD+IjLi1P
zof=J@rH<tc8K;|ZH?}hsz<?_!Y6Gqq&E)yW#$jIjRx>02GtArcd}PCLZ_`#YBlizi
zUZ1tRFv;d_8|d6^{Rwum#GVr!C7>gX&{&}c_MGTSurV_yS_h_P=0q8~=0s1lppz`_
ziRK~Wc=J8Md@Wk3e9sZ^Kg(EU;g~tmdIN|V`8qZD4Uv#>FlHfGIEUzoYb&9upeI~C
zJ?`p>4^==COeJv+^}x6k{b%m;kc-ZT(!Xo`k4d{jj7I;%kiaA-+1*DGZQO@R#AYwD
z&Jx?`@LkEb{V*s4w>8wMJ~n<^L%l`@;}aRo_^kjJ<Nh@W3HPBMj<I^c+!PsP=nS+9
zz-*7?izelU4(9WbzXIp4UgR%W|6GI}Bl0JHb$Ha{t|$7<79BGuT4`3yoajQcV&+5-
znH4i9`hi(7bE139ikTCgX;#df=v!vR%!%$aD`rmg6|-XIME_w{%$(>Bvts5%Uo)#S
zOU=GZ-eyFnN1hPZgx@z5Vn)JZV&+7bm=!Z8nlvkBPPEFbm^sk}X2r~jR+|+wC;H3j
z$72E+W)Hshc_45;;6lF|IKS$g4+hQ$opW8_T<4tk2hRJQ^Xq~0>(2Rw!1)E|{7K;a
ziF1B2aDLG_zZp2c>6{M*&WD`yTY>Xi&UsJZyvI4e95}!1oZk(c-*wKxfz!TE85Lwg
zgd0VdzZ;1#bE31%>de2$1A}O<%8G&YO<6IpZkN@J-^(`FJTZ-^KT`~7ZQtGUG~<sJ
z2{R}9JF`0T(`LWH%ukugBs7Ao&c#%#_?-1=n9t{5k5Igx-lPJyu7Is8u-}LMKJ51a
zH)H8BbE1Rk19PH7ow>&B))@?ys2;pVDDGE046F@C8D};!6U>ReZT^@!(I)eF$2>4|
zqPLjG-^>FuC)&saG$;DHd0-O5JpN!Fn8dhUF<vkaOn{oli{^nz67zW8JTP;j2h56@
z6Fq2F%$%riR?M7emsv4$qMc^N%!&SQ_TB})it1_~o|EfQQSg34J1SAoBqSj~xQGFQ
zh(<sX6^k{5B!oyvVooApy+p-ZrAn<@uk~)JMa65iMGHz5t+iP1t+mu@i`H7&+P>PV
z{Xc8%z2>a5&tx*{`@Y}r`@aAD@?`eRGwa!FUuN$;mp$io4&r~#;Ey?o|2cyfaS;D=
z2A|47{LdNO#zFkg89bkZ_@6U)0SECvXK*72@&ARyA|IK&XfH2u>L9NGMN>#+^B=yT
z!2cJLvr#s)Q6BSg?0g(LAK@Diz5(GIAoUlP!he`;Kw7bSk=w-=xS^z7X#21W|FLU*
zVm<b(PyCXCo6n<myABFwg@%_l%!>5RH+s0_hA}tBw2Sn31G}JyJ<y}zW~u}gz$jo0
zQ0`$g_yiL7q?dRWtDmu#eMS{E52{=XH((d3@&<N66?>pc!OeW&hI5S-F1%oME*(z0
z$ci_x3s%?zD++Gry0{#zdd}dlV@x^tE=ubhlUA&dNZK%~#CO>-)Gmm>$V0LhxRcs|
zT@(dxU>Bmm9z;RG%@`ZM!iIbcB=I7~rSOdhsvG$32<?J7cEJ#PU`WBueBim~A3)@}
z=X1w(K6PCCVNYT|bX-GC$92BxxUfRUwJ&#E_`e~s4;S~|lgS?c*C+Oxj0^93=)(J6
zy3)Sa%N=|VuD>uyLk_->Gx!c1wArk%b^GK!c$3!fcmv;sNxX=GCw%3hDD9$j^9FXo
zee8kz6x@t|P`TS^(h6H^tR}5<20vvQLt2p&=fZ06U@C<w;B4Nvg39AKQyy5MAZWv^
z5*YY@>Lvb72i}98|1RXs50EuKU>&Xk=U!lP?*h)f3n=$WDECT`d&MUAE-<-=6>{$|
z&OQ9!kT{fc4<jt35dYUFhV%G^T1>cv6`Y_Avw{oDa8S<RGmw=zgU_T?R8mg;ml<CE
z7Y{H0$#)6APab?99;}838xj|AocO;Xv4Z2gfaApf^@$ZU)F=hT|8oXEip?E($h0e2
z<qXD(ZjE7Vwb`ujAGarS2Jg;B_@6U)HxA-IWiM69!T82W;(9RK0cF5g7TI7#uv(up
zcs&N6(7)3}gB8+p5j%$e>k}6eow$fy$Nvq93vonp6`CQ8zqZ2~NW4l$=U#XKW#PFO
zauHleMKBtB5~Gm;m8J+TG(~_FG)J)}{%=TBaIEDVEB>!flu^n~<mBK#4j%kkH6PCF
z*Sdy7eDG_1bos-pUz!zC{MxEMzFCathdtfB{LWa(B)%W-PxQ<D;dmu$1l_Zi2?xVR
z;QjNK61r{g+m{&eZj;~G)6=q~3on(jSja!zU~g${>Go5-U3eB?Zd^C|HAPJj4`NQ+
zb?dn`w0pjJwuv{foHxn%#Vvk^ENvYU3bRkOv@E8%5OE~5eeeS9v{^^`OBc}`A$nzu
zrzy}zm^VC~B85i~&3JhX6QUM%clNd}@)ve@F5z4G^rF2d&k$6W`1D#v+cFPNsLji%
z<~3A$t1Wno70<p?crP6@T2N4YU<Y2;#EY)-@+k5{r11<4kBH6u6}+t6+0}$eFPNu<
zSNACfyz}OH!{5kDUK|r;0~}YS_-cfYQriQ?G5d2IJCK&<=R&s`7zA_yX9B*(URV=o
zd#^Y1lEZ<+9h70a3h)7`YW4)6=P`KusHOXK^PaCfQ}R#i#iY8np5^q0_>{Uj6ka3V
zjFM7mS-8-=pX<E!E9z8!^d4tpJBm0sU3~NYa8qY@cW+nE_za4RwQN~YS;btx74Hpp
zK&pC6UQ+Nb!Wvt#E%1Mr$?4-L?DDjI74{2gyB6C5+JA!r@h)^6E=Sv<O>5fj!dgJv
z1L=op{@;Ds<?#R2Jh>h9MG%(8P2gVx_5;2MPv;KV6674wI@_>ckUp!^p#^PcG<IW(
zPE}de7|ee&lRdgyTJhQldQEyEA186Yy{m^8yp8>+FJ_MScw0NrD|5eYUcPTx*3{C1
z2j%>V0A3-W9zT@fMD*ev=K&Pxd4InOMmd-W%ySQpoIHn~tec50!F-8yp6L+3Z$Kjw
z^Op3fy-T`$dW8+|<x6&&cM^Q2APbfnV}7iT_p31}BWSF-fu@Nf=ug$ufh}lf1j)D1
zM*_0mhOpqZck_~Sf1k!ggx4t$KlJT1X!{y$3ut@DJ87(;@E_73-o<S20+*xhwcrJ`
zJ^YVp(Do<T7KGXV-+kG6{{N>u>Dr3^)*>w3kAQm)nE$8neA)(XH`KHK_$td0-;A&u
z$Hmwu(C58`Wh50enKBOM!H*f1wW5*1^^3O}alCG^9_yQdwQ9Y}a@W{>bUf`NJOYpn
zail@}<T&9-Px!S6(>5Ka?dVw2CD1Xhmh2ZzIbL*iyza3SpSy1${oA+YC3pGoe-FzL
zAH}&6I1{)5SOJg^S7N>Fum5|#P@EGHAH_KzI0{$=)C0t=z`7mSWVipf@@Wm?+YGD+
z)&g6AM*xcdHLRuX$5~_k;UP2;3Kx1jrH?OC>Ebu&-%`t$Ea+@E`!TDZC$pyq9P0YU
zP&8Q^QyB5}2KvN^zn}$^qv=9&Ir?jScO*@ji_n4W8)*_gE>1Bs4P%7vHkui!)0JUQ
zGc{Xm^xAER*g0<6l*8(<@xGaInw}NuFX>HTT6b3$UQm>jSOZQhPq@mG%-CUa0dv^(
z^;vMEpb=N=J&oNw;GmiG8K%5p>>K6tDKrxv^R(srDU>y!{3UIzi}0xk9+>bQg+M4{
z{1Qye)puL!XB<1N&g1{-w+Lx?WoMQJQlSBzESlMto=;BiBJw>7+-|^kSa9u|c_k{D
z5Got&?C1ST%))EJE2<a+V{nSm*nHeE!t0jlYhV$O=DrAX7S)7WJA6#FE$PCI85ED2
zcq^v7rmENIPK{2B2KS%rA@a!xpQa3YT;=Ty#Nf#B7<XbsNpEW6Lp$_21q@~t+q0+*
z<KYZ4!=ucN`N93Kbk5@@QcFu(LEY`iw52V~M3mIvMD?5TvV6vrXX!uXAU)X`6P5d!
z6`hVp?6d8t*s||$1jpM;9eO{u8-w+r3Yls{_td^dFK(l7;5O!D(wLpkji6qMRR57k
zqG;x7+U1N;Fm4D-Kr7w|$HiA=etxnUSZ~*xvEBxp32Xt@0#^dHz{-OB<b%LAwWjbU
zyN|+e05=1}3iFfoK$lt%vD>syP=#=Y(`p0X18Jg9f|TKtAYn6cXY%)V=&KLS-MEtM
zMoUR|g>d7RTHP+XZAo{1m11V_#5wh-<!Hum{}yj{^Q9tY({?m=<Cd2FSQ397BhxI{
zQth|gN=C$VGql5>CzGzfW^aoHR_TDUr%4oT_}WMcU+m#;EszF%^o1|m%)DnbLAKDW
zgtE_yUoN+)?XX`ap?Zf~dGkwqFo%mK_=Y7lJ;B)Kid<>>3mV~Ea4}0KW;}Z{TN|CK
zvZY+YEC@`+i&}blR*T6N-2A1xi}w6B4QEk`nj<=o$NOirbmN8h)(ko8pZ&r~FmqZG
zM*TY9Z-#HSXQY!U-Q;9^lf*eP?0$Gg<k*OpKh6Ll<#G9VrJOybH0c%fqP632SKY%@
z2>w2nxo5r{;}m?V3`g=eHBiu0eQaS%K6z#36{9Lgj~QDv4st=4O0|Mb`K^CCC8Xic
zj#TZ5u*cVnI+vn%K*L5KO6cs)EEyxB?PtxI?%VJ8U?>noUu3?h*3dxTBWajggAZCX
zH2CFS5n4^Aym`>}i^{*|6}6dTX}kQe(vD8|b7IPK6D+c$zJ`XnX;blKHGiJ1PCggG
z*QfxqjMR>WxG{rI9Ca`8rKX|D!N-eQN?S|)npt&zDZax|?3dP^REI0H?4`7{wX>(I
z$>TMB1&IUr--QWnrKPBo*>ypyeA)V`zTcsS5PGPAL6JQ(s0;CY%#7<W-(cX{*|`97
z{xUw<rrpc@E{8h9Fdi>G6dy>a#pKszej|NvAf(wbLwD}F)CbCR1oZt9`qEGO{9TC8
z`}N{kg=*62dsEs-h0{;n_!^=SR&D0-gBfv4+G%iskxeSyf*FzdQgHNjJieEQrihN>
zFXdtEPXpLYDch>sdZv5{3r4l?pR<4YLj8k^|MT@v+`QxKoL{p2#)l6Z=1e}ZW^%p#
z5JV@MH2d+!nX_=xP7lkq^gdIw`fL8Bhs^HRL_ycj{#2+Fp%37op~G-OEX_J2etWXv
z!+FiU=*OsP%$`c$%rQ52XV=!JtC#J9GVHUuFRqa)YCKKrZp8O6&24thyJ@u*lWXQ=
zI;FNU^d0}SZ_{UG_!b&bB}G))sT$_~n(nj%1Gc}7Xc;nE3De;4!)<hnVBJURX>o*R
zw)9M?s~LGDt|+j!4NZnb#^G5TrX$YU9qgDo>&PReXXT5g6h`q&@F_%|!dB%6)8_E8
zPP~ZFLDw7@qVU;4V=yxUq8^?axIi`t(9FH&MqE&FL|GL;wTjdNnvswmEev2Uon3m+
zU`7&c_Sz_8tPnV*0=obHpB+D_NLBE}whny$##UTTMUV?L&|T1i7dUKlF{aYI-oX!k
za4QC*JT<^lnmQO{P)|>H+X8%62s0wh2%K&*(fy?0^ICNN%i+P$P(}sj3wv4R_dh=V
z486YLx|DHslOFKu#3QWQ|E&HaPX8nGJEcvcI|t@7fOK_ZDm7oYIq}M-ia)gfQP)No
zQqUKTGB1z@>VK#W&elj@NqpJ<hf~;J$3c;gswlz7oAls8lFsW$dn(+_%asgU+K9B5
zLg~Nzi?%NxljVE=9YdCDyu+NorXI*=t?0!Mv}EnLG&5J_lsl%2OkY3J*)5;?lDA9f
zjHZ{Kyi&_hZ&Zrb{&RIn8IBIvKQ+;yz5j(%HoOgwuSfX0+mS1Tqo>cF&7T^>wZaH*
zDYa%9V#l`O3)iX6g+0E>sSv4*<6~^ZzU1KMG~}97#~}?~x&tY~4NdcK+qnS5*G4+=
z8LCdRZdr!UA#`-|%6#jqqtmQ0JZk0dnRRsXs+6vd@qq=eG_?rL2}b7#Eni~RW?Ord
z8CLCw-26vv;uo24JHhmq!M7(v`hy^SU$FiEU%x)fOg=t-W#-q*sh-*XPOClA-Zyj1
zg3WZf@>>M>-Z{P~Kn-oWkn!{pUuDGQIzH4M*hwIUea2ma&v|({;PvJI)7OWp{(YhT
zQ`!H&vj3wR)?fE0buyy+@sz!DbrR?5$<y{(gD>~$N$RX#tN63*V|3q<@&7k;pIYC^
zpNOlsQuL>ue9^fcw+L~Sw3OZ`nruJ6-t8BqymOHDL;@czkR|id&fYj1)=*UL4=cj$
zxPETaiFNpT!2T7#qY!Rs_QFSu|3i93+rjend+41vV~<;G^Z>KpD86j_J!{I*GK!&2
zvEQ3jI7iI=C3TO?Gq*fzrXAV;ZI0;nonkl7Mfj64{&wDYC#Cq|iuBV#jL4mvX>^Io
z!xO%sq0iemiy3pz2XlzOxMexN3%8^Z&raw^0dN-=51-|=c=smv_U6Mmj-az?D>dEY
zu=m$OzAbE&OXT^wd?%FO6?gR9P2<1)uxLs4Lo)hN0i=YIv7CmSZX#SgcU!gJU#R`(
zXG!Lhy5^Pw8XbHrlfD9mhgRlB&k=5<YC9M?(>IgC#>}Xc&eJcdG^WXh4hps;7-riN
z;5(erW`PH3F}X;`&#pA%sT?vAkFJ;b{JA8X@%Fw|RDTc%+rWGbs)O&?o2s6DA30=Z
zhg|T&zwy4kF_6(8VRAxmmyetCI4#Ybh7`UNj2GRT7Pa7OO|oRR4>kejrB9qqaL#<l
zwt?luNUiO2Il6IZ&OLk{jUP+%Sr<GvqiTv7A{e=Lwr9LAn-M>We2%!u4M{WVsodYN
zcYsjc!tZeK%|&~iP4}|8aQ%)S62Zqo7vT4AaBGV{!;EGX*@W{JpR~e%T-MN|67R^`
z$@N|<GL*if*4B<2^;9WsUqa*&2jEj*I8_e!=+Sw5<MPA%efE{%fAG{R<O!0>Z#Ssw
zXIB579=qbsPStoHUejm#T76UuIE{pPUTk}M2<r$`j2`o)>?_O0jlpe0GyYCHYid9d
zK4fOUgdKGWmwErr8XO`m3(bEr)gtV{oX&r)pt$anuT10p4}L4C5x=*D!XA(NwfNK_
zY81*Fzul6ecWdZl?DQR7KEhm7n2LaVr%Ul|M-Ny3E#3IAE+&*Lp{Mh1;bD8eVek_i
z@+o-q6ZTh%Y*%W&eoZfkwJqqT=lc9^3tqDz#rb9(YHuiWxQA1ZzlDx#R(|e<1TI0w
zn#|_ZQx`s;cH3*Cj*{RJW{Bf<SH}5kBgCAVcJq@4q-$<q^rs-_FMANAoZqEM*9iW7
z3{_L@Z53(*Ro>$QkA5>Hg?2`YL92&*fNlsmYCbe)FZ=oV7Q*=1p<djJ;qg^N=fVcM
zuE!fg{SFl8nWD^ikZX6PpXJW8d8D8A+Fk0PpyFhRrT3Nv&xX}QWRn$I*z8H`hGfBj
z<JS-yy^CJ?!LV?^9)8=k`N`SW^$#zCBfB93@csaN*#LYs_ywJ4ukqQ%DQ4~0@OKO6
z;B7H{chaNVaM{bTbtUwa+*}Hcv^PU%9eZTP&9ZE>U{BVI5&>fZjVVkV>F)w`z`O7C
z{1WYy{C=4;IOem{iO<~(z5mWmW!!&v&4TSOJARC^m$N(S{UBu@djFx{_mkqi-h=#2
z%YKpfd%o=b`N;Yq8RQN~LvM2PW7bfHpNq;wrt}!v%y>mVoq1jT`7WaeY=0<$L2b$o
z*yr1HmJG+UDy--wI*joBveHqRx2&^`v1d*V9)M>5EL3o8cQZW{v%m4fw+QXMVY(TN
zQ6qk>CzZYc9bVL2%zq=I-+Bq;5&xIFzr_B3i3Z}!wh#7tQawgA`D4527K|EuQ#9r@
zmjda8+mJdxv#u}Y^+Q}((4^eZB|X>=O3A$*q$2FMu?lV9A}uoAFwfq&e$Xs(dduFv
z2re%}rr*`iv@}~W&i~MJQeKK6SNrQ8BuC`*r)Tsb?^p2YZO4{gDFpi+;i$oej79Zu
zL-y$b$AITIe!+sG>~EQ)evqkVIYz$th0<C4%9ej5y&QX_c`$u?d1?4b%;!giN5d5J
zdpa0Yn*e6mo5wQk5|A~IkJE2B@P~~1>!&IIC7;bBgqZDvO|Th%FYH8ff`@0Ve18T%
zWk~ZL^gD$8Wlv`RPK}8;!@mYJ9KSu-uPGC9IL^b*b^R==9W6_PC`}`PCQ+tGun(M(
za(LDnA85c03Hrf9e%ZOX1fy^KSOC6}za-G*7gF%ai{_BD!2bq*AUAvjE}Zb<9L<*P
zY!061&@DgyzIA3pXI{)>|Ds1hnP!=9>P1_cq*9$iXB4}A#Qj2<4<to{9=8AG|F)k4
zzF!yG=nXL12{OE;dkKE%)~_@(u%$?(MLhxy3tyA}x3`<(z<}*%RO1Pexb0^}X_-Ws
zvHoxRjVAg*4g6F9{_7uWDq3bP)V(6UWcP~rrW?PeTh!gzLpSA$@Ui)J{_hph4*}sn
zek;N}tHJM*(R4QXk+QZx4RdnnS7zmPYOL|Y7TvT$6U{5xl<l@={OAPn2-r2R;2*D>
zdX~{z4zow$w+pb-9%B!|9!XRiMl^Vv2QP2n*P)OO1n4)P`DG5XDKCI?$IAQL5FdUS
z9KN^U9tyij0rryv>0Rl4#x17VGaE7*bTh<;*hM1K2Ep-^7NUZqgM&R=2fZTvs05nR
zB1snRz0s%tQ38_TaFpz!f;ec!8~AkzY<rw6ih^F+=N}i7tn#PLtO@eXpFJ8Q{(zcI
zzXFlo!iy;Bt)q`Wc6MEQb4JZH{9xrg+vMtziQQFRa;UshKhM6?tdFw0^ilKzN5(xE
z-jN>Q*lLQm`Eg?hZ|ZfJgHgJEQ5ifl7ekg(!ofKvhw#m=1%7!+h1}Xfcb38q^CJxY
z@L|JBhK=wK_J<EIDj!i&KEf}m2=v)F!<K$fg%|V5sG_eAL%r#3qC1CYHP8uGGJIG`
zk=e;NxJLNR3;eXlZ8W2+Ofm~m^|x64@&WWPok=Cl(=m@XCpO;4AP<8ynN7bu@F6P+
zFqHho=aI-*d7Mt~cyFHENcPJx#R7Gbrf^yp_~t4-{iVhQlR>o$Ml<jrGz&y7J^vzz
zOjoU7r>Z*Ek+h}sF4|D`rS0VSASJRRJ@q3~fG0bs=_IbpN~m_m%xMh`YR8c?YBP86
z9F}8e%$zj`b4|uosY4Aj`DkX!%*pRhnKk|RIyGa*_YU-mifA<M7d87dg#x)skLYuO
z?SOrOU4eaoA;8YSZoq!P-oTCkO}5($p!szB14Ds5fIMIjkPi$7b^>+)a)1J07hq4I
z5TLKs@8b=_6qV|t_TEwt`HbHwv_BDo(I{rJ;=@pQOwx(@%y>vNaiTYAk~eZBy!Q@2
z+?zPbI{^O=_a+_g9el8N$|>HNXL>Xq98b3V)S3G-ddrADz?Sv9!-$@jer))mEpn*6
z<@A>JBKl!&bRXTGfAaRe@A-JSL6-FV4@{=)z&okx_ti<;`?`0QS1d<ouQ7UQ!qbfA
zPQGx(<BaxBJgTN=t$1c+TCZR#Y_>I?U(ka++`z`0XsICS{GfrK0N@85!>rQ#<`<y{
zElS~BNXwXLwMhDSH<S@SrfJcI#1fi9Kwk6hneNtJ^P`)tDQ}bgcr|O99`LXPJv^j(
z8ful^iR<Y$9M<Z$Hg+#)#1FxkA8$sEp!w$eP?_)ZrY%i~-oXiKo4FVazKp@;=NdTM
zhz8FkP=qNwy-7bq;%uQ?5zAZf6RY&3n(_d1W$RzhPww^#=EDMOUdvAof7KvtAMqOg
zukw=v;mhcMg!uM>e;RsU9=IWZto3nm!dgp?*ZV|Q)|Az~9gFc^CqBo}e?B`UlDUcc
z9Smv@!FK{sCs0}VJ&p8v#ZQ*;?F9UuDSn#`-webrC)p*_ULKaRJzc%x{40W8S{WN$
z-P6<0MJaq;XMR1J2c}3Q*Cg^#bb~4tZk`o?;F)rOe@lvgRm%Lfl=<~3^OICF?Bn0G
z9Y2P2QkC|iNO~_cinzORSm;dw<tx&`L)0&tLlOC7b<@77XoFyO{OOdYD?o5~R-oVf
zaZ;7`!pWhM=o~^u^F@kZR5Xkw**(31EY9*Oy`!J@56R|>1w2a5obR2sG$9;l`>b^P
z-)O%4$&b1F*AL7hV}L%5?6kOa(CH4wbxLjbAHR`}j2t?MA1z1w|3LgkHg5c%cU&S_
z5Rv}Qt^rGz(~k@GuwjwBX<>#(7}A)o7!Q;Ao2j-DYFl`SxDvYV-#@zCOgo5j;2q;J
z&iOnMMCj8+ZDs_#Cp3n(Q0K7|eifm?$0P~lkz@&98Bhk`PB2mZ8E4uD!!T=QU;KzL
z?$<tOnJ^Z@S6(6{(&JCqVC3jn`aFgy@eb`zLZx5%@2Z$V)%=p|x`3aT<$J}hg?uH^
z-b?ll^W;J@(-S+Xf-)Pw`q|S~!q+Bd1j@ckt;F<hx^Q$$C3^g3Zx3X<9XLVl1K;UF
zP3kzkb1~h$wx36oVx%`8gX7)6K=HS9MMMrUIxjk!(Uze4IcEm#WZvApI)twf=+-`N
z(UaSt{RQYV7JJKFuhQFGzC6CiSX#G&?jYYA?xo8x-89=ufst$YVu~l)GUTyAAU1!5
zIE9?YOL4e|gDQn92Yc~DpU=j7fBjwt&~UE3#jQ2=g+P2Q6Vtu<aR`6PS)Pjo?oy*?
z?tO|E^Z}!+tO>l$4)oJL8413*5#2*@`IsTV7jj{M`d5^)+LTZ_wbGIBiH3WaVY6=1
z=?phR-;bXdra4v1-o*EO{*j-2>8*Txw=O@q`j1~6XKuxJfq*yOH`x3ad^6||cxMT^
z6bI>h(Ep;SeizqMzc)H_Kgv(8+LE87eV@FOpIrAgzBTkge)435%l@37T=W~@Lvw7p
z3Bs8t)q`7w$e|f$qNxZ$g`>MJ_BA*9b{RS>`t%G!xLY2&WFCX_K0R{^?Nv)Ren1`X
z$Tc+B8$}Hb_7;+enfS@spm~>5jG9uMesW~^+Sqfn{MvY`*vBkpZi?_8CP^SgLGn^w
z(P8+)$9NBy2IDdC_0^q{aQ$@uW$&NRr<iCCCMVVNf<~XtUG7oQPE%4E@nPN04yxAN
z5Xz~IZQGvmX|In>-%+9DSa-~=6SO_XkVX{tlYMjt7WZIyK4`e_v{xNvKY5SewCCU4
zwVhQu1M!?ByA>@O)86cRMP*g(bMcufx*b=9f7p|nSkyep^Re*#rltM3;N%~DuZ9XG
zor5LbMBE9%-EhP($(x8X7q96cfL!aD6ny{3%um2H5o&|YM@Q_7Mm$}DZ;XU`KqhLA
zMyeBEbVCQ#N|`|)-cP^Li%+Ad_wz+;{+W3Dp1<Lb`zQTO{79kt;sb>2MEcH~QJ8<q
zm$X0l^V;K%BeIX~J<>u|X}o+w4)^ie@Wpz3D-kn3aE^487}t%fq5o5h+Aufwi{}7-
z9vr`Hjwa;uNd#u_lqRc(`bIm`^^1pRJc|W)`O;~#FIu|gB7*bJ{=E4smS&xfznMN2
zh_ONN-D>`tm}gF4Y0Ksh!;onh{@Hi8)APMEWrHo;#>kwBf)*ovuc?IZ1LH+xyoRhk
z0~);GjQJ00Hwkfjh33RIBAB^A9?HGQl)BsFd0Wa0k{1Iv024+T&_04Vh(;bymzw=<
z`od)i&3%!|MrSJCo{|ImS!cdK;l6e;(CoF(`Td5F`DS>A!@tih=YG(i@h^?fm^N*i
zOfU;i0QHOmzug>eOMB6ZnVJ9G1ybW?=P1aWf2a6yKCn~foi5L->+J2ur*_a0(3@)V
zUJyQ$hH3lsBkvjcONW?y$f!kaEiEkrOx}Tim^|2uTg0wD+Dh}-sQ;81rp~sh5NN~`
z%XTL@1NxESzZBBvNQ25OnxJK7yV)sP_%a239A8xBrHz(unzdmY3?V=7`%eSTAJQ|2
z`1x%3ES4bti1|Nq4zdi5dTk+N^e43`TpUFd+z&?8n=ePln;#QQH=q}MkDYQPJ>V;*
zA1*0MmF~DbzN}HEwkFq96;~G55>ZoMR94xH1GB(pW#wg~mEqJ`<z?l?Wn=LQz){mC
z*U%wH96^IfudcpmZt-Mw=;XRu>?vxWO9wGq)THRT$!T_ST^()kk&#unjz9m~*o;fy
z6n*xL-}U$DGsYOHnD2Oalk27z&oSD?hf&-!XV6xV6O-#`JL3qm3$Bv8#%OXq9fdTJ
zg4r<PnR7GLC_~DM%f=u>>P|YA4z5252UH-pgT&9AnPD=yj<y{K_>fEoXjk9>^Cl~&
z7)OqsMzKw;Gyf@l6spCm83=k5Mq<2LN>O=P@knn@kUkYGo?To*o|fo+Y;zdrMc96(
zOT4)xPydVt)+OFaL2OL$rU>ahR-$$eM*bAf2yz$8%9#bpt-y0Y)hzUDKs|6V&<;fR
z4>ae<&Oh#_7SUB~ocS+{>I#x;BhVAUkzL;a{K^6NYX;zN2jAY<OkZm8YA4t57h5vt
zzfgaYoe9+bmW&xU+8-`fJd3%bC*$3F`-*b5Iq&Iuqc9k6$RYIX-&3>qpQ|rOJ`St}
zZU%_%JH8-!4B!J>uy4g${8k3A;{NnE*dJ{vNInca0IUV>2JQmB2iy+a0^A5(3tR<!
z3%Crp6u20;05}gg8#n_v9q0x+fK!21pc$ACoD9qb>VernEieO^222Jf0TY0+z$joO
za2Rk1a1ihnU|(P_V0T~_U?*UEpa94LK5H&W{tNgg@HgNC;630Ez+1qZ!0W(Ez%PJj
zfu92Ffgb}813N7&NbUe^2NVE#Kn~ympCXQb10MnZ0R9Sm0K5nM5qKN;9q=3ASHLU4
zi@;{!=fJbTCg3UHNnkzjIIs@b^|XTIU|<KJ5Xc4o(^ZiC82CHz7ho&!7VsP3Rp3S7
z7r-;XQ@|6z<G_!Ahk*NlyMgZmcL28lHvrcFR{|@66~LK556})Y1M`46zzm=o7z>mF
zMZi#C4`2weJ&*@{)(Ibht-u!GW#DJPM&NPaAz%$~8*m-43b+tB4>${04)g-uKqs&m
zXayR9dB9xYcwi22EHE9I3LFkp0i%EtU^s9fuph7|Fa$^f3E<<7g5)+}E3gH49e4?N
z9(Wqq0Q?Ae2)G;g9&jsg18_BPIdBQE0yrC326O|9ffnEt;3S|9I0l#oR0HFIN}vQ7
z0Sp872lfPp0NVjMz`vKEP66A1KLPImZvw9ZF96R1KLs8KehAzPtOjlYt_Q9JE(0zE
z&H<JK-N0gCA#e&X7pMnj0@Hyhz(imyP!1dh3<JIb><#P!Y!BoD|8B>51^g9w7kCT!
z74Q=99Iy#^5_k-F1b6^g3#<X|0B#1Z2d)OL09FDQ0_Or}0!x8zU@@=|m=AmvI3Ab<
z90ME)OaaCNV}J^v7#I!=1HJ<63+w^x3=9JDfR7iWegc06{s_DUyaBunJP&LFHUjH`
zb-)9_-N5&NTY&3<?*OZSOM&x&Gl3pp3D69j3>**4295@5fJs0VPyrkU6afbS`vSWI
zI|Dlc+W`eY0{HaQg5-Yze+B*oyal`tYzCeMHUf_U4*~Z8cLLu9t^vLcd=t0`I2TwB
zq=3ah6EF{`1C9Zv0uz8rpcEJm90=?K>;h~L<N=?xp}hnC2D}Sw0bT`u0Xzdd0jvWa
z0@eVx1K$O{1FQlr0nP)K16@EXa0+k&Fbg;es0PLX6+kgC95@Kr57-mf1sDVr06D<N
zi%^!pTfnQpbHEe8kAVk)dw|uzt-uYy)xav?8^8+SY+xC18qfwT0KN*$0cwFMKow95
z3<LH7h5$PN`M_tbC?nvnz<a>&fj5C)0WSg11J42*fyaSIfct^Ffz`lmz;}UbfvbR3
zz@@-N!1=)0z%rl*Xa|~s24Eg=0x$=d2^<AX0VV>Yfij>NI0QHd*dN#v*ag@T*bc}A
z{)N8mAHWB|AA#QkzXg5`ya@apcpBIMJO(@pJOJDctOjlcZUn9ZRst)4vw&ql7tjtY
z0-AuY0>=Thz;s{=Faa11j06q^iU1$j2iOA`0_=zWZ(m?fU}M7behNGV%*FN`U?wmF
zr~xJdV}LTC1ULjZ5V#EZ25<pzE^rpG9OwZ$fJHzP@HK$OOrLkT33k^3yZsEm6V(sq
z56&LHMa8qe+xYSyEd3paY{*)kwsyoZ@23xW5*)q%8Kp_@fx62ttR``;=Fehi=DLE|
ze$i@1`9i+3Kh?gM7~-?aK`FG42nk2~HAe>t=fN(=+U@7q(SFUjc6rurPh*!WnzUbY
zunRc$198%_ixZ#rlQ=p?G}#YpH^{NmeiEnc*bi%0VC({4w4cPmF5q%J<e85>SpH+n
zL43(m+((8B>=Hu`@IdqOA-DuWVwa=1zc^f;;@&e{T9X9vN6Xue9r-ETZyb*N6z&yA
zlgd2-nif}+>x9pg=V}s{XF1V~s-O9gaqDNVEkEIOxf4e*3&+0Lde-UK>2fE|wUav7
zX6$lBQ<pn&unRa{KbxKSw4cQ3_;md|#j(?V5~uBS{hVv;0$;SB#A!csP_PLfd$1hm
zYAWt%$4=MJBTalkUhDcf+2M5koM^bf&jjM5KU&5(cI2mUBOOlH&*6?Hm3soFw78mF
zCw!(nSChCr%ZX-G{iOH#seTTjItE)>&VetUmnhU6^Wc_SE=scy$GMs-t)1pX^THUK
zRQT?Bv;}qv>=#bgPvSrY9Os!mkACIY>H0~WYbWQ?OU5o&;?wn$IM@Z8K97Fk#Halv
zPRFOuqh}mD?I&^CPM=3l8oR(3?I&^C&m1pZ&(^t`ihIbh)92BBCcYrA^?9_$;q-a*
zJ;Mcl>htIp$Bz7@KU%JHIDH;{+tH+QPxvsx;%ai8@R`ceBu>sF(Tu9|H0Q>x^Y6hI
zI*&9bb^aa8MQPHFS6A~N)=qPxxh;mK%;Vv-+w<YyuuJ55Il}3BMjSfuoG3qOt`PaD
z>uy00*RzChx_)|w%Z<{c`AM$kuCPns9Mc@fiDQYwD&TZ{gB&}3J`hKCQNGapC)bw)
ztfuC~7ve}$IPJ?mj-B>}xPg43`B=z<V0?+7H{96eMWuo615+Awxlgmc2&c=PI2@fT
z9G?%izD#oLbQ*}$b~&COoVR1ZVJsME>hreLa#3m68NzNFnyfFv=`;{Wz6ht&aI#~k
z(?FcI(`l#&M`;jEorYS=MWun}&betg*ZLxyP6Kh|i*Py(XE=5`4a8|XorZ33lm^k%
zX*kt#QEAvUBn>xNUxd?XAdY+yPN(4-$4;k#IBloXunHWdK{Rz5F1B1$8fY#gokvtX
zW%<a&$MYnKtM-NQJeTto_czBbM{$34xG53bfr|U1V<&x)hvhAYt5J3?H%xJFC_Ao$
z2SUv9uQ*(e;x;=R=AL?zMwiP|cF!8ST*~Vlfb1k4nxnk-Rc3Eg@ey~R;vRRnVTyZ1
z#YcA4io4&jo1(Zi4p*bNI~`4`*Rr^FRCi@@?Q~^weaTVrWoar-G^6S@&Bt|@Pi^|5
z>}cMvyCize`4?qJ^MKtY-`GXoL!x=d?vjjQM{}3mWrrAcG!NQcb|Sk(^w@^xQM=17
zG2)}S)LiFLeta!}?FFz)U@e@!4j_)=5svDM)U}fxJKeSt=h{g<Ji*xIil%N`iGy9h
z>Fbr_ocOe##Oe6hM_WgaaqP68#A!SB(b`Qjc7ZS2PvW$nIUe%U#~v(`TusG|b?o%@
z$|w_Gkk|TprPSf{^~wmt1%B%5m4h5R@{|5(8R~GluiD+wq;gOAFv8+$a-Hy*%F-lG
z+E&qwI&bMa08~Hu+5xt-bix<(iiMh!Yl~LPMQPGE1YFHNYo|HUToyy~D<PU!T06~&
z=E@kFeu(BB)=qPxd1DOC141+(wsx8m&3j^KqPxt>&!?@O=0x)+F*FYf(R|I?X-+gZ
z$Iu)WqWP}1)0}AjE{0}Nh~~eno#sUIZ!t6v4$<7<bW`UwCz`pIi>mW9|G=&DL#>_W
zM02+on!`ghORSydM6)P{Ce7V){hVa&G$)#4VrbH2L|1c`wbPtvPLH8^7&LPMwxM<j
ze+{r}M!Tdr=E2RiTvQnqL(g4W*_Y_&TqUj%wig?_$omDQIL=MOQtPMYBn@3L(l9c_
zmvdsIp$v9z8LecyM4{%Sj8<4KDnH9ZG;g$aniI{dVrW)aP455fIQl`@CGaRjI6V#_
z4kiJ|eWSIz+p*K*5aL`r886-G*y(Wyaby>jFQY=zu!%H>czMF<G!Tc6^8}nu!v@Dr
zr-3-vPSWrr$4;k#II@dMLnYFHJom^KS)M1m0n$Di2e|d@b+$_sYEJ6JOO}iBCG2~}
zzm4I`*bradCA;cGq2`jdzWm;DQNC1JO}4Rl^G|E1IZ5BP7@G9E>u#RqF2#F6XzMg5
zW&0^<f{XH#e%FUI*~a=g1e#>0Iq`FQ%SCBU2ub^XWQY9JoM`T8xhTzvA$}feebJm~
z4vXPu*vtFnY!}_mWBOdyGTPWhw)0`Xw=*tAeAQX8dEUerc2W5m#Z5(gbWZcNnvJ{O
z#wVQAF`{SNv<t`AIo9qN$1cb7ErZ`!b2z@vvFs66Gs@2z97}%c_?oSza5}zI98SkK
zH%5HZ5SM%Yb+TQeP;*iT+bkEAh9g5X&$M=$6V20OXhy~NMY*Hlr@Nd_zEnr|amT=j
z@{Eh!r-0{O#A)ynQNGmTI4WCJUA&dX&LfUB4@~pIMQI*Odd_kgY5LLU`%K4%Hm`_b
zHw(v68uF@r{5Q*8)=s#j;_h%b7?U|KH@lq89wM(-9Onyhbf*f7wqwrhXYOii7nNtT
zp<$f}e7V=!5$DDyT$JW<R&z+TkC0g&w3@={@q}<unsXpS4r<Lut)_5VQ@AM2I_sNW
zJsu;^!scc^5yS3yn}+nt^PV$y1;n}K_q64r(r`jrEGWNMtQ~Q#<_j@2PYluAV(o}?
zHGdsLb8d*{d)AIPSM!}1nkR*5erWB8b2a}GL-VU4nx9!a;#|#-V`$C`(M&GmcBz0k
zS2NdgQRRMeh~_TVjyP9y#~7Mlvzod+JJ{HH!s+(x0EbJvgnOKdbA8#<a#86!B`p@z
z>oQ|kK%A?2nB}508$vY4TRY-h&CxM5=UYvkXETkRC!Ef+84hR7vGTkc#ksy5VY#UE
zHL^<Pzq%N93o=c3>qKK0Io@pwv6~kozUC0Sh8T7&u%pVL^Lm-J6He!K%Hd!f)TIu^
zabBxFRdd!LuxoSeRDauSxu`N)2>;#q&a!sIx$y}XrP&&iFIQVl;dH)y%i(mstW=!q
zr{-KgFLLcvzMN;ds5C4JN&EHIjyTsB;i5F#VCOD3lV)G^nD$iH2-~;ENW)?r=jO}z
zW7xG@J6*3Iuy(@bRQou}Ece9FT!KT%7p?i2wG&QjJ`zK-BSiCQYbTu6d?JQsXNcwt
z)=oIB`CJUmt`N;%TRY*j<|{EYPYcm}&)Ny6HQ#YKeg18U5np#md>>jn;dFd|iJ_T-
zrn`I`!>-3Q!uF>z?0RvWTL%l5o9i**bQ*Fj7j;gb9-_I2wG&Qj?(A^790tXRZ)r$;
zzO@rh$G2|`&1E5)hgv(~v}REZ&E+AQldPR^I_={ePG475I-Hfp%JW9X@Z}6XGV|Zm
z7<ONW3AdlBt(y+Jq#u3#erAYWZH)NN%5;&pj*DS;c8J~aG3?F>u{$Y-U0;aZ*J9Y6
z8)DZO!|uEgyOtPs=floD-_Npk!s$A=%;8|n#ZS?v6zBH+nzIIhU59I@#vyH%i)vq1
z*fgY9o_C(LBhK|jxG2pFVCOCu#qi}q*9hB}#<066#P0GKb{B`(eLIHTB_Vd-iDCB*
z*m1#C`+>ssG3+i4vAY>|1GN(?L+tK|5#KjM?C!Dg3CHgY*;L$RG$Y@Uzsw%1R}aMS
z<#KIc!#|8+w<^T$$Hp%58t+>nc0Y*`-xVQtPsXtOHtgIw@pKHkD?{v_i(z+Fh@ZcV
zVRv<i-7Cf}vfRHDV)rX!7g-M1gxI|q!|vJ;ySHMb?>g8~Iq2($ZPrdW-Io8!;jB5w
z{)ZUxT`vZzE%*oQ20Ev22(kNjjQDP}b~=4S&M;$B;dJ_Ta5z0)DsVV)32QH5xv2i(
zyJDcyz7Omu?ZWByWp|?)S<h~=nmT=z))(P)`bIh&3ZG9y$ase;&h7s+XAJ_oBG*p!
z#lGdD^5tfmhV;tw##uY!TwjEX(!9lr>3o@EHHFjpa;(GYd^t*St}mK%^JS`Qr}AZz
z<)YGXYdS-Mygt#|5$F0MT$JW*uydD_WB77AjNJ6K7`t5J*cX+)`Id|F<&F@|PGeU<
zoU3`N<)Sq24AER}?TB+VdtzvQFGTZvW0y;ut9iENqWoM9J9oJ_hTZpFBW$lUc9HMh
z-xXqaowXy*E!(RU$LXU(O!<0QoGSNKF?{)f#8>SHUVWGC5(QCtwkE{x_84||2eG6B
zcg67Yp7h~C=$;sM_XbC&1NX<UTbn*S2t7=8D4eK#xerHk86iLAT@QL!EIGu>6)xmG
zvVf!Ksq!8Oy(>0E+0lN@;XSg*@yq>z=jp(slm@&S8I^_yZ~&4C`1o&@O~%d>PQL^4
zgv04~K-R^G??FW2#<%a+*-uY69pCN_r{f!JxLmTMa^NyRp3;&8hj=nLDI?-=NWgJE
zTf2l~r^|sjvCBn3;!F6R_b;R!@#T;&!VxbVc4u(>EZz6KzxQM3g>d30X})jlI1Ln^
z_$eHAWpEPTJN?*Ee43N|Bt2Sw3p=bh4Z@KPEw8II5J$cwd<3w(XzVic+Goo9x%DNg
zem;alNmI`!8I5wt!#?5ke3CMU)ALCVGhD9Nk!H@2VeHIsQ??nJ!VPmc(iF}&T;w_S
zF!>Ki{i6tHT20}&Y>B{fwAB<&pPSPhJAJMk;c)s~8D}-4@;Zup#JHC6e~!_Nd=Kf-
z3=6Yyd<<WH6k>N$jQD;GJIZURn-u&S?5Ms(rEeV_=qz#C&&M1a+H5p_M#lGeh+Ulc
zeiC9AC%*L|cFi&T+z?{dN_L6p_nM!89hXD3A1Ex2VfSQkbUJWa3_mxf4-Z1U#xC;Q
z{AqA>I<P!Od{5zUPM@E)J1d6W(;;@}#qe{Jwd+&yy=mhU&Qsj$4yTI2b2(qxz3ABG
zDDHWOn-aktsJKmzU7q5ebhw%bZkXa8Q+Cup&|GIp{|_Bb&#k`C;q=^Um(z2re_-r#
zDX%3yNr&bV<c7-ZJ5+qc9jLgQ9B!E6u2u1oUA5xA?buCG+&3MrMsXK8nz}!7?R0<S
z+VNNdKGEX(lB43w(o~#iMzzV$m?$#-zh%=GW%n#BsElNMMgs4{j=s5~IY~cp^vxCF
zIPKQgcN{z7ByWft=vys6L)-~+K&Acfup2VKyn^Ro;-=w06dxAhw4WbaE-GJs9-_I!
znMPAMt(kARD9z`|A!pgy*hP*DegPXdef!w>gwww47Q>g#A)1F6yIkS4rf<2Z^t}L0
zxBN=UZh(30zYOtZf{jl&?Mr10UtSFHWl9WRUJ9{0itO^e9O3kNo5i8d%OYG<p1m9r
z-%RVLa5}y$PQ@o&RD7?9b81~r@eOdz{Hi)$f^&^s<h|e5<Y2Wvne4Dc`T4p!UV;tA
zE^>_WD>+!Ln_|TGYaGvY*H0UsX6=aMehggBkOTRE_7E=5a;-7^d;=<Oe0^4vI5)np
zhj0?#=`rH_O-Ou~TTSBJ_`VUsNqiT?i0{pa_=xK-KFxie_<kD_pX4WTZhVrTnv?kA
z<mVQvsr$|AkuTJ5YEJr1;;8=<PPb=QI(Eb{k2r`MsNeiuh%etKJKWb0PRDnv<)Y5N
zw_wcmv)V_<ENjUQ?VxbFUCQEAyChsxe7{E&R7Nz1QRY5AOz~BFk#h>)wst&c$@;p1
z)0ZgJoXlzZvE`zCc_&2kd26RR(cBb6^A91KzqWRo6U~=nX#O!obE~z}oM^rkLvyRu
zq%l~|5V}o=IX`Fd{W{O#sJOhV!a2HyAY884(Yc^C=@^F#G()&R6I`H4_iaS;a`>X{
zEXSIcgmbKExj++oIWh)4-$@_1JcrA$lk=VIv@c}ma2a-T|LLp{JBJJG_te2T_f
zmgVOGo@cpkhvWNvmTNa$ph-5Y3(Z!?jyQSt+Ze*JF6`zxn%ti4HiYxz1aN3r@}=BO
zTW7fA3>WxfxgnIk+HlS%Zo11ME^hC@P05Nc%^mLA4H+^-?5eUkU${{YNA-cfQH1zP
z!O=-0>C<!Si31gI<{a~Bmp9z8Gv`X0qhmyq?8KJ?jh&Nc#*R3c1swYbTUz#W;?sT-
zN5@EfTyL%2o{pXNlQ?b1K3cn-ja}diagqk&U>9)gr%y_rw_`|rp3jt*bU4<tT&@!z
z-xs#rr)UQgkO<O8f|mQI!|}OixxW}L@RQ5ka;_$qZ9ke^evW2TfAp^Bao@=8c(pOS
zkMk^1C>&`@JO2ZRqy56&8NuCRxhP-Wv%ctW4Ll9IA()%1IVsyGNK<j-r}XdZ96PcR
z?uXVc%9lT>e3A71oa_d;U+})NBY$Z5jkOa_=jW>qr}OidG2;6(^r;ilcE68d_kpq#
zKmTs+gwuZh+2M42TVurc7aJdygXHJOG3>TkJMGJ7G3@@T?4;at&&Ihqz?koE)=t;K
zy^LMH=0tN>a8w6{BR_@PF~Tls?V{@7-{Fh9>`!)BqU=6&jj(-yv5UOE{RfVdx+Ha?
zitQ4G!s&7-cQ{=q4vXN5EEkoAe}<&t2)2t(`+wOq=zirm*kLf1t2yoma4d0H1sv5+
zdCqrq2$$peINbB5S}rOLAK^GRKNquIqEI-UpUn=Z^YfGlZm#8`eEHb=qVuH>c9bug
zlYAi#CIP4OWqAlE`O<B<C|~{s;RM6Sf3tks*m=T<9<kqaI2p4NcTtS^{*B|@a=4N0
z5`~(RcIg_+MWx}B5Y6vfJI#saZ80=Ig{GS?>(~zSkSwS3<za`@`Lfn<k>~qo&~%p#
zRx>K?|ACR~=Vr09oc8lshtqy;jNvCmM&;*K<J`pgNy~xfm~obHv|n?4kh0@?kDWsu
zJ3YoE&b6a@Ps<+0E?45C{hGre0mpv8S6X&<;?sT-#|K$I^|`r&W2gNjPTR2`Hokmg
z7x<$6Bo1}~M`e`ou?Nd%wv2-GDek{)840J~0r@*PxX%@W%1FNh@`1zYcR=1XT;Piy
zL;v2f<GSQiB%b$%!|5^f%Z?`37oW{MSChCL%ek7w<ylTNqt1r}GQe$LiaD<ng_@JL
z;1J72Y35i>4}Qos^K{tJO$E)#HS?4ZPOg~`H(ajR(K|DuIi7t<YZ51#V?sF5tT0?;
z`;v<^xXUrdF7laFUWnby81dzY*v*L%Ujgi>{PdV_9_%ny%-5WZ>rNm|a8cz~7^1n*
zYHCh28)InFiRSuwn$^^tXtu}D+%81(OslCm(OeosbNdj@i>#*RMDx5DnmdGOUSTyg
zCz{`kp*bi-^G2h&yXHjm8l$;;RJrdMqPg1osX5WSEry>vg=jutH8m%i_r%Z~9HRNS
z)zqA5J{m)FNQmY$R#S7LxiN<3&LNsFSxwD}<}YGs?h>N;TdS!#(fm~m&0Rw@-!YoI
zYfd!z+PB(^tV_EoO|ko{@ug66)L+r^Clg=fGmYJqrr3Q-c70yH<|Mv<QheZ|>iix`
zQ|xx=<2JHTa}r-ZxPh+2_f(o<x4W^+*PO&R#Kafr=UyS2zSY#6Xzm+BbMFw%!>p#}
zMDySnn)`%kj<K4W6V37%n)`-mPPUqw6U~V+G>3+0)>=)?iRSben)`)l(r-VZzC@lY
z`@=35=Kzg&IX>U><{-Z20q*yFB_zHEN(1V=<|GYsDGdXh4}OSdht<@aXtu`CJRn5#
zEUT$G(L6nd=7AxaE3KyHMDv0eng@kwUT-xuCz@Br&>R+`d6(7HoM_$_L$fGE^HHm*
zInlg7hUUQ`nwzYq=0tNt49!DAG+(uvniI{<F*JvVX#T-!YECqN8$)wMh~_`6rshQR
zgBY5JhG^!UYtBv0iRPy<G!F~W+|_DoPBaIB8|Zv54$(Z&YHCh2_l==h5~5jdH8m%i
zhsMw>4biN&nwk^MaWOPUhG@>Rnwk^Mqhe^5L6h2Yvf+CoXv<H59ku0}<NF@{a6D!J
zcVdWLPBjR{MU8FBL(<nw=^LOwstB>`G<Nx#lYBW9+(6fqqe3*#u)b(cG<%I^WWQOd
zG{x>hV^^p-8H4qi_#(%cqeC>mWi>S?nwQ4V9225>gVofWXkHydb8Lv__pGMoMDvyy
znpIXa7>9VCx5jEl)w6NR7m4p-6W{KdlQO!`XhxRp_z=w}NfYB2&57nZ(i~uHGa*Ei
z?xoZDpgGaxd+7t5D-)Hb*u7xVSExD3m!DA@1{l{Jt~AB&*Tybia}wVxCcen)he;ut
zf3TXG6V2bn&^#hU^L?WkS+><7c7KauH#x-aqZoEmLhL?^VK)_a_%rP|*0k(*9_kqu
z;kX^A9a#1@T&{3Ap3nQ~->$Bm;&ycH?E7V8w>@!q(<jiRcd+b|bTs)LEX(Ct&8YLX
zh7#v22N=7^dz{lk?22N<cVvj&h#2ur53wtWVRuxBU3m;YXN1^|juGF{uygNmPJ$iI
z_k7LCIW~?o!9|tPG0<dps{Np(YDjZ{wyrkBZiY!iWdC<;h~2Chb~8ilj*nqCE5vSI
z47=GOc8#zbC|{0)os^N3Lp#NXHd%Ah?k*(F0ov<1(9A{YkREHIsFuNw#(bJ%O>n1y
zTR4Dbo$^zBxy1OAuQ^G>3UE}HH0L2MTF$myR6VN?iSIfapXMaKtE{HxB)-dI#CLp1
zd_S=9X-?w1(`sr?;=4IUd?$p&x6a0=If?IwR#S5l-+eLSJ251_pWFB}C-H5vnwpdN
zo`@0O+>rR*wDD<9;(Og{YEI&NF-CkRg~az48=vMRzW1!A<|MwiW5oB>kodgwP1~wD
ziSOT5Q*#pEKVrl;FC@MlY<!xN_zJ)c)RvzdqPd6F)SPJU97FSKA({tRP0fks&={Jh
zglN8J?_+9CG~c1$n;&4D+z_H!Z2i=nXdV*7&-o#mW38s<M6)7>W@Cuv6sxH@(L6kc
z=7JE-W38s<MDwT^noS{^bFHT4M6)i2W^;&UlhxFmXr2;7vn52c!)j_yG}~fmE)3CJ
zZZ$P0nmsWzTSGKgSWV4|<~cDm7lmkEZZ$P0n%{__*#=GgWn7ayN_JR;)7K;q87^12
z9M7jidAZlMQ{4AmJDT5NmpigKp}gB1&4eFN-c5$f34Br9bq<%OxT|b@QRA0WDN~%~
zF=H2bEwebpZbOXt+C%Jq8Y8|XA$HHiu<Ho1`*{pMJ45VVh!I~G>~fHwTsNzI&e>nV
zj;>`iCw2E_(j4Gg<}|CB@Sx}SvF6SzOx@L7!p;{R6vB}yEd}6EAroT9_1bEBjvaBL
z`7e`pFVoIw{vDjw%u{~;+1TZZ9dV-h#}H2Z++s8%-!<w^n7rn9tg3x>W+<m2QK&h2
z2Wt<@MV$|+5X}+RPIIDpPz=o;tEtPck?lNBbCNG7hj5-ro_7K`%4@OH<u}{0)8%(`
z2q&6T9Zg++ha0<GiBFf`*bq)M%Zz4Z`Sl`S++`tYVm?<?8J!+tcdGFv@>_aKL+m=p
zF2~y=D!yeQcHJhvNI#duj!kXZQCd$oc9HM$NBQzU!JQqFzB8?##JOo$297$;C|}MA
z(LCR366b236GO8vL{t1E&ee?L=eaPV_FA8tKeT>oPR`ByLpaZe0G2i2=-d=LeQw_A
z*y(fg<`7OauXQx_x%q8lmn-q<bMu=aoM>KXG$YT=^Fs3F&qmYJoaD>a5KiKI%fy!u
zJ4(CsV{bTi#EIrBA)ILb!qL?E@{F;|mH2eNJQ>1?<~pMpnJ?!jOnt#U<KXxD{zjTP
z-fmIn!wT5pFR-Ed@=*-C3&_Y>J~MWaZO?_)Pu({rFQ73)qEK_vkL6e{Dh(HfXzp(9
zG$)#aV`yF+lD?sA7u~*GVtvu)?QCnOIjKv>gm9j3GIkm`I&Z~J*UuvyJ6%7=g>a%-
z;b`jmS#0cbB|cq04-Vl(^D9O(vVML8`Qk3elO~>pM3wEOuyfnNON=j`<|IE?gmB{L
z*~ZU=*y;RS=Gf`{><-~XbFrhT^Rva+<w|@yKN~_g(VS~EBlB~m%@?nl+9jW}_Sdk(
zZcjKpzk@hBNI0_N_ZhJ7Wyem>?;y^#lk3r67`t52r2U$MUBKyiD9<|aX+Me6@v)Ea
zm6nZ;o%WMBI!60KX{6<GV;A_M{Ui>D1RR&UPgb7yLs!#7Ui%=htaUg&4`q#sFYrar
zL;0S=>3Jx(8ZPj~v>_(G8yq|Glm2MA%Hd2MG~8v5Cgn-OH=L_UT#n^jP2%JlUNoc5
z+ixaJ9Qywj_(I!Jc9(_Ny>09w&xgxH?B0zL->MM14~$*pbG2{5j!momAc=oBc9GwS
zx&lUSdnWyZ=A=E7{y}q|jZ*pt;Y^+AV}GQ7(41&W|DZY1l>R|D-JVJRpgGZ${y}r1
z8K-~vHu8m@xp5t&_6&c6FT`^->=rIK-$OXApVqF>u?x<3*twj<$LW9_x#7kqoToU6
zkGPLf?%Gb`6OQbn>im^3cI(7Z@CA0B=GYJHn;ODVe$jF`I2tpET@Dd`A5q>|$BsDB
zEDzyC^H4`q*NI`qE?45yecb*boM`T8G$Zrnssu8Q9Iv*0mG5~?u%kL5oURitCuKx&
z&U5UfjKVmHkMgD-cI1W|pK$Ol;3Picj&<xLKH<nNs!m)@k>a3WoQyP_2F+%SlQqXY
zxW$%>()<oI@yGc|D_WMp4y(vE>zWX|v#p(QIn_SN@sh>a@d=T_MfrIxJ887!KYs^#
zfN%F*7h<=<_!)U0<@yl2i;Z36wbKo-W7BG1-1Ju3d=XCPOBSc{MYyPZxe<|3I}y|g
zgs<WF5`~(R>zper7p3{#5Y0QRo#sUIrWl$xai#=W!htnx7v1;Y9AbBG47*!G?Cy_Y
zcPs4JwAv4xeF$~~eTVh7kobNaBfi^1>>f9Ek!`^pA$Cv1i0@9=v1xTWeNT}czRxF|
zuAf<)s-MC|)urztGOC}{4$3vj-WQo`65;e%pEx>PIB9oj->!~b(9T<qj?s41zS6Rz
zvC9=s+FjwW4mf>Hl62zJeiBFaqDj7xue9VicG^$k=oqnMAFbUdC<kO$;EVQ?IG6=o
zj)(m8u?NdPY`F)Tiu=H^)7K>LnfL-<^fk#l4yUh4wiqt(MPHNr%CRFq>5rBd9nOpy
z4ELO)NqL#@4d-eSC)XsdCUJ62BAQY4b9ExS{T#++lql4kv~~MiE=u$JA)4jZPIIDp
zSPad(L=)+w`+2lfk=+3I@_qn2{AJwBn-s%tO^97h47<B2GH2m$<$B)1QF(Sxh~3eg
zFJ9zxl6yn!_&G@;+HP%#9e)cr5$)%Fuyfn9Z^BQK6Hd1i#8Gw#$931XOBXqIx}6}-
zwUhSjTw|9jn!24J4t4>j+p{x6;v;`(Io;uOyVT{xr`wQr$4<8)tq!N#kOi)$2S4yf
z%gK&ij^d7YINgTKbTlb#2_J%3Tum+qpDEAPBu?58(Tu9Q_b0O3kng}3oOy+slk@!w
z%SCBE08Mwfk?e*<kINqnvAc!ii?(~nrh)U!*3S*FOJIC0oUYfz(RZ_j<NUOCKXUAJ
zy(Z4JlY0GtW2fsiaoSGTYx*u+e}3{e<CLGepI+m{r~M>O$EVMSI~+UhCvjvKRkja@
z)R*VT4)sNIQeU37T$JVyLo{EtcA68-U&hdU1e*8@#x)fD4cTF=C|pjpPrG@^;%t2&
zQn;uzJQ@<;?`?d->G-lZ6`ycX@%@MsXMC6c?{dCGUz7Ye#O{5v8{oHY)`i$@Gj@^B
z#~ur@`;hDgco*Pt*tvaG!NuHH<q4<HY2uI%0jJOD{~$id1)M%th;!}aoc_qM)8`6t
zWEWLNKe1`h=k2cWlYTo-bIe1GI6D7?)939VaP-@GniD^X8|b`UANWGQ>*XUh&pV3j
zun0$eoM_e<E>}2{X9v*XUUilo`W)EOGSRWqZQWRKa3hFMmmhItuj8XKq@~=kGrpub
zI!5eto*icFf;12(=_3wi0jK+pgPr)apTz0-bUpJOJMAZNuATU@kFg7U(S8y~en!=^
z4V0<QQfuRjvU>t{?m2dY@x>EPr=2*8MmU}Js~tO?cH&$+N&6~emn)h&?Zm+@;B;NO
z)QL~~Nt}+4d?8<Hxxlg0eiBE=XkWzc9Ag*wqWvTeW&xMurN?f|TusHD=Gf`6=@JuP
z;ENucE^;_MHf=Io;ETS#{hDJ(e$pQ;CperQo6d4HDNhnUjIg+x#L4xot4W-UO+_=R
zem<GV9-H0?UudkMIT;t+V!0^IjaF0Fi3d&k3N*(&(nlOt0mt<g>7ZqeW2fr`aX2LM
z`tPUk1%H$+!ScMZ%N1^l;+}T68pW-5I8Slw4CjevUkDeKXHUUN{AD=$GBojACRaE<
zH|ZEG#9<ZLX5BovF!>r#Jftw$2Rs7I-L)|J(e8!G+C2)BHv`ps7bdR+wgMCPDNL>c
zhVEOKTn%giZXa5hT(loF_Ag9s12!E{nDh=TOjZG1z-nL%u-8F_$=SfRqQYd&!G+0d
zfcJswL!b|A1tt!MKJYeBHKH)N64(M%9$J{Z7<dEN?J)QT+zh-16c@vHpr)iSnJk4K
za3$~@;Eya!_5hoJp=Iy~*a&<ARF)Se+kxAG^}rjzii*PIhrm&z3X?Ygj{q+L+koMf
zg~|EAgTVX1u+i`tm^cPL18)OE#}+2*fz`k#!0amM10Mmk<KQ#!A<#D-y1?)W&;#BF
zhD|I?o(x<G%ssp?xd!N(1b=}~fXXA_FR&iitr~d_tOJHjh92+|FlY+$0k{T8PK6$@
z7MNIrd;rz}Zv#W8!B1c%uo3tKs5}yW0=3hT55PL$L!kJm!eldW1Mm_sXa@2DxCYn^
zB#%a(1IvK5z*fLN25A6R0h<7?7HI)i16zRhW04ME#Y~hTaKkL*F)(~~Ve(91GcfEp
zXaZ}2tw7Hl_z%1d46TFzz)D~vFuNZ01NaCSej@S{xN<IRfvtdl68r&H0h<8ttEgW<
z7qA-G0_-&pI>5!idf+3V>}2@SfP4hD0{(pX0c--iM)&}%2DSi|3y?104WPCOX#>^)
z9|FbA$V1>Ipr!?74h&le9|6A=n!ww@&_(bG*a+;^20g&*L^^@Jy5JwM9{31YbQ<at
z@ES0r8+i!41Pn@{Y=F(c$vyBJ=;?(%P<1-AfKPzRrKp=g%^5fzIQi@F2Y3$1I}`Z@
ztO2~UkWOGV@Ch*cY}f%G0k!AA2jD~Cs6O}rYy)b}g(mPmP<<YBfvv#A^HB!CCcs+(
zU0^lv2{8Kt=mH-BwHHDc_z*biBIp9!fSQY;3%n0hUjkjg{|0;o)&Sn6&;(Wkp8&I0
zqC9~&fU<9*On}#b;>&Q(0FMCMfZ>;;P6O4eQ0IWPz*fNj7PNs?z}vvkE1(ao1U3Sn
z0F~cH9Kahu?Ug8Vp!h2I3=Fy&^%-~{IQcu!1@f+eCa?zZu7w`38u$d5eI4=u_z0-I
z9(e$K2n@OrX$Q^(9t7S8hJ6>Bz*=C_P4Mkz)E(gBTTn-UkASjUQBQ!Ifpx%Zz=yz)
z+fW~YM}R@ML+cKd&7G(xz#8Cfpz3=_C$JHCV>Q~G?;~Azp?<7E8t%sNKo776cpLcS
z9>jSswC{uF{m4(?8X)-q@)cMHtOfiBVFzpiyoV4E&;_gpwg7uQjC=sr1M?q6dV%DR
zpaCoc)&g4r|HsHjU=?utV~86ldmQNnUit~jbUpG5cpo@<1L_L!9FX?}d<VQIkv?G2
zPmw=B^(Gtx_|L#MpfES5ASZ9|j)Qh8$jL3t&EILzj)N0BY?tqCzx@u>>C%{eJ75<e
zAE3UOI$Zj}70~>geK6Mh0ENIvpa3WZb_VtZ_6K}mKj0u>C~zR~72sgt5MVek0yq>n
z3@8RlfJwj+Ks7KKm;y`%YJh2gEM`nj*P93M^E29(@wVX(#Pt~cu8ReJ{{_zn67*Yb
zaxAUE<M&;%fn#&%o4Rt{YQ|rrNj4N$GDn5+J3h%gnhz8O@sDhgsg$+-0zUaJXe=6q
zz86u~0RJVl1AzZB>e?%)6To_GZ^3%YtJwbr_6@Y$R*-!D)`H|ufgc06*|nHegFgVE
z?G=L&4*_wn+c`g3woiU?)o%I8*Y?a$R_~RcT)lUGaxJhM_BZd6&o-;D^sO#Po&wYZ
zqATk=vF{eUU-UOZf91Z=7@40ObZ~z1sQvSk&+V6=tipCRa1`+VP@}&Ewm%86e?O+Z
ze{VtZulE!r{|JardOaWfWPtXGfAf*YtKh@%srkv`arwzB#~@sRv`@)TZkw2&d<5(2
zGUMOPu)QqAzCFTzo3ihFxFC5nFb)_AXx}Kj9{X;w`^7&G^`Q*D)imZOE9>%;ZyW=k
zrspR=nV+A`!@fblUek<!^^02knJqm_+nQVa$*EM!k_GK8-F{i=xT?~!a_CoYC`j%O
zY!7(A+v^LGF9Q@_hxJ+;{tnic+HlIQ$-nw13X-+Jb63NU@8l<kT#Negv%KUwtk+%#
zf3R;o)nC*rI^JFSV0$V+``@<5^<lkwVSaLJE7H)FpX@m`Ke?qhKiPf((tI}3cOlAw
zI4tXbT9Et}a1lV;S<6!e$=_K{@~;}_&m-_{<Ldn6nKwcA#{A^%H{>U4v0V?G3~asL
z=vTv@G;e;UAh`lq3M>JRx9hC<oE=+m+y;PlOZ=-5|H*gdC%YcVPtLw4KRNgA{NzX2
ze*1pZd!Qcsm)&RL_n+-2T{fO3@TUML0rfyFFclaNlmmwVj!Rja(s)sykqc1&Kz#=F
z2h=ynvgLWy3E*Df4&a-1EqvJ8{{`;n0mMoA*P!iMhBV&(1k(Q)+JPUT{yvC0i)|mc
z7-(K^(*I-FJ_0-pJOJDW+ztEyxD&V?xCOWgxB<8pxC*!exD2=yxEQzqI2Sk@I0IM;
z^Z=&;9Y8y9D$oiv0}Fupz##a&Bd`-d{U!CEbRE32T~q(ME3g}|J3tHNr_M{tN6G-|
zkGBVQ0I1)UK9>5^J%Bv{>T9W=-3!<o`1%V4$rR8IGy|sq#{;!M4KM*H2Mz)D19k(p
z2mZ6UAo&mAPrzHi>%fb^bHG!;I^aRzZs2y{df*D+GT<Vh4>$uz0gHhqU>;Bp)B;n1
z3BV|z7$^ev19k(p2l9YVk$?XL{tEmF_ye#7cn$bD@D%VE@DTi63;Y1M1Gp8q0k{gd
z47d>J1E^j;iZ$gWg=Oh`8Sh5|#{)IMC}3~k-!By;{{~Q6U&H!GYWpUH`_y(l!bbt+
zz%XD>fb2efu^{;_Kxq)I7qGn%pkp7#nvS~(>pq~xZqLHn2gr_feu;7bD7;>UZ$$Vi
z;1b{*fXal9S%mN@0EKI?remrAea!xL|1Qq{Tx@@ceEI|M8t^Re7$EsY>tQ=0y*nW<
zcPU7gl~;_a96e@i)ws!1rq)b5lK3HeqFw;adle*C?F-wXNHaj3UIyx4>i>cI0{F9$
zug4W6m(4*PLH|%$hjXhQ+t|P5*Ae{#Y)=I!&OD5Fq#v0-8hT?2l3n9)o{mM`IHDlA
zX=*|8O2Df@odhR-%6%(Y7yl;R7kzL^Uh*?wr*GsX_XkRWNx)3t6rck*8@LSkE^rU<
zIPg61Ch!698L-o(um?(kNx)3t6rck*8@LSkE^rU<IPg61Ch!698L-nz*aM}&Bw!|R
z3eW+Z4NzLBU7_}e*3^E`n(jwZ8?_o~pmwSTc}nNT@N@H$)P}FQATLSn&&u=ilGOJ6
z630{fLpsu4QJdd`yrnj4Hh5~wsC}dMXzs;%NeU0gn%cTDfZ989=(GR)r}LwW@{-6`
zo}#}E>npGgDp<%z&-;#7jmC_KW?&7{L;EF6*9;Q@S|$K}6u{B~^icrIIY1u;u-pUm
zQ2@&yfIbRfIS8VC95QpcB~14;CA>|Azk&qI{uwIVt->o+_<Jh6Nre;0K+zed!ZTDj
zrNTELe4dwHZneRO?f%vi@I2XuFG*nnc3%4UeN~vu#8!tZ>@lxly%^~8p0+Whk3Wa^
z`@H{Z4j;hbyE%Lyho9i^K^!KnKCg(w+c<nMhYL{2`aBv*qVM8x1&2p-coc_gIb6x%
z77mZ*@L3!l!{MtrT*cvgI6RKSPji@Rh3EZ|!-sSDQx4NrCh8+9cpqPF;#!o$)x7@*
z4o~Lr2^^ln;SLT@<?sp)*KqiH4o~CoeH=cL!_RPdI)}G#_$Us4%;6av-U$PxK5r(6
zdpLX?hgWiV4u{upxQ@e5a=4zuZ*ur}4*!e8r~p`Y!3opn&E@c+9G=JF8V;Yr;gdPM
zfWti;UdG|aIsA1Fzr^9QIs5^K&*N|s1Cl=PA`TzG;fpyuk;9jA_(Tq`<Zus%FX!;(
z9A3rYH5~pnhc|NgY7YN~!`E{7BMx83;oZ;>^?5gPxP-$ub9g$!<k`oV(Drp3z8Hh9
z+xQqhg#X=YgRiLl`=e3o<GU1|_f-y?`ZgbpW1nqZ?&h#5_jfpK$~S?Av(Gc-awUhq
z$}#+s!zQ2q!eJBfMhph~ymsDro5MXEu7a<9-f|9~#Nl%}{5uX`$l<S`;qCKQa+v-}
zT69>>-<^@Zv3&ej&}!j#ayeYZVSW63>^CLqc_|xSfI;O2e7s4cK3<0l(YW{VogU9S
zn#1ONzZ_xFyw!$F@DQ2edV&P7NL*$sot6h!$LzfVokpKM;2922=dHhU_-GCvxGNoV
z42SDDY|e`dIc&;e1BXpn{ENele0;@jWV?XFr*fEs-k#{(`b^M!VvltA5p-&@e<TLk
zecs*nsI>pI<5s)3j*l_z)l(cE%gmb`uHx`NIc(aiA$ybNcx#>3ITZVSzI$e<W~`_m
z^x8VwdP<wTk-e$zk*V&ckqc5IryM_{wq|5&d)tDhl8Vyu(s30dn^L_az1F6tiiW1n
zC0%XpEzPB{>>1xPysWr<#Npk%nov?vUOBe1YSfs@stG}G>;$iAQDZkBT44^Y7%`!2
zLU{$4_Rfx0UxY>(cGQS|g?c+uZLJ+G&4Ed!F{y;0Ua&Q4Y_Qm9vW!O?<I!=9GaMZ=
z;_&L!n92#1>@lz|*Kr5o31xu?I$*tF!7P`?D&?_RewAyTAUwfKE$Zy<3G$?hG|I=Y
zcU8#CQ59pyR864&$Z&ILR=nes%{at6Va({!qekO!lifi9mY30iRjiHhgp%@#DpQhy
zWcpZCjNsUE60H~w$%XBmjke<0>Hw}1tk>Mxi@QUnPT9Hus){JiEzR442VY)62T-+a
zZ&?;(LOBXIRn^_n*gl@?W^q~ZsEP?~OB!44_NWTlkv3Frp?JAMqi8vD(bn;!p!gUR
z60%x3kmV_ggO5Z}RB$pI8W!}nwfD4jG@Rbp(B77^nSmlW6s}evht0|>Egjj`(bV4C
z+%l5S#nkd83p(3VrHhD3El)MKbfrf2cC;;{jni>VNAI$c4byRob}VdbjXrEaTTg0a
z&+@JoD<=^xY-#N2?RNJ<e`Hg0%R)MsTMGCy63sygt=mRbjVbAFX<pRWgKhGmqIBGt
z!1Yv5Gb~}4YCEH)ff750nhd0|a)j5=(A!`u%qY9Jyxi>Onu?=G6{DKq=y7JZX)Hz+
zqk^O*DAV~+R154KZ4N!Hx3QTc9ECl!e=O}+dr{EXJBIc`w#puhqQzd+Zt_m;M?unl
zb`QJD$JpahaM)iZhX?!VTmiv;<M>e(_IN0;kQk&1lTgkU7>ubD1Cv(vlN?GDCb=eA
zjm^#7VnE47ej<H`V$FulEvE}h38XCH^hpktQ}QTVvA4A?*h`7Cd)qoXtpeB4QKtNs
zbT*q(MLAKz?7<zV35(@$N|)W=xp1NEHL2nV+tqGLll8eP@T0;MAm@E5s7Q#?6d~{L
zZf{#6+9rvdle9a?u?mw)PJ3EhC30aZ*gcBM4{jq>sj3E?tY}KGiNrK^Q-GT&UPpF5
zXdKEXP{kR6HVB=@1Y~ftDy&ha5IG4=dcP^eQCx^<7pP!*+LlOWk22Miv#&SRf^)t(
zWm7-O)KpG=%H>RLWwX@M1?^Hsm8P=t{-*ZMreMFRtm*wh_EehM%6^kyQu!)Px$^#n
z%?(Q$Q;W^1sm@L8Pqk1}fJ$VNS&3w((3vbmDyVIutgb{7C99E(qmYf*SxNa=UWT@m
za&mFYa+~T(dwx<rwRJT$q$^LQNi&~_NU^FuqgATGG<Eb?vC%5oh6t+AXj7Z{q*|ED
zw4$Wj^FpY!ovGMd^%kZUwzaF+Y#xy7LZ$7firdo_r(k-&I*oDqr1zUDUctrR(~xRv
zY;TmZ8Ldjcr=d548)NdqoEjZHT|Htn#^ePTXbLr>y`{tE(il?(5ED8iZu)x`q04Pf
z1-(<3*)fv48@r);o&Gv8K0MX52*b=p$P*4VbTxK2E*W1xyox%CRHfb7-PYON*0Wsq
z@~9U!s)mJ)sUE7$FdNHeIFVC5=;BbpFe0F;gi!$Yb+vWyappvo!9k$Y+>&adA?#T0
zjK)&$b0{`Yq{~v72SL8Ox2b2mCoVMh*qj{8z0g=R$A_mzjX@*O($m<qh`edh-rMAM
zb+)%PNwSPT!f-xtHlRH*{<n23YC$$|o>;MQV{FozI=dtSoM2{WYj0zBGo1+Ixi>~v
zAsGRm7IP~^C#cDd@^L&?;+!)i6XQk{S5(;ek%}fhv8-OjXpVhCkPFm4ajhAPUiffi
z9cn4g_lAb129xhpJf?x9eM=kLFhIgsjWXP(GE+=tD^+TkqyDBUk*&Q;mPo#FqSAKK
zSm0n&r%`jIn3nYRv@Ek8mQ%gPK`7-^1tga=U_{i?eR@lCW<f2%P^%YLLAuh=(Va^>
zTDmiQr@f2YI>cVeW{FNb6%O|g87`@GmQxD?x6oQpLfK;_>Lj+aqsjCYu%IS{dZ6@)
z(Y@3*@_b^TNKzPvG;}Z34smzIJL#lu>E?3=r6iROM=wRC3z90S!hSMv3NfgAV&?Kv
z1;MLS1(grGyHdE23<|+kzI5>hX`=I#$1_-Aa3uL@c%7l9=Fo74dU(na6|+4fG9#6i
zK{Tb|ur-H=K%CQZz=Fo^?l#*wqB5JBRlzl@3|9iU0-)xJ91f~Kc6PU%*4vg&s^mDB
zE~<(_os%pFk$KA4+)ihX^+Tl|Jp@%J8d_0x%1ozInW(SEp{5?8i&#p7c24s+YF1IX
zFhW?0v8mmsI|jM5U>kE)va~6+1UDLF59;y)ZU@=AyqqPmf(n(3KFMsMU@+E;whPA~
zCwt*Nq{a^)M~#I&0y`G)0Z64DM9@%7j+%hRklI6Z7}FaTc6FKoR0T(0!Ld^dh5a-d
zL79oRZL`@?k}#t>BVqet=ptJxsE5F{cpx&mDk$X)5fm_ss7t<9G?}NH>}sPRuD8q%
zADvk_UoEvXG)$j5Yvu_JvyK^GRxBGcXVJd#<!VRGl<^g6^Vn&}jvp0lPdj#Y{Yeco
zX3jpoetc!H_sHXGYa3=AUr&2S2YYAK)=rx~xz-*%CcS^=)LF;QuANpt%~E62lr^cD
zRyTFdjM??G=8UgOlQZk5&6x?oX>;a)7*{;Ov&lo*2g#dJ*HAmTu3jZ+#`Kx9=1enI
zbx0cx1v!5j7NYO%q5Prz#|i~-D6LV;7uq(^9!Yn;(uY&k#$jj)`EYbk&fzWSzyfh<
zIB+!eIea+vCv-fTlE9Om?#7N(+Jrk5vVmj92Cg}A7!#B;`Xc2UwfGzzoHV9zGt~67
z-j?p=Doz>;Qk?LY4XLRMHO$NmZpL6o&6Tl()1h`5xxy_9nZaLU28YQkJ6oC?dm2qW
zuAt7R0&QVBzu09tNrlk4!Uv2VVNYK<LVO_>t_1xQ$3<n25sNgK9mrrb4>%B6^ncnr
z_xQT1GVgC_QjXY4QIv|PQ4kB1+J*w*rcHBc1G$l;7cQD6IVTs%<#0~Y2I1A}fHGPY
zkx^7|ih=`UQAAWw)V>M|h>8P9he551$RG;(RzX2|zrVHDbM|ur^O^a)|Gu8jCpr7O
zo^@Z(y6nBzc~+X&;|^b188uCt%F~5n%qCS>K8BuL9_67&|LDMEo@Z5xLHCIv2Hh#L
z9E|G4W3GH5-#<0@)&eSNLkG9ZlLHemV5r?N9N7Xd40W1NHHTCRFkG6N==Z@Y#h9L|
zcCSpb($tVS3S|>(rHv&x7J;qne8u@y-2~65CJO}>Ls^KqifcOt?Sa|n6F0;)rVBki
zRaqm&;n{`FgvVs-%<01Lj6J$Lx*@JIeM7EX5m%U2-)bsutWB+SdmfhAQ!~?pGs9_R
zgu#HS4RdW+_@`1Tz&uoRYIuBLWbTS*Y;yC|(7^QA)MPp-Ra(l_iW#s_nj9GC-ikI3
zjaX@tFyI%{bkYu@i7soNstG}D!;BDBI|M>g=~;71JvKQ!l`5zn6lk`bR7H?+J!Lbk
zi%wEj8{q0`Xw$m1UL~b7xXJP;?zrX3%*O<^Jlt@nqpXdwaU9gsgR~3iws=i{n6ScR
zULS6HD2t|P=INnW(WqZsUh;HxaExdACoo%TD0qHfSr*gG)HgJoc%q7TOq{-{`S|3m
zUiTK%y`IRCmCBR1dLG5uGI&jRvR4V<9@V9i_)LzaK;=fEzpaaVyF6Wjw#}cgCbVvn
ztZ8aGp>D~V&UJ^^>9J>By`KLccl3(7C571{_hb_+)&|B8|9|#)%(A18s;^rzbnXbt
ztGaTrFf{f&(f!?*wZPwN;_o#vx3m4vbmG76yX;vAAHDfrz9QYY{CBr>LzOD#|Cf46
zmhlR1dSH<6=~DX5^Sksa%>2b<+2qu8VOitqwxgy8Mv`Tt17+UU<<FfYVER2>N|udG
z&Me!^^Ay$*RnU*DR2W}2GBurE43^93MR6P#t>2Pm;ZpYp$+BTwkWXoHB=+#XFv?nu
z6=t$*XnLwd@O=6e;v^#j6JtZ<Kg1mVvFr#18sHY3^qGz|Wu*lPTK_-#_ll?nd-J_#
zYfWws-)xhpe54}!Xm<x&jKcop9D4+{5w8xmPffg7!8cp1f<NsgT!Ozme<s(r{<Ir{
z?KZ)m_84lvT;06vH%IcrmXWYK3+LcZdlGjL`NPC#AG_4<5bY;aIkcDX5;B|TTJh*3
zcl~LHi1r`qT6++m!ryYPm1o6e{)f0`>rn`!J&a2jH#Bre&UTUTE!J)x^S2y-%W+&1
z<=O`+|MEA(pZU|?$c;E^&!psRDXRF>ZY$-3En;DB<~0O*1K0Mk{9S;9`P;=F&RzJs
zUWJMu`P1J&@@M`oV&BL`BzDVp<&u6Zz7K-tPkTX|@7*iz?y2_oPtl)}+KRue_*->l
z>PP?U;-z+JDL%E`&RTwdG_!ZI{l`(rS6#gPG~ecLllJMh&kOmE;>xvl+nB#R{_^-!
zz1qjhaU%}qZybN)|AoJ=Ie*&2I*q@ZEHb{W{&sS$woo~=|95G}yySYWr7!x(pYm}B
ze@a(>58`h({`^Po`uvbT`ImHe^mqGbfcUA4-}mxuVdSLv>d;lT1BH*$mEJtSUsX!$
z=7l}8!4v;1j$gWK$yQCyOMc}7n!m@8kxb?Dx)Sy5^ve9PRjVr9qo(I2f2f4Y(v^P~
zJbCKedC8*F(%%S9QV5kp{T%hJiZA!QdCBT*J5;3{cze!A<CYxfMPC}9QchFWIFxc)
zV2w8^EA@1*bINI}+Fs;&q2<$YB9*5#qwyf+@Rg|Fr>s(>d!JKgBOV{^u})bdUXrN4
zrmPlB67|cJ*(}IM{V!!U3Gz`tOPLLUeAJ&(R?Q`e`c2Ae6~?^^vssRh`hmXZ#gSe5
zp0Y-=RIgKJ^BW)OZ^~?d<0CyyStDBZnHPR-;@Pw_b(<G<n|rxto9r_${9?tke#Me~
z<}m`9zR9&F`Teu1v9SLwcv~2L3llD*{Iv#==lVYi_giEA?S<xPzOwq+i~7-TPj7c}
z?Jl(R_U0Eo1F+TiUhH<ChLiWF?I*eRoA05%*xE<l4-DgP&dD`?E_J*ezRRWeIoR57
zFMfsleC0VH>Vtk^bPN8CmHxlMqp^JzUg@0_{Y$<b&hoz~`59cS_<u>F{-4SBf8P2x
z{Z#sY!M}a1eOAWuNxl~icsJ!!Pg8x*hwpW~0N&+zKlnj7osSnK2f+`)(o}^%5`N0@
ziSUB?{5Ctv8{rGCugT5ADzDD;eg=Lw-{LbRzo8~4%@&Wr%I~p}r{UQb<zjvhOmr5@
zv}4&ezx8u9x%cp`@So!QEGL&e(!68YD;#$$8)-$ycfxBO-v^J9--BX)ehXiGSxxTy
zd@H@D`EEz9o+RFjA+DY9Y55OK_Jvpdbf4U_3>DJ9{l&k__~mf3OYc?irjOU;`WY$|
z-%_}a@M(J;n4GNef6KzR!pS8yx$&5OH#`pSLjZ+83!eT+O>TS4?*x1R`F~sV|2BA)
zOaDFaCdZe+J9pIZ<LflO%lO{t<lEs<$Jf9YIsP)d)$vaFe8+dd7dXBbwvXxW<>*K1
zwlMiA^6k$56Yy1z{|wjNRFhM`SNZp0im5{%51{<g*Ztv@`|!I(<l=+j9q=Ni67lQd
zTV9mu?~(BBj^6;^3onh~PlgkI6Ki}5ycD+n^%i)!<0*Kh<9EQ1eWNCKXw2{X;P!9w
zTcOC8!6!NYpMqC8{v2!{tFME<m(`bkiz5C_jPILp?yj0#1NEf(xkK^&peEN5<==-d
zhFc=v1Mh<08vX0{EX_Zv$vqnN>0x;JJvF&aQT{k=AIr}Z_htEc3i)>O-+(98cMTOK
z+dzGh7s0X<WPC6zn?dG(2`u|T+euI1SHiL-WV{NNT_FqK3CqTi@ma9!4VnK@Shj~u
zz6F*YBI65T*(5T)1eSdw<L$6)6>W?8-vP^Rk?~EiY#3SozXQvj(XG+{k6_t0GX4oH
zJ4eR<3Cre@@gHH?KiU<`zc&N3Y#~|vFVaB$+Kdl^Wh2SthrzO!WLyu+c9QWMVcAhK
zJ{6WtCF2dS>?>LQ4Z*UtWc5*oWp~N=A7I&FGX5|udrZckhGm<{_=~XYG#P&zmdz&P
zdtupcGX51TTTaG*f@Rmqcpq*SWaG(rF)Vve#`>L+Y(E*F0Lu=P@u{$ELK&Y9%RZFV
z#|SK2QN}Z{>_(aYe}H8}%H$t{WlzfFSHZF^W&9ObcBZVozYELel<@<w>`z&IkHNA<
zW#ONOWtYn2FJN4gjVhBL1j}BP@sY4>R~erK%Z`<C2P~Ub#{IDDTN$4N%hr{p_rGA-
zy)u3;EE`zHAAw~L%lK2UY-8!S((2FG!LpNOd=o62S=U7Qt+4E86(ipb%a)eqN58?6
zT`l9sVA<HR_@0DiZ_9XZW)|7rGF}MF4wvQcAXqlJjP=|>_PH$nm9T7enS3=YyIsaz
zuxxl)`{{RHvgc*t-wMmNm+=-@cD{@+gk|%~;=2Tv{V(I~uxx>u|Ifp+3ugRHST@3p
ze*nu~nDI|x*$y*)9F`q1<7Z*n6f@qBTPoQXGkz5;TVpof9SO_sn8}ZaWrNIkEi8Lv
z=6^jb+hkUr0xUaa#wA!b%Z%RzpXK;sShmcpey@OK*UZxUEG!#mCchb$y)%>F4$JnL
z#s6bicF>G}3Ckv$@$X^TN3-zH!m^cSypUT=*-bM(7?uq+<0D|%Q!_pumTfiD=T=yD
z)=b_9%jTM;pND0C&A0^17MuBh2Q0g67T^0}*=RHQCt%rYGyYdtw%e>dz6{Hbo5lZa
zST@~^e+0|EoAGW~w%&{%hh_K8_;0Xmz!@*(mRt7Vj1Puo8_xI$Sa#x!kAr11&f2dT
zmi;)(e-A8Ma^`;kmR&jHA}kwo#&3sZZ_fDrux!s6e;k$_I^%0$*`zbR36_02<J)1`
zs<Zsu56f<y$sdMg!_IgQEPHmw^A^xPr)0c8EIW55e+?{~cgD+M*}pS>BP?5Z#vQQi
z;u)U>%SN8@7%Y2v#^=JaooD<WIM~sP<LifE+0--nm9XsV8D9^}*50=0|Ld^q?pb|&
z50(u+YrkEv?D3iWVOX~LOuh$}oj#M#;}MK(_E~z1VA=08`Kw^r@-sdPmR&#NlVRET
zGj4}v@6X~p3zqFa<1tuv0Jp{RY=&hM(B$uiWgpP^pJ3SvG`<>^-9Y0n!m=S~{B2nF
z1dV?P%eJ7U_aH1ggC>6zmd!!y&ria#Ke#-u|7v(7C0m46fBV6*OL$Gp|0`hGD75+Q
z2w3(CE&k(R*)BA0hGoal_%v8H4UOLn%f6xU*|2OK8lMXXyN5CTcf+!QXz~xkvWIBA
z9hPlG<LhAANi@C%md!-tJ7C#QG`=5}Ek)yB!LqAp{0CSz7L8^6MfMi=#QIwR%l4wl
zUk=L-qqWEDVA*6e`7yBUGnzg%!m`z9+yTpOqxnA*4mKQPeT=}e=V<=RuxvY;|E;j>
zJeqtPESrxe{}?R$kERcwfn^KQ_=~XYLYn_?!?F=+{9{=5B8?w{WjoUN53uY=8nYxz
zWK+`OUkJ;-r12|Y*_t#y0+!uL<Kto3pfp|s%O0iGZ!av{lvdt;SavGS|Jkr?R$6|}
zhh@Lg{J$5LElcCeVA-`a{tPS|m&P~3vUhnY_X%2W?u3Kw%h*0Ygk=ZQ^7o*^7qj#q
zgJmDH82vvD%T}i4?}a?_mEBB}9|X&Wrpb?lWlz)iL|C>pjrH4Y+1a%8H^8#FY4QRr
z`<upPShhIL|2tvX<uti||1BGxCcgrfy-wpDuxxi4e-)M;Ps{&zVA=Gv`nwmFeNW?G
zz_Rse{(lF{?x&^y7g#nxO+KIJTCxXf_mBI-vJGnSy$Y6{P#e#VfMqk(;%k6qKh(Gt
zmMu}^K3H}|ExrOQ8>7aXVc8oseh(aMkH+@=Cs=k!P5x<EHc5?dfMuW5_*<}Sl^XvD
zmfce0pTn|YYW#ax_DqeRg=O2+cmXeaW#`oRAXqj}jhDc(e`<UzEL*6?t+4E(8u!7n
zk!qZWWiQou8kX%;;|pNfQ8m64mQ7XTt6<qzHNFv+tyQc4TVdH<HNFQ9Hdtf*{v4J)
zRtx_)EZeNce}!eI)p+3n)bE8EzY>=HR+AqE%a*J0iLmUt8n?l+@oKyQmc3Ww0xa9F
z#+zZ;fi->)ESs>#m%*|RYkUnXTd~GphGjR__%>KJWR35EWlz@n+b>|*mbLo&Kd|h~
zn*Vvc0+P*H<NftY=zSU2!Lmhb@;AV;OKbc_ST<^nJ7C$Xwe;Qs%XY2Fr(oH!HQox#
zrmgXZVA;1dz7m$LTjT3t*}XOXCM+AcmfjCx*~2ydDJ<K##=nJSC)fCCcoV!k>d!vB
zD3JYJlOF)fmag$@VcFF+UJlE~uJOsR?Clz#3d{Dc@#(Pa@LK*0ux#?0d^0TjyvFZ^
zWvkct3Rre~jjxAg!`JxRu<ZF7-v`UKuch}8EIYr({|A=MUmHL7;+3E5{~GTH%NDTl
zD`D9MHa-%TjbP*BVc82dUIWW^u<<%rc7%<GVA&M5{G0>JzOeB-VA&cr{s1hy!^WS4
zWrNuGIyl%Pj_vt%Shk5x{(V?>ijDsRmd#@0-@>wAZ2T-NTgJxwFJ?S&d<ZNX$0k1p
zmc3)+HLz?SFOKgA`e4~XZix9Cgk=-i_#9aFk&U;)vXyN70a$jEjjw=ZL)mx-EPKk9
z{>`v#D_i=v!LqY#@_S&}TsHnWEc?sm|F^JgF*n5gJ`Kw*v+)af1uPrQ#s|W(*KGVc
zShkyu>tWe(w)=%Q!LsRW+z!jWv+?P$Y&{zf!?OEq`7Ob+0d4#aSoWZex52UvZRNQP
zmYrzht6<rTw)}komi=hsZ^E)AZTvl0cBL);|A1v<+W0rH>`j~hr(oHhw)ARv(I-39
zCf^^HO=^?B5|({xTfZC*%T~4dKMt1NYU37IHmr?%VcD}b9)xAv+IR|<ooh?)JXkib
zpNZ{z5iI-HCchMxEo_rt3Ck|FmG^pBHnJ`LufwvJZT<UBShllG{$p5nw2dEvWmDVu
zkFe}(Tll?s@hMx|mfrrb>~0&^!Lq?^;g{+~>6bEYfMuK8<jt_`bQ|}<ve|7s2+MxA
zaS@g+Z{xSavg>X6doL^--_~9qfo1R8@^=+1+uz1Fz_J5w@qH7PO>pDy!?F)<`~WOl
z;l_``vKwyvG%Oq9#xJC!$ey_IL9lF#9}w?HUk}U9xaH?KST@Jae-kYG<HlXEY>|)0
z@#`#DcF8UL1S}in#&3sZuiWbAeXwko8(#*?j=9BuH7uLv#y7&UZ*Kf8ShmiM?}laf
z+}7_ufrAb7sK1ZGvWNa)%<q%1Y@=KFTDF|XPP(<%{;+JOTmD}S%YM48pO(S0rEbqV
zPJm@s-TbeG?el!^BYTnWbnlPf4BzT_6xRF8m&W&<<M1PgW&07%fgf@_3-2bpz3+dg
z_*IxX<vF_E|6e3_{x25)rY85-82@GPg55Paod>S>vsc2`{JbW27tfi+*TR?Ysma|&
zp~TlK{BLV=U*)}z_-k;(kJ9}?y1)GnJWc##(f{}1jZXe!*gjT2`9EgwYk!9PDg4*q
zN%8##mfZGl{0U|=W|T7-zY349&*ioT{|6?u@K(n!gdcl4+u!jr_|Rv_KmL{fI=IHg
zcLba`UMY?r%kOT&r%nr#laW6|er<eI`!u-l+MjWf<2CqS>9_+v6kbGxYOg-H&dJxq
z-TT$%PDZZ$=3)C-e(pk^x-Cp5kvHFy)!&xq@js4@cJsd#xwsPt#s6NhOaD?>Hr=m@
z@+;s~POkDaJKhe@I^F@Vg%=QB<@*xc=lC1&Cg=Y)IPdre@TlYa;AzJ{gNu$IRd{U7
zA5OiiJb!{^i@ue80OG&FvP(Z2%k#olQyy&8k3{`H5SG1qRgnB20?T%NKJp4!cI+8u
zgZz!K?A~kGk-oOUvVYHOzaU=^+sE3g0eR}SFxiA$d|FKZZ1|+ZGyPWmu5w&L-t721
zcq`>Uln7P7?}T?ceh-}B-{jliLtXd}!Al%}6kh81a(KDpE8&%nuZ0^Ne-4(7{x_4X
z>hC6at&`sZZ*qJme3s)~@J7cE!+nmQgu5N@Q%C<My=P;3FNWKl{N<8!Ccsak{4lug
zNa{Os13V2s6!{c*<I>vPsj)rQ!8&8$+$bM~b?!i(=XomMW_ZUTwYjUK{6e_zP;8RN
z@E?Q6Uss#EBFaAx>+FI9V)&cjMcDj5EXr?(ccM>V(5JiMtB$J8m0_j#3wZIe+T0%_
z{{hzd2d1yj!a57V^zTKlA-}Nc>%p+jQAo#|MadFa=P8)~V`2N4zUoYZ)NNt13c2{T
zI4D2e@K#sf>){)bzc<SBu+Bs<|0VbW=U@7Lk>gq9+mFxm|LyQKj^7Pm<yiW>!?E=F
zddJe|TO7Zi@H-t#zi)Lc{l4AtrTD+m@#V12aCkJ9?^^gN&UTP}VAaQs@X{5vxj#qw
zcVL|XF<z6({~gx35b1fg3zJ{N?G3fLpGN<GQuyO*bDxOg)wA&J#Bchs9~G&yB&@w&
z4d3MQ_j>q|H*y|8jPFGF-Z$0eJ|4LPZfLB{&Fq!tXA@jpRh#>6l#j#PX%AaZ%)&aq
z!u0DxSm#)1{iO1K6xO*E#-D|C4u<L1S74ooVfnocwvXwT&ZJ1)7A8MHzWei>M~cH<
zygb<jOaAMa-=D(=oRH~<^k=bSjgJRAmOkxv^&@?H#If}0A;;3EryT!U`E~LA4t~bT
zrC&KGmp(0U{3racf~`KKUyGc4uR|E0Tzvb&dmJAKKjHWgF=upqmTam1HU8GQ_?9DY
zKP9W5H^JSGyWl>@XTcjCkHKd-mj2hc_%|ch86iK8>Awr!vmTE6y$!y+wKjL~UTOZW
zfOW>mp;7*MSm%ytpO*4}3%u#H+T15&e0Rc0Pi<~R4F3~YXO--nm-_z|eD9{LKkR|;
zI<q!+-QKCZ_E7FO-cp;pCC2wMc&#f>9o+2r2zZs_m2g9UZSF-e{WS_tdN!V&0qeXJ
z>kq@Q&Q3A?o`!XfiuH$g!a8^50KT+7*aqwT74!cw$>YcRLp$=+iT%aM#q~I-zIMP{
z;o-<%f>&~e%4Lyv!jB-Q*@FK&;l)FouM+t_c)=j;5&0)vZ0F1rnj`ps7+#Lt+T(Hf
zZg@?U{~2CFd`Cpy`*r9Od|c!g!rS1JBEJ;A9qx+!YIt$JHg{y?!{KK5%*bzmx5Fn!
zJ|2D$-Ws_HKC4ihyD)M)yveoS8Sq2ME&c+$i1Mw9{)=!o{QAh}!L#s^$QQyoL*`Af
z{XYP2J0t5)8gI5b)_8M)<4f>=k>gLm7dyThzSQyO;OiZK1-{YoPWTqbx5GOf-wi+J
zco+PH<K6Hc$B)2IIer4Z)$tzqcE^8%?{ZwrM0B^~1@ME8UjyIk_;7fa;}!5Dj$7f~
zjyvIp9IuC;ah!+quDvJW%ba{OTytjDUhjf+9+36755hVF=s#ooegbZOcWv&syoXl*
z`d9eDvD(~6qCR{b);U7kYGZ$b6Bqw3SZ53k&|?+;A;~#==<+xoJqBN1s?9aU@#`5_
zXAvDnhU9-=6jA3BS$}&OtaFNN{5S;ON_lPmSO#xmJV6b^c+vo0<I2AZzT9yeyxnm(
ztaFl9#qejsS2_70yu<NZVV%WvAO4l!Sy<;a+4y`Rth1YJKDrdX$%VfX)|pO!h~d8g
z>wG7wGsO1|cqjQ`SPA9%5v=o^()-0l$uD91*!ZY3m{PZe$#0R1m&f*e65e`t*8b|R
z7dY1aQXO1J1a`l)%5k_Kb^gQssAH`UMjdOtIqq2Nfudur2c{is{-1UHH}YGDK3V(j
z%Rp4exl*T)Kh^g^u+EgaIr8h_=1+0HSk$L_SZ7e#{YeX~bE%qRee}ZDf0A?3V)#K=
zXII@8_491_P|mHA+A6*CBzO6HAN<(WwYg)X|4+h2`26VqI#}ml<syF-)>&BlM7{&o
zxmbnB_rp3z%hrd#gms>l`Tsp^A8YS>k*99_-U#`2!q?!S`E>8Y8E=p?OojX}fS-Zy
ziM$xT`&#lJ`4BkAnORhO@Q>Z6WI1f}*@>{u*!ozM>-S1KTzyENu6Nvw|Lw3cD1BNB
zU*qIm@Qsc)z&APWhi`E_4DWPYgmuQ(Ow7-_;NoW)Um{-uFW6C=D@Fb^ycO<`d?UOY
zUK#mY@By3~)*Sh6_$pVQzkqeFnB8AK4(qJ3B~jm=gmuQ4em5n3nMcLx{4teZydSKy
z$gI6z3F}-kyZ<}_);VSe<6rG}46O6ato>KR_ObTYnO~{f!lWH}-ThhnuY*^?Hhv7k
zTOH593co7m_Z<p9L3U9fwbw=BbF%S5?OlUB)vp5+wRg_3+B+F1JpQb`6DL>u9qQt{
zg!q>@{%2Tcmi=SwPioKRuW(Ks(W?H`o`>F)^>?-BZrJ7{wdd^3wYl@6f3@cxxET2c
z;=jt(&#mw^j(-U6cKUT6taH?KzK_yZ|7o}-TR;C2`5ySJ82=tvXRjR)_2I7yzq2-{
z-?=ILzAU_S9-HaIfw0bIGkrJ=);Vpa4=Z7v>t_0}3fB2<rVpL4eM}#AAWz*ECL8`6
zxqg3Dw~O;I2_StN!2fo~6L8(XbJlB=&%!kiaL#Jvi{Pbjst=2jOW@^>{~2EC_*%HZ
z@t5F}9Dfa7<@j50GrTnD)1u@KxcDDgdiTL9Z(pq6M`3=zTA2_22;X{N`ukwrFV`+*
zJV9>#e_#0E+p_WRrEs6)I(Qp=3el?lmcqN>vB)doRZf48hnv4c{YU+6f;W}2{?Z}2
z^RM?88y)vZetT{1Kq^$}oe7_HS8eVav3x`D#XrjW!`bk`Kd8;MM150#+_qqTr9YIA
z=kd>1i0^G&6#p%|U%CLEcJ+BNd=>J;V|w~MWVg%T$C2NCPi^kr7~i$<Zsg~~>hE7r
z_<K3?F^2y({KS3KcP!7{@HKzqc_Rv}^6CDd-NpY?<QF_Zf5Khz-@s?N`r89<a_Kz-
zUo@XH^<sYJA4U7Q_!h$3|3ZI>>DR$Gy_9o7qyMAe-G8pleLeCqaLqpRbETO7H^H+x
z&Q^=zJK(i0{&ld<e0y#5{}#zP|7~Y%k1<$h!M!ocr(ye8f89fVQn!W4+mT;Dd$3I}
z^v4Tf$@M#5)yD_n*>a{&AA`5T-NFBX$*16Zo%}lZ5yv;ecRT(j{E*}C!Mh#b2XCkT
zcg6UB3hNBJ55daMBk(Tg|99|%j-Q0Ly7qe(*7<jKzq?==<%6eUd@qG{HlBXxsrX+5
z>zq839|`Nsyl+SU4Y1D7v+;9{<nd$myY!V={dOY1-s$^B_(sPg@S^FgeoOE);SV8B
z<>!3(04Ki?UhMdT@WGC+fG;Eb#u)xz;3wdL$Tz@!ubQ9RKeq2T;L%rS<+&4H>Ein#
zd^hq#WB3Q)Juuxq<nPz;0d?~$&!03N)VT0^|F*#K9{fLsfBkM;<@*b~__gyZ{a^3j
z>YRTWTUp|GA2@NW_j89jUVyy$kombIV*D?Li-&S<VH_V9!xtYmKlhR-e-(Vy>oYzS
zzG+FuN5FR-K0o*7=zlr9^hnNNj^#fVegvL~`g0Pz@eTCP*nd~U4K9Cr|G3ogTI4y$
zJ@9hJXTbI`{nD9<soTP&fL#2)aZr8g`AGW(nLepKnjPzT$XdsG{?YAN&p$>T>-opH
zV?F<vcC6<gvySz=;(W(?Ua{4&o>yGpc#8aA>{!n$E^@5r726zNi2q9+Uka~s{Au`d
z$2(x1FKO$SufjT0^61!}--R1EXYvbiez+gjIh6ZFefbr9nTt>N(?!R7kn8Nqe~Iz^
z71kM+7svMBcRBigD)xI~`y2%4Pn@4SDeB9S@bdQgmHVL+;ZgW4(SJL<82@dN&w#hT
zG3(D0u+GXnI?B(7b$+JZU;QJjb2RPw#Yf>)=$GB!ej47%c!ZjS@&7u7C;fNC_}VD%
zMpxdiAz$0UnWItu9e7vQ{L1r4J^$F`{6C2NV*LMG^#5x(-^qEjvA*=Y<1FW2&rA9o
z>-k6C@gE4UvqrCt@yTF_&Lg$;*g{xmlUn~g7}go3nora}mclx(v^Mhbu+A;j_@?z}
zJFN3b7esyweETgmxf9?Q6MhU{`;z(L`KtI_SnvCLqWmA=YnVS5M*c8-_gB;X4)T9F
zTu1yTA>W_$u7WRSf61ok|9bcl?9r%xU(DZ5_$m0Kk?)0boKreN{Ym~X-2BCwO8S3*
zyZ?;+so<Yn)HB~;51}ja3*hATnlQg8KL@}yH>dkU#IJ;PHmmAG`8x_;ynk)3H-<kE
zKA-xKKFa?ZSoUa8cl;li48l)5NqIv47A8}$ozuEMCzZ~^i|3pFMf{eR`s4Y4+C%YO
z3fJ+z%IfC|`KP?^ME+X-z5y?RnKnZC?|~a&Jui7Nf4_ncb>;gbtdH`yh`(pxtD-(B
zzYFL%TWQZ*ktzLGz)wAcJuo5@9|o@_ewGm-{^Q||@Pb(Xr^2J~7o+^mlGEOLKA`Z!
z@NVv}tvnNO_Z{pfit_W|ny=S{`$hSG4}AX7^K&dmL-@<!<^$&Ez7_d1@OGE~FTjt`
z{sU3|4Tb-5P3}#R?|^q;KZCCj-+f$M{IyI!cEg+4kFzbxABS}Yyxt!uKYxL@y7t(c
z2N$!H_x>QqHXXc`_t#dwgW&G(*5p>j@JGT+{!$a}4;0_Y@Wu2O`4^u8?<Rk`-w|(s
zufiTis{ad<A^0NFJ2uvL88-V(FUDfsxp3m@cPl)Ke$sp)zW2d9Z)AT_2){7-Fnk&D
z>HVerTrH;lI-~y^;5wdnT6u1U55AN8;eFEn@IClq$~P7L-wR(ud|wKT{=r4`@6;%N
z9NtQM?;H7V@J;wXGx}e24BZjl0ZYG+hI9AV<gT2b=Km!47TR;a7`_F5$o01k@FR}L
z;9bP`Qsys}?``m+JF))~!(RyBx`_MN$RAXA{4b!w<^R)g1N}ek&x?{9;HQvZ9sIME
z56-=>Cd_B@e-CW-vKG;P55RYk-<QPrAA%R-e@_hmM|k!tHM!43xhASjuKgClmoXkM
zMy~Pa<?s^1KN`ay0m~kYjjyZV-A@13!naWWhsXGP;0D6~Jk)0r?*A^Qe|;<J!xZwJ
z=%@CBNdL}*b-sNrrvF~}F;~A=!?Wa1^MmrY1J-)q^z~+VE$OA>33UN$f7;7p{6B*?
zBEK#$V<l|%z4phR)-&)p_K!Y911LXx(Glxtua+48h43ihcgOHc#BMw}4xU9WyEbZ{
zQ{Wu>x+aG2gD*lZyGW7`!_$mEABplJZ1&9RDBpSTV%kgV5#{II@N&j?)Hv|P@MXkT
zADDA8VY5f|;^alxBA|aDPun9&z6uwaZyt`}Z-s9{uJyI@^J91s_HXK<{2};u<Tpq8
zlW>mt^^;M)4-1=Zl>eQP_k(x3@oF)wGs`zb`62LK#D4<)S>-tr-bMVM3-Tm68D5TD
z&%-3|fFJvl>HEUu4EPcJ>$#-z`&L-?!mPi%1I|-F?~CC-0Pm(h(5xZ8kHb$9-sY1X
zuy6k_!rPgz6}QsA1<q~D^yO~Y?8WVm<;#cR#mFBB{*&ZS@HNa2Ao}_HXP<^2p+Ahq
z_@0H=!iPnEArB^&5WXoeXFtPFIDM~&bIcbPM*nYwck_JE#>ZB8$4^rGKgw@6+(3Mn
z$M}ZeweZIxPs80jZ%OrKVX_Urfc02ffBPk$fEO_Sn?8O9zMk=GAf|r<ypi~<{%(Uu
z;orpg?}tr)7oooo!3Qutuxt$d^)d1H(lgbS-)9w`{&jkc{{<}c+L<p(kq?BIGCwSi
z{2DC;<EM`A<?t-&D}J?EBIB~MC%bIux#zrw6Jm!-)8*-z;bA-!mmSS17tI{y(cj+I
z+t=S8kKdf;ysni<@>BgI<5Po}!4Jk~`v+!bacx=K-`dmI(bB)VWldWrfs|Z&TvL*s
zlCW&WiX<4Xjjqa5yd0h?={TdQVBw$0nq1;O!C>?@CK&v*bT*Sz%&kG1kCY|{$`h1n
zYItIre;jR_ln0aYOi>5zVCdalhNBkB-eC)8UM3uiSS+Uh!#PpWrGKO_&6#M0C>a_r
z3{1}8kK{OOW@fsaa8v+iByjv!|G+TU{Y9(=7m_UloT4*R9vCSkr9zQ|UHc2A(o~7O
z4Ra({IiV)DlsJkrA%n%z6gkJtJZBP2j`Zs+#w7Ue4+SX|MmS!Sm^tNu6#EG}F+dcY
zq*gBU4^8Al{?fEKhA13tfFkImiG(2GyEuRiV*UyfoXwg>J5yF-`NH7L2<G*Nr}$xV
zIrU7D(_`Am+|&^D*FR7isa#W`#gH#2EGMa^C?}Is2}X$f(}E_%b@rCvP%eyEsbgiz
zH^&M^qQvoP*xErk3RTTn9W-vJ^ofCS3K?rt=YMbp;Rtn%nwACzD9P9~G!k2x<3{qF
zK{hp6rbfz~gF&TmIW)=NR1)p*M^{>6c#N|!f)~yR;9Nb9$SX_~%h+C4Lsq$Q>ROcp
z=jm0rI904%b8g$Y^bu-3G=$3BKRGioSSY1u=u)nU8P1U{j^k}yhXWN#(;V<yN=lqc
zmQU1K!il=N3dh^(Vq9*aNaX=yplqC1H{0LX*yygC-F1h%?#-^7o7}bY-`w2oeKq$w
z>U91(n>)S7&Z=NN-R+gwS9h&*;a2yyW|H0>cfFypJEJ~#nPqf!p9|2JWvr>OJxi}?
z^@d8|rsmVK>-H?7ruM8PP3>*YkB_y(1?b2!*VNJ7a+)i9U{_6WdrP&vy=9KPZ;rgL
zTHZM~0UYM|n43iB+%!7d=OltdbsSwizR}1w4%I%YbJ@E(tEi6dURQ;XYYoUXK}YvG
z&U%`YQgEscv$1LI8Xv!SWy7&^of=#wx;ol?9Np{MT%OkVb+^^~0^rbF-|ZTEeP3@|
zy^jEg-um7uAI}Xl*Utu*=7#2$N`9MNk8Ezts;4<CKywzfxg}G!=C<`&EN$yu8IZXA
zI^}N8I!tp`_bnYAS-LGcs;d%j%W3N>*RAy%J62@WxH=2e+UW8q$htx6YS)QcSNHZg
zQPWx%MN@mr#w_-xj;{4t4YUT#DlPCF?40AhbM;&gbJ-P5@q6sbhQn5lJj>cTkS_w~
zp}AZ`Rp`n`(^VC|xy`9it8Yw!iv`LWM6w<ytZKW~mQI(`)}9tu;<l<LYNJqDwnZ+^
zwyMmCT>5RkIomqcWg}{9TW56%+dA7aeQRX}=~Aq!iniW$uJJ@JL7!fGvs1wK=B7-C
zTicskI<x)&w%5DT3tjRcPX=vLl;_SWblo4}8JW+j@&c~bI;$19v$}mdtD2^>x@tPR
zd_294>s`(}d;5Gb!K!k?ZWL|pZtQF9%(C0v)8d+0<m#`x%4-i9?sQeu)63F3i>W$O
zy-cMpkG(B@-7cNpHkSpUsmpbP-qU(qDqbh53p%HqRr*q0<|^d@TwPXclE?}BeB$e>
zI)upeq<}7@crH5L*yt*Q`6;W#jdN;sV|BG|?CWW4a<y}Md%YVHMcrBZt!>YIwykyx
zlD4K6R|i#{xvIaqR-%n6ndEwPmB`KKZJlm92eSU>b%*QaSw2NayV(1xL{*Y5=WTs9
z>9uvPZ|}|~{kEPKS8~Algt9!H(zG$_x~H^Mk!!#9#<kgEv%N7>`u66IjZJRx+1{M#
zaeGU)kmlO;SQc27Vzjrq>osonZC~RAZC=psp~Ka1dskz#U%*DLcWa;au4dO*qO58}
zS=F?6xgkf8^=47$9L%awQb)bn@Zav19PMre-qF~5Dzocpl}hPo-00RSkPFzs`J`FR
zKwj3BjqgO*=sk8hbwReay;``o8r$b`wYa1A)M|%LzeFbb&OTR~s-ktRcMX6~*8n0{
zG$?Bh$+Dgft*g$!8BXYCTuneO%5}a8I$N?H<L8&ouB`L80lurp#niRV`B~TJiiE@!
zNt6|$yRqri-d?w^OdU34Q@b42^;S7FyLE0iOO#AuMK0xlZ9X-`)wphscao|ooq~IE
z_nO^}+@v~>>sx$|*RQFj>O|JBagl~QJm)*GD^TES|7-fH{jYI@SvUUIxZ$ju6-8g0
z^WVaJ;i7A;clR~jt&L6Dm=5`xW%<m#X;x(Mnykxr2hLQWyOmDreA6vGIfd+Q?P<y;
z!a!|qypImqQVWOP)8_c7S|D_{`q@2DHa>IX*6OO4!NONZM`P349<MMRQUT|`qtQ2>
z#vxakpj(r6Yb5g0w$3VP*Lubb*D`d>IcdvbLpEh}2Ok?;3&~-fPXeySc8}}Vw4C7+
zT;E=eoz>{cjr`qR-7Zgns~*TD*wvlQk%aQ~4tbBReR^72Tl(DkhXrVG=<IW;Mz_A@
znNFEgwo<T=eNK0xFPC<2W3zjz)7`svozGcsyStU>hFlMTd^|nAB6@p#MfCPm#nMw1
zOHWlS>sGrKLXTbLLVmCkdQ}zs{H$ADHS8d+8rxv!dtGOD)2VBp>*AgR@T^6Cd~XOY
z?av9-{+v+lRiS#b)ou5>-nFh>MXtm`pUGag=u$|pQ9|c;qnoFCnz9uKV~v}%AUD7E
zG-Z0&)7;@!aXe#kPwaS<wbuLW>&^OPPm60KAS(@!DG!j1l|Ytrzfk2m>p?&^g!Xi~
zBKe~Bx`(ely?$ZX)0^F4FoO2@^+{k?6TN<U+uN9>#dTKJUbpV;b$ZL4o~r~=Rtuu6
zu)REeXv!v$UccP!UF(uv>pGCHe6C&G^j+7uy?%{cRTaJNMvZHC3md4*C+3&ab81cK
zE3MB}jhmC1fGfjPZ(sH80XNLPsvuV!$W@hF9@BTT7`b`P)^i#J9IbcS(7WDiLoW{`
zvp7!I&AF@Y(|fBQ>Gk5U(LI=fy`J`YZ4NiSE)(nA^Otqa*;u@eC2J)I>Db~5k`67-
zVSP(a*5`n%W;QgsoNeGf)UE3`^!RSPp~vgaM!&w<=<kNBo)>RyZ*&VTKdx}?GN{La
zLqnAko#L)})&bd@GG48uue6pOcT6%qIjmPW%Z@u%uhqiqGF|A6V=8D^o^VF_vW69U
zdpA5Y$(x;l>7h|xI1LSq50&-CXrwSXq}O{xqXF#|T48{9uao)B1LMos63FW-uJl!2
zwt`#j@qxj@csac0;a%1MZ^a6Ey>`v_2Z>%GZceYpbqeVCaH&wBaJ+RL<W<?(32zoB
zIO&}CP~mENU~D|S8Z8Xu)7OY4V%J-<a9n!&@{!j}XDb_H$yk}t6B7d*6VG|2Dl%^%
z2{4&2jp+bXIdS+mE(7^IFHcF7$oL;pLXy6f<Fy{Al=3FDIK?rmyf>YlE*FNT6P<V(
zE;z_kZ_)UoY=zl0j<UF)LXS)apYc+$+RIp7t3~vkFHi)kD*&;Emu?d9mT*unW`n1(
z5($&{Kzccsd7I8p3=GB4)9H&*;vV2n<>O0lOL@nrOG;Frie`BEOVLz0<#2p!IG2^P
zV#|q6j8zFZH<mYaymjWE$~e3w&-+-SNFy68=TpKXIi*s9j6-4_arSF9@rt$Dp*WQB
zU>Y-RSLCSJ5S`Um8uvgxcn<GIg9|S|XNqa_#k_4PjZv~7RHpD6-;M^SN>vBSn!bV~
zDov^mncLK~vh7@{ge-~vG|A#Xe%XqZD^vI2^xS;)hpG(`TiXW6R~k29rFB!EY4gTV
zS^Ex=DcV<G{hZLw!SSJy!)5A9&rRKeA6^A#gkDoSG%o+uxRVjjolyUwnyBcJG!|=u
zG@($v;c{Z&?1D8%>a)7SgQrS`2g)iupsF!kC}6C{G?djxIgANX#fm?*s0IOEMhCa5
zs&*~}8k`zu91AKJAiZYefc9F%2-6;x0u@xL`ZT6ct<`Q+qk3Bmo;62dT&)p0eZS5#
zhSTciLc0UB+kno+5HmooBxTdYj5dAPNzQf=hFJqOj;c*n6neZu(ygrDL=1(*ONhAA
z>m;mnNP)ClF$Hhduo9#?tgEVK4Po$~btAb{8dZ?BsgdhLa#Abn+cmOqaAs_rVx`Ag
zXAbl-O$c%rrch~31?{XvlDa86rwa;@szMZ)ue5<B&U#sh-G)#>Y}9bcPLi;<gnY9(
zh&JVa7`NF8!&PB|kyIDMX`Pu{ed>=%C(0)aTau~L7&|A%$AfHeW}=vS8Z9uzDd6C_
z3|6|>GF8fli&Et(U%3ifkb-nJ{7<JE1=C2LMi6vEPV65ll!i2IDDm+^7~OSQoEfCy
zQdhRx%uJ-0(#II9GLEWNns<1tR8IG*3{0L&`;D*%h*-iDtcx&LGKB;Oz5|a<6a(`e
z<tZ0tQ_gRpWoFqMG#UCq8e1WaOZg`mChbDLOi9Q){i84vBIG+nC{H7$Vznn6f+xN!
zo;Xar6tW$PH&ZSgUC+v)T%O)Cl?=_4O30O3kg~xkwmPv}$52YCPK6OeNX`kv-mn7A
zpXx!Sx`I5UIfdSeh&>!>u4{DzeOrV~T!AyKj3L65uj|UVBZ#Bc;M72QdRhI7<;g&)
z6iUo@st?1HfkQ0m7&SZ@>H;6(J3lxwI94fKN-Pzn2`N-cGEO2YA{&45Q8s;UF{~R3
zktq%vyOP1F()a+Yx^z#L7FlzgNL*{JfpWvK8XoydM@3zsYr!E7gyA}jb<-4SB$ZiP
z1Yz3a!liY8>Akjz5pN~?m57RCg&`IL5~}(u0poBNI85vPVayGjwoi=Sf=u_9G9R>R
zXrtggYrcS$HVYJomGruzVKdXEyyl9Y=C0P(wtT`sF~KIcnc*b;N=unu=QU=em&^ns
z)1z!tEEJ-5qDd=LTCB!rPUJFO)fGn4bsd>yA6>dmRd@xeuDrCwX+5yWOj4%5Y71cI
zK!>h&&>}Yz=f~O2rqBZ=v?i>+rzV%JIA(cBvC=k5UTvXoYuhwSX{G8qt5Z>>N`tpl
zv(pgPWkZG5TaDIJrLp5lX|=`)y-<+uVk;~4xLk@tEqhaM<ye!kx`WR-^;KO$et<B{
zw#IWOmaRDY*kp|V$EERC%FKqs7`cx$)<V6nhI$PdLAgS@RTWWRRTKEERE0uibwOXI
zD&ihZuEw-IPrELM%1I?c_JC?TsN>%0fuXZ|b;B2~x^=^YJ~fs`y2Ad?q+K&bydEnK
zph~1c8M#3SD<X!*65~d?I?@c+U!6pnrF7?L+&(x)#+I$9U!Ji4G}Y{WcCNC4QcB)G
zo?UV$H&kNOo}T4Ste6ayr_bhAi`xO+>c$Kdr&ujYz)fIbk{eDYvT&&lo&5w&ibd^@
zOeR>K4biOzDR7ygZj@b`69t+EZ9R_a8e-*vswCx*Xk{EsQ47i$CJyB&-Em5)sIqO^
zWNs^JKumonY)G!uu_jiQ=!|S>aWoGGzhn7iW^(KtX7cFZBM<8_%Ap;Y=^eCg{mUT(
zREY}#^~X)7Mcovk6co9#8<<P$aH?4HfpW~|$3~d;<&dsybfroy2DdPTm=n8Xb;+o$
zFD=eUAP5Va3*-HT>^i+t(@30-QM%%;BW`a_CP3;x_2BarMu!lL4x%Y0T!(fJS2M+N
zC6_wqr?yO{sL6@)Xzwdk!fk8iDjnNVW|IuEIXPg(Pg0RqoZ^g-XCJvjhArde(Qv6L
zYBQ_PDcu~?Ck9IW(&uDUj|fr+iD}cbC&?dchGH0(wG@!bXtVEZk#Uj#D+o~Jk%Yoc
z2ABHq|7bOAX?gh1vl*`I!~fKMWw<^j{697slsJ9j5}x2p71Ku|Z=(Xo3Wb8k0KU>@
z2v-a;)yt>gnyr@tW(!H42hmedzZf`<HG!<@0;DrXSS$sujDUgC__a0)sPQjc#IZ4j
zG>Wh;4nm7k%O&R!*2a$0#d2_v&QiK9sdw$DV*52?XC;QLLk9mg;s&TpHi4=ZU7E^*
zD@r*~9vb5zlWG-WU=5culjqEE12{a!{1?{a=3zWv@jG790&1McQ*m2<O4&LLQKi~a
zS=G`DvGt3Ae0geE>ojeL4@<A{Dkm+y%Iq&MsW#brUql0j#%J>6S);dpcR;nUUmHmn
zylqNRpzuI$iuDC$Om}^2jALjX&yQ_hwQ5a!+v=wN`en<L&1Lj=a(dXiX@DIqd6%#c
z9_KvG7=}USBW{(Z(0NOYF)j9(;HKd{(Y=!|V8}BM{TMv7)=}YzbcW8>&j`;1&kr@m
zr?wQT(vIn+&)E8#Pw#B(Xlr89m|`kP_t}R9nueHkeL&Up>v78<v07qO2$KXgI6URc
z6>jIJ$0iEiF`Zw$3uSxj3?rcxkl$hSkMbJ>ZmayXNkcHFS~JC8ON60s__>wLtX7z;
zYKr0E@tN|dPggY*o(fSSRuoCOq{nSEdr;3%f0L<pX#BL_&V<|Fn3uHjm=*i=3kmv4
z`jZBVIHoyNt;DtFCihc^&@x-nh@+mT&wW{egqsk{lb)g^`~+ou+~=Ci^2k$@oPHxQ
z&OID!Po9+I3quUH{Ai^dbDCJ>`k_Rcfe?a+xj~1EVf0AoqGca{rAoM0N|mU<Q?q<1
zj7pOJUc-kl^_`Udl06<2q{*clHp7z$tv<*w8lmOOK;DOsHyPBPT0rZO*x^fsiK)$1
z%ENDp3jdAL*`t1~Y}2x^>_T6Cin#DZ-@6QOuU6$H6zZHA=C>rTu|U&nviW&5jkq*D
z@yKSl$dfJR{leKk=DGUMIHFljxeLF1Nrtro_95^vnI9<SrTvA;GS6{BpW{X?RBOmd
z_^FZ)lr{o&SM__E*jH&hYMvWA4FzZ<;{a8YK4$QdNb^h=-RPpRG8;m|)aOGfX?|)I
zI*AS3QhU09_ZEKMRI2JmD#eiZ)8DWArnH7822k@*_hB6FrwIn>py7>!WImjA-HPIb
zs`Wllzt~a88o#OXvd|r*mFWwKH2L%i*7y`FQo^b!N|UV8=Z@x@B*t_TI#fK@$ElG!
z?O?-0<5Oj)#jI+g%A~7M@-ufrh{Fp%7YdIVtY1hC(kIyI+!qFl7#We4%EhWmQM*uQ
zmC1B`YU*rW2&6-OVRo#l4#MpSvktT0n0`_gezX>DVHo*in6ygDqjZ&|ETylS*ZR|^
zX_X&s^|y6}`QO({|C;u$)s5}_+}rbFuD`Ewb$biHIOK+=%2$E$X0SXK)i!;OM-?+T
zS9y!G+Mst-TW+B)H0@Dcx>IC)=9gmWgJY>>bwh>QnJk8|p42@`xW6gWP1Ip@U!w9*
z**NgDjJs$OicdMyz8BPrpP)TQMN(f`63gjKVI7t#n!R*$9gbg$aSOsj%F4)NNlb=`
WB~Vy|^!JajPKdptUrI2ic>foFDc4;9
literal 0
HcmV?d00001
diff --git a/board/MAI/bios_emulator/scitech/bin-linux/glibc/ndisasm b/board/MAI/bios_emulator/scitech/bin-linux/glibc/ndisasm
new file mode 100644
index 0000000000000000000000000000000000000000..dd14a7ae41def58b20bca94a5d01a22f5d6ab70c
GIT binary patch
literal 100192
zcmeFad3;pW{r`XOWC8;OCSb5ZK?el|S!5Fdw}3=(!A20ZDq@xi6Ub&VgJ=yT4iU#O
znpSPqN|kDDt+rZg5v^zfD!5dGOAU*HiaO(9MWv8xG{5KjoO>rXL$LMp`FwwWnMYpl
zv%JsyectDNmV55GcV?F7o_mIAnuh)7GSUo5oqVI)Gl?*8q2^68d`7x4!pJrT8a>Dt
z-lST}fP0Ax(t#VKfj0&41cwk82v4+WjYQxHwyiP@fyf(~n!la&_A%)m!O}H`k@JM1
z>J`3=V$aPrjpsf{_XrwE3&bv|<M`5&g5yhz#*~(nhn9}5t{6MPFou&q4h#Z4ffqRc
zGDwJCvF%WcaSUN!D}ET^P%AFM7~rwehg;!Mgrk9K2VoXC8XOCb1LA{WpbzK|#80Vz
zV^cC{u5kny1$sGnBOUP(j`;Cb+-HSH5{h4>{R6E$I}l$D0sX*_zyKhB**Z|Pw<De!
z9h{nBrIY<j+6TmU(oY1m`|}R*$;poNRMNg1+@1j80K9sdq+@Q+c$MyB<Pu)7E8UYv
z*q;*T6K;>VJz~4~ya3!y`cy(`Lp9iqKIvyk*Gn4yPAh#Q;VbaPZ^HjMxETH757B=&
zq36TS^uwedckrJkeG~F^gd)EIT<fU+CDIwppJp5({LSEL%8w&0_O^n-@I_A2??@W?
z6I?p|A?cGzUu*FbgbyQsf|cGwSPH+%O7AB;m$deuVSG!vo$~h(O8q^k_hI;_Tj@Te
zFM}`RQuqT%XTWF5sq|r_OX15{75-4tH^I04HInq*@PBIYrCp;fd1=pN(yutur;uLj
z=)YN{FN6Op%1Zh3NIy+FYU#Ux^mg>uSm{ehUrSo%me^BBx}EZWv(k%5KWg>QP)bxg
z($b$bj<oRWNz3|%ILk?I<0jHsF`bt2c`NA)&?kIJ-<6Vnfb?L-hs`$@ELd1pQNEx$
zm|qoKu)tvXDU)Sqvaw+1PtKb@`>fNA1!tc7;~CS>UGU>G&X}8f!Ga5>&p0=Cfw7>Z
zyd-EWC?+r#ob_WA6#1*F$X`HEUa_FGqA)*LQc-T?2mMPaiQ+;_@dAk}dBm%#gN7<l
zTv=689xO&dVeslo|AK;KELc%mah1Qykq%W>k}mU?6;@ttR0pdH%PLh6ATz&|s*U0*
zzu&0xTZxKFf4NcYuP8Q(3rj1i{UTcJ4~k5=$d(qBEKv%yx^hu#nNw|rR9IC}C3^FV
zjN+@RN`ij7-6iD<jN+ibwA3iB3<asX+V5X1>a+-vQmS9zFJDqpg+uU=6|+O_eM;ae
zeCjXC59U*>pt?HADK9dNCe|I94>I4=S@dOHNoRqS`JK)}DB~!d#Z|^@I)hWzfpjhc
zvykh_LVvD=EIfG<a)G!&LM|p3OUPn-nS@+Gu8@$yS|lM0en3JN;Zg}%$SWn}Vic5+
zg><QeTrjSc(8r}wLKf^560#uQAR!CqO%k$LH%iFG;Wi1mK-?iABl2zuS#a-_kO_Rh
zghLJE_Y$%oJ}e=N`lAxE06Z=s7o)Wja)EkULi}U@&5L|EHztWo>oy#6scD4&wn9?D
z^w>Ws71<ZNXMtfv=eI|8&)?8-LJra$!)HRJP{(lbT0o-logMrQ7w-jx7jIE%@nS$O
zaq%XV7H<aR@)LhlrNyfOpQP_qY4L7ggrpl)TD%+>C+S+17H<cpNV-y`#p{6_NnfGT
z;{CuZN$07w^g<v{(m5(Ey%D%r(&JQGdL?j$q<tzay%UfI#WPh}dMQvTX+x!@w*pHg
zz2{pphD)ynY9+l>rKR@*H%PigrKJ}GjgoFsY3a?t9g==jrKMK`_e%O+m6qNO{9e+H
zDlNSncvRB0DlNSoSS#sDm6l!)G)ejjm6qNQY?5@IO3Nq+v`9KfrDZe(S|vSBrDaqE
zc1qf((lR;%F-d2V9{*|m>%pFLVi(ZVi(|hg=kkV`kGt=aITU$6ysIrQZ_b6Wr@rav
z2*~9;Hd>XNhIn2~`e$!rW220(zfD1H_!OZ=uwP_fG_9j0yulql$q4ObXuY_hVTnPx
z7dPngb-Qn4=*^AhW<)b1w?9s`8|xp1qSx41e}6J|M>2LBu}sBnOy=E`jIFR@u>hOe
zj@h1YjmHS}j4xrfMD~SqGu&29LCQtzh1O0P<E<Y6Ung^Frx@N9F47%}Z5J{^>G2qA
zi%xr=$&9o#WXWd4i1w9rCF<@UZn`JjmgQafq!e@4-xhUyI(EjOc{jN|Gk>me|IM9o
zgM8r&@3LDu^Cdl^!R>jaQRfY&+%D3RKZW?ldU1zLY;9xwOlriht9P=&&I`yg7<;<C
zqa*yBXM9uqR91+{zQFKL*i<Oi>LlxESjcUx7pM9<_3ckr`JEmKW?1pWAj(^Q4fatE
zotF`HC0yg1BK6mzCA?0k5jr|r|2UDnz)8t^N2+==){5cr-?MH8E`b+SVtKK@X{#bl
z^-ZCE+9K)Z#Oc^R-%;+?1Ivl!iNhIdR+U#It6cN7cp+n>>dFSP<AZ71|4F-UPF8Zh
zu0*%1#e?hWZ;+<jExVFEF<lYCLoz(W>x63rhuh}<F{!DiQ`7ZmitKZkp6}*T@qc3b
z8_61P|4KPX+nz;@i&Cxs%M{D{yx3)I;%SK8fMIq6zDTM&!>R6hCQ+lq{?%#!SN3No
z?6LgTza92pK!qv3|JRAydbO0;h9}47iAg;TPCXguao8PaEB}Av_xZ{ChB)iHo9Vk~
zv^`vAC?BffvQ!Nhp+@K!+uPSBm9(}w8h?>q1ETd(`~_JWB$DEek0x90cvxxH12Nf;
zk0v!Qb87yEDbtu#BwF)gt87KTcPL8wwNudvPDPKaxhE3L4Y43E){A>whLpqGKV^Af
zjrl(r=Wit&^vC@USB=Jwz+QN^%TH5Q;&RrW0UPV>%SrqL78Yy?eB~&6NH=9`4PX2T
ztL(RqvLCBjyXvhqGUIY{BzoPuJ8k$|XW8K7fXBgE?cfX!WI8x2J2|0#3C66lyq49_
z9!>V3$wo@A{`c(@Ph{#De-ulKbB#$D@ji@9Y)hQV^>UrM6o<UJGa~BBoEXkr&`W!6
zQt5e0skOBKUFLawIetQqt-~H0&TCY*mf{+97b2|li&fjC(!AJ1im7}TTofpCaL%_m
zk$TxFh1Ur+LepcdFj!^RM_qZb(tk-a-H|4Sno?*RU70lcPE{mJdm<YP5*gwP(I$5c
z;dN^J5j-@ivd|;xyx6OhWXLw;Qd4B!+Q_`88|tkwEz3J|gYzV7y_Z2w!RWlF!|R(O
z8%DknStWZ8J^Dwf%K^Mm^VW`RnX0Z)O9mgv>y!(x6KNwjEoqXZ^A?%W+^6$mBUO7c
zBlY)^8D1yU2=(4rFZ(39<|g{m9~%{ylo4GeCCvFxN0l8@)r<^Pgx5)9jNmEJF0BeQ
z;I~+hz2eo3=qf2=u9Eg9O;J9GJ<4MFo!(i_oxj67jhH?)cWw2L2uJ0v4YwV+Jj=E{
zEzzqnE(ZhH9aUqSPPl_Q36!g&YU7gEP`_4X=B~|)jpIHn{9JaV{%*3u>x3G?W3=+A
zDsy?Z)5SXPD!1$(oO<MtPs~&zHbW)yqSRv<5Q}3SvnjetDl+G<wIa$h@uBRC>HUU0
z-_&_)s|p(CH$_&-?g#~u`bvq+e|psXwUJe)><hS#Zh$elP!_A{#V?Nao{-ZywU
zlu(DtO}vJ^GP2f=TtAW_i0=7oEypcCCcI8M-3Se`dMDQKg>)R#ffdf3=n>hM=pES?
z&u2T2Z|l?yk})4-s>}G#iw*u#35;(_n2pg@0rFnlz`i}an;kTJ%s<FzX!~5scsAy?
z%XkXcWE#uZaJTnd)+1pk`*SnAYcl6_<YojOlk%H%`HtN7j@g-s*Xa7JynyV=o?<g-
zjGEUTX))K&2|OWX?^b0qMd|Xi#7`On&q(g|D%b6-vA3$xlW@@{@mWfp7j&uf?~Q>M
zMbD{PPvYLj7dJ%q(XP7PZl=g01M$3ArtPfA`m}kTIV$g3C6OTx3@%o873qmW8JD@9
zQw&6xq_34AQs0iNL?WtU%*}>+xu497-KaEVMw+H7&XPfam&KG1_9#a$GGimHYWGDO
zM9Ik6p2RP(Pu*8h&Hk3i`nvbc%%Mj8>!FOb%rhhY6ja)5F<qM3XDv&V5nrYDEjG_>
z^Emi0;&okkuFPSgw9i^O-HrRZ@XXAkG*9{{epVNr%jR)tV#LRE;kj)d2O37ae^*{s
zrbpGsVT=*~7k*<bSZ(0U*i<|=n?`&~7oIEAqj_@59bcEqb0K$pxF*90_J_K-KdH$`
z3#KQ$(ofu`xNmQpoX$w$UZp9%9BJKu+Og<%BY!M1?qDxydN3`~xA6eEGgIVD!zcdn
z>VmCQ5FbX7WP4m)_-lnPLoLa7cj4b5{9Uvz$;U2-erZ7bIVazpseEbGpM4_y`&0Ot
zo%T%;{)!a7uakc<{KP`1Unna+xAZR+{+Uj`C)3&fJA{9%lb_jzzgGA?;j^$9*4(41
z(X9GbIMPF7DZpH|c;Vey7s}~Cb6bzd3*nE_BBAzZC?ot)&q%0^iJ!)OW^Q(LURxy3
zqaxYSs=?t`-I2<{XpJAjMo-z2y)nm4Lu8H0^wvMF{Et}n#u*;wX2-^y3<=P%F((ry
z<=T3BS86}EMb<aCZx`ukW8hcZ)4zWM^j@$Qw161c3yizno(!P$s3#UGmN6FD#5FQc
z(eKFbFZl&_KKpliof5kI*$3vU@)PWQrFEFrsW{m>E_xCfopmLoH9cftw;Q3MI$v5F
zuF1*__Eu@PI#9`NXOdz<d$`RE9t&CCgT=0QVrjU|6+AI<C394KraYX3hZ765Z|yvf
z@;XI4-e)F6Dt#Tfp2W!xnaoc98jEjnXM4PB21T|szvqco`Fg!-$;upv=dqN<&w<$e
zsCr8G&kf34Xa9IsN&k$1P69dLTyQP87!-j@pxW$_buckY$7PLDw$eX7iI3Cy91a@^
z%f}q-8VSqCM@iiBF$cwl@^N~%KK9u@_EC-tm-ra--QN1udKtJev+0u_H?#~(^RC$w
z;gBrXBROg0^i(-}R8H;tq`ruRcH>p?+U&j0$UuGLqevwe$vuqLUyzLE?s1IP>|cvF
zBKxKg&IEbjG7tbkPz!DXs;wEy9~bDj@`v_Kh7Y}#Z!(lWv~N^DSiZ?{_$I^Qn+)4G
zyRq*vW#4XxeQT*(>}w_51@?e;;JJtALm&(IfbI)rU!{&K`-*g2*>|yyEBnsX@uS7=
z9359SP112?(+D*i4z>D2Gh|YzJ+e-!Hrdl*oJ@y4Oov0_YtYNR5p&|C_#af9^7b5%
zc@e*jTt{Aa^CIZr`@Y}2uq2anCetxzQh7|)uJb98#yo29@4EDIHWq3>H|!!=U_H^i
ztjN4}R@z8z+s53zw1C07M+dtlsH++L1pzk{xw~f*N%U_d>r2V%N!B?;8d*CyKIOc1
z02g*yr`o-1rbKFD?D)bpF=N>TXxj489kXLZIznlQp(4VSlPw};ZZxL2g1xyNEJPeT
z6aT=^H8FSSJc@YNxF{8F`%%ybS>7|;)|0hqG&c;v!{wed*S9f;TMG>H>9|a^M3#=r
zekdV_p}o-Dh|cuTw4}~cR>KYUKIK6Pyoo`UF1cXX@?1x>{EHb{zDMZtq<pxoUvL;i
zZ0Zs0mpD1xc4+X(aN7~VV`Lpk+BI6oW!iqHjee_+o=zL@MG6~#FTsDXakwq-z4@0E
zr?tJkw=@v5`(qcrrl(ck?8K?j+?`W%cP-D1=I#nN^_-f!bGhC#;jb+`?rKcTmA>>v
z>9*#!$V=wy=1Y;y&F{IRH9JSu?224#O3R}2V&U~|k<I3d=H|#t&F{OTvwhJ}Ec`-S
z<V$m#`DNtY=8xRbYy0JdUvo#Ub>(1|H#874Fn~d$`h79A(eJSOESnGQxBMcz-o4Ix
z84b@&qu!aycwP10ZmQm!Qgz*HwYb5qeHoX;*ns6+5_Qw|q*SrSu7YBRsKSSK7T*0G
zg@3e+JA~L_%l)?I*ue_hev73TKR*`U5R1HP?la$weA)bgn>~+r&8d-^?a|Qo=8rtl
zYx~UXwV!r~1E}h7@6EF3BzA=N7J1@tSG?;#RlKX4ig*3j6=(Xq_4*>L`{4U&%k0t&
z+ZEqWM|O&i?5Vk#!Na?6erDtXlXX9Kr1$3idR`pmz2#FiFZ2M|`JcSCvm0;i{4c#_
zx9|Ju=-x-)Pe)fD;ecb8T>?FBITw4~@Ya-uA27LEQyMPwx;15Tg<mtRnRUGP=C`zi
zCwOmp+2P=plzNgg%yv#oN<A_UTE3@)Q+0@~E#2FCuxh&%`S=^Fc@w=iKdWckWbZA1
zb<DO`{!{Z_>85$F{Flw+)`i)&&hq9w7TfQqt^1Mm{d9C4Nw)V=b%^&~Il$pA@m^x$
z_Y%@B|6U?`5V8;IvJiCb8G9i((R=f8x+AA~Z}B-ga?^k6$W7gJ<fi|!BkksVKONn7
z-}lqeefOp6knY=bK=-9tga0(|&9Vn!{aEh3<=1L7IyVw(J$bKZ7ys>S{wgi<cKG9-
zj-A5$JySeLt=!aiyHkkf#+uvGBJ0BlwU|vN=U{9v8fFZW<2fJ4bJ=;(+)S_&aD4at
zXL6#J#ghPaaa_KvqOK<PET%3mPTBR?YN;W-v**<H!Cq{6K4Rl2`<?GsX`Z7}t2*z^
zw@@jG^#tBqu7k>PW{`Vgxm?z*m-kc-a6{b-Dm&E^diqRj{2$2bS;VHE5iaIzA_yHO
z>q)3D?cGN<XQ#b*_K_^|q7*q?PD?`lDDnnHWIx`e%uA{ao}ZeV9n7HAA1T$?wM>hp
zC(EbwM4fu}kPve=+hufJ3%e`xx>Z+}UDx!^x@<l2s!ND_R(;RGzBakXWxvZFcb9Bz
zGZ`h}Ca-LFlY88MA=sFZcU9<@nq8x6c1D&C#;`4-&>OB9Y^ZVZD#^$`^0!KU-*C<D
zbJU&Bxg^QmCb`+xEm2VJHCB<+$gL595r2=vUG#6v;k_^!2fK~nA*wHZ(X+Fn^LIyh
ziL+xyR=8%b5n?;7oXWui^T`)IKdWOp96F=dlV>2E=o#7f<e5Yw=Qg^z`8Ptxag;8u
zIjXBfR%WQ@lV^!U`jcl{<+*Jc#d%o^=lTu)mP;>Rpw9K{cDLeDZUwEIJ}ijjZja>d
zwCvxQy9;@431bp)zZl7V1zJ1h%V1v>e!)5Gj~F8)ylXs>+1&Ga;$GdCs=%HQ_hRt4
zAEZA#ak+EU<!h&m4USV~CI?5T@YJABg~tRrZ=sT+ApJ(@4|?J&Ejdn^<c`o2ZaXzN
z1G0QjxNWT58;+Ixuw#PL5|@SBCUb8%uQA+K6g)B9<`15lm_>UY{M7A9oJQTm$4Gpl
zj$bEnIlCmkNaBa<_)jD*XUODVC~>)mPE3~Zf=$Jt%qPcT)2P{*k=ffZC^1;&FAQZq
ztMY3yBQ=ahPr|L9xxB#9KJwC?!QSc=Kaoya&ZHx`H_1yPm&vj~D6d#a=KYcgN}_%y
zbYr~_Dt{a6r=U#5a@#OLJ3o_C)X_V5YfC0Tdsy9%ze`8R^DQ@p^H|z|ESTGYESetB
z9?hH+`$Vl`gQeEJG8DZl?m%*5?j|UKOff2<Xf(HV>J0bt^mrDW=)6|v!mMhEUf{|J
zzt4$!kozkw5WV0!&;HjVEyIl*j*Oc^p7;jT(f03@4~;)iK2ymvHaZp8y)T~y;Go)-
zs7%SvR0r5ceRnNsiCoV5yKTp4E-{@I&54zLq#k>zXK9&oR*iqeF^N93r6adBzLj1H
z*K9I^mutZp*~5(vb5C^k;PK6ohLhn&>xE8L{kLR_PDNA-2~J?5xqBnIdm7f|P%5%+
z1hnC=(sxl6Z+~(;)qVNfaBjOho-IrnPi>sdu<D$o&rYJbZE67Qp(i)yzA5&FYjzpI
zL4i~LEhlOjX}NFa#V&l?YKocrCQFsozpYd2FF@<^p7BHJUB>ym*651cXOb0edWv%w
z@5+6s;}y51k8yyvvvDs$=3h8p1*5?%a0hv7K`RKH?x^yEe{@zE{}Xz6?mx@H-{9om
ztoi3T`1d*ZoJj}fIe06bym^g*OB}q#PTthUzyb&F$4=gm#z2vSH_^#68}0tJy%nx$
zbuDovxRtVo$bhL?^*8a9CNwo#e;F>ziw*i%TC840$Zh3GM=jhrff7d@ue~KDcr-{i
z@XVV!62DV@if&d!(d<I7@^}#}cL@GM3G!4D!Hv0cwUsqsRPHOL^!fqQwMYEU-dvM(
z?|0<B8LnwDLOd&L<;?CepIV0=8=Y`HHtmMY)VUxdQO{|f26<N`R86gs^&AGRkF+%J
zbT{0tip+0~tQt+(=HCi6O_hl1tPk7`4QfO;2rnASO5?bDor+(3(oB;Bjm((`uUDS#
zoyWTKzp7K!=6!<dq_S{Lwh=s<r@ko@-)ij4Ik6J_#Ut)y@3Mrk(y&8hVavedvMwfi
z(^pCFcdir^)JxB?2hpz=NY+8wJD}qr#ZuRwPv5g<P;_={M7#2K<?PqfR2X@?`D1rP
zwbbeqRVXsEKO2iK=3zbU7!<hDF{Dm^qjP>9%%IM9U$4`zoI1y(ODWJ}GJb?djknHP
z^##CJD;EGZK(Y+IV2o!h#=qpPJGrKImc@ZSvCzBXBP?}t!tbk5_%?nEgdE0S|N3_u
ze<N3=+V^W$pz>B^yK7&VQ#GTe^nWtYtmRq_Xx%TD^_i)sgC6Glcc>w5wR#M#*3YJ`
zj8WnS`<m$RL->8hesE~ur;e81y}7fcak<Zs@zX^{uDwG7bq<+;Lnd)~S6_$U&r#)X
zaFn0oEI+oh{Ef^4<wb_h&5rUONBQnt%la{MPT+Qj#6Mc371mh!f>U<Zrq2GiHVaoU
zR=o9(9HhUL((Y=bBS-jxqYlQ(40+ayLlZq3*Z#^1#aVf3Z|+%pw}Y1#&D|~8p>$O=
zFYs%a_BC{XYD2cQ2J7Aau{5RAU!5Bt#<R2~!Lx;p^^;fxX;ezLF|cu~b5Q^Jwa%_~
zx<?O-L0yJL{Xxsha2V8OIQ-<GWqCP+vJX2NIp&~cdAWeHe{qyG4_elz%0A^N`_`)m
zYnu$mK>_D*e6UMdy>eX2lsQ-r8$tiUSpSo8(dEKBMA@PTt{O1htL@GUJnLxMSAXvu
z+uS**p6=#4!!RA)5j>|mOBvduzjLYmrLzh(o>(UjwyKTm@UHkH?C?4@@OY))vFseA
z`f=Y`eYT_e?iA3pN#?Q%-LYueq&a~N4tKr$io;#s*%oBEaxzA}D|pYDi8PLhH0mG?
zXT_hX*Q(3@Cri3>zoPdJ&s@gdVaxt4k#jR=>Z->aq-wn~DeLkA8y!vE`LZ-sZ};MI
z{BiJWKMj=$cGmalw3IcrO4X)^YNGfcok2Y^InVrG)YIEhk3F>J%O!3Ij?W9c=5WA{
zmpc1eHq;mM=Bm1W=}E1RN4Sm4h$!zxYu-FFqDE~;gN$8mq&z<!-x$4Ja?);>G0-q0
zEvh1EDw9_x)m8XLMQ`vVnyF)vOC~C+^I}_GR8|lVH@RLgeB5*;jE3J1Mw2=gk>}&=
zrsWmJz&34tUTl~)UA;7{-&0cW=LI~qh7mhaX>{M0!3ToErwBDdM+81ZR=<0Ftm1ok
z*Y6ai#?8HBdZrZP&w9Ty<HEUhr>MM44wO7`>wU8hRc^H~<P8dWzG6fNN)^%Bo=AqP
zdrn5=T$fw3<Pm(k$vvIiyQymv$EaT&$%EYZkqucUd-yi<0L|@@mm4zPQFRSbb-7(r
z-F>{_+oX2xRR5!fNiKP%CFpYVzSe&wF#CWiC-sR;az%rE+!53$9bKCr+AI7}TatZ1
zt8&}bNBTJL+THoyL*|8Z8^hYs%Z^yBdaTK#JsMum$CuM)xTofNs{3$G7N5(8pRv=e
zkEMlsbPM-(TcEGf-Ry~u7dx+1%}CZ4+7lTUr3IDlj=s{jypW=oaP=<i)Pa&$(=+}O
zne>^wA=@Ao;!E|~Q<q_Ifai2)U9X=RwdG7zL+IKQoU$CDt3lK-!y|9eZEnc=yXtLa
zbkvyY?q8LjSgz*g0Tnu1?$l`y%LDBBk3G3Z_2gdNlX89$mxE~bgtqbCn;usquhW(;
z4QTJK0p9Ctze8r6^j;;ybFZ@r->r30e>yGLpSKLV9gogdgxb#FmBmDQqdNN=E{oI>
zBfdhvcWn>9QM_%+JF6^2o#XFpcf>IoU5O)+OB^Qe!%(yrMK{tYKI$u{f3glW_+$3i
zX3e@Ui*aLr){=L&<qe;_*d5Qwg2zDwo>lKZ4G3g@<@PKZ5FH}rJKoTDy6Sv0I={^+
zFK;{tc}Ji3nnlx}lqOGPL!!SL8?2@$S;{v==6|PhY<21uz3fELdCBw2I{UpOkG6T3
z&W-REy&0J&<32CevO%}wyIP@+H1lG)s;Jz*%X{qe_ja}k{qr(r*eYxO3zfR<sLG4|
zS{29c_O#p#HX#S-XK|rX@?OhiLixDp<_33z^jLJDd^|lmn^#x{Mc!@5_^ZksqB7Nl
z4eEE<c|V^+W1d_j)@V(kOx!Q8SMh8iac)ArANu_?FYBj=i=1W4c+?j$c@EHKj~!VQ
z<vsqBE$b(JZ|mjVf1agi+vPp~M=Vc-WWy=;t8;LvCDc11?*ae6YD;+c2pK~W4&694
z%5C46yHk9<F?YLKV&zpg;pmA(59*}!)x6fUd9ADEYXx*(aWpHlSWY8~IfF{K&UxDt
zFRQU{$?-YjP;VYOp<d=>QlC1_Wi6Ac4yv2&tf(F!Ymh2gJ7ri<`KcqfE%9vEdd7t&
zpgqSfxKth_btW%HZh(50$Ns_Kh}ac>h)B{NH1ip^+`YoZ+_)UED*bJ<Y>l&IE$U1L
zg02K-U0PyxTVjEed4AWjS6XFdN7F&siO#Y!x|S`l%5rg4WqFNoFUM`2rcTXmyGqs^
zZP!Nmd<Ekr-ayEh+AABD+}0<_tc`3M|N8zAovgc>oAtfDL)hG^UWV4^bN1nOBzITx
zAy=~Rj3B<ZQc`V(tf`&PsFLN5Uv^EhT<w&p%b1f%Ue2=16P?D_PPt;)0It~HXIz*S
z&TV}#F+%)2uf29!4ss68i-~?bd+03LqQ<LkN{sl_+`Y@v)O(4kuDFiI%U+ICekndR
zcX!nh&Qu8Z#cbZLWv&E1-l<3bUhgBeSelgCBZJ`+E>Lof*=YpPBcs0~)EYQ~i$tK7
zcPKlr6B*HYd%Ta#+peA?M(4ljTvx46=kSQhnp*QS%=zqW+AtRXv`x*;Snf`!_t@Kq
zlhwg%wOr9Ctu1SB-s#~Z=JFo-n%)hAO)e-h3!bOX+pTL;avk58p3Rj@6zl88YDu!4
z=c9Q8RdoHgm`GnHKWmVY=UpS0o9Hug5s_1zJX+e^MrAE?Vj-QY_Ts|QWfyc?_N<iL
zOr>FBN^Z8w9pca%-YwTQ_0nT{{7vN(Jl&=SI*;ty^cs1n^egYiwy95k<+jm1iT72W
zzTV))>V6%w<ryCjP(wYrzNyc3?NVjrnJUj))$6#{I?|r_OwDt7@W&<WoOP=G>M7O?
zyicus)RD)6fwN^#kQtqyB^!c_L}p`Pr89>woggXBiGBPxr9;*mkyLu$(0N_1wLGNe
zPUz%-Cx@G)Me0MVZWiQ#L0Ud@)gEr5M<P#)Ho2%Kmt;P+A!8yjzcJup!HSJ_$dc}q
zot>0r*hDf#2cP($i2WT9dj8<g_9$B`_5Nz_$SikahhAINxU$B`A|rMNE4b{Gc(j3E
zlb=OlyXTPys{IJ_Vy9?h5;M623pex3Tlym0#NKoiHpp8lU%BeO>R{e1OIQ0hVdG__
zIpdrYdr(&*Pw^7ZC+m>0;fY>sSLKbg%Ihu}Q|DzYKO`}*Q73y#Qhkn(>t|l0HjB^6
zO>JyoAkFj8#`D?U%*l)0rn*CRSPZ4;%tl6<?1t2<G4zQW`OL(#(ti}lkOHh>&V5oQ
zF9pb^vt~eGvkZf@=m~1G_zxzJRNQH5ro+^1850g$^`7Pup7p7IELI;?Wel_hq?4o{
z+te7Sf65vIsuk1Dj7))}8`RlpI!k@zhs&iWzC>MbX&D_L{j=PaxU3;}PZvMjWGn9c
zfJ6hI8LIJ^Z%1mFdu`IMjDJrw^XxgXGuWW3owD2%abnQMx0B#ic`BQcxXbbt5B$$<
z6ld!FH}BNzcPYZVGv?MY;C*!bfWRJc+991Qr)SZy*h2L&TA2c>D`;SQWF9vldpG7}
zGu*jIv~8S`rDD=m;sD`G5kBc8Gla~)Nd=MCJNMUkBAa>2`;??dzNCuC1W<Bq(K%SY
zw<EMS_J#gLr(_FLbfGaa!>4K&7g*Cyj7gTE*0#tDxzCYtv8QvLce7Ds0Hr0ys8K*I
z;{9lzZ%%BOZXU_JShgLfN>Aby$6VrL2e=f~YPd#oGDl6%B0hCShWF+=+K!)2vrKN%
zWg@1k!Og=^E)VDPhPfyD6L+*KJFPk^Qkku~MTUN~e<V+-wUlQ@X5kQQb8nQr27^t-
zZ4Z-RHojqh=+mleI(~7OSLsW;GD|*v=FB91WmZ~MMx;{KTD68W`1jg-Y1Vo9Xa(17
zZix68t0z9nw9fjRiZe%vV(~w(EY|d3A*GAtasILjxk(F-fs=>&ye?Je_|m3l<;8Aa
zqvuPg&Ez)oXqm@tdGbKhQG-?VxF>W`CkyL2IKlc*+sII+Sef+whR>5zKz#cD)b|&q
z)HU4~f9YFpmHm5cU+TV9Q{J;NM?RWkpO>k7+wf9rEeoi=Wm0;gbFxO|4JI-*FJsxU
zT0VNVN5+P*l|&C#Km8t$rBjM2cJvZo+Qoy}d02vsv`Yr3{UjrDF)H=FWS9G6TcfO}
zGrQBmh6y*yrY8E6tWlQ?jwFX`(xjvf2k2M(1$!8!Tc0n|P3RfF9$)D7+p;`slvv)~
zfI3MJCA*Dtd}(=u<>i*V*zCvk;F#ZLCfiJd=eJ3N=eLcVuLj4mgBl&rmo>P{bwdqg
zRvBfd+@t7fGp5eSw%)xXD=&5=9nDg!*=i9{7wMerv>Ck8mQmx9&){&qgr&|bT#1^*
zHfe7=_t2weWk+T+S+We?`?*Z=W@U|<-4>a>hh6a0+$@<+S?p~|$rNIBN}Jb4i}&Wm
zF8zyc@$5Y#XJ<uc?=fd%YnOTkT3gn{J!+3Y-?cM#?DL7t|FV6j=}XD~AMM-gXk+ZB
zkNxl3CzB*ER@bh2hg}7_N%vK)kuRs=yD!?gWwq{0;Ii(pJ~Ni4E6-*oUb6Ny9eqbn
zPxq`A()r=Pfx}2f-F#EWzE4#Z+OHhRN;&z=f3L>avka=lr}i}?CO6irMJ_MaYzx`n
zNsy7l=k|4`x~w`5Yd-(8_Jn;{qb!-4J_1F{N7t!P?mSjYM$*7MtD^SZBJ8<Os_nK3
z99U<#I?}~zTJPLPhIbF+IA!%XIO_Yt%=PL>q03={-kYaOnZ#SFsO<i^7q!m!xZQoA
zm(1^js&R90;H{6a2w36^g3GPg*kH(tofced#d3oAR&1EJegk_`mCEVPK+znUsQI;1
z76eDw(XqiHcJ#F106Ur!>=~~@p`1OamqisrjvM-tfrE_>)lQWy_nV!mgVtVR=~xh4
zV8zA;=UK7Sg6CMVoZxg7>rRb2S2@ZmI4qcL#f}d4vtr9QFOl;qWlg+{A*Q=*lv*<O
z<i+l?hdle^$P7MiwTpMAlrTlYZGG5>t9v!+F<Pm<1|t4>PtGVB>BeYYMr7XZ29EeS
zXU^TN@9mD0^^5)KZtpX_BQG^%+>UcN7?kgkyD>w)=tJ(tcPCy`>&_nT_ZH;_vZti;
zoii+4$Mlg`l6amc_B63Kt8cn?xYWe<y~=%tI+Vs1m)IgC?iX7U)7X1IM>25#R7=r2
z>fNTUidburO%qum@sX+>)@#4K^zT~IBfc7AX<Cdo(jL#@jkH+pBWecAckOiMDqD;H
zq^6#_$@DkOXNB#QI@^|Nn3Np}?Nlv@MKf-1LML}-i;f74#!`7fH8wHDQV&gLuinMd
z<s9|kua4YU`~o_0QJ+8?ij)<5nL()@<9h=vkA+`I`phHk77`ziwnlWkV(WOc8y#HJ
zFhRaybFGkgJ8yjiKIm!H`pF;F%AwjWpL5)393mx!#9vqMhXg*h%RX~JS$VH^t&sQw
z*1IGq=p0`^BeO9ch0<nwbcc#n?7+!v9WS2gm~t{N57%jBn|zPzS|Rbto%N+lrjYnh
zRo~%``VKnT^xTjG%%1T%$XaXHf0*%>iO%)#A6C1@dh37Qb@e!)ZcBQyl9(kgihJ#7
zF7un`CYG)-)_PStWt8KbU9Z3Qt1`)X{~PrcZCvW~yjNZtC=L-4&*T-JuH~!j^0c%;
zy;jZQ5sF)bKq+y@K9z3|ljAi#cI0$pt&n(=9Ir7*ax&CfAj8EJrjYo3FzM&`uXJd&
z<=A9fj^e%ezaVFig&Q+(n71R@xzT}gdEve>GH;h9%4djG?8eL~^LFU7Bc2CniNrSS
zh@K!aqe8nPl^$D0y|1^?=(ITlbF@r@dZnDjPQEQ?S6=Lkgf;JVvz6~UoAV}jVe!`>
zw!O7eP6{2S3Q6O+<~;_J^Vf&ElsPptR+++Abe<YII;=X4dviS1TRbHsel-$}@#-#e
zCwI!7+*PiZ$O(y0S8^wHkvqOq?)a{9@}=8rg~WR)xwI~F!#m}Mca_T!IU(`QkjD7S
z&`uwm(kXXJSGiO0%32}uJC&S#sdcBEqkSoUk<VYO6%x-^a(w5nLvH9n>+6)0uLp08
zAKgXHQD2Ik{V2CqNc?k*ZH&uX!ku<H`Y%PUugD3B%V~aNm$6(s<(SZMcE2AJI?~zi
znIb17UMF&iWyyJddFU8h=5jvB<QOaR1?g*rB=QpHCCgviS^nCt<@-x{AqijN2)S<a
zkXCK!)^O>LWa{y+&zKwhZ`${(Tp#5mN<G>PFLlc~iGBtg&h>coIj%ZM^yp`Bvvqm)
zBHTabG)f^$K_3Z4fs4<N$oF=ApzifVcP6a5Da-jih2`mp^=h=A=UMyi?`gwyrwx<-
zOB=*qs}0F>(*L$z>+1sLvt3r3YL?6ArkbTMRr8mHCOKRohnStd6kn+GaOFo!SMpvs
zJY{)k+<z(Cr4Mj5UxKD8GK1Fnz<=ip-X~?0@KLKqd}4pMQ5RoKxprCd*>0C{P~*L=
ziN^$tqHg65I)47Aa{Am?Zsx;NmhoIx9SJ3P6*jW38{63vQf|2#Z=L?<dZF5|)#|%t
zp%D&$cP}G-W|uek4m0*?9ej_7{_Gtmui^Ez2lK&{We4%y@}&J4>Y29EnH-DZ-I;u(
zjhk3`A}a@L+^3G>JdSU3Nlz?hZQ`CSP2Q!kUm7wuMK&~l%`+$Vs(X`ngR-~gUKK~=
z#RlAOUDCPE%ZKl3n5vu$w<WSAwTy36BGoRo5L54WCvN0fyJZ(2^>dt|uAVfVD>KIq
zys{xtxr21r?p{5mlP}ROe8qG;+miP@!l#HDBRGt8O4f+Mss;?_`?cr9F1pV$otN)j
za!#dkL+?tiJ32qZmL8y`V%3@xX;R;rmWGwlfy$yx`NG8x{S1$Oo2qhyM@oUdQec#R
z8j>t7cI$cJeD`CwdMtrmrzyMic{u8Bbls5qwY;sijQbinc1g=@n9(77m9ImG)Yg1`
zRInHHSiYZ)HMJ(P?}gm2kMcf~`?d6sG}Gv8X3!0j(?6ceq~*mv;{-vD_2uweO430b
z8w_2oykZG2d`EkOTIcO;m|=28e&g(~Z{V&BEor%X8}eK)xYQ9chv%7{eF>Yv5&Df)
z0|Si*WW`pJ;}Q;@(3TflY}+86j>R09+<UKOfE-%LaLkJ}*jbM8zzK=<9qXgjcdQHT
z==_fL_V7s@^QV5tIxAB0kF%1_@Bjar$7$za9s=@x|Do#qh5l*2@}iRJ{OU5_rDO8v
zLrR1Mgj5L$2`TUulmx3KR^h9tDp^=kF7aw#_0{EtW5<r2-`m&q@6s`TU%}NuzY<yO
zQ$MURI+;=FTjDP-sz7~lNvU6C$K<2dH>SjwUl=S|!mnji`|?A<3f~BR4TIm5C|T$)
z4~|r|snQ`IKU`7mn>ROi;soD_i4(?Pov*B-$UjoC3w+}zD}4n%_^N1msI0(W<*O)G
z4e<plDpbjUkG5Bq=3iay3kFIc{Pu)mR5=-b?5(QicRYMrjVj^yRWB~7toEI(nsusf
zu2c}<$1(g>s?1_v{*sE4qH0l=UtR4lE8r)M7N&?4S5=hxDl4i><d;HxCo5l_s>Ca?
zz0_YwOM?Nwud>Qt%#UgKi!AT?O3L|FjSvn)j7D0{8tuz3D;n)9yt=An>1ba`QE+5$
z<Gh(?&7D4XcCs1c#!j8m+ZbLw&3DC^f@6JE{wqTzRpRq<Uw+lXP#NCtZH%96Oq`$!
z*?G843seUxLZwB%0>AHy@sp1gS6?x4!m-@2Yn2rTQ`rq$T<WhXDRfk<OI3fjk}m9n
zD)E1}k}m9nDp~y9N}TNARTb74VQ%;<^Q#!j_~~k2zOS&NtSsMlx>F|A0o8V)%7fLb
zCWS#a8>*KLI@u_s&+<c6##JTdg@KYv)f1ue#pM-OmD}Uxis3k|y3$`*Qe1*nSCs?<
zbY~^~CLS-VsPZ$;7y=dLel;=6^UE0IcKP1?WL8yyr8mEzl)|h9{HBag^iJ~)7rVzz
zDZSXICPt+U^l?jvlU5TX$)wPPi;dyORf|A!)fmIi_~@UNSz1<hq5+vK<OCs;giI7N
zLCAO^<BVX{iC{7~0ZalD`MH@B!DMg(m;@wm0vHd*8P(NBH9wM5Vn`iQh14Jwh<;Ho
z+C}-oYJR}R@Ke}NX+P1TrGRK5VSxZv{!)YNqH3cETZ*uy2pfv3CV=r^oKaM2AX5}D
zkSeS;3Nf>gB83zwgk4x_6b1~mp{$_PC<qv6%r7<a1I9J{2v%i<QRz1-jS8du8l$}0
zD6cfiiI@6;QNEC1p-~PkG|CGI3XJl6f_#Glr3UPUhTkYOU=<iJ@{OexRh893jisge
z!2)AxVPK)Lv>-@ceo>KeRaG@V9duPySv9nvq<jfk`TS@RYu{Bus*F&1W#Qsdbf`!`
zB4rgzj8M@8Fy06;#7l57t2e(Ybai!={J7B7)#`_hBxEVCl8i!rkjSWBLcP^XN*TJ<
zONt7O>JY#5BNVMrx{I>Git4KrEmBl+%a#^mUv;nqNG_6BRs}_rKxE5Aq>L$2Q3_uo
zLXB!wlgyOrK&V&>2CCrG;_84D3}Dhi;THSL3;hO0iXJFDC{-7Le2V9nQYXDsogXMR
zs;t^oh}Np=G9YzTRnsc@wWO+wQhtOfSS|zsoWfFjl@JxXQes6y3XH0vU^PNTVpdgA
zWtqgKJE{r=m9!EnwJ>rjr6Vgt)q&!xbWo%NMe}tYztSWn@)d=s{<}&tRjlYrJ60g&
zB`=WV29n%>aOo3GL)b2<5cW!FC96wxwv|gA@T5dlsW7TasS7IkRbm}f;-!jPs<@?!
zOYaCfzewtnOJ1-r&>3Sg+nLPiWOQ6I$|{(QGlOtZMWrZ&QXf=^7ywln6tAc>D$AB!
zgSBN#%5_kxgN1$-hLo9Qp;EC#f{+zfT~(+vs;)whaH_-)%!;z=#iEa2Fw}v#sVsk~
zO64!rsf8-9s7QQXmS3o4xvDeYDoZAay~Q|@CP)BPgG`4d()waXLy34qN30x@7$UT!
zTqtWwWidbSwJ>OftSOTA(<8+)@u7t@qj*9IaW+6wJsXx_33Vzt(kg_lLY?owQs?`x
z)cO7^$<JRRje@G-L8$WlLd%OV2MVFdimI_hN*69F61R|4V@X00D-sK#5-(hggpO2q
zMo?A}3L-1CNYMhJhFb3!0_7D!!0PE=Xy6*A5tL~pZlbHMSt>Ln85K*aRRU!a*EvNh
zULf>JA>~0U&=T~tjwqECOG;&7q?jF8*-A^kW*KyiC@(3OG{Zqr6|Y{bswrjp6GKa@
zOO4Wsippyg<vJh<7JUgcB`SUsTBK+JG{1;7cEXg&cGM`9WswOczd<L23tXuzcconB
zO1Zw3`tz5d&(GC^>se`$US>;K?@DEvTg30fE#lgDjj>1wo5kQ&iWVtqaJ49{Tqpq<
zEWJV|3K=hCoQjT9ane`<k%DwE+ZC=g5&)w_x}>CtAEGNMluK-hT%7`?L8JKU(g{l|
z$Lr82W{`5HKv*qi7cb=p^yueeu4s__GNV|oMU|CSr~@`dD!W7n{8}9gu$o{n)I1Za
z<7CKyf=W8bZ`4UpsB(yLsexj1h3pfsn_s&NR#L58+ptGlWf@h){S_CX;>ut?1zED#
zW2gYiZ`_f`K3*y#P!$nMP32mP4BX;!^+SWj<$iu>uvqTbBq%KPFEwPYQ$YMyTv~LE
zkV=@PMWy8vRIpG76R?2H30PNJq^c<`l3Gf+a6^pZ672#BBq0rlLgXh7p@lk2RaBw`
z=q7xwdaJlZ{7r%Y%5*h~)vph7HN_f#Ss9L!@|4kHP#u>HX-<(}*PwiA^`2G=mA;ce
zQ3!J+q=Rxhq+yaRTOli=Ln~=#(>U$7!T=@}s74h?bFi68l;!yauqG^}pSUqH^u9$k
zft7|i!-Wy+nVixFMGcHMXfumcQ9e2O`9|SYMeM#<*$bBh*`7?Gi4v=<o<R2yOJ-G<
zOh6SmNfv8AY6~kvtjE%5VV70PZf#0|9h=15wlXCQl~=H9P~}uq<jX1<R6=zeUBs0F
z%}q)W(K+R%vXP<~5j)3k=lHE0|CLsb|4N->3)wO(CrU}FC1DHL<*A^MtuGV1uoPF|
z`$Be9g?P1)OTOA1%B(M71uS5DR}eJVW8||#W+PNkU2GIogt&<0S5>l6E*Hz?%Ax~<
z?xS+)N=1nk8u|1{K5Ifg*ZX{WhN;TSr!rPp9Saxx*m_ke;#ZWLA0vPKWC&*mMuo&G
zBsQEI7Kp)Jk0Ez7KI1AJ=QE0QQ0~vK^0AGqs0#WFx$jwO7}JbPMQV7pO3yd0)J3^T
z6v1K<;Lgi9Zg`O~yim)W%(7lZgN7HK%4m`sD7jm*PG~r)sR;V~<rSfY0Uy8KSy6Sh
zub7)}Ifdc=xhnta-g4cOLkP_^?0d_?3Ko_8@*sC<zM=~5^hHrIhbATEazrABJ51YB
zzfaxs<(JA2d|pjW99>Z23Uz~rW`5a|+s4vTx$~F&a*mD0l7DPB!hw9L#m9caUoK}S
z(|q5lz*Z#}X?`<xiQktz5}~H5{QL#_=SJsFpRVs*1EGa}AIBqdSiv344|k0}+%^7i
z*Z9L-;}3U@+{vk}+z)q+>;rzdYvgwEhr33(d*sgWhr7lf?i%&Y;SYC>+~)mo*QjnD
zzwce6+`bv=CXSmyeaokB?KouQVKT=hax=)yCC_KL$<ud;>YmXEmXvYW#tr8+LRgrE
z`h_YYcbam`scuZ=22}1uxnW(%V;Qt^3~ihT@fG<CLJQ^AuPi@kG`qZ&vj!NNlGrzk
zIE3gfi7N88N^g}k1lA`Kg%EvLq7b70lqiJgb4sVC&l4x>1K~o5?v$t^A5SN?f0mKv
z{ZpIK<nm^R6}?W;Iz?-R{z=n1N?)W@KwaJ}6@|LI16362@{Uze=r))4GU7Veq7yo3
zLStC?=W9Lz3`yv~<$XaLEdj;m=wbx$C7}a2b2W#6EJ^6V<-L%&q7?dxE<^yg|8$|5
zvy3L45D8Kgg98<gPKf2CT;5UQr2*u-yoX5iP!;{rbg6;3%R5qXN2pw)<Pt}CzOI*m
zIwYY3I14m~fGkPqfC~O}ok(7;`2;W|p#wOhHHUyKN$3F17|kIdahy&Nz!#1Vpu*9C
z%X>U=MUhx99=AgHDrto(*G#k6L{z?H*b!Z#r(L3_Re}s%qNmujewLYTmq@otkfBSY
zTP1qfC3;vT$j~KvSS8$c3Aa^(3|+!)l`!oRrd5IrUBa|Vxa<-xs{|Rkgv%;n*d>gm
z<HlKq$kT-ky88m<=Zm$U3E)UV2Ti88wXxP{tsG%&CR#hmXwkvzI@sJym@~_0vBJ$w
zX5IBejTQ+88BJ#G_5Be%fgJOML54YrRFfILzOR&!0QreZ8rp15m?iA-(}fFdGRI9f
z%(o?PrOJagnb%Jjsg+6!+H78rl&8^X0h@afg3S!TW)V>Vv`Gf`IB+89WthK0k=I+V
z=nC{PAw;1Hpv)0b!9)@j1kg-T(FZ&!2JNpMDpu~Vl~(Snl~z7Tj`<+1{5`2=vtC&U
zZ8le^cGZhE6WV015M7f*>$Pe@x<=8Zv<%19E6sKF%768ud5mZtgXYoNfA!jb1k^K1
z)dOudnGz^q=28!|$s8fX>#allA@n?Cn13+LuMP7X!~D0@Zmz(NDXNUJz^pTxHoLrk
zM65*zq#mArs7gwR`sVt961-6_baTDbC0PVyLCI<|o5*Q0UzcbL1TDYSIwc@=zok<`
z(YZqFq$^OcLg^$+bgBed=p+Z75^aHCeXX&z#eBrrx><<%ClRg-Ywv}X_rl`6A>zFu
zcyF-wURZmN0Ph{Hya#PI4^!S7q`U`hGP6~GG_TaQtyH$HRJM^NwyDJCm0}w?*e21I
zm4^8b!~8X#{exKf(^^@ZuGYHhw5~d(i*BLmWQi`7*jy*N$U&DxTU5d3S}j$pq-vEE
zSt6wpo9R2Vi5#RP+EQznFJ&9%%Z9n0V1uy}TgHQlU;>ydikib(YglOwE3IUSR+ZSy
zCDd#p2dxrqQ3ac?(^A(dsq2&!St6wpo4MqgP2?aY(U$9|?=#%1Xp4C_9dftvI%qMk
zAbtgL2?IVd0$95!!{}j{-kzer<9bmH-R#L@e&?YoU#Wt+yag%>b$PE)QK-vXqM}fj
zcae%hUEY9-LS5c}t0>gv-J+sUm$y|#p)PM+MWHV5JQanyyfGDpy1ZYhDAeU`Q&FhP
zdnJu_c{i&JsLNZeGTu-bP?xt#WxTF3polP{UEcRp29y#i<9(F@rNs48;&YV&MXAd8
zQe{99Q5j#T45-W7w@yecB%v~)E#@j*yb4#ZBA!n?pLjlQPB+}*=v&k{f^PO)jH54>
z?z&h>U!v%xin0lEdEZh|sLT7IibD0yL{XR5JIj1R<W;D*3ySIukD@N`zm%w^YztKB
zzLr#9o&1B9{DV&3WhL*@$zNK@U+U!VtmN->a*dT-qmvI<$p>`u7gq8YI{CPjd|W4Q
zvy!*z<o#Ciex1D6O5UrJjaITzCm*$vkLu*Ft)#34xZ_V&@=rQB#7e4=tFX)KS6+d-
zyu~UCb$N?a6zcMZR21s+E>Tga%NtZtsH){zOYO5H^Arc_^6pSksLQ)eMWHV5H!2Es
zdEZe{sLQ)uMWHV5rz#57+ge3k-rXt}>hgZ8qEMH&T}7cT??M%Yy1a!d3UzrGt0=U^
ztY8pU7-l)aXCyx}%zqO7IEy&M{3uI?WnCRhw*+c2uam{RFF9sk7V`|fnAhpWoPfo=
zk6O&3&1P@4nD?44^3W#JqZZ)(YLS9+(Z0?wWv5{7SIZrgJhjH{SJxaU8G3W@1lkzV
zYec^aB=xM$d`4$VVEz^he`}aBR+dw#qAqWRYBtp6U8ZuOE^oQYg<`@+y_?vmb`vki
zZo;#chI-ZxGCYrxYBr;)Y0zf#MkNwaO@lU>H;B4pME%i1j#A_%V#9<nRESRzTC~}`
zZ!lMLMa|y~Hkvn^s~LbTikkNhk-BbHbwRQ0Cgrx9>co%4h1OA}*Ndm{!DG7d1d>YA
zDS{Wxog<7*LS7Q`qWPXAAukDe(R^Q$ke7tCn194?e>BX8u{0g@R9E-wRXyq!&eXO2
zRqH2c;_A;Oh&mtFc?4MgoFs&rFG{jOC85NhS8=EaxwH_0d5^TRL-jcHbrqK!wU>cP
z4qF}blcCud`pKYdR?bg`WRnw@%`oJ3A!cF(Ss#obOOe+|y$0(wW$H>A#jnf1YM8GW
z=I4g_cNynp6e%;zQe}WzfIH;s{jIFRIdpyw{7)(OsbTIW`XN_YA?7Zwz-CF#Q0U?u
zhClH^P>Ivdl37Pduy|HKaYf0j!z7TDwEGd=ZUUOPUo{cRFjt$o{c1l0C4)`OUc<HJ
z-{5nw*D$yA+63`zBK0Ep&~R;y8|FK`Vh|5xhs1VBY@5WkN$j0oJB7>sW6LhXe3yvX
zD$G`4ZYSAfZkPI7>xC-}5onci+eyNeN!Yr=Nc+_e3cG&w4tBlcX(e-;nE8%O+AR>*
zueLB;po-rjESck5*nMpI3VaQ|HC)?v5q_f-$>@5A?eCU$@CEo6XaipwE~(3;DilaD
zl#;w2UJEKd05oXZd*FRBdy|+gL}J?^m@RXpwGN4Yf&};!>;`f0iRhGuZK)?ktG9TX
zNNp2Oyi+UrLf)0+Rw3_7*{wo$h$TCu(c6UVkT!0+&Pe-}ShZz8sduI3twMH)=nm1e
zO{o*ntwP?FHf<I1t|-|m<XzFURmi(icx$bJo0~*2P4)IOXyzViW}7q<vYjN&6m_k*
z{9Vaw?IlH|+;)<1rHa<;MG3yzvJZ3^u6MUc$yO;T-MC$9Zw(s^9|U)Z^frlY)AhAT
zIqA;rVp}Uq_EwSIiY(=X=op^gChp(X3yEz=5NnbcWUF+}R^e_H?pEP$74BBuLVi_c
z%TBcK5PNs5kk-I#l@hHI+YZ41@k?thWu-BD_-Ko{DO)yYSE;$AcB=bD!#=jFtQl&>
zgfgM)n9xi-U><Ln$1-p4V7}go>~9!~-i`1HekZG|3ZM_jvg`8xS?3Xucyzkl?)*+}
zcOd2iQcc~;p|U2|tyEXYm2!nVg&gw~u8=3|E96Rjg(P5EI7t=&q0QzrwFpd=8cb-D
zIfa{TCV{tyVSZ(p?S|QgwmVUFhiZ_za&}y&7DToC?@-rGs4S5z(B@rgiM&fKk$0&j
zGA2tT<aHs^pr_QGq7EhfkZvG>;<A?&A3Q}U>Az?$f#RyWF1YH3%;o)?<`O6_TW2Lp
zDCzq&mw<x{I$xH*b$a<Dkkr#UMSx=plw+VxW}zrF>sAa^o?W3lyFxrWoE&pFo*kw=
zyFz=G00l=Y1<+>mDCJqMyLcAbWODTtjkQ{%y2#h6BZG9&n2tub)>x}G5}+|nX@oYL
zT&PfBDvi)4uU2@SR(PE<@j5YapeP)O!Yr-uI<1fZg@-7G&}MUhQmD>1OgY{#Io&W%
zGt4)$4A+~z4f8F+w+K(vAK^MV=JveF572D}uY#AsCh$C151s{2gSFss@F;i~$PeB<
z0PX|#f>q#7a69-JXaEsV59CMimV=*yt3WlV0E@vwAU}+E1-J~z597%X;>`i)fwRFG
zU<No9Oaqg_L@*A>kL`^F!@*E61PlTLL4VK}^aAO?1mEm-d;Sgfg3rJw;6tzzYy<xQ
zo59F`x;@8$VPGgY5)1){gKTgpI0R&Z4A2Xt0~hF^o_5d%{sle<{{#sT10RA9z<c0b
zunlYhZ-cRXvHx-47;qFg0vraiKtIqMq=9eR&=0-<{{)|aUEn?N4%h<T0xjSbun9Z|
zn!wZG3Gf&22>2bi2mBJ;0#<_MU<oJ#Mc`5}2b=|Rz=>cy7zKudBf%ih52S&w_q#oN
zz(-&Q*aBL>M(_;yD|iU32CKjw;5N_*8o-U<dT<@M7AyhPpc0gU04M;LgNwmja2}Wi
zP6wxeDPRH^1&#)TK^Eu((!kgI7zf}p5C`vr?cgoY0ycs5U>$e@{2BZK+z;*ncY<3%
z1Gpa4f~!Fgl!Ib$1-KN<13w0{z)Wx&m<lF<QD7Jt0uBY4pbzK)4Dj!N(a&Hv_z>&_
zTfpn!C9nZJ4c351z=L2lxC`6{8o>3S4qOeYK?NuQ1z<k72+RTJf-}HrU>cYN#(?4A
z2yiIq4>Euoe6yD^4n6}PgAc&FpcT9UUIj0Mji3qq4Xgow27d&<1FON^;FsX%paEPD
z>cCGy2vmYapcv$X`CuM6AIt`4g44liU>cYV#)Hw|Sa2lB0{wsoxWG4Gx;^{B9uNl~
zfE{2PcpJP5Hi7lvX|M)71|9+rfM0`Of?L21U^%!7RD#984;Fx*fVp5cI0NK>lfh&#
z4vYpPz%Vcr3<lX?0LTD6z&BqoRzU)M2zG#0&;nir&EQG!7w{+Wd+-}@H@FSl46X;u
zz!FdnioxaJLhxg77C0T80!{#9z;JLR7z7RheSsT%{W)V2d;)fXcfi}A1#AS*f+xXa
z;3057SOsnaQE(l&8e9n$fkJR8xB$!sXM)qgsbC720LFl0!B8*+WC0KOW)HT2kHI_O
zAK*3cBG>@dfhWM9!9(D;;2v-%xE0(4R)8810%c$!m=ETHv%qQK1TYF51AJf*7yvRr
zI{5Z8<|_CX_zc9shhPWT0^R_B2b;hK@C<koJPsZO4}k~3Z@{m?o#0k*3s?!3gKNMN
za3v@MC7=+@2N!`na1J;V%mAl?sbB&a14e*h;0Q1fWP)D61-|9l^%d9${t05>eXt$0
zf;YjdU=!E?)`7L)QSdu(54Z!|3Zh^o2!mxH1WLg|PyptG3qc+@8{~o<a1uBHj0dB@
z6s~oX!36Le--Yo!cmW*F_T>oR14F>kK)%BBC~zd;YlI9hI1KQ8W5)4-@82@Ug8sk-
z`1&nl0N@*_<Xf-|`Oa^?Ihcb}!x#$sfpK6E7zTy|`>(eZ;fvD@`Ff?kHp2=JA(U_1
z9S9D!@+9~X$abV9Iu%R<CxMfJd@Ij*Fab;ilfVgJGLUWC6mSeU7K{KR!Es;|7!Bmd
zqfP~<fgCU$%mAl@nIIR44Pu|PRoW>&6x-}}i7&-&@t^owd?UUR|A-%Zx4S((fg70M
z+pk#@KpXfM_yYVBd;&fK?}Hs+JJ<sL0p0+wftSHXumL;^{sz{9zk)x5KY|CrZ^3G?
z3fu*L0e%i{0XKmgzzR?ct_4d$5LALvPy&iUAy@z|1s8$2;K$$`a3(k%oCZz;CxVIK
zcyJsT4t(Hna46^xGC)tT06$y?E&&&Td0;L$ADjoy1!sXXzzlF2I0;MvCx8iHEEolj
z1;fBla0ECU3<5s_S)f1gg1(@LuY9`#Tm~)%7l1r)Hkb)=z*I01j0GdWFyI4+fggcG
zfEV-uJ%9^*+aulc71#&90H1<5_z=7U-U5FI&x3W~ui#;DAGizr4BP;ggC(F0ECl)B
zQZNtv7|aAy!FX^C7z_piFX#cjNl*9e1qtvTcpJO{UIj0K7r+M41fB+K!DHZI@E~{q
z+y{OQ?f|!en?VGu0L#GDpc<5e0LTYF0dv6FU^<uz#)IR)aBw8Z1_MAJ&;xwyPWQBd
zFTtnaW3Ur!1#f}Zz>8o5cp9t$kAOdb`@!Ad7vN_g3hKc!a19873J?JK;1VzwoD0qX
z)4|DLGB_TL07rqt!J)tlJiq||PNPr3Ztx-40p12J;3cpDJPn=zkAMfkZ^1p_4sa`I
z05^c^z_lO*D#0R92rdN|fOEl_U<Q~5CW295I2Zy3fh^Du^a5^Rf^S@mJ@7f$4L$}R
zfOo*#;C1kKunBAcPlG4GpTR@m0dOz48~hU73Zh^o2!k4MH3)%9Pzn};0x%!U180Mo
z;8ZXLOax=VG2lor2n+=ML0{ko-<pg8@CDcnV&FZn9lQzt4xR_kfWLx2f(O8A@GEdT
zxCKN&7+edMfGSW5ia`Om99#k}0&~E5fEQRiGr-AUA~+5V1&4!ypdaV~I*fGBe()KH
zgI(ZV&<b7$FM;R4)8KLNFt{Jw4Q>NBfqJkUTn(zhVo(S!1@pj<!CByRFb#|cBY+Pa
z1`YvzK@adv2iFbo8Hj=Rz*g`EcnLIvwcru(J8&<!6Z{O^2*RKSTn&Pt90Wiim=7)j
zbHUl*R4@^Y07JkbAOoa>j&Iq+fiJ<Q;A8L}*aqGLuYniAdhitZ3wQ|J2UdYwK?E!Z
zA+Q+agUi5$;KyJVm;p`#lfdy{6c`SU1c!rxzzceTH1O>=*ah~2&%h_(Bk&&B4qCyR
z;5G0fcpj_+e+7?%hr#c_ec&E&C%6?ffa^gWr~yks5LAEwC<K>-OTY!-9B>9W4NL)(
zz&J1(3<F1iY%l=y1HFM8e9Lv}-{4E|Pw)|V2fPJd1uueTuns&49tRJB-+)!%4sa{D
z30x0q!B4>wa3xp_7J__G&b6x)1b}nT_#o-~z&+qDa64!KD?uGt29|<qumfxZ{{XLp
zSHVl*dGIWF5<Cw61lSIB`?m*P0&M@7J~{|ao_=uo)*+fFd(+gvHyu31_jQ(NfhYSq
z+2f}Ey<*7;FI8@nB`165)W7E~xuo74pJ8VDRIw&_qRZw<zLO_~Y@UIf%aVI4MNaaa
zyi_^2CHJ_NOS5%KzLSSslBevTPWgKzr9P*f!jm$#PGyHB_h5>g(@x<z<&+(k+<jUu
zX^YcN;USmgxeR>fBZt4cQ*}Ccx2MRNnM3tW5OP1$^*P$m$-60q=XS`g)V!oECiTg`
z{MDt%iJdm@niQVf!K+TuDgACDDu1au)tK-pmXWGccy5bl>y-O7HMT{kH6|)7TWp@Q
zZ-pn?ZJw&nk}FA(bM~$9QswM%R;cCDY@N=&6&`X)o^uRdo>HIFPT@K0bB@7_Q{<d>
z3ePF$9D{STT+$Y&ox*e4>7xHkA36M;ld99fo0%f#9D_N!zND{Rj&XKU3ePzPCu?5P
zPUjdLmm(*2%D?=LOyN1l;87_$rQb~-Lj0xbRAa)YSO@47p4;NtI>m9RV{nLNi_LTP
zt?)#<%~SPRWAH~Qa?ZXLUaFiu2K#HdG+U>$Z-s|klII+Q87cKS?G&D~KIa(hks{}`
zQ+Q4}=NL4!T+$Y&ox*e4>7rvzA36N}dvJ<Q2k#5bOX_rv!GFRtkr&0%N6s-APvJSo
z;4aPU)Jc8vFMsc*$cddc@9h+xa}2hm=#+jp5tYAGooY<@6w64}DLi`&+B)Uz$sU8M
zpGdzf^|=j~&2#pV@VGd*<h)Az#b=0K`Fmb?1}|Shgy-zPXEiTP&bU(L)=GVhGbhis
zMR<rLc}|^wPLXqt3E_#HoJ*zF_XkVP$+PPdo>R_Q-+d`^&iaHWa&lfsTatSTqQ)xC
zbIZAx*rNK#nzz5OblN<puZ2hHG@GaT&yu?(Mb2r9@SJik!<QUqE8(#}N$PZtv*i}A
zKf<YYF16~jc}_cpC-vDpr=3@($T{s4o>R_gX9+y9)7I&<GvDILSz@Z4mss`LJg1$)
zllp9))6Tgma!xyi=ah5Wc@8|W)7I&<^K^?R=eVhMo@~`;^PF}HPwKOIPCHLXk#pK9
zJg1z~&N1-BPFttb&fykM&T?h!%5bs&d|IbE=M`R#&*o4ph39hc4o~6D_zs@ECW+=l
zQ{-kk<eWU^&!Z5q_?Zql;kg{V-YGme;J0l}<+&YlZY`H4ei5A_XWQ!JiC=sU$9#LZ
z>W8Gyj&ktYQh380ye~9Q)h9Z09K78rax)yfk5YIu9lV_>I%S;Mf2ndZmh8V&IcLYG
z+TwE5cYsa@&(<l=GgAMyTWxSY=djDPT5XVL3#or^S#qh*L!{j67EhkNr2f5T@#NV=
z>fg)4GYywKvq=5hWXZ|14K*fcpV}9Z-T==ew0X`wk?=&9%@cpxeX%Y@&bbx{FICR&
zrzf;rnyu5h76=cyB+t2bdn~0sr=7xc)~9T=`tactIj5b%bIK_jEx8A@T+$Y&ox*e4
z=`!%Aj~xE)N!97#-H{^a+`HYT>r49Dxp%uIh3DM6-Kcp<JDv9rD^lddPWhL=niQUM
zZC#S0Q~KTXA;e#*PBkWcigkca;n{1Cty7-UrT$e>pXAB&yVSoj%}bN#n5lmOOKt*;
z)Nx&)+mLSaoa04!h$MNc4c0nxX^Nb4ya+E<&K}nnq{unPi||BlVmEf4CvusF+vYj#
z6dn&AlRT%LXQs$G?G#?BoNZ@Lik#C<;fb6)cQt|3Xa7wT9&M0kv8jKPEuK8TP5qmo
zdFr`rDsQajrOET!)W1=dTuv&3^azW0I&ra6&3CKZuoRx%ZejbZ`fNEhS1h^1Q{-HR
z&*JbbJB6p_ipBL>I%kp=Tbw$3TXHtfsneapbL#x|Fy-sCvy&EdM!phWj*)&2S!&Gt
zhzR)mmzFcnB`&tu`4at7^9<oBxuZJyHgC2RO!@mv<a~y4UP`_s6Bh5s#HBuWjt{E;
zK1$(v9K82ZcnFKQ`rDq$vzj8zw;epy2I0w7k3XlJ;^}<Fd)<=DqnuSyvcA7Nc&R#V
z-uaeXW{!`T{@Y~9**xc5v3YYSDit~9Hdt~t&nai~=2~?)gJ&(d3!Ir&{3(k!k92DL
z{;GLBgqP}<M=jok-N-%U;HAnvVDT>MMsBr(mnwI+#k;s0xnDYXsd7KJct7bzuED`e
zmAk>>UDAzQ*uhJcTW0Yt?MCiu2QO7FXz?!VMy|raOO;z>@#b4{&Uxh5Jj3QW=g}1@
zyv}M3<5CANwZ022-sPPF$@y@;=JgO>s@%C2Z$US5XF7PPax*O66_%W{eWz%iVe_2r
zo07uotd{qK9K6)}##+351XBNwvv>um4ARGFURq%{yrV3+qHcIYES?{pIMUg^>=d4}
zeTSs*5Ki_(KL<~>PgGlLos(w?B;|Ug$~o3Sx5X>Q##EghgY-K8|220$;8~UR|3BLv
z^ieUV4yB@cG&C|o{tOs}Ibaa#%&Dl9vjN*+)3MEM2;|hMGci|UO-04ToQk<}Dt=u`
zxfBh*u0o@v#KNSaT7^YLMPGlf&pDsZ&CT(y>v#RGtLyhY7w?_(KJWYexj*-xbDrn9
z&$A&~I;Lq$0`2>|`b_iN_ve)6w{N$nrE~GMbS}S5`@Hu3Qnk838(#OcbbY4P<4bR^
ziLWCXc5zyOZ_}8UaGcKb2dXuw=Ff@mrL_Fg9Ho-&1=W^9C8qD&l+t|P)2cNFd{3q{
z-}ks`O#xqDO7ndWsn#6u-JjBY-#w~b8t|=6X}<5al;+Q~FRIoOi23=H=Eq#6S}VTv
z)~Q-sT7X}r+A@yQWAvGn=GV7OwaWs&=9K39E=g&A+ZU_0JP>nXO7mk@s<tBFyC9|c
zzH?Mt8StH%()>K<rZoRO(X5oFq1o|$PSrjWvjcy8M77H~9bbRmbu<}`FWf}!0d2hc
zt~fAU%*LvAWk4IF+EoE<v}zpzEvMSm0d16O*95eYs$Gkgo@Ym=G{3Lkk<u{7-6K^T
z;%Vvops%UH`7&vrci(+$Wb)e4sd?_-MbY0qEnS~!*GXcj?Jw&4Z0fwwKdN?pK>NLF
zs{-0@RJ$Rd{Zh5hp~a0Z&AC#qt9D~R+m0sltSg|sqQ1`uw3pRqTD;yvIoZCK`0~Gy
z&;x${x5m8bfU^mCUbWQ$?U_U?xH+JGOMPDqXiuv4CA4(EJg!=IKzmrVTLLj3Qtj4&
z_CTWL-xkpBO|*hF0qt(pZVza8YJGR0NgMpv)LT=Ue;wVN($pT;(52d)cG8<KpGA{7
zu{NM}sP8V-{9G<iX?`x3r8NKkd1*?sYS~8(s(sl`dU-BJlRQoH=itJ`mw&hV{5&f)
zrfGhj7o;>gJf1d$iO%t~^u55>)Zlz)rhVSMXRd1NG|&AzzW48G>H18&M-6`aKBhj?
z{Ps;tX@2{PJuO|Iucg~}a@yy$?<Cc}vcF-jUrz9}bbY4Xi!Z$$r@kJ9bS|S3tw6Lm
zrkBgHs@)gx9hGPYiI(;quG;+pA73Pw^`(PEOZy5`dm!NZpJQWRfoN&p-&9+VmfrrX
z+Jk8U{$`>@Ukzx#^R#rI?eerZ7wOid-=eo^UVpx!zOM!9`<ZHA4`{Ed_HaOZMYX<w
zwpBEee+*69;ICDFUo<w;{I$v#QkuV3`D~&UYzV~smikQdWA>*sKjx!eOzF>feYZ5n
zQ4~FdM(%NarrG+hXcTc;y!NZUo|MmD_ZH231sqs?c{#oZk@)hZ4W@~18mAA?;`O{-
z6y5qSd{IENJSFB$UY=5)<!KtH;`W(l^{x6BKB>>wtj{E#Y}epp7q`JQ@yOQhwLvt=
zB`?PT+hvLGz`oAKQq-)uJPs9~|D3A<EyFp}{O4RtQkwsqYf+*Vm``Hn7mkiAtU{9m
z(<G*87p63cY1##eR`6eV^MK7GiFK~}OpC`z1h%tMKL0v8J>~P~d|68K=lsVsW`9z}
z0Y5*QXnEf_;A}#ss_)5wHc5R?p-KB}T;=d&G#Q6)2}x~ZHRjW)^FlwEXwg7GJ5jZ7
z2ejiw%ZoD4pvAeA=3J>!sy*w@>^~T(F*of$<&KIHt>8I#X8%E<`kv=hTwiX#c9?44
z31|mt%+0EGc)on~nHG84KaWY~plSJ@wl}3^Jnc`OCf7>*i=3+eE~WY35BXI}^S>XG
z*8J~>yq@?9Bu}f)^6@q4vs|er!ttwKeWD%jX+KP9qdo2WUVY*#^|TjKzL}o(Y)UKh
zv~Q+j`qypR=U=yJUwrQ*C)v`u<a_nKEvBbg%oma{2mE|e+wk9<mA<yu6)E%>ntWf;
z*Q_0)$@djai`$@e_NIKISsO(Y-(aA=`$c0j&5yZGweJRecce7m*R9(3ByeiGInnrQ
zVQ+8yjp{Sak9nPHTLQi-6Rp5B-?v<~m+<9DF5VbjDjMI7c{vdCV)dEk$E;TE2Z5Lu
zY0Rww?E=yGt8b?HbLnjw<7b;`KMce?TkA8;kNGyui)q@AtP*d3ro=3a3SRNf+2Lu4
zmcPwTc>6h`vHjRPXNNNrt>7ni!rOmLeXnvZ9;4iTahj*a_a(Ia!sFut#Q`m&+R0kq
zc1osWo}@m}(lJj6XcjZ4F<%SBe7E{UOUFDWpjpf#HRezMO-#}LRZL$?$NX6!rnOzP
zbWCfzuUSlM`wsQ__pC!{gWR)x&F)#E$-T!k|2is2`9zC#>JUwQuLtVeHzJ;A1*Z8i
z|E${2@x|j_n&T+h{vaCHpK1QJ@;1%8R!rMPn7Ge~nO_)xJudn+F{PfA78iRXtjXJ}
zNVNj<Nq_k<rA$h5F$0>5iRNO;`$&uVTGB5rrfPA_SHfBxQ#BWpc=>h@eJRyGv`k7n
zz-Mzpd<V9HUlZ2;R_y?vy&rxt;7e)F7k{=WT_Dv&&%Z6t<Dy8lfs_`1wovWKL~}94
z6UQay<0+qLwodkNK#SwzdoUF<p7TY8aewrnF=>a{xF^>`qTQWnE*I4brG0mVwVY_T
zq&4b_uNSn{Z>w*=c4OLCSXgMj&%RyDnRazbllc&TUz7UU(fn)0|4y4|lCQO0d^RU8
zOZk#(B`3ur(PZ!YESKiQm+G^e6put>=d?IS>Xhx0RDFJ)qDdL6FV0bYwJD#Ur)a(}
z&QX0;iO=OCnzcbRd`^q=%t<7^%MqwA%EeN2eoBkusdjd%zW8&hYG<T;`4UjIvXmBI
zd#at1iW!glzla%+?Z1dAntkrDn7@gl_`aK!djz^{Q>m|z@4NY$_1Q$U$kW6Vd-07;
z`NU(|2h{gR%E^t<ukSdtJYxEq`9`IDetpOM8{d)Y`xAAgw|9ufwkIvX4^6a!zXY^{
z)c033X@fsM-zrLeZ^GB&`9wL<*cF&2{bK7Edjnd&PKq~G`&*#C-)MclX7!0C^_k|^
z_eMao`nId~cg%S)a{NrTR}w8U%{-#Ml+x^VL$nt)=07=3$9!IWrui`kQkoz0NsakG
zQbB5aLVa&>K3(6VDb261H>LUY-LLgY!1zVIl<|}6h3y_RsmC-q?`tBN7U7HM45#i)
z`TYBtXlb8af43yQ0*fi<eGQ+};ykERw$-Wn{5(aA3(=7Dy#8Fu=jSP!?~C)$`Z^Pz
z%f-)AG<;5zamdSYhV6=UOi#Nk<@47#Tax-*U;AsEOH-P^##xtWE*JlPy(s02=Swb5
zGrBOP`S<I2shBeEdFo5YjOT=E>6oI~{n}#Y=jj~8WAB$Ls88Nd`kK98IwPRj`=vRF
zR$x9^qqUf`&<N>bie@oS4QLkgqls2fK%VKXB+>FR0j*el!vflP^&O;b_g_0sLX+1H
zU$fVa6U2vhaKQII_4%6l-laadu;qI2>nl>9ubJ-%^&JxM9il#8Ghar1hX#EAb9B-^
zUo+p|(4>8b1$=)}pRbwk_v#xS@a;-`BYe$#ZzR4EhX;JGX??zCzHM6HI|9C!)#q#G
z`>y(q2>8CEK3_B6GwLf0_%^D~*Ua~X`i>0v9#NmKnXgxUM+JQMtIyZWcaQpx4*2d&
zd?S3#e77dP5hDV=FNm)r8s=-}yIy=~#|C^?C-ohmnXf&mZ`jCy?=toIn)xnO-#Y`o
zOVsCU=3A`3cLjV4)aPsFyHI`a4*1SfpRbv(LVcqGzSGs`Yv!A+zV`%trzXA;?+a*C
zMPnR%&0>z1m}t3xZ;bkU&3wnH@3?^Po$B*7^BtwW;{(1!)#q#GD^TD21HOM8m9)>-
z%(n+k+BZ7j8&aRIneP|sJ0akEO?|#*z8|UY#DMR6>hm@8eMfyC2>6~>pRbv(UwvZ&
zzCQK&n)x17-v<M}d(`J^=DS0ECk1?8RG+Vz??&}~DB!zReZFSCcJ+-7_}bLxYvx<3
zz7Gd{wd(UV^L<)<;{v|()#q#GJ4<~h2Yeq_pRbv(RDBZyzK@8nG#W86pcN<DFkiEn
zCrivyeit#|`=G}3HS>*5d?Tg>eD77CubJ<i>ibB*ccl2Z{(Q}Rhl&sFqXAz=>+?19
zy>(>Vz7eMce1Aie_h-IlzCDR=*vA6C->c8p%=c^cof`1Hk@!ZG2DH~yn-S1nQEg^G
zdr7rfX#8`Z;pF}8chO{Tntc|Nb1x)Xfob_sPEN<$vuU5FeKYNobz$9}O8Me-Vbz{c
zUzsGC+8#@^yx9TmVfD=kXb-9H;{ojf)#e7Ydo|{10qt(}osO1%e|<Ze%oks?aqku%
z+8Oxbu%$WI%A3T;+^q;`pHuBzv~+!)TA#03eOGCHz7}bfD^;5ph}o(!ea&JvhI|^c
zPPOv_F&Ak}U$dAOg?t+G0@cnB#5`ML`kKWo5BW6a9Mvue#4OdAzGg8$8uDq($*Ro{
z#5`GJ`kKW&Ddf|bqgDH4Am)2DrmtDdcZPf#^JvvR6^MDb#`HCdnGN|gX1;0{24e0j
zOs)rCvzUKHlk1@};CoYjzGl85^<5P3{Zf6tX1>?e_vwJ|)x<Z#*Ua~$#5bZU;M=10
z`I`A&)cO_#e9x)R*UUGdzJ&qblj`#|^F6M<MFHQ#>hm@8eN}zc0bh^$e9e4!tFI>D
zyIp<0X1;Fq)dqZDP@k`v?*{cP4*0HBpRbwkO7$%X_*SUT*UZ<dzPf;Ksrr1)e0A!p
z$H%_|UT<qeV>8Wvy<L!K1*ZA0x1UP;BE9&CH81UxXRW$byj?RX`a~*bUd~C;>4}!_
za`Cj;DJ|n^rCQ&`((u$aJ<;+m31}tiYY1q?>RTGn#;evC(8g-arhqm^ea&d;*VN<D
z<Tc#aY;4~nKD0~Kmlx%tDAy6UbYv1U^0hqu&dJdMO{}sVj>drHnJ*r9jd^g&Cz{2~
z3uqSe??)UMGvnpC2aReAtUl2!=I;ZV#r#zgv!E?6=`+9WKTmv-uUX930-D8qC5f45
zKELfRrF?$dUkqp#b5km&-}Y}MKGz1n?fn7GVm^|@ELcw4)7#g?mmeLoETBCo8qe)7
z3uyNx^&PY#pxu*b!&aija&CXEcPCnOWx%)A)6%{*Xfp6u1$?)tPqeh}X7zOhd{&=m
zX`j`1HG*7Y{(R}u`h3mi%k=>*()M4CCfADj{P}Wu%ID9QWdY4%Hl||w^QA8F6<B@#
zd|4FGEartt%z|qIZ9hNpMZRWjKRcjV%rlahdFGS$*}Z3W$|st|JT;(M%#u`0zwHwf
zpKF8P_OSuYVxEx1EVwo=8FxP8xxZ)fKJn#8MV)B;bLTmX-l^JkBBZtvi8gFiKs!n_
zw$BB$BShnyFgK#5=is60^EK<UVF4}5B}u*Yj${s+&mV`sp-CxUvzUJhXcluQ71JMw
zUnaf+i|LQUj(}z{f1JcD=+d@Fr7|ayMr=jnbYz<UJXJJlgK6Tk=f2-d`TXapqNRQI
z{$_LHbGi7>Q$@q)H2=Bpv#I+0JVo>Ci*qDb*}j?b`FV;aWvqR1j_P|N@wr_5JVnFi
zwD=m!Nu((1OUI1p>l^~xgDK5_?t5QSpUcI6?z=9f`OkgtOf;8Ea&JxQyCvmI=4YaP
zA*ChrEYYq{#f;}mE*vwS6RM?Sie~Q#E#~L*k~sd)YpGB87XsRqiB@n^KwGK4o6%yq
zH0Q#$CR+X%5z^OtqxyW!uFd*@7HQaOG<nT2U(%l)ah(^Xe4<&*3j&(OtVqT5ulLgv
zUxC%<U+-lB&0?OC#4Pwyo_slhtyHhu9RDX4+G0+d=B|f;7LT9YC;0c_l+Rrc0nO@@
z_MeDP(n!~5TI6X~pJ?w(`K&(E#Me#W^w_=&A6n#V;*o7cK$Et~b_AM?t@-jr(D&Yl
zq<o@T%z}VsG4~yQU`&5(|AI!ft_}X!?ha@c^Vdntf?M)1OX8*b$M$tJ8C%o*u}y2%
z*An-~DWCOqNVEE+{V(H_G}85%CharL>J#n7l+WrjO?<Zzn16BmWGCBm_}JyI320BJ
zwEWVXSmNz%n!fglXxi;@Wl4Ga8UHRDzvFO6Kzk~w@0hiLTprh4O!ISjo95+W+TDTr
z9!+9K>jK)ts@)UNdR4nOpgpKsPe8jb(F*PhX!oe^ezaIF%~_X4cZ$Y$@=f#G{x;2P
zyJ-&)P_Aj2FZLegR$@v$runb^qDgVnY<|kQ)hVC59#oSuzE9?%Y@bVf1*X~jG>yH}
z{P!r=rRwwZ6ixgVQ*x19WxFcn^Yau<%9t<CQGF{DpUcJ1Q#5Q&%a7>K9B0^C(lI^l
zl9bPXkFq4G&*kF3M_H88{P!pqC7R2{e~)rO$|rfsKiMi$T5|tPw9`^Cr7!bxiI$Ej
zTE1%On4;Nx6pQ)Qykrg*iZA(UeKd>un3zQmq4Dp4&nu^>)*H~Ks`fQ8rMCF@r1;Zu
zUk_-L#K(Ud`EWps*BSDngZctm{Cin>(TR_srLUuL#1xBZ{`?e8(lagYGrb<hq<sGT
z6fNzu>*)BzS70&y`6(Jcr}@{>djj=IKC&H~(){b;$W(p)+&w(y^XG0hrTKHWARRLz
z5B|ya&*2C5XTGQXC8hau_YaBY+AeL&%Mp+*9Wx$>Tr5TDn4;O-wV03PC1w4ezokAt
z`{r*5XulGTsq#2ldcM3adGh*anm=Deli&X{EzVQt%TH21f4+#8_St;-LCWXP7tws5
zKVQC^^7(m+=KK8n?(-?1pQmWP&!1;cr+j{%qKU7c{*1f3H0Orm8=~>rXj=Zi)3h(e
zY`$*<Vm_uZP4i>EP4i-!_GFx-OEEs^lbCEz1+-q#_+9*O2DJ5}vHrO+p!FoaVc$Ya
z&$BP1aXMp~KYpT-iqrggc3aBlkDq91pUtz?DW5-nqKR)n^OXBUJZCuBm1vP^a-Xo6
zs}iliv?Q0~aPfD~-{#}G#VcD!%IDAP%h5=~)#vw%XyW(llfIE{S<2`4i)d2Dd~yEj
zYf5~s4Sv6fhRtbGSDY&+FHY6x=P8<BpFe&zDW9LGXlbAI^`{e`%f-)AG|BVZ(s8Nn
zLXG(hT6zwipTvwz^V=Yrgfh)<Lq*Exw?VYD&)RT$;w!M2ej7x?=d`$=b&O`G>htpy
z&96^#kz8dvHRbd36iv$bxtMQS;&Zw9d5VV3Y5CFq*RhG|n4b2bl+S;i{y<Wn%f)}4
zK0c-SuhZ{IG?$D29`o3gPx6$1vK6K@|8@G1R7~lUyc{OBbWG9gJ!U$lX!bg7F*oHU
zbI>27yrjN^d@a_gPc(K;i{}w>W&7J<@qOX|&E}bC6glWQ>f@iJ;<i5~T7hXZJ?*zC
zt<2MQrnJb@b|hN-|IJH%euY0qV~wTYc?8koc`aqwL}OQQ5I^MFEcE8?%dwVsu&>2B
z<pxzdIN*COpqcM!)eZ^x<U1f_cd)OSFa8b)+MxlTd{<h0zGl8BwZ8WRe2)Y)^F65A
zdjr0^0-E`5QSE&JUspggU#Duhfba5vX1-R{jtlrM4ru0Eq}uTT-zNi_`Oa4D{Q=+H
zfM&i@)kX(=Qv;g$PFC%NfbYbBX1@2Tc4ELcBA}V?aMeB#@MQv;`Su-}%)v1M-=6}S
z`F^X~2LryJ2Q>5jM75IwzLx@;`Cd?Me84vl(9GAb+Ju1b;ecko2UPnIz5)=RFU`fT
z19zj<aNYV^tRt^cZCt>&I-r^F2Gu6xOW)6~MU(r4uUVc~sx~#?TP|8@-od_R-$%Jr
zwG#Ek=cRpY7Y8(}uST_LluPG%5n2U#`kKA2Tp&KQkEqXoJ*o(3R^REWeN=sZp0h-w
zeZFSCQ&gKCsBenK^fmL1S8aBneIE>H=6k<ta{|6m0nL2JsP-a0d5!a5{|eCx>9d`I
zn1`s(*DPj%YQG5h_8pRpgRhzIFRJ}A;QK>BGvBXO`&GdA^MGc)?W+Ac;QLWZlYTMZ
zmXs#vO?&a*XwR!Q6sT_?rTO(esoL*6pVjxcYQOh18^d@lf$=lVkNL3re(U)x=2unw
zgKBcEm=^yI95HvR=EuBGeSh|1S}tEsX}<5alqPjqeK-Fb?MBu12I}ifX?}fIq%^<2
z<^M*zRJDHu>XYBoko$|TSsUWt(?Hu7@LjAiea(C|s^xKErtfv14ru24q-rez-#G!z
zeC4XO27I#vn)yyu?Xv-2NkB8-MAfbj_&yZS%y)unx8h5`Hog~4UK@Qa_T{2zq-u8s
z>N`?n`kK{um}*}R_%Z>_eE*Y8=EPU<@$Z0p>s~aux2_Mwd{ceCW-))O+Jgb#&VXjV
zpQ`p~z_%@+nePXx{a3*E-GFAk&8j^S@I4dI%=b;zo(=e(2x#VeRJDibW~>MFb+2f-
zyn}iJ+Wo4PV@mth#WACU&kSgHsP>6~)~(uE0qqN_t&S^`ME7qusP+b@<a(F)8uosv
zQ?%0P;5Sv1`<ZE1q2-|!5i{-kjQV^{yt1{a@0ftENqxR%zIye&7oS{z^7;_xl8d5h
zv>I|5ubP~X*96cm3TSamwDVOf4&-t+nzY^5ESEFTr0tUfzB%giHS?9KZ%V-TQT6$n
z`6jDxYQQ&MeZFSClhjwDKG$dT-wEoQ9*CI>XcqHb8uRRcZ-n}M&3s3w?;LzGelkWj
zeutpR`1xAwV~q0A7NfnzhAp^tmkrDI0TBn;?*f_G!?HOb=ccotug7idSA$-#S<j7{
zlawoAKTnU>-kO{%yeZkQ>ll{Z2qfM%_Ip6#)x)x5ft;JmzDAEb*slfsV5^=Rb4^mN
zjQs*VwmOENJ}f&1lz|1H9jpNxz!oqBvS$p-js~Tm6088-pbrd!T_96Vo56H2AGCqh
zpciZgJ3(~ju<R&M0_K5c&;{03Q0`pHft?_lM>$Xe=7DC=1=fR2U<cR-MxHk;+j&0y
zaS{7VhGo}*jbIy?-b5atyk%In4s?Qbpre)gKtI?Dc7x$<^Z_UX3qU(q12%vyU<gFZ
z$qAHzd7v3|f%RY$*a7B#hH(HLU@hneTfuHH{Bru_3i<@}g3Vwjh^{0qC;{uiCa?qS
z10$~*mMsPqpaJAMX&0Ce+Q4ei3pRtDAi9oNpajeV&7cdc2b;hSun&y<EO9{vXaK7~
z4;TR3!Cp{w{jltKP!8%qCs+qIf^A?AC|t!H1am<R=m2X$KiCR(gW)&Ox1bCx0PSE6
z*Z{VGA&~tX^9z)MO0WWSgFY|_c7e=|v>!|d^FbR}4SK<5uoFaGv>%j!d7v3|f%RY$
z*a7x|k)NmipaL|2RiFn9fbC!}DEb2J2j!p+bb_&5kGsL})wBtefd!x)tN|Oq7BB>|
zH`69i3M#=0&<*;)AlL;mU!+Z7I+zdIz-rJ7HiMlY`VwsdC14(C23=r1*aUWfePCoa
zZ2}db0jvT&U;u0fdqL4Hv<Z}hI?xH$fsJ4r*aJGa_iVV0c7UC?Q~w>*4@yAcUGxE%
z3!3ktj;~M$7y#SBUQl!|b%1hE(?dM47W9LyU^f_kAN>c)zyi<?)_^Tw2xRZ4@4zmQ
zd4N6w0}oOM*b9ojN*$ma)PeS1{9psv0){~LYs3Jhpc1SA-JlN)f?Xi<bz+0*U_NLA
ztHEZl6GRWwc2EN5fo9MJ)`QU-hz%;i3eXMuz#zyxPFye@%m-~?HRuJK!A=nU7qLMJ
zm<O6c7g!HAfgNBU82JR_3MxPYSOt2(0N4)pf}(!<1C)b0&<WOojbIzt0}8*v*nzpA
z26TY6pdV}nyTR}$85d9n7JzoJ25bOZz!1njMcY9ss01rOH|PU{U>C@2r2Swzm=D^(
zYS0TdgPkDyChZ3$U>;}&U0^-f1a^RZVC1)GKd1l=U=`>A17JJY3yPkm{h%Dwfljav
zYy{iD9#A+y`@vjL13JK3&=0nP-C+2)X+J0f3qU(q12%vyU<hQNq5Yr~RDu<t8}xxe
zunT0KrTt(!m=D^(YS0TdgPkDSMEgMrm<O6c7g!HAfgNBU82KFS2Nj?JtO7k?0Bi?)
zLDBQXV=J6V8$tY@fPD?<0BiMJKl`nEyqo>-S+p0F0r9NS{RZ}1^w{1f*n5#RU#35R
zl;6UB2xRZ3Pk@{&WnZbsE7*5~J}{`~a_f?E)7j70<8&P(KTey0#H(Q609Jt>JvYF9
zyB_alUo@BT2jxIK>vX@7{Wd+8^9|=|-49SVkaKP9SA$-#S<mg1{rW^7#l8g01I>DF
zlkRu0->1hCYn8@d_Xu+j$hmFo_khAj85<zy=CZHR;|}&~K|k24=f*silq+MuK##>&
zHzPT}wSxHy<lOMH8ADJ8763Wd&VG#^Z(zR#41w%9iC(Gu73{n9SbTdl{?Jm&HYR2N
z6UROD(}4EXf8x0CR{9!9oBk8W>%PGF0*U{hI39i*V+zWE)G_xa<_qWm!ndBr_yaj!
z%f4Tah5Or9`e3*A!`KGyePAu<2fM)-##zeuYneTlFi$yO13JJ~FkH*5(D~5KzE6(_
zuTA{B*k?NRnAbmvx$FPaeu(>4X&Kk*9PXoF&s^F~|MW4>Gv{(ozlQ4pv~lm*3`Rc4
z{ROmhoo&%;EsK9Ns01rO7jf2u9bg|QB;Ht113JJUv3G$S@u!0|#NPmhK$gB)O+CF}
zCy4Ih-u58(bFd2ZfHl;+0Stkx_M7zK0@~6JcFx8}y>+yu6O5*=Qn34K#)mp~ac|8K
zyNi3#da(OZ&J#;wbn^aa9T@vi!Z&if4eSAhoSO@3R4eWyFR&f#1>$dDzY6q#0Z{Y^
z_gYX6>VT9Pb2)Pr$ngU9?O+Yqpy#%*AJXG&JNbiBPzl7dZ#m<zf_?!NpaHA`JzxNA
z2U2cN3puwY$9p+fw31vvIj94jK+0|7+S~)=czg%*fcI-Vz&<dNHpuz^P3H<LXt&-E
z$8ub(#}%KTFTg6$0|tQPzGgn{sH87G&3swF*w%6_FJ=tD7BB>Qzn+v`z&)fLtkHYP
zTJ9nJU@MSVHFqWZ@${|mb=rp;*>BV1J-RRa40Qo1H}A@1-^{*CkLRD8oNHshT8}$)
zZmnhCugBf@C*}Is59)DtS#oYP`%*m~#kC@Jm9U?u$18Ns{J-wI@%L$r|HSd=HQWbo
zXFTs@UaqB|>EBJ{zV6<nEi2FmK^tW@gC5H51?wog2aNeL;{`^3g|P>F@XhT>yj^!N
zhk^7-Gy5HSJeO;t2FUr1jN>*P%R$<iyCONii{lK()4_Z_x9<Ez8>`+;8gISsGfjy;
z*qH2d%G=nl2EEFMm|MGO(@5G;L>t!L#hjqcb=u}qv~Dn+_O1pElp6qbl-&q+Q@)Hg
z@4!<`n>XSs)HY}FW$+YJemrISDZ8F>of^9my${T%OfOhPx$U5nvfIFL;w}LD@Kg|c
z8@{m`d*ci^kbdiAzfO-ks3Sh7_qVYZaGwYLpzTxC12%(s7t&6!9u!wHmS6xBT}1t0
z9q3v_-C$%j*Xj~pPe3==1?JZg4@g~m7>h#Ux6h{^h_??6RWW`GDFar6Ua%SL1Q9Vu
zff6teG=uHbQB*@efljavYy{iD9x#{tL<d+4`oUJPfP2Mea@bK%onYj}v;|av2CxeB
z0LgI!xorVMAp1$~<De8wr!VG%xt}IJ=m)#O81ml$`nX5!0-K00aVqhw0NtPu41!%C
zLyR2Q2_o9R0Pkpgm0&(?ZlHauKo1xIHRQjB{6`VDL}SmT4{N|$u$nl{#HnCR8o(+r
zo-rv0bznVxwh8P2qZyA<Pzf^hM-EKau^CHSrc?i3>MW-p3#oTE7*5^oU<24GWyzrn
ztk+z&lEZGWi5#|5_g=7(dbfcZVy*>S!EoAH2DX4f+M1!RV(O{@edIF;RujKh^BGS6
zj{#+10T@O663~u+4JakX3eXMe$afz3G;2<o%V-;z4(5Y4uo}p?^l{%E1iL^l=Qe|#
zs#S7s1?UD+b~D%hPQCui^gZGN_U(E+`r4#iDf>!2UVkQi0d|0WU?i_+#rm2ys+l%`
zc|hVfv+n}y!6vW+$oWY3YnCQ_1N$v{yh7{gX5XjBV%f$0Yr}o&mlJFQI;Z<9lJn!w
zXN)*E{u1WNRUCuz4#tPqtTDYwnR3e1fxVO~qFgzs13i=-0DD0Zo;uJ8cH<q6w+t-M
z7<0A0()*K`9m-cIuTfs9eEWIKO}+nar?2*cqO-^ol!H3Z3D$v)U>n#2_Tnod*HXNd
zU|%!+eJTA7DnJ8R1$w{$*berBB3?V@-pc$0(of~jGfzMRSOK~~H&_SOgFdhkYysQB
zZm<_*zC+u=w(l`dz+RB~J~@CK7z>KQbTAiGf;!L+I>BnN2CM_UU;qq)9bgyO1NMSw
z3-y2;7z;|lTrdyJ2Ma(0=m1?{9as-GfPOFl2Eh(61frL?w}B!s66C;GPy)(81*imd
zpbd0@F0cmlfIhGhYzAAw4lo4vg3Qa@JHRL~1{8x*P!8sU8qf^d!79)V)`31S00zM}
zupR6GJHaln2NeE*d_ggo4(5UiPzh>4184*7pc8a~Zm<^gfL^cxYy_LYAlM4FgWOii
zfc0Pq>;ofzNWXvzPzjnrJ6H|+!6vW+41vs#C=bShQZNtHfp)MOtOe`A02l)M!0=ZX
z1277V2ID~qC<EnSK3D)6KpW@)t3Wqc3)X`^un}wmgJ3Jz4t9beum|h|*=^JXa$qbd
z0cD^9RDyQU4>o}<U_00a_JHh<>3c8|<iHp(9+ZGmPyw1jFBk;bpHLUbfiYk_=msUP
z(gv^{jNeZGfB~=%jC_r81!bTD%m+1~0jvPspa*OOo4_F026liUup8_H(N7r*FdP(t
z63`AhK^N!-Ye5g_1^vLDecFE08_9h^?hT7pWwI^c8t_H%74Rr{2D}V@4*m%8Z^&ei
z0>^`iU?w;RECMay8t_H%74Rr{2D}V@4*m%8KZhS24<-Vsn@73)8dtKfXFnX|sOxaq
z@5;#c*rQz?nd~t3W!Gi02g&}LOjf@8Ex#jr7<=)L0J6z*;pwzZzE2?E^(q2Kf@8s$
z>oZw7-u+qfU@za{JQ^e~NF2!a@maGzk{k2!Pn`F`+{AHH$4wkJ>3{t>%U}9({Dg7i
zC$RtDel8l<x^ijT!bR-cT9SR89o09s)wVQ8<LVZ+)<xrLRyI;J*|)Vs<63GP#w}@T
zOAZ#bwk8M74V<ZOtmkKZ*jBrO!^NCIZ>m|?wvY(%&+4|O7ECqCE{;SM3zybcN8{pf
z)lEy6);8j9Y-+2ODe-^1y_<qE1~T`yGH2!gmX!Hrn`pAVAIN-`ax%Afv9CmwxhtE@
zd4YUKT;{iwlQ~}|2NV)bV#!|SzKpkc<8oXhWdxUN!!|pV?-w5eq?}v>ySbQTo`_fC
zNIc;)ftA}!xxJJd&p9b4*Nv4s!z(A());;{M6Nk0Cw?n8k7LO}u3fpdb5t^xW80)|
z***oVTsh^+DYx5_N0WGhDzDsh?jzH=8Em_Vle$S6*<|o6p4>}vbx|}bR+1l9?<HDJ
z`ei!hrc>^2`O>&<mO?9Bj-`FuKg>P;E}m;Vu7%iHy(>Aka$~s{jXhWXtNHz#mFw`z
z6;rPGUzEGvD<}81>6BZwKb-5AF3w3GOMY^H-$c3999w;|mppFKy_B1`lh^TidC_K$
zZL?hO;DohZG%2^i3VGVS95eLsCVKX~a5=g6N}aZCq}+o>*jrt)m$9&I41XYZ9Rnx#
zaQVBh(heCrnPYyu&6njxYiv-_EFOn%+vNI`lktD#!(Oh#geNu2^_K9Y26^pCc+#74
z{Ultj<S3HsB;hgw$!kr*lb(@zpYV7W$^1^Zw1Ro3uZIPZys|~{YoF{3;yXYxFB2}W
zkjeZ@xV%zwJu%)1e@Dz^J|+B!n9ICLc+x@k`d<*gIwtcV(d7!?zZK{m%*MSSens_l
zd*w~e6-3AE7da|m)ckSCL~p(&E$Gnp@;|6Wa^JMg^qs#-`bYE=5sl}=r^Cl<d-9@p
zM5n=rbKOb|(dB+){gD?P9xZ~GxbjB?^C?pQzskqYw~2VhrM~On*57&25z&|6>$QEB
z&kpVvoTl!>qc5}HpWi#8UJ-P&_V;=HBmcj>_+{pa|0(t*w`H;tN8%5#UvO(CEB}A6
z@E6(JX7RRBJ~?-2w3UOM#4BQ8B;HTqd<}l)dm@vu{3`_rpwG;d|g6Q+U6rx_ocF
z%j5DL@HKFDarq2!`#nA!zRlxD!}ogpUGR}p_xq27mw0>(e7?s|hOh9rd^d58$7jO(
zJucsomG=LHOI!Mf+fKC2(?1R0a7QNlF7g+>4!#9m#icD={?_gIb(w6IOG`Mn8Mj&g
zu6TNX|6YMU{1-M}N5y}4ve4tJ0{+aV{r)ea7kTA-;3GXQf8(TkFq8ed<}2elvgE+=
z96Rm6@$7;7<GG>q!0{aLxcohWLHJnW%J{zk-|O)o!AH-q_8lJm20q5)|A3G6_+j*W
z_m48!4{5%~!uP;$RX!SC?3Et}FY)+C;I>(R+x<YU*IDTDOnql(lJ6OCS?{p<dLCTX
zK8gq;?WuyxI*94@a9I;Ey%jF&BQl|-{1tFnE3xv|!)4vX^qb+bhGP6qxU8pG`TO9q
zwqo%ghRZsO>ED3Mnv3br!e#x%;(Zq`YcW>-6}YU+nEpCk)@TOxdi^b2)@!W%pW(80
zWAWdD%Q}wfhwu_7YdWSM4VU#Di~k<Dto2y=55Q&J$MgwsSpzcuQMjxJS^3#;SsSwW
zXTfEi$n;ObWzER+YPhT)S-hoiSxd6=%i*%FWct-`Sz|JOBV5*-to$u-S$nehcf(~J
z%Jc`}vL<EvV{loYvUuNw%UYF{{|;Q%t?YjM5?t1>to*C+h&3oH{|oqVxW)eiJm=|u
zgOBy}0s@!9E#Bd9Sqrmx$HHY@%<4am16d=p@*jdP@XAkyH^8m_Q{f$+ej2>X)6a#k
zgIm0d;Ih_c^)G?Tx*NOr`nZ$>S%b6km%|6V^4Gx!;a2}m@Ex9hJABB~?}f+fcN+g|
za9PW<`k#Qyx}Fr1>+{<j$Qqy3{~}!0`>gyA;j;E;{AX}k2Q>a`xU2~p{}Wu+2aW#|
zE^CFx59W12)(wpx370iQ<L`#cdZO_Y;Ig)8{A9SSGa8=;mo-P@v*5D+X#7mLtVJ5X
z050p2#uvh6jneofa9OW3z6>sFm&UJx%Q~j<8{o30Y5YrYS>H5%7hKjljXwaFbx-4u
zz-0~8_)~CM4>kTAT-HX7e;+REq{e>?mo-!4Z@^{!)cEh<vX*N6uW(scHJ-;?ZdqeB
zei&TVTjiau%#RUpS$j49KDeyITKNycWlh%jB)F{4GVHPc6u7L_8vi(4)@_ZS4VN`s
z;}^nZJ=fyZ!ewn&K6^?&O>kM~wfVXdE^EG~Ukfkx^v}bm!!6!za9I~N|2=S7BR2gZ
zc%`R54wtoKEB`cH){%|B0B`g758&+{e+@2c%~t+ba9MXY{wBQJ<NtuK_4qJemt<|)
z${zujb!y}9gm3Wp`{5fs{$aSRWn1~Fa9P(jJ_Ekh<7dFP!^^b4&x6a_cc=0yxU7TQ
zc-6yYP29@2!exEj=F1guSu3~kxgIX-=5{~387^z+qc#4Wa9K~c@wg8zYwK42VYsZb
zoBj>Btht;1EL_&#$7sCo!euSq%D)1ab$QF@b-1k2oBmt4tk;iJ|DWNqc5m_Dg3CI-
z@k8iHS<^RuG+fsAjlTyjYyHMQ0GD-t;}hWW48ZtD;qpAd@|g{nX9LF1g3EIP%kPtL
zd1f$H^R0%<^8@SurEqzcV0<}z_$&Lz|7v)V$8Us>^7t)qdG=uS-wl`N5bWaX@j(vc
znS|+&!R7gc>EGm_+|$1Um**Cyzr=w&!!ZA=@CHx+1-#AE{{WZg9PHxy|Hgql^Dut_
zO9I`VemH!srymQK=OX4m4ld6~%>N<yMo*s%muDwd{#5v&$4`TA_4v8)?H<1fF3(!b
zzXU$y@k`-*JbpQRAKdb}4ld7TjNb&8=QPG|hs!e?<M+bl`Hk_f!R1+w@h9N&T*vsg
z;qr{f_=|9P-jmb*{UKbQ{Y+Q>Gq^klvhu%%%QGS4e}c>NA>;pq%d;Zm@`q>SxsmZB
z;qna0=Ks6l@;u4<>jbzwTQYt!T%I!-p9Ys_PR3`!<@uBGGvV?q%J>Cvc`jvqAzYqO
z+4XS=T%K21`<KDx*_E~bD!4qyGW`a)Jkv7$OK^F<W$n8QF3-A*KLD5KURM7jaCru1
z{3*CR53AAsehx0r#(I>0A1=?y<|_X&T%MU#Dt`km&(G#5{~cVOrIjfED_owd%~zgx
z821mj<$oAlp0|xseFR*dy%~QWT%N;Oe|-=x&*ZFqli>1v&f0SdT%OgL{&BcGw=?~0
zxIDu%{X)1r&$Ie!;qq+H>T80_b3VKOt%S=nKZ|!QT%P|K|2$lt1zP;u;PPD1^n2j)
zjL`Il;PSjMqwRkjF3%24e;O{&5lw#q9zRpm@;`vf^F@pQ8eE<=8vhkso;!}#@^8ZB
z8DyFAf57E=q?I2=#qw;@_z`e<PHFs|aCv5F{QYowerf!}aCw$#d@5X?YqE>)pEEd+
zXPj-y&wy95zWM>UtY)4AZ~H+eD~||{V!hxZc-@vv_G8Ky!y70s?UC|J;hR~HvGOb7
z?dW4wzXo3UU7mZY|3>)gH!|5N%5Q}apnqQZ-SFwGPe}YDdH?q?eD}+l?A5A21-JFs
zBUvBa1fS2kd?qe`RP;T#txt;nLwE)2O(&}VHTY(){@=m7$Tx}4y$Qa6coiCt6r#20
zm&bnA?%|!^&tzZMc!luZUu3fHRsLT1R{HM|<tK@bUmlSh4^D<}gv;+v3!egC^;{<V
zgqEKL@A&UbcB%4Dz>DbLQ<Q%S-t|%@dj@_PpIUgIw*NTJG{QG{{c$CH_|G%h%hZ39
zSN=%K-wvNg{7<TWKYT9hO{Xh=6fW!WburII{qSv!hg^?R|FiJn-^pYz<#W047vW=Q
zkIjc|@B#XNiRSw{ypwzmRsI`z`OZxCN{zP%K16@Y%DluY;9xiXAuIF3hr<WSXH3lL
z8+gArUhjkV{xXw&LCc>6-%j}}wETGZcwH}(`E@GXo+lI%e-1o)asPN$z<c1o(|FbJ
zA>#42kbL;NmhgS>yOm!7AI|gpyOduCm-R}T73Y5^d=&a*)|F)Z?}ZQ2{+X(O4ZeW<
z<ocETHp0hhJSqPSd^)_HW8s_O@?45T%D?&6R(LsjGG0;iDqPmb`?$|Y|LuTRqTi|h
zU&0&U1Im8~AN1z)KKQEF`Mv_W_zz+r+9{vh5BUGV;H$P~vOiP(ShzgzgGM>>KOSCA
z|H<o*_&*Gn=Zo?j_9&j$OoCT@FO!wu`xpHbco*@<#CjCXh7T|wWxZMSbKz^f`acEV
zN4{TEeGy#Nm**;PfcH{<md3jjz7c+-^5yWZS2Edu@V-UjUj^SzeKx;uf{*!jCi`lB
zqTdeB(Vnpy|33I2@npPZJbK~&csvF#<NkJxmfr}s=SwnPFT+Q%UX2`&-z)G!+H<>>
ze-$1vKkRz^6};r@ne4GVAe4N64`0vy`3)`qcldVlc@JFjIgA(5A^471CpNt9hx^Ct
z-SB<r@|;BG^YQQ%JWpB_^FyO?@ZroK`P-$UPlnt07Bapwg;SnohB%+|;8|UNm-|aC
zeC*F?A2(>3&kgX>=QG(Cwftw`eOw>%yi(fJ2_Hp$&%!1D8{oF(<Uqc+AYWA&R~;>>
zuAW%MHxQcZ8)|FDMb#~Bt!>K|FGi`Vs%ffP($KVMVMA5?9fqof%T{o9*1WUMsha(X
zvZ|^$PF2marAt>vi<?@iYpdFts^Tv_R8^JjFXab{zXhRz;v(gzojZ?6l8r{v8dPYk
zsc&7_x|DqCY8#rP)=TP}qo!qT&CA-V>Kj`lr?%8Csp3l&wXIQg6P~vECR9o^>e>40
z#;Cr!DWcq@iQ^{9e!>*KYs0=|TyfOOe%xf5&u&UoBfF_lo9s%W#m&p)U|O_v=?XcR
zFg{wbbZLAvAzEHnUtPy>Ty5*P3B}17Ng|^EY8OUJ7q(T`kyq==#%h|uZbig5OynmG
zYp7quNja)oy0D?4sk*ARrKPDQYUKMQRjtHrsips07A~Z@eA%S6xwg8V6G>B>TWS~A
zuTaw3R?}L&u(7JGc4>1fUp85|q&7O>T>WPbJke0w=n6D9(YG3)x~ZA*WIn`!qlWrM
zj+QN5RNE4FXlo4#)3a?YOow{DN<+c%<K58&cQnx*O>#%Y?r5?*n&OV8x}y?zG|e5&
za7Q!U(JXgV=8k5&qd9iOkZGn9Tz(T=eiK}N44;*A`Au;7O>p^5aQRJe`Au;7O>p^5
zaQRJe`Au;7O>p^5bootm`Au~BO?3H9bootm`Au~BO?3H9bootm`Au~BO?3H9bootm
z`Au~BO?3H9a`{bi`Au^9O>+57a`{bi`Au^9O>+57a`{bi`Au^9O>+57a`{bi`Au^9
zO>+4ayZnk>e#I`oVwYdB%dgnwSM2gDcKH>%{EA(E#V)^MmtV2Vuh`{R?D8vi`Av5D
zO?LTBcKJ<q`Av5DO?LTBcKJ<q`Av5DO?LTBcKJ<q`Av5DO?LTBcKJ<q`Au>8O>y~6
zarsSg`Au>8O>y~6arsSg`Au>8O>y~6arsSg`Au>8O>y~6arsSg`Av2CO?CNAb@@$o
z`Av2CO?CNAb@@$o`Av2CO?CNAb@@$o`Av2CO?CNAb@@$o`IWf*N?d*=F253&Ux~}F
z#N}7w@+)!qmAL#$Tz(}kzY>>UiOa9V<yYeJD{=WvbNNkk`Au{AO>_B8bNNkk`Au{A
zO>_B8bNNkk`Au{AO>_B8bNNkk`Au{AO>_CpaQV$}`OR?o&2ah6aQV$}`OR?o&2ah6
zaQV$}`OR?o&2ah6aQV$}`OR?o&2ah6botG6`OS3s&2;(AbotG6`OS3s&2;(AbotG6
z`OS3s&2;(AbotG6`OS3s&2;(Aa{0}2`OR|q&2st8a{0}2`OR|q&2st8a{0}2`OR|q
z&2st8a{0}2`OR|q&2ssbx%|ppeq}DdGM8VO%dgDkSLX67bNQ9I{K{N@WiG!mmtUF7
zugv9F=JG3Z`OS9u&35_CcKOYA`OS9u&35_CcKOYA`OS9u&35_CcKOYA`OS9u&35_C
zcKOYA`OR_p&2jn7arw=0`OR_p&2jn7arw=0`OR_p&2jn7arw=0`OR_p&2jn7arw=e
z!+XY-YThlj^8U1C(aJV?o6F(imfG5=xrOglFHYXtQmkf~yu)ls-rdUk*|<=BYt^#G
zOB$P&H%4-fH@h`a<FbZ^s+!tG%a&B}sbXmoT;6V0w?$QDpZvs(Gf$hv=aA~QmCdzP
zi=wL9_`BD&3)>`th=><2Yi)C3m)0(o469B%tBN<cR9_V}CrL=A$(!nyYTjzMRV|ix
z)k$@YNn;k*HZA52yu2@W4XLkQ+AQzNYe<Q=#r}Ku*t<NjR@F9MR^QUp=rV0<TGmX>
zlAye&Z&+E?TEDcpp_T$xH2xS6i_{l)Wb^WtdK#s9#yzyWo{tt%zpGplk?vhsQ&T0M
zGLkAJXTH16Ckpu((MlVa&_>?Pi;q)D%*8rP+CTM;RY`*`T_#^fU))+-dx`sCuxQ!h
zX1)<mKQ3(HqX;3Ao`E;kENrQ%;xkKaV=EuMXcHf7s^coE7T345Qk*2E=i)sB61P=)
z{eX`>*7zjx<y7O%hJ`IH5wnIVvbd?44=+_!e1BfEVVDWVSk*U1i`!}&8luJ34Na{K
zrw*<*oZi=NCy_XxWGWI=KDlbN#c{VcG&L@XNT2WY%j8UkqE$Q0J}tG>O1%r2gYxk#
z>E+~uaXb_aHT9RtC&)GiH2HiLx18Ros&1%V*vPOYAN6G1l4@J)nrL@&%<PUoP`eL+
zRUa=uYvzpds<Y<IId}HFs(CYJmd~!D6mw!xD|yBPe%Zo?WwrX*IGK|)Hoko1(`92*
z6|-WYd_<0ttfdRIb!{#3u`n4NI%r`$aD2k0v%UWD2Bn2h<9tFyPcF!|riP~FGR@;p
chAvWLeA&ct;|o9jQB}2MX;Wj;=PUyJAEWSTp#T5?
literal 0
HcmV?d00001
diff --git a/board/MAI/bios_emulator/scitech/bin-linux/glibc/trans b/board/MAI/bios_emulator/scitech/bin-linux/glibc/trans
new file mode 100644
index 0000000000000000000000000000000000000000..a1aea4f4ad2199bdc7a0067bc2845fc31f9447b7
GIT binary patch
literal 9244
zcmcgyeRNdSwLc*f7>2+^43Q$%i<%M?Murb12nq=Stb9ZQi1HDJ$%Gr2%%n5-VsIr8
zyqUr<j?GeOYpd@`)mL3lTdQcPfCiEhY3W<k#Zp#bz4CmhH*4Z5DlbNe-uL^RJCj6;
zukWv(wf5}2&)IvQefHUB-<x}~y=>9^tgI}NX@f+zAlJ3a;hYBil46fc6N<<YMWR5A
z5`)pjv1v_^0XzemkOOc4vH>Rv7$aN_n!qvI?wbu`0`SpwLJ+7g^6YUFy!o=jNf---
zrwW9em*ayVrhOOiD~FTN0-iv>ILEEQnhm!Gt0o0&LVCR?8um;Pq7eNz1Fi*(16--m
zE`7TSFcL5XkPBeLv;r>mweg^w0JtH(lkRl`=L6(AfXAf!UBEX1CIILo+Xw*Tba^Yf
zyaT)fp#MVwY&Y6S{$7LMu><()L4R)mpCLzq7?x&+19LyvMgtf#HiY<!?S?D%4%kPG
zD*&#S`vHU)ernNA=K#JK{G6Q*rwTk0(Yp&+Jn3+HB|l7*0k8kH!&we|6(sHjK8`$m
z9GE`b2WS9)CouPic6wot`$YaBz)KiEo94FzpTYPez|{XCU_b10y|n*h;C%!5e*=FI
z`iGGOwD&ULIP@ojr~W>`8jLpplYbL%5aZL+{M*1Uf&X2a|2=RJ@~vt9IPg;#&qspL
z{(k}*z%!S~e+bBh{L^Xv6X3i7@%R$_Bamk<QJ%><5%SC#@<YHs1%7bae>d=|-45pg
zIqnkIfS;ANPyeq2|HuITCh%RbKQC?X7VwKOz6Lzyr+{DoxWoBf;E}>5ih*BA$8Q{Z
zO2ChW{G7D>-2=uM?}`CD<yV96f;_}=zFcAhc;*9n=1&cH2kd9~y36<m@XhW0<D#;1
zV{JH88P$9dt+G;}4Ak=Y-zF;O-M?h+;=4;l<$^^^OXe=BTsnV#McMMo<#S6Gl~sz$
znox}<DyxA+<=snRpehiFREp|4U5g5z7O2NCtohT{DoINv=tQELkOI}!K|QL%3BR_r
zE>Nk3gW(4QkpaA3R|h_-Mf_?+)cS(KuwPV%>jEKB9SB#8>Wu-+R_zalqXB3^4kj>*
z7Kns=L8(`_l_=x~PWu_wwMtPJfmF4KM*Y4}HB{>n0ZqUhDquiVM*_YoQT<?~Mhl2Y
zAmpnJ&`OnFN0D$HRvrj#sfmO`LJvV>Gc05}GT4qO1Q83$SNSv_#5P2ueIubN?o%Dk
zJM)iun}g!S^PGdC$8(m0!oz&YL1ExI%t3L@hx`x}r_sbHMq`OlL=|Er^-aVm$VJ2`
zuoH<<$R-n`_)a56VVpsX0yc{n$vTG^g?Sz^3gkj!6vsuxDCXtFD1yt0kzuQdQQ+4Q
zqmZp9M&Yg^MzL0jQD}n1SYM{Ch<{jNl3Bf@?QIlZ<A6#|%Q3e>D&B2whVzNFz45NK
zZPxT$Xj_GO_@$6l$kj{v&a)O;A)}yjtn-BA84Z<>p3YXuGb$=ecIPXSXLMAB{4<hg
zl++^fEs|%n)XC(VB+sa+GsxFTp3zh1kY6u(Mp0czzFhK*rpj{MIY;u0s=A8&WXUtS
z>U#2u<QZj^3+l|1Jfp4Fkr$F@)YW?O=f6frA)~K0kv}VW?t;3D{0Yf(H`EsLt&-=i
zs6QqDisZRF>NDh@kvw-veSv(7<hfhwE99HNdq0W2s|{IZHe>2l=GW+1mz=lH@ho#P
z{(*6>r@VaGO7mv)t1Lt28Y#C0*;{Tlfxghv(!%{d;DA|UHh+aSBHo?IwoVvr4&x4?
zU%*x$YfEkskUQ3vmQSqBwREhr4K|&yel+LAt5A(!*A65V;@yx}6-;VP@4_38HJwB1
zM0)YjSC)0G4ddo1_#myQ)g1T}2GW8p<PU*Y|3d0DQXi6fk<{m;{*~12KLfP~l+muJ
z50Tl$?sih!NTo<=q^|!ts7<8qCAA*ZrXuxG(#zTVds5#AMN@;G0yCQ;S>{TtP_E~`
zl@$p+H?cN9(Ky<e{SKF`k6|DLGGJ4dHN6#G=5L|(?1|S9h~eb3hf^><!uxKAd_78C
zkN6JW?HDx6r8#4k=AJcNA6C+l%_Eo^8SgIHOWj*?s8xKV;bhh*Qi;WR@v9P}I8-b<
zbXSKIftK*LX1p1`<05_0a`w|)GH_w_x=QRCVol#0a}#=AVw8q$OF9Z>Q*zt2@PAX*
zGHZGho;&6}@Vz640@Cj3;?En$V($~fIcjTW{bje~j$IB{Y4PU`A7@RM#s<u@qiZad
ziP^l}9XWKDhWbtRJDp7S_9CuH6Tg-|HW@n)qC6S9V51%)_+~aU`mrvs2{~r8=g$_H
zVw=m`+Ia}egnwSExWk=X2PW|}?PYx)?=~8Xgf=R%hlbp5<zBOw1v=r_waamh(Kzv&
zL#*ZYP$EY8-HsuSUiVwAMo)ozCtq5un__DoaX4os9nO-=U_bhc2K4oUzg*@Y@w96+
z<_Yb#`1vQlXw1WIPxx~@c@D04TZ`Xmd?>L;F6%R__2?j_q;&qA;uuG_f0|myzU-l?
z<-kT`zR(KnH8eHM$a3jJk7m0{=PyXjXfYbc3O&zgRD^y@YAoY3T4?!4vxk>b#5g)A
zl@FPlgg(442D`GMT6~B*;{MS~*azbfHwhxfA#R9pH{XWdmDcO_Cgz%tBY(WzMtg3b
zz&Hq4dM-}~Qze~e|9#Q2>=b?e6b#8Mh5yLYio{x{rRPD#d=x_Q>{zSjl%lEZ7H_L8
zF3jg0T~2H_vwE!)S*=dNfvrf!dNEzOxes&355tYvG5zWabvh4o-Iww($6>T3`82C{
zyxV%6@@5P}M!O@{>W)3e&6d5Y1+v1tUykL%i-+QWo!r{{J1AP8{pt&BPY-mP4i0D8
zb?IZ`f4zL{XtNxHk$o@{Kb$B?l;y^ATM`BFJ=86U7hu*Mhe&^njCRL@u&pkmw?}%U
zx2K_qxTO6|l6$@j;xb^eCSm=o#pb=7;z%Mpo*z5O+LN7Jm=zxe`?G0Uzsfed**4n@
zVHwl@T5WW#VknbkFO*ko$~Kolg4@_*>8=X31}>$hp>CD!?{1%?-&!4OZ5URe#@T%x
z{3~q2Ud-l?p5ChwEfwm^T*#MSFozRspF7qj{WZEK$};Ly|BT_pid<`o`64FkDC<GI
zMMqf|kr(_~5*=lxjn3KVjE(rmIL1y98SU`8w_JT6_K-F!%?GgHc$?9l7dzeHw2%GR
zpBk4`cQdEhKE=4?cQ+p<d9`urE95ZzHZJ)zy>p(Vs<frXrD}IG-}*Ye_-QdNMYZVm
zQO2d9R&QLYbvOS6+MNX$!a2I6xto7UKQ8I+*dX+El%2zG#`RQQyc?^qd(x{oi(#y>
zlgqe#g=Z;=vHf!F47tviBz?-ZA=lpdB)VGC5$Gs8DaB&!d)t;87`9Xxdt@fC_o+b3
zCb7x2NmzQX8S3U9=f%sqVy)Y9jGm%x3sk<{s^__JP1ra*{O$*8NtX4Lt4u4ZZO4H{
zYNW=*yKV98ry+i?Eq*glygOMs$mq#(@2o<q8jW2-pJX(i6Z&|g(G>bPqw%cJuZ>wc
z3h^1FrqOsx=);W0lS0oiKZF6Ju?OAp^S9)jf7#)TwQkQb{{!87$rYb(yfL}9C*EDb
z+?n>UC1uRdq*KncNW%y6k!&9PA3Tcr5VqNu$?{2tlrd(rUuZb>dcK;^B`m=(R=g2m
zVZ83Zl-}-Qy~q9NR|xC@uAgUds`)258S6#!dl*q~gSI*WKgqHS<>u{|WPGIEV%qJ#
zAnm$syXt!MSyPi`=gZAph+0!sKc!AUO64CJW&!-L^plo;%F@r=XX$4x-L&*`mfmIQ
z7cBj}xd%IGw9ml|H>>s3eFC~12ujThW)-k>$aI0i9;du59AA_kpGQ2^{Df*#ZNcAg
z`X^{?0Vtz=G~WN_bMZeK2BBo&9s5l}zAxGbn6DF~<d(eWe)J>6!I*sk8zl4@3CB;K
zCCLE2kAbEcleGMf961VhKeEE=`~xV~sNw8xs?VCFUA33w?$MT%Y(A|I)WL(r>g4y0
zrb{!mPu*{|;pHID{3CotY5p(h&(vqzxgf1H%@F!Eb~YT{b|m50DIFRhkXW1_&+7Ln
zbz`4eo-Nfs2GI^4DuG#31^xXcak>2c@C*U6U$xRTc`@FCbKP&u%`#dK8a-b3&Mh#2
zmx$+{kU8|!9)~mU#}4PIG=3qC*+)1xfZsQO&WsbceoOyAnQx<mY2D*#T>pRAYQAi&
zC(XA2TR(89KS$1_w%}O``d>(Ivgy5~*V*)Qq?g(BFG<h0>3=6Z)24q-+GEqNk-ovE
ze@nW+rr#v(vgx-#SC}(D<6|$C8}ELTTa=jVh>ynKL@v20DW2E;%$)w`+>S05Q<=f}
z9kJyYqu$;luojQ40qZ^eCY~Rncx~RcBJZ(y_io3CUClRhq^V&<);Miw$x)k~X&lZi
zErHzjGwB|YjIDwkUScVZ1eH(bKcZU1kKhm*7cFf%o;ers%y|b>7#F|Rys6Fb(YUx!
z%iBKGxOkT~H1z<UDHm0}Vn6h(&gUT5B3C0zzWv_jZr+7%>vg&>lN@K!nzj>vmRRqz
zw)K3aZL+i2l1uFLLlE<LPjguX-eaKMZ#YI2pU{SK6<oyMl8)7f&kky87@RduADNgp
z*wG;vn$GdIuJt<CmW8S{1`)MqamQTflMzlnzYt{qdkG?pxAI2kwgvc;$$J{_4l8n-
z8phDJrHygA-xyr39_4mk4PRKwGoA0D(`@@2r^q#q<{E9e3t(n@YvzRE-OuQ9aswN4
zz1{e$s;n1Y;(_K=5B>(5xT43@p)C(BI}UIWDtGxl^&rdZ#~6)wBv$k^-6gaiwCo--
zOVMuI?wmDLo19t_@1AvozA)CUU5_lvHyV3|o_%zPV6~X`WU041H3aj~V$)|?sqe+!
z)o+08cLz$O{YeeQx?<h>p!nB`ve65R+ZqQiz=V1W<VU7^T>W}<*TH8xrpk+dCw?j!
z=&~y=--!?OpfDP<`D^w6eco%_fd_(2ZOjF^zQ51q!yn&oEPQt|uRSmGpWkbydM1nS
z`$EbTui`B(E*6DRMOhh$L~Ft!1@t8TD5c@Lt&y6Is-_f`PN3Wr<(@#O3Sak>l0YaF
z&@`7ztcdzH24+eny-HJqer5Hf>RJ2}cjsDVb#+ZJ5G{&MSPMy*)FQr6G>ET`An~<L
zk;6)LBwVY6Ljk2a9I5qbiWXLUp|GX~B8t!N4@atMLL1q+#TTgw>rt1$hdnqN^}y&-
zn^b&}z)Y7=lu5c`w@Gk6v?UOc=2k4ZdsW)HM=4!)>!SJNqf}A+woIUk_Sq|KR9(r&
zyrmU=Ca$cXHY`o}u4H1d&(C=VS}I+3B~J!gs_nB>p+#!y;65~D$PghJK{+AzOSVbM
z{F)%Xt16{hBsghaMz$`D7gs;@(?ORy!9JZ#thl#+)fe&kVFH^JR^*pnzb_h)8vg%>
zhWr*x4W-EM!}j=s(FsyntFKSHn3)bAsVg`M2BLL7e<12n7W?XJYV}&BCaM%xNwst~
zAt{&PYp=r8iYnpibn-wuoi;Ki%qYc9KdG$tIXtf>S{L+fRn$PRPC+OFfsj(9shG!R
z;A2D+D?+{vumG$4daYza%mjCd<>9bW>kDmFYC`yYZaXjzN8p<};|rtX;cRqsO<f%_
z*Cm#OHN~ey0vq+9FCw*+E66DFD>gGe5XJgJe=oC~r$^{3s^<CTstaouM=P|M%V$>4
zoIf+T$X_b%4sG!TYmmvl4NA1;p#Z+|X1eSHgATe92!-{Hs!|)M4M(<m&{<i@b6HvG
zsjsgW4{i{pz7UR|f)L@PD)<baS*+smD83Ehh$fd6*&yc2154KS)&l|DCWLst5vyPr
z1O1WkxI`6>IZ$DhD6AKSVNs}y!XTI+xFFad_-Y`)qH3Woyi4Fn7iO}Kdm#B)zR1Qq
z6}cy@l=!xe?|>}EY<T+cFZMpH@ndGXJ&Ze`#{j<oyb3r1co*;i;4{D=+}Vr-+yIyY
zC;==3Yyd<64+9<p`~vVQ;0WMdzy|<MK_BwccpY#qfcJv99+3Ax4j>cv!nh_A$D47V
z06g(whZCRU#SSR*9+UdK(`4fdh!g$~0_NX=DC4+45(3u`qUnbYC+Tuv-jPiP@b0s3
zv7o=v7L=CGREicXSusJG;<?>3#WPiie?nizAI4^~*E87*{LknUp6J$E90p+AH%Y8!
zD0%f%Cp@YT*IJ&cts#ioSc?cxBoOp$3~M%liy)h*3!+C}r+FkP?~6S0X3Y}`SMl1&
zWB>ZKa0E(KHj<Vwg|D{8FFewmKU`ZI2*DiAS>PLc^bZ)`@iUIh2l+n;z})jp;~3kG
z0OlCwm~SR9ziBX^*qDa|-rF<hD91dU2;vz4$7qX~`N%z^F6EfF$1%Ws&9n?zj1J!A
zQ;vCAjs)jkQ<rvVk9-LrBex22s~}f|KFTqdGjjI~kYm0#L5}Bua@5brEeA~>c%FFP
z=HNbSBIr!x+-wg3GIBx41tHgzaUNr|N2nYi$9vo^IGvv{l9mAy+`NoEdB2N$Ib6y0
zwT#N<v>fBYS~V7Of8a#vmT@5po;24d|3?J(b{QKK&8Tbzosr|qU=QRN*G$XEHK8LT
zCs+q@uXrW7ode`pZ=8?|W{d&T9^nxHV@&^8SNXpxEub^=5!3#jG^QLsW#r+0Qp*%I
s_5s*_2FR?PJmu<1q+4d}S@75@**L!ITjW>|IcHx}gm|%!>7VO=0UA7%;s5{u
literal 0
HcmV?d00001
diff --git a/board/MAI/bios_emulator/scitech/bin-linux/libc/dmake b/board/MAI/bios_emulator/scitech/bin-linux/libc/dmake
new file mode 100644
index 0000000000000000000000000000000000000000..f198f294431a80eefc3705e4bdeb593064da5b19
GIT binary patch
literal 71264
zcmd?SeSB2awLg3&nMo!vVS)q<8Z=^1P*9?v1c(j^6Cy7X84{v|7c0R-L_l&5q8J!D
zNzLI9J8iY4t+t}}*7n+#T5Y3M3@=Tvm$sDJUVN!irFO@`mI{WbDf4{4>zqjf_TK0D
zJfG+J>j$5cz1MzSd+oK?UVH7A*%F>x?(ulE)W0+>T_e;J_xdNn%^T*#P0|W9pEgz-
zuH|YO2xr`+DAM429DaU2d|rI%_+I0OIDW(6=f^mf=9CBz;`rS**rV}del5p|uLWHD
zZJ(dtOKF<+z-UeCWjsJFp6$`%kNN!kS^)DSUaaHl)vLa6_39N9R<BxPZoH~t?NvpZ
zR)+8e_y+!)3?Luh5H}E2XjkAnAK!d@qww+H7<?gox%l|+8hkg1Pt#DecAe|L94>Ji
zf$t_aYzEw0@MXI&or(Ca#5aKe{*fM+;Tw+c0(`UZ@n6_+9J;_i&4n*@-Sgnyh;ItM
zAikUNmEhyQnfMCu4Z;_|HyGb|d?WEq$5)7N;J*t240QvtT=yc^CGGf+v@I5&rp<9(
zI@h}XQrFFNUG_)nANi#`1)Ssh0au<Ab}o1^0_L3?H~^kIz@PHYc0HHCy&hi$zC1T9
z<$#@pH&gJ`l*e_+%ltPM-&Nvs{#@<)#|;Qec}Z*XCE=mkKa=E}hac^S$zuhr;C=i%
zPs<d3$k(0t^U!1Dr;Xq7`4_?+ivOhR#)rIq^2lg>Y}Z)8a0DiQ)c}40j6|Ne6<-_5
zXFn5Oj*sJr{WlccP!G4qt)J!HgHK_+!;$hf!0q{Re|?()PeFR}1Iug1cLeb)knnbV
zJ5c{ea0!16Umoyx>Km#(2Do5nKl~%W2M5Hz47d&DrOMwA*bn$ua9Q3#d<O>LcNlQX
z0Q_GEtRp=f!T%k`4}jkXT!Z}NS(f)9zNZJ|KMA-6@priN`xJ1GOK+x6LwE(!kA<J~
z$^u+4pnrw~o`U?O1JhpsSRsA23ttSlW&l280Ph&ko+|-wMEcb(Jxc&rAfElr@@4|o
z5r3x(&jFkV{O*R!_yur}AimIzUjq2h0Q_{o8wb?C2Jiu-M{;RT1M?5S=K;WD2c&Oe
zJnCb6*nS(ZLOl7C@K*rmA%C3<e*<tE(l2-6#{iE-Jmm<}KLvOrVDcUDe+KXl;Pd@7
z2Ywc?j{Jy{^yKRu1Mt}mIK|He;O7p&Poum>xGe8CaHk;uJQseA@PPcU13oYS{xjgQ
z-}U)>;1*znbiwtbJjyJVcLHz)(ocd*nCWT;(C-Xjh5ASj#{1BY0|W3M1h@h)<saim
z0M2*$pY`PfZbN;DlJ<@P{PY0)CII#iC~q?32f)(+w+w(ofb$0Ap9NS)`8T-rF92MK
z_QFB!L$&4br0^kpC*Tx42pf!d<rC%ECcqru#Fy|F&w(ETeB|Z+cn$OM9h`?JYs+Td
zdh?8VH<fA2X3d>nI%Dp#`Q_!2@WN#aXOzwjFVmK-TC>W~maT-NExT#{vIb*C-TL**
zw3X}DuUccQ)K;!sZ8qpygRy@79r}9h?z+40Sa+YcY+2o!4Xf6#U8CK7`|8ze@6cAR
zudCA<+&oCkM0eI1cig*zS?{<VRV=&1xNlwEvM==cjJ2!R-dneR0Bo*X2bdY|UPosQ
zi@9U<+J-t7wr<r5ZROf^b!)VhPT0y-tLxUR)m9>|L2>~>$%Wi5DsGe3n#MA%ZX;T{
zvTiLJwZ86ll(o)8zGZ0gdY}SA7<KE{+`d|Cs58D`u4Ij9q_%8hgCXdz-B7oFB`{8r
zY1JA~$*5bsT9a}%q$q~69g={KYu5{QpbygEZ$n+(UE2D(dsnSlp&4~|uUm8b-P%13
zYu6jv9Zn`=)!lVkinetd>+aZqrkH}r%C+n7(pH!t%zX{ZQ1<Fo4Tg5RA+3^D14~o#
zH>|po?YQ@L_UtmUg44^$1ab-OR;*gDk(6{v47zvd{Cn3bw8&foP3|tzrp^HBcc9VB
z;4Zsk?HXhK+SMBCM^VcLqOuJ1+K3A4R@`pfj`Uw>XaH$%N87+GD;)myLE)hs_d&Vf
zeCzW$^O6tBD&?mSlRL+W4-*H+gAWP_$B7Th2In&$2J_>X*E69&K1CN3*wb{Ols!Wi
z0(=);2<GSLLa}V43&HXdT_|1cbfIwVr+X#j2Hmm1gYG53gYIDH(sUs}j?jgo`4(L$
zT1V+ZDLY2D6mp0zM&@z4P;gJs&Cs+{bSogc=tAk~r8^4)7<x)(5p+AcGazT^LeUA(
z4M82J3q?4WE)>)}x;KFibSHogbfGjA(uIH-OLsJMO}bFFCenq%Gl}j<$YHuraHi7@
zL$9Wri#d)i6x<5BP-f@Sg_2cCH(S#d(uHzcLl+8kE!}IN+t4l0v=wy6K+e&H61|!(
z6s2`^p`aRcq3my@dnwivbfGv$>CV)&Cb}aaN9m4-PD3{Udj8=JP1~z!$;mrFvE-OX
z@fTFnl4IEOI=x*-llV7=9H29<>yW_Y1fA+-SG&OE2%YL@*Dis{8F~TX#|0*b=wk`T
z1tzEHXsOl}6_^~O17odgoxtQAJw$l9z~mskf^en4<Rrb4a7bWslwL!4qQK-VeL3L*
zfyrSy8`PB}FgZ<MM_3b>9H(z2eBulO#*p*$DB+_5lLPe@!iNMVC+cy+?E;e{^&NzF
z2~5t^A1C~{z~oT<X~J=V$*KA-!cl?Av3eWfbpmVXA-$dOa)G^s4-l>t*iZNn;gG-q
z!bb>C6quZ?A0=EMFgaXTgmVNYr|TyOYXXzw^&Y|}{>Ane5Y{mDcO4bDkg%WdA%Vvd
z&LP|`@OZ*`gm($dk)an5eq3OV5PdA+xWF7K`b5G}fjMIIDTLPv93mVdyj<X!gewSF
z3S2?Bl5j}ixrA#7PZXFVOJ7d7KwyqAovLD2j=&sg`Z~gzz#MV<M#3k0+5Y8(qlAwN
zyn=8G;X?xJgyV$U1zt^f2jN`;b7bm|6MkG^j!^w+!f}B)QuSSgqXKip>TQJA2^=Nd
zPI$S%O@t2+t`xY1@FBt>fwvPrLU<zJTdnu3qp@Q>)~`K>@&8b)-COiwRaKSs*UHE(
zZDiwL;?sT;wPzOkpQN@K{DqH`L8U4}>tp-9Dhp)MsTZkNz#t6y-Dk<9`lu38OTC4l
z#jP7OB8*ZJr{RzMG7cV&mGG}-WXJ9F<e}I;Z)}=oo?5)m>fRTR$ALiXc>bd5h&|6A
zy{|?KZokm0X`Nv*o)){WRtrATJ|+o&Wj*xp<T}5)2GR?a6Q1XHf=>G-DBTx*83-rM
zKt0xc{IC8cF=JyJbG2aeb6DJVhH{Bv*VFWeds&OMuesfr1AL3RW1I3d<Ggw;*^rlP
z$XCNKky#zF{ejkSZ)HSnM;?^kqrQO&%nJ9!_UANr8-q~IRglEM$zEL0{HEC!YwXd?
z5q7vYR?-B7Q1eve>?*;Zcu{v}_!MhpB4cXYp4VgFTF^P8fML=5CTPacTaxA}HA$*C
zl^6oNP-V5clmWoSZ!PITC7qVp6Kg!B85#DxQx*!D*Au(1KnpfKj&kgK3Syf9JklQg
z`4J?ZVGoVnU#J;F?2OpPLd`59WM0m?XB5~P!;DdcJQ6*`zNNrUlhAal3bh$Ga|xn#
z`lg^c^ra}T7m^)jE<?x?ki(CpBdqS~@_J81eMd+iaA<N|pU;$MmI|G^eNUqxzcCJd
z<RL-VBdxVBvhx}CU!`s^?YBNjCL?MRm@c-zz$IE|m;wqNcbr&|gu$lw;kCMpx`hIH
znsHOCSTk~x_v9%*=0lRqoAAbM(;vNgp}*Ml8@XF=UZ{nb{kUdk63AhTdZPD@*GzBp
z=9(zVXEmg6u!*Zr(Adth<|(=}ymlzpDxYoxoKZ98#_wQ(Twc>%zAy)UUcNApW8bnc
z_HJR;A*+0$J!7I(J`pKn_f64^h4#%;ta-<n@xCd|Nn<AZwmwkrQNKe|t$jj2)2G59
zQu2B=dj_yi2llbXW12D8o_EZ;)tksb9&70oYsoQti?=yxzT%(+wkF0>Q-x++72Axz
z7o)Z21<89Vk{c@2mv84V{Wyd|%PYXri9z5!w4ef@U^E^WeIagV+FEkMbPTjqA1faQ
zBsxdEP@!pCD}-7cTb0%7zi(o97Noi}H<Fyp9@KZS|K2#wo(n|OJ&+O{9D?t6V~r;?
zBbNmv%@ft?VH6Rq@cS{A&;=HF**sz2G!`7){A#fIGDww#zqviwOc|$s=F_y+x+9C1
zE_-z!=m6QV_4spWHpE9~^J<7Gp+VRmYY$Wcee%GR9}`7yrRv1!BZb>de^GnaWgLr0
zV$BFx%{p?Tj;6r~v|9<;p6<}XG>n%}q1C(s0f`Z$d-#+qm|B5nE5l<i^DnrhEe&kh
zypRC?6}@RoG?=E9+DYs_jIcrWj6z$({~CYmBkK^_wj4=OZbzC{T48=dg5Tt~T5Azy
zwbtNo>%2o&D^oVV8EpC?5<A!>@5!aOWb;;`S}S}cqD}#KtHYMs9HICwLdJpnbDO&x
z(~7#2<`Fl~PkY!Oq-xVq@HQgU&zXC#bpk2UXXJuj#e0Ka-iOF~P49UDdLYtlC`FoP
z>R#woNX(I~FB3I;U4HKidBE-D_w2^UMP3yp6PcaiBM8F~YSWDCImnMB%{I07B9=ia
zNg2VWTTzGI%0lg%@|{N8lXrlJ5?+pJ$demV+?DU3&ypN2dxKnNe9W?Py2JZJ<}h+q
zYcsK`R5xDA{tno~3sKtEccVbYp^o%L(CLd%%@{^x?d@!yi(K$(uFN*Q&4<lFPB3sp
zLk{*$MdTq2Juf6{sIuCY3Nc`k&$A4{GB^1=dolSunJM{vCH~x!e4ZSt?qZJ#vnFmr
z-=mgr>}BCybNc^S7@6U$!t8m0WRbcUWx;28V*AI&UKZw)>FB#4vj~nO5FG5gzsp$k
zx=eYK*I{0cunNdmm**KQLjl1bW4PIZW$X7ss9S~{#v4YOGjwzGv{mGbfXcw?%-UC9
z7*S)TmVEF=xZayI{kj)P)MoNcM?|f`9BFl;uVR}6m}HY10%{R5be3b)A?Ow_2^bj>
zRf<6CvqaG9Mu6#$s2Q;9TKlXct#zja4eAV37)*$$04CtOn_o3niQZw4jDuq)SRWx2
z`R%mgbR*MVz^**md^n{^0KarAf{DqCj{F^<G4@DgyEtwmuq;1RENVof?@Vb<BHb#@
zXTmqlckP?J&E4kLtdl5wX58N7jc&@(j7h~O%}nb|B7nZMBYwNgYn6Iqo4lHlWk<Yr
zncph)CmV9r>Tb?vEAbaY&-x4nzHFUHwFr69CTUXQV&J_2CFHW}knvi{;*F>)91rU^
z|J+*Fvv}#N(4mm8sNJseN2h8=5amRtUS)bhr2x%SZoJScU^nK}PsChv$H{?n&FhOm
z+i7-Ht_5VP@~ns-t;=Yw4p@;KyDHy`<R;Cr>J=<_t+M>2S*V^9Z=TgK7L{6&f^Ag=
zEs^ots>ZiOChS}ewb3dov_^@iufu?2Bv!&O&A1IXN;<oyFu5+EykIVY$*&useGN{o
z%U3tZsP;M$8!@RPG*69nLX(qOl)AuyoXSAYAJ|KJU)_hg?65FKJNo5-%oEn$*v0~O
z$by2{{RNtN+L~Q3kTz(unTbi^iz4taF>M&Djsh=E$${7nknVp5ht_-QlX?a?I-=62
zkRusjXJEQqhoBSKaAA5VUirwd9U1KM{OA-Yf6-KCzhv%^l=kpbkgF5ht^e+Q0aYbG
z`muH3^r4E%<c9nOYW_!L6AmP32lYvWB`yZt=%3hbmoVqRT<PWc&`#I57~}||gQTw8
z28Okrhp^aYP}A2IfERhDrs5@dNOD77ME!>}4qO^*#5k>RR7N8tr8>>`N-hSV`5~Fp
zga*f9=MWl5TGkd(N8GTSSR+QuC6T0=<BIQG#OpLesiP-2HfDn{i{2bC%sI}%H!H|D
z=K1vjH3jKdK8NFQby1b3C5G6e7>{B1Bwg!>Fo83kz@R%Nu+(b}r^oH{h`of0>X2lE
zSA7W5N7V1|S2D_YvcvvPbQ$LJ5Hue;&`vc?c#C6ciQhH@=(*Da`=E7W68h8Csscq}
zCcUP!RPtK)`?=ilS;G>UaSDe@FGpILKji7L%KRw-Aoa$Mds%#yKXyMFoKe)CSPofG
z<xj5ntCD}9*l@4i*vsZ8p(S3t5FA$Jx39r~9fx#F{gLE#i_~j>m$}vRPDf_JEPJW9
zT7Bd!)~vU|<*#?lN@BwItKn>MxVN?LgosqBzdBOXt+b6Y>5oR|s9M;S>eKYA>92%;
z=Xgw|6yO^tYUTvdT!#~{y%J$nPNY_G7`VkEZelw$u~VCl{5z*JYk$5!15M;(=zx54
zn2%v+=Yyy~e=WlLace~ldcxyK<P(XRRyRiLWTK@S5P^XXw*53|X32DrxYg<w)a-Q&
zx4y4Mv6FY$#FEX-sZV0jwzZwp4h7zePNh=KrJ!Yccj&gLd7cbyy@bur2BRRYQ}H`R
z?E~fS*5f-+H@dDf{4hLNox~l7LI6;U<1{%=RGj7q&;i7#vw0(Y)G#`mjXob$7)cjq
z(J13l$9ddwo^qV09p@Q3t>IJ9c`%u`hE=7yPCRc_stMvbRH+K#p^i=N!qhSuYD)3!
zTw{WxUF8@T+B0&cz3%9|g{?mSxG)phY(cJtztA=2JxB1in!%%}SnWypV()n{+piDl
zTbL!z`60ZEn%6vk_l#S;#x=3V=ODoCs^{#|isBg+5CVu29TiIx^%E>ytZ-EHK`dr5
zsZ=p*>^|_=o%THyDFpMJ9FFR@l~vuB5bU6XkfVPFPGk>N`HR<A7!zWRQE1%g<*&hr
zi!pOnozt8;oyv%6qd(T^H)cU@*w;(WtGmk=`^}-Uj2g`4(=#%zyfBNB*{;e1(&ZIf
zZ?4h28is_|p7)$}bDp!rc?soqmo5win;$~QbeG-=A3NW^t(Mb|QD~PI$nxSsJ5+0x
z)<$P93?ax4)x?f^vPx?boFiS7=G)gp-||$eb*PcE(dJss9Nb-A6*97{rL_qzS3M~b
zU6|ZZYiCdsb*S_lsTBFZ>3CUv{Zu+-q2IifrWF&?)j)GFNA1VT3TTU6ARjW9p~l5K
z>2A{k1=H^{&+9I&@*3=#=uHcA5_!ZCjF5)v^w(I?==n07r0=F<Vcj`ndN;zQ)Uld*
zgMEJ?B;@tTS6?WrOxSX|g~7Ne%XDaW3`ufPMDm_O_0vIulT|tv1g-~(5$bZ;6;p)E
z93qi*lEzw$+v{VSr)b8~&T=n@guQeM#73pnt$Q)PlGmzTTbuz8jSuUZ*M1KDb@D`Z
z=eH-LxV?5cbvLWpivknp0ng;M`Wd!t#m!F3L=Sw{LG){#;g_Tm(0~mKHkDDahZSO1
z?7o0z<^f@fZWrPEIAuD+V!qd!*JfW&;w`8dEX$KUA7sVe^;nN^84%sPP-~n9re0L7
zuEj<OTi0%mT^U1ou=VOpw5yeZqWI?8;6r=RFndF-^*lqmen#kecQs*T$6gj86Kwhv
z`yoYdHg^Y`V5<O*pg*}pZIl5d3&E|7I8s*ZdkIu&9NyQnW9!lW3hV=MXi28;V^hQG
zu*`$#4;hlxYPql&(acGj2lWNalk4OGyh!L!sIH&^s}ligIqC(TVm%AmLXR$4cyyZ+
z7pYRg3RaJoG;^p8Qb8olF6{afFeJ}0;3aFex9eBZ7Q}X!)_9F<jz!I{*`*<?d?xHL
zV?rUG4#FQZ*M5Zb0m8+%)IN}5M^Yl;4hg=2USC#!s6_Y5rev%6<3_871Tp(IQ)
zsJFTR9Z{{$|1_D*3OA7k6l$n0bL$4FF4owDuKy-RPm1h=5abCqeTf4~sx7Xr-JE6L
zTx&_UZT((K^4l90Uh+HvtMMhfu?;NL{0f9Ls&yHPN=O`xvNU8ZIhg8y7VF}0xm{jc
zJfn8=#j+yXFf*bqt!78%6qna-9>j7M)RtP+wKjAU;TND$U28o;2;Cqv#yBjt>}CGg
zdk|t&ih>e>`65Twa%?Zig#xz(Vd3%{SH?;TL^h0;gqUIe<}7LY@?!RR%?Xl$0^28Q
zle$K7VHbW_Ca7%jx3q>)f=B$@Tf?aKV`R0$aWo<&)Tj_anx>hvU8(jU*{kudj<n}Q
zF;_E2ChwUm%&32pvCAYjkT@UX5o8b<^*u(EJK4?_CV$3u8OCOP0BMu!XX^jSlm{g6
zsd~&U+w~tY<mVFdOl*H41LOKn7`RgcpJvFz`cE11WeItlAuamP7}6*qJDAZCV$=2K
z8D1yhj}pVuiBFEj25Wt~UI=G_IuA!hV*B$jqQ=<LU+4$&?)l(TKTMJkHEu@)n{E)`
zIgDG_*gL~b?A@+R7<A$(5*8wN@}An{^X&P7)95dV#x=)C%G_AVSaxi%=?$=*;1sgL
z2kqNtcKbNdV|2ty+E|IRpb;j#HDpeQE<OyrpdVpb@4qMAlDI665-=`9G(Q}S=<gyj
zktN=bm~OYE3%Dhk*Q81tSJaN-6*AIW!v`y|Rye3mMMw$So3eH7E@X{KR`2Jrx{T6~
zwQ{~42|ypk^bse0S0+M4eu!!jZ2B)W6V&vYLvK+@2uO?L+uQXif|KSmD$XHI+v|3a
zq*+L^oonnytEzolT1$9;XPA30u!-*nQRu^zLQS_d++L|x*0I2YK->lm=RE^6W2f%{
zkdX<gt+YBd(%S(+g26X1`{jMvv4AvRa_T@%$@=5l*v@A<OH+0eu_Flu7gm~=iVVx>
zo>ApB&u2FZ^IuF#Y@H<)B`#pCI!ZzN64{_hr&zFvnlqsWn-0Lw`IKWGT97;D{py1S
z2rsXViRDi-uAuQe3ObfUdXBP}QcZ{b-%f`vGX{2D8pa)!`8bU4QPHgGL>+`+c@DPc
zgl{Jovrw=q6;Ekd`;r?%5%nGo_hOcfsB2}&=609g7BZlZg=h=d5K{RP>~)M{>Y^)%
zS4bpxi0v96dy?i;YA=QZd-X+epH|O``?&g{xR0tQ#NDC3CGIZuRk$hTA|J{H)*jF;
zVAPq4B^8%(<uJ%(VY@!r;8$Of0pyQu!g3iVn}CW+08-rRc$m}daP)>>BnHR1F9qEO
zXeQ^8C`t3fSYw=-&A2La^E5sz0S~+56P(y00WIp1REq5quwCUi0o*nk^-m0OQ>o$N
zzNNCoJ*0ea?Qm1;_i7P8z<wS(4n4zN(pv9WX0PzD`t4ZIlN(&#=#84O0z4AEK{INT
zlV@TpZ;^U$oOG2yNwZh|fpCWt8&O*cbvjVBY9JKuwLTs9#<&x(j}-4Ua~D)c)Lnm}
zsG!o|i(-ZRT})!h<m9I?M)Yaq*6&`%e5b5;Fc+ZyRMomvjq!p^#$~B0he(w)JAeq>
zP`X`mqXBt|U&Ya^xRa8|UdFWCNMn;`rqDbnE$+pp#uE}>%~BRuaL;7V<;bv)@b}*(
z&IQ%#JMds1jsxgF!0+Ln);iT^n*=>!AMQ52SixT<tK@&YgXAz=V1~u&xNatxE5k~+
z%V8`7?|W4zI>iE4!D1$6J+v3LkJ#}%_Kk^+kpOp}PSm63{X#Zs%oD2B<={Y!@#e$E
zu;R3orSoH0I-7qagE?Sjc0CCn%CnaQ>^aapk9UR@N4jO6+LqB0?!g`?LGYw2y|9dY
zdO4Xh0NG<KuT*=lBE9S|mpKr_Lt&Slh`K_wo_>t)SFuI~Mnt(NM@w7|{gQiHpS>+@
zVx!T;YF!ynUF?m{@%!z@<JKmxb#1~XUR9^Ig?n1k>_%)p1d5Bz>`vmNb<Xh9vBQDZ
zy0`jm6t3-NxD2)+2iq_Zq_a$9;Q-r@Fm+C>L>J@HdHM}xsh$a%_9R2llHyVH7&n4^
z#kb{|f$q}V{08<#XKKckkfpKvU?#f~;_UL+eHE}<#WvyZg~^5rE?L*1JDqlA!D`qB
zG_CGfNr>V-_|Ufi)-MMEKK(P5xqy|HBEj9IXb-xw80^uvWrD@-d01H|*N;_usQqzE
zst`z7w;(K_ev}Fexcp<3fZwi_3ciU7xIyR;ILOkc^_82xb@{>@x1hju7FL<-h~ZzM
z{H?c3gjh(<u|HLa5u+U~(Clo^`p7$Yc8xXfU}tzgLsJvBuX|4#R(Rq4>?<U)7hub?
zz^Xc6XH$={=Do&1SF4FN9>5&>MWnQbA4H+&l!d9_;K1Tib>wl=9aB|u@-Adj--n`Z
zg%5!*V~zW<f1vXun_kX-Z3nA?40hGQ?!7q%%+&kQOh?Z#4<#p4rBai?PLL$AlGVZy
zBfz7YeiL)Qjq&~@Ls@i*A<>s2lIuf#0aH8x0r2EHM0ENX%{C*gJzSbvbp+$B=}{<Q
z@uFmBnA|`O-O6TD?W!YoT69XGc{7P%R@h=Ri3)AgI(>7Igry~~QI+6etHTLm5!LDo
z9Cw}7>Ke2T<uaWm*-`i4#)Din%sYY&!>oBP*-Kv9lNby`%uZ<stAdRbV=@%D4Gl<S
zS>5n1g%=2+viGpAl#OxOp3B#7M@+TKE@Zp>#V3qG5QBr?5TeFP*l_gUi>P0EvUwLV
zIjOIbOb=fwnJ6prI>7k>2@h4OSDc8-gg=fzYDW6q$f4Gb73$RoBKiix%K-1(0-qIr
zYiCT{qbqkl2+v9@d~BP~g0Cg~zN{3k6ucwqVsL)7nt|b*74C1m+l+FlxWH}3%-0>>
z2*0#P1z=x!auR5s(qtdT`G_7DFs9h^UOK&pH(Jbm>8%O+Hq`A<Y_iiD%0D}sYH(II
z)wx%M7eH?Vi!kz?t8gXFLp0hf^0BRXi8|OIzKXJ{)elDZk?WFrt*9Nk1^E9Z^1n~I
z7?k&+Q1o#ktqAhtNbG*E7JS$}0~4{?4j<aVk+G;AY;wm<=#6kYwhM$EAmWcyt21x1
z)zBG^KwYnc3~|O_6g>wNyGs}6nD@%C^JD1*w5cQlXP8nsR{VlCEcX55>=9tEYNXV&
zsfPv(VNR%&dz>XdW?>Js-hpUh`?puUSRsfydN2?HCa+mChD0dUU=I9;9foD~nX~j0
zudAK_9q3ni5q$?yY5Z@TMWO^ykt1wsVCMmJ$~LVf+}jcUS8Yf5jAp$-0kS}SRDgOp
z`BGz;9-UTeo*&)h8DtJ^Ela}|$fYRBdIQmkL-uefBz;PnnGLIORzzI}h65d2Bc8;w
zR<}sYSNAz*mc&-S#4mf)qQPX?qi7q9PP^PJwceT7p4uHa{d;R(Z}fq|XD&CdD6^LI
zM%22CiP7iMbj%!lMw5d!iE(l6ryg;5mrNH?S3`hV`<&=ORyXzor4(QnQRmMQG?8#D
zw^_`guv$d)M@gvd(}bD0s~1s!LxE6AHeud%)`n?D-<gfyG4*AC5@I@ye?hAE%4|M?
zRO-`Uo<yNLH$pB@X&FV2YZv`G_xIDWRdWwC_)7gBEORr&irR_(c4r)C$HCd#VOGr?
z7Hh=c2lSInetN33MT)nv9W@Olp^<3YkcfWCYNU8UQurxBq=Hc*w*sGQ(M%>@_(y4x
zEm(4!NU*(Dy#=<3s6XMa0=Gjwa`p~m#|vc+<iQ9{)+W$F$yO;vX(#*G3M+;|mpZ|8
z+=HNEELM)Y7O|iDgJ2J-K~QjadZm*}d4yvNaQ?zQ+6Fo2sNIWj@R(cVIQ!6F02H$G
zKVPPoLC|9Jcsj_efkOR;^c|D|V|J|ZD7QOhqcE{NPDOX<B1f%m!I@%6T6Z{PM;56K
zeIbif2f8_FzNLPf?;s*qth6g}^l09(&hSyRRl_I>HZMgolp1WVf~QY~t5Vy-$6M0s
z1B>)kq<xbJyFjtvVPq^)ccS>#x<doTH}pA9#LgKLzdEk~do=CFd3GotTR@igG0xp`
zrliyH6N6M=iJomQfz1(9eqOcujhr*;Gb&7rRIC4RXd<FxaHM{a8tw!{RQ_x1{|@{G
zDNtp0(#+NGCf2u2fx<jc4;LjIS}P9H7!&HXMcl%~5kpV%I`u8DFegt(-33ZSR5Qxw
z_B}RlyUjnO)T@*}?{|tqRG^JBV%JyE9LN>OscLmUI{y`HOlT{M4zE0YdL>TY1%I*E
z&TpOw8W71hjY8;tW!~a&uNh2UTdh<d_L=r#t}WihcY}=A#y<=kuP3jkLh;E3sBDil
z82f%0x4~aj_1NA=SU6T8R=)TWY4%|2Kx^G`=^|N!^vOABk{coWACMtC((N?;36g9v
zhW(R_fFSNJgZ*YPXe8=e!^}mhbq4A!tA+N(BS)WL#H0*UutfAGk;Jv^{g7on`FnOr
z?jki6Bi9~AWJ~>4=hi!FUP->fNv+e@1f0nTTrw_F-zk<psB}=_iE}JBUGyqdJE-bx
zrQ;+6`whnnB5E^`;ON0-V6gd@D9UXYXG131$;L>^g#%N51u47BZi5BxLHLjqqm(WD
z&rp90&AG9X=O80AqiiQ#YDUGeO;}f4i?o%Bmj^1<-C{+T5~>%eyHfdO%fDL9XKdL_
zG`62o4YiAq-=)+6QtG}#LMhIzLxdAB-v>Mf^kdi_m&G>KYR0X0+05dy5cG%O&rbmJ
z5KJhW#DvliQm=zYPz4S=k)FoTopi0T(AGIMxTl~cg0$mEz#TP7&>rkxV3&n}SRyZ;
z$~7c8nc38Kw=mW^GCF5rsJm>j*9fkRZCa>3;8#C&T6orevuk^p7ogtU1A^kbZy_|z
zX&|{MQmh?&-ZKiHjG_uMPXT))b%J&$L)`;)oGyQGnC;<U9vo2`Q)0sMT5rE{2Gn{1
z1~;wuY3<~Hn7KGiideUfb^gTp7@wdb#xRC{rTYE($O`5F73G{_wfe6cBsKQx946+u
zTAaScfrdFQ9n1_l&x@^jW6HUtxkvCq=bX|Em;qDVoA6sgI-UsbAwGTWDX#HT`6zbs
zf$YPC9L4JpT&+es!A|Os*QJet6KTPwch6wh_ZcH({8HxV-n-F7pNv4ea44C2AvO9N
zQ7M-7)?Tn^u&D?T=%D+Mbb<147~zD=m0_NzhHeNR!$zuP&*K!(#5?qQ77|BP9us5Q
z5)^)hmgoV5FH*dGELJ4xyKf<a7Mev7bt58>-0G-S;4CsBBq;0np=`|dR;v<7frz>u
ze_>n+RkqGbt5jJm4u*)HaXlR~GtP{IC5959S`V^yYngRlwMs`GRufVG0x|lFp6?V5
zD||$~gOS7I!h6yzEcIc;xiZcy^`6#w{#zodC6nl3#Vt6Ea593wobiUffFU^8d>F+;
zI;DhVO2#{9I08swLel!Xj-c6y!>N&p?RH}zr4`C)ACQw03A*zi**7#wahL9Kl2E#=
zoHVCG5RWy&AaRvl)f=6Djb@Aq?)F|&spqlb&*Joou)P_i;@#^xG44oZWKrS*X%j_^
z$8v(yoMCKOPNgb^N6zA5F7=!Q4iOdU$H4rm5O9&YFqJIUn2Y0OMD!`tmhfR7YV?!Q
z9A(aFyEC~3cb9uA^$UqvUJA2d(;0BfwsMd6?cnbASkJ=XgS-=)ENp&wkJld`yU**N
z_<z7x@Ne3v_Imv%@C|H#&pGhGIQq47%JI8!j_c;Z?a0VXY(c+tWcU;JiW^9*6?ahL
zPI0pn%f!t}EE0EcV!pVw37&)K$QYft5pEIAWCeFur|skg*zTE?9=~xBySTOX$f4Hq
zw8~cWwtDAPVZm9kq-XQtRBX#deetg#{#;#1?9SN9+*4pQ%DIwL+dTbhcF~)t8<RLk
zfvDBFbDaSapfWqvo!+a}U*vQLw}(c^>A@Umj<JoH;WCr!LO8wI4aNA6xb`S(m&A`P
z9D@$1qX!`+mjq&U{&z66y2JiF9CKU3O;8-{V)@ru-ND@>`kL%DE{5`zy_0t!w|V0U
zp0f<@&aj8`QvWvZ7h5vQk;^=Y0{@1!Z1<j!QS<pG4Qx$07Hl%bK)7F0t(FOfDLtAf
zmbfTlS(=5tG{;7Y@?UX8_Z*BK_%ee{GvNDtU0gr()9whCP*NLJb}{5stCoolQM|<`
zaR?~vPcz3rUmkIQGVRp3Bdz%pAybN%oHBB(?vC_=GI-6?iS)SjcKub=Y6v<swH(a-
z+)=pNj3i3*nwO%){jhDHQ{s@b%cI1*8M6Sgc!JF{;VU*zK?{IK_^_ZHuz9-c3Issz
zn1P}<*+<i@?&u8#hJRaz_w;nny@R3pUTU3`bCT$+yw**g;?oU5C|9Mxz&e9E(V(I?
zrKdV*94kKAkO}U%R1k!f*)ibDoS6erwyi3srRqdcGWw}u_@bXKG<~kI2a@m#tXhDZ
z*c^hpHCPcQ{JM`I288L~abN(fRhD?mk>i_#>;cRi7P=C<hpE*h(wxKR<7v);-V%^W
z_Dh%vpi+#eR^w4YL|rH46j9zMUX4c^Pb@WuKvrWG#8ibtE1*f^i7U;~PMFB`McIzb
zhh1ri%La*uz#p9N+<fX<Ck-Y%>?y#{<J!NJF`e7B%;^Wp{-@dNIJA6hpglh9-?k)B
z^lH&zjKSGfchj3j0H^Hy&99o?DS5_}=#;T$`i#Uy(J7nE^wPwL=#+70CJt<;-;@{>
zoziIfuzBH`9io;TK%REweW~e96IMMe$U&Pv9R^n_c%q#1%0xCqcBjA(s9&32Xsq2b
zYWkop+0(Nc$2GMZW4iu|aWTEX$nSa!9+WeElQDOCW3Y)9>#hS%81jmN9;}ncsnb91
zM5XNeTnb}s*PoDx@&Z=7FN5q*gL>3u*tY9>84+;_zn9%X#Rqw5<z0!{wzbN?0Orrf
znVU)^SnXmG8=QC$)+8zBoh-Kjd5Q7tf6+Z8$q&Tflw);bmD!`d4G0Zgq^`oa#G<IW
z>tirP9JK{^hcL@dkog}B3>2UqH-8_oTy_x$Bmx>Htwuy6*4V2V)j;L~AhHbg3nJAi
zL~;^Elo|C)iHp>Iv5N_L;%~j^_;3%-2BWS;>T#(t@0VzzmRRHRlGDU45C|HEi~pN|
zkgr;;k$k$7FELHpEcC|x2{!auCn0i@k{dmn%*<GOS|UUGH)MsOOkOFOy<mbazi3`e
z*N8n+=vb#=;rv{gOPw-NAc{f}BtuTuK_(rzzMbf(E$+=SPIvC@FLy(WvSv7>y{m1_
z>~N`V45!#FayarkAXb+LY9nkdh35I?PE--QC&sAvvHGyOw+(5Tcc>%W+Zg?1tm%bk
z9BwM$*w3#($88zY$2sS-wu}eguHJGH*my&5`wqlS9~As@oNiWddkblPv(-I)tdW=4
z40n@}vn6BtRO5ogy6KI^@<cuAnRjT)5OY;oGJGO&2j~*}%wsO*E}dB=i<bE!$=pkH
zi5YRmPjmML6W4&|Y?!10zl?S%WBp0iN!#Z2qHG@`Jacd>Ni68)TzXJm%iXT**79U!
zYpJI);X~ck3)C&#+Td`-iE<bxv!!^b@m+^#XXfVN2;ROcE;NSRq8{A@a{UO6WPcWt
zHxBPlQ9O^}<v1qp?8c7#6?}5-5R;vp=0o%$iZ9AfV7RQiEZ2jpfDL~AT6RVBGBT$h
zp?=ta=j3|0fB4@Yk+)Ap8*)8~3$c&KUHlA0Br@Vo-|m$$atfk4R#L--z2wbF40Yq5
z=#R&R!eG+}unD=gvZ8kDB>5*VdP9kkA1Cbw8-vSeh=$3y#QZz{1e-0i7K7{x4tA`F
z$_1gfs#P%>-rC>^?&gSwty*oztirZ&0cH-Z)+^blH^+chOK}6pk22mT&!dbqmVv#a
z?tQWt@?b>2#p40Dk$7RW1(bbD9YO3Obr^rGx5YT?ijf?&KvacHc%;LFO}**xf`5;+
z9Ps`TN_=^&XLj(x!w7{IU;7)cAN_UccX*TM_n-e-e*5{bbJO)6`rp$$?3VF3+%|mA
z3@G!^0RR30{&VY4h$D_~{V!=!dCqOi|JU_L=N%1oeFK6Fbc5g9W%v2hy0-NBeO(QG
zeoxn(eSUw};y!;t*Ze+zPFI=Z7ZdOW`aNWkHf&zG90@M&qP;85zC2cLot!en2s(Tj
zEZa8k*p$KMKLs?;)4#>M56H%sSN06RV9lIQ!f%yXZ-ZBueu$Cd^0hyeAIX+78P0mX
zr8eSNwiSMj-c@_ZZg(=EW06`62osJ6@*lCM)GH@k)*O!jRf5=Rbv^!~9_wxB3O7s*
zHciHiQ!Wf?{-f(+&amCm&JlV$aXkckv)j(DQp7rKjDAvR)^Vq7-f7f;;UgPCWf6)g
z^*m%Y2h8tzA0doEx4)eu24n6BCP*1GAAIa0R=`F)g?JKiGl=Mpz+1)4?N6+UHXa*o
zu5pI^<>*(TCk8*ZoU*ayRBL45?`YFgMhRg4g@1DN4~hBvmryd%4gum_LY%^HosGo`
z2MeNbiJ*`Vs^no`aqt@C|C5_P6Z6khW2j3b$eyXe=4&u{mv@cFU(zbrG#WlRC393Y
zII^#gH~d{bM8@?QEc1&_nOz^jtnSho`${-nb5u=p@`04jOh>tFzaol$Yu*0O*^Xt?
zstB^W7jsj38K$h^TLxo#n+3h?(!`uN=B)tlazv+XGD^x5Q=`)wjmcOU72RxJm6+&+
zLtZwT1@(;)wRd-FK1j3nl_dgJH<D(^bTtRM@^`Ewu&<}LmL<`Fz3Mg0F=DmiJ&)1U
zcoC|vU;|6i*!Ol-PA5E~wj?HEtpyOgLxZ6D<#9B<L(DAI>hEIf54iiv$6pjInCdG)
zh<fA&)Qtz+r%Bm2{n28O{re~sGoSds4ZkzF)IoqkAoIWg>{0u@5>1;kRv2Q6BWWk1
zX0+i-XAbR23pQs<VVE;V2b*b#i{9sf?=;Z1=k=nbuH*2=rGSX~C+p}OcLd!P>%rD$
zblPZKh9@VcS)ajRgmOJSSn{n)E1uj0yLaQHSV@#te(dZ{rbqqcWnubi^>eiPNd^H`
zIo9({ZbC{f+w8p(?-T%EH`BL%iJN^)+u_a7EL6ZrxqWjE&UHGazJLS>W0XCd2|Xt|
zyg8b_5}o5Fc^~yrBXvNE3F<!}m^5vXx{Xc4kS@Sj3N{D8*e=m})r~?~Y8^ChHa`Qg
z$TiHdmy*0g*LZ56Ar5!wJ7#*$$PmPtVX4uv%fS%O>YzDtRsMZs#$xuYwW8Sj%pCVE
z3E9aU(i!&aXoP#Vin~udEE8Z@><p~RpR)wwk~hQ7y4BY@9Xn>>7r=pNAg{dn)Row0
zK_hV2ugw_)-9|Pjjs@r4!j6HCnbVR`sd_bYh?wkPxb>@lg3dfzHqcfVJ1%=sa+M7%
zkG&?Vsuy(xe(55Pc5B?H+U>wSgt5?nr;lvEK7II{8*nqzlIRA*gJs7<z)$R!a#hX1
z9t<`bU-*R}O@(L_6AsZ=fgp>N2W><*VO?_CX_l;2U;v*Y3<7I)4^*;hHID6o&C%JM
zf_%l=Q1$?^3&T_TW6;B-74HNi`KKUB--$Z8Gwd85lXH0!&T0#8URJ6%fL=e&?brbY
z&OQdB&Ys11asc&lvEXd_n>_o~3aVJ$=a$9w#v3pI8$%$wrb6Jm_i-!LhO_FZ<u2<R
z)@Mw5HT8h0CFU>?JtzXRBfX@oBYkvYNStMOJJM^*U^+-IEu(4qH6$CP-v#=qA6}?w
zNY_#3!6-{v+1Os7iUqDo;}~x)XSJ~_6S&`I?IZc~;@p$2R_h(|V>oBXywuf4wEyR2
zT$L)r_}|O85nVIQseTgYf+-p1Wvz2Ot<|0=w&aXlgn4lKB6EgZU_Qx~W>`lOIPV~+
z{kHGoo%E-4J|yqBk2VfJ*9cWnymv#k{%sP-x<DpZ2;XfZ@pNLfI)ODH1pmB1%gBNB
za{3kovtBPcObQK0pIC?X9L@9`3ho~2**gQ$+5Ee8VB8VUUTcJP=#>NL{-VRDPh+1p
zRZxm2?eg3)+6mr3DbTP1xMf%gUl|ED1t6`vF2x^|Ew@vQ>=G@CB-eCNsK@Q<e7hWn
z2D_3d8)*Q`efdm;ZqpKJ6Wd$Ty54i*oU6uv0)Tl9ciniU{^931m~yOrTQ}#|Vzpu}
zY|}7(Z2jzCkcXQwEn?Cv9>o|OT0_oQ$)jA;P}I|-_RAo}nUeoPK~FL$CF*|+S-6t{
z9hhax^Q}D8z%!3V7Cdoy%=yi4ZpqevO_~o!Vr1OO1jRnaHWno()73v<{KweK5nCM_
zXAY58=bb)uNgDearP~|wvL?E_@XmP~ckdiqD6Qe1%GU6iN(c<v$2jD3AiD06we4Mw
z`gKik_pm<uZODYYDWD>jWekf>8)OVwppRS&EY<=GNFIl`>I-pbGmKWVK<A|HFA-m@
z_I!r0GT3-<V>bue=4Wj0H>`9k{~H`Ajxdt@vyLGF2NG~p01K{wdK!GT(n^P10>$#b
zB&8acpnYXI#hK=LNW$aeqn~$Vc{^@DUWj)5g~d8A9iacgPp+(PgdrRUBJagrTq!r)
zQ`GGi-OSamQ~U(-49dqDf%A}-73>j~;Jzp{X{q9EERHD>M!1InnBB^>rawYYA_Iq$
zGp!qtW|Uo)XU)pPqX^cle7mf`nuQJE+%ak3>#SM1=gMN-UzQOmXm0SUA3&G1_7ois
z{$dYKG4!LD1Cz7gdP6Wdg$DDS^a7Xx{dT&QmVnF*{^IxWdIcM%GR8YJlQwOTHhuWB
zvx#;Tsc^t)Gpg)_tp!}+Jg$(kA+m28aWv!*I8ZaZ(Rn#z>piZ~0QdhyAYkUeRM_3&
zF>Z`)Myg`#r0_)1vlJI3Z#U-P?_-~gRQ=CS5L%9#=Q&n+PPJMH{lc!!&8o^l!mV{V
zNx<FZxoO4)Q5ZcQz~KWtRz{w?68XDUV5mcPzY_tRq33@pt)UT=sD)(2<C;T2O_sj%
zqNE(-0y~^DxIFi1FOMkr_0=rx&$9m^8?V1bt8rRC*hF)Z^%?k}zBZyB2BBPrHZB}^
z?(NE5QfJ}~$kxOksrPp8EimWmHj2fZ42<w*PLGqB#%N>gxzk+h%=9w}+OI33Qwoev
zqf@esk2^vhEmoKFj-1)S_;d^Kq5v}&?_U5LnD6K1$gb-J$g4ku`XXu`s0qS>0wyWo
zx0VL*hK%zx2*|qiT`zbJ?H{uVUB#!Ba3N&)3FBfx8&_0Fkgt*;ZP=~F&U!cIH8i3B
zi47S?j;`jfA6u;+V5d3*J=pXLC{{lX`^}(<wTC_Zs`K7X@yXzqo*-Q}B@2U1JK)1n
zz~bKrzr=|jN;eeC7<`yjI?^@k57B93&C-d7t#?`urSzn}(|_a4vHjYUgvxn8=S1LA
zQC*^QYC@EM5ykxwVu$PdW%PDJz*8MriOROlukmUH5ZnjI%jQjZD<w>wRSr>AtKYHN
zut^7ETk<t?teg~I`xB=)N2>jmySmHr@$APep6;*~<FTE%jR44<fjXiyX1Zrp!PH1?
z5*OmJtLE2VA)P15Rx<48&YfZ0iG%daJgc5Y)`Pc2{MK!SiG`F)I30Uip*)U~T|CX0
zfivj@%##2nNdX-{2BLjKZ8{6MLBx6v^OhFk-i@`sko(V8gV#FQFDYGphxaawOYHJO
z2)ki%y9Vz*ofJOD-3ll;fA1_W1O-#ayTB9DMjYbop0&_}Q~uP{-M0fuA#<d;$JyL4
zo<1di&R^)UmlZ+~j6!=Lb4E~zU#q}O4&FRw-)+1fy>}rt-BV)Rt;h6ZZh*YYkug@S
z9_#LFtdRw+*yJ8oCT=_=zQFZ139etTj;DqjkP@|9oryH-v=HjC9}Vo$VZd&Y8c7pD
zI+%vd;8ps7b(^=d46{FQXK^?@0_&)jh2vg*Qw(t9)%c>rMQ_HpdAz4#+M5yUxjy(H
z@5{loH|Z~4fAPC`3;O@3@86X@{(q>e&<)T3AL9St;FycDqQ6c{6rew&zb=q_?a|-*
z6TEX2{cTQyc1_vn;1gVLLa1AZQs)odcMHvcyY_PrF}Y9GVO{2z_pa0gNPN9z1i0v0
ztl#QO-7{RX(Y5M!$UO&E-RQ(8pTU@hHCs+Le-nM|Jh{gn?C>q;c<=D#)9LgT(80e>
z-{XBgF;7dF-WMh_o`h{j7&;X><Q}K^<j$w~p2O4+4`L7X`Q&i`341A3Uig?KavsQY
zw@6lY%6opy+tgRb{!|WMWuK4t9h^Egx;|K<yM|%Hj>kH@_C?WY6N1efV6nkOg^dDz
z0ZH_0?Dm1Fc_5bBr`r1rI)R&RoRo66rMG03&6>W_@J=r?Kb)WVfc>^5Il;`BpU8xt
z&!BW<YW77`@?eEQ;avB`dNu|hJb|GB7SB6|Gbn?)aIWJ2@Ne$ly#88zDLRZF;7^6o
z&3nH;O)9)y^@nXoz8p926u2{){(mSdm4BeS1L>bZ`T~5tfA#twrHk@cyJfTtsQ*6K
z{}kNU@I8m`0i@dx_ZYtY@U#9?_^6nI&yv^GuT<N?bV(lm3Ur->`7h2zg%dYNt#jh)
z2f>)7>*T=~AzHET(sh6)L!8$=<)*z?&2-YzH1*BX$)xi@jW_ki=l-1Nv_-+DuOOQ<
z>Nx(o_<nr<Tbf-Btlt^lp01S=$KfkU7cs8W$DzxC(>2S1Icz2VdI#p<75H)orf?AW
ze1XHq1mL^;ojwj_0YAfEl+7V4WhV$b@};ipZ2*ox+;td!wGUGVF0RhJ8d%Uifw5KZ
z*9}ld-+(`f#n3@qcr)QS{qUCvPwR&tB79{({B^?EdrReig79F%5QRShpr)Q8{R3SU
zs2DbtP00ztrbDF19{h=yZA<q)CI`!MgAe`$AsE!h(eEMf%v^jA<EwF9`d19_6JB=?
z%&^q=zyN;>{L$>EK`(EjigHH$X>$MC@fRdY`ojH*qCS64VoaaklNj0O56S&&Xim3d
z;|@ZOaxd6C9&^IVSP3h_(SBFDZqX9+m=7t8E9wKSW!V3JfwZ{@dwQQ!&1=)ofL@6U
z<NAK4`4aXh6NBqvKR{g{13+CO5SvdxUF_nyW|UoD5>YF@?@Cvg(y!$+u9@=kkr&4F
z<7ywC=CH!YQF2i`gzS}gNDM5+^Dk9XS*AZRn_1#8o1+3`Q7SH3l<2SOUg<_JPX|n%
zj@GHKV_ZR}@<XTPFCjT|8TuGy<#TlMoa&eVf;keirg>a{hi$nEn-2t){sF;@0m?Oq
z<8mANxJp9{P`h(0l_>o4KO}$?FDDSao7vPqS&IHI_;u|b1pGGw#Js`%RV>7Y)|ZAV
z^)yDkgebJR!?ztqYR#U^3AZ0rH3Jir6X%JQ$VfH9t>F`udVrZ{aRb6xXc!lPzOaSr
z+sUKm2`9l)DV_Vt49XK+umePWPil&m<fFbYmY%sFw%A5Tz(Oq>6ded*;emv#rKU3T
zdEkfSx<d8i0TqYUIzk<<gpp#vQD|S=90cGkSA8C{zSl*fRO*!kI<O%ZQP06fiOvw7
zbz6st`Bo+<5-hPRE>k_;XIRV73!P90>pEb)6#c3AQzf{Ki-ut9TQy81BwC1(85>iG
z;D5zRM2~^a+r(mCgIq-~iav&`7S0=AbHG39TemU>ym3r3ZkBU`_VmYST>!^Uj(5+>
z4VhzOTc81tPTm`!xuh6NLS(>_AP1oS5R3nw6z{ihgn{~C+1AfG(IcCGkurwmxvIu5
zo}vaura?5(Ng<t^5>*sk>QQWIq7S-#V~{e<IA30c*PlQ=&Io<LiB~(g=Il`S0H11g
zHCFCtzhw)9B$l(=!u}Y{o)_YbRHijZ>=zJimHJaedpCOV)qMiLK$v|jcIn7jH%rw+
zTsg^Q(X-D{xd$cmKMD<Gn9@9a5meVV5#%bet=J71z8V*rAn%`p@zi}c5Bpizx`|^9
z=-o)%y5v+ueeVfy%*=@X2@8A}o2d0O@!mIwi7|X9UHpzv$o4jG$I(gArQ6ch<K;m;
z9e>pdq_>xx7-*xxsZ5M{-ihR{nR$Vn7~$KD*MNcaAalJ4txdXu#Sg-v=Rx}A41Yqx
z{kzH0*h+bUlF2#nAH;qP8Gko_<RURD-nIzov3T>fRlx%><yZ4|vTML4&V`EtV@%t!
zRH9qmM6TYx0-*ZWci828OYXW<j%<B1W8RY(h#%Yz*o>mvzLzTJL6)OFgB><e=f2HS
zfKl@c=K7J7OGpNawdOXH<9^u!vRTja?@nsb*34mIFS`0~z;<scv9&PfP5MZU&OTjR
z&E-<1Zw2bSFX(g(?QO5_OJ*}es)#*D(_UmPTif`TWHRQY+I4=?NW;5l&!B#NA93{v
zu7OnE<fLY1Qdc|<0m?#wKf>7KY6Hj$qN?4n+PHkNWoSQ^L<I9rDi`=9j$BW&sS-x!
z0cv)X6$qa@ZzS@JRxb(Eckl=D8?sC69uNZ<=K*!*x9n29{QzcxR7f*|oP?^?S842{
z%*1Lt%)Zac!4#%`C&`^8YuzNdU=o~q?^QoW+fWR03`6l!5cWH9R>w)m^|p`e?Q71p
zp`->wZeM%c!N4)a=41UWQGH{~-IwFN(qK~u+GvZQw1<x+161|e!>R0H!>-du52?`U
zW1QpbU)nu@FixeowC?)kUBeu+gpHK9{?wOfq6OPy%gnqCQ_8h!JWM#0u02U(xTH&W
zQr4zY%0mLQ9vizX2eYbPT;oL*HpK>U>c8Ua)J@FDivw)sd}}gVBJ-(neyn5%*amwL
z?xQ}Yj|wJch=&<Wn@+HahgQ^olBxH(y!a>ZqVs;}<Bt+&p7<J>oJ{74=x_B!#v~FK
z|D`Y^Q$LQVL>BNrPw(zawM0^3aPc;VQ|b?0Hs6lXfGrICz4tuG8hNqwp>GS762bUR
zMt5j~l0JG;wV=8wzysU95TQd0`z%f}4qL;x1tigElSrQg+U49UMx2DaE+H5j;15Yp
z3OT(g?MUVPDbjWN8016>ArYC9sd`!ihT((I2%PfW7uwZ_e82>QfQDIvXPG;+0v^IO
zPmBDW;L>;~ayu=ajuuDs6@Bn{p+H{OcTw+v#Ol~LQ|Z*}@am7T{`ud6?_K)B^aTv~
zrqOo;eMRtL3tx{BC}i+{`Yw>9CVV;cmC=_$-)8!HS@`qxeMH}f^eOtT*Z|+#@Uh6-
z3H+YH-=MFPz612VOy4K;{fxdF?uG9M^xZ|@cj@~IeUH$$hdvuV7I~V$W(H5&2%kaU
zV*2XoGw54R-_!I})AtsAbLks=AAF_smC`o_J{H+X;7SJXr0){?_R@Dgect=w%cgH8
zed+Xlk-krM!1pYD|Df+r^!*h+7U|st;D`XQoT!H`fgIt9YT8M`11(?}x7Q{y<yA-t
z3-S%{>tzfW#S$0M_ci$JQPc*Y2I4JS>>J}<#5IiS`35WV$DE(^=+YY)_#OgvlfKvC
zOWDe>6Ae8hP=8gWI*bB&cBJhkBueqAV~2%oy~jGkCx_}&@A6Fgi^Hg5?a9D#$i!cH
zpV^$%x-?n*nQ`HOd(}Sxa{wLGGkQ+(XXalAL_LHk>r>R44*R`zD3Kk<`bq3V*6IFD
zbI_&_k7@^x`6)b}Ir@1#iqBwr--}ixu82G6<jbDAd(V4hA3i?8=j<JNXKcG~{w_(`
z5b+Zv)PLlJ$l0es*5OA07~a2$kh(&KOJSamaD1fXDTtiZz5^pYdy9uZ{%xPX;l|d|
zoWc`N(hn6Ee{tu&QgwZuJG=~oo}CYTl9QPNx-b5!&(M2rtbZp%Fc(2+&W3z+Q*=GT
z6_e!W#*J|`l(yjRnMF8wCD-9q9#~a6#LRVGc5*Z3xO~GS>DN#IUBvq~efQ)40tRvV
z(K$?T3=AtM9Rb3KumzF>sy~OQOZCv8ci2M?#MQC-<ZT4NPzW0gEPpnV%J$e7;jxb3
zEvg=mIW&61RS@}tZba@qIWcLt`I)Bg+eG90Ua6I8a+#cB>Pa`Jx{*@N6RCLfQm3Fr
zY9DIG$%+FHV*m)UK%#37gfMJJ4W6zU@Co5k`z_Az;9#7V<3fR}=iupsN-We{!XK;*
z{`?SbgMXlFPe3J4YYl%;sdoT1^(a(Hot<8<wf!Ce(Z&z1#<=<&yp{SNnBsn<pg7>`
z1T>)1)&I<x<%sDBe}I=V5}M9uFX~|)L&1MzWSNr<t?UM<pJv!%gw+=~0Z9hTW`M^D
z$b0|+#geNKOC!lOlwo6-D8~sH$$(r0=uvcm6Lty1G$*5ur&rwID;V5G5Knr#Vb?M2
zj}iuj&B-2O*dBzzj;w11so-)3|4@?R9<Y;iKEu9_uugf;5E#HHFSK*wYZ*UViW;jQ
zBtbO&3kcI!FrtWs%^Z+?EkiGq<OTXVCqk0n&xkZ8Z+8k2Vl*?9KU%}y*fpS>I3xam
z2z`ZwqSi+l)b6Hj8<6%XM(`Y={xCzm4&u8Q%AX`<(XTnl+YqL|$cT+h-aep^{S5tr
zo1BmD)t9P$SPfU|uQR5C>Ak{e`d?Ve`wZpki^cC?L80Vi=F>l7OdiueC&3On-3;Xk
zN~Eu!?Sy^Gunmx)daaW(i2&Wxh)|wE(W4C2bO{YI^h*eh?H><T$_418ypH+fOc~Ng
zGISJE)-r#{37x>us~KAE<k$I{Z7TUxMoeIG9<9-D2H3jfctpMXHI$q8G80DhTbPKd
zw7uk5YHq^O0X&|DS7gIE0X&+|CBqLPYqnP8dcO!!vMwLGCsbt|z=^2gU%?>Ha1X9<
zuC<rA`5e_!-VS5VQsk_`BNqX@1LwXyg0wmHt_rFu+#0YcWYy$#hVl!6p)-Zc91fI-
z3Cww=sFLdXC8=kdhYftTIitHQD`fiYvaxtisJ%}Ih#jA~h$q>2D1s|hm~`0krDErX
z`C5Slym^+3+uBQdD0Z=x+6&7|q859TC1f+ahqjZh`#v;Y0m26V);p1;7;_2U&OtV7
z4|c<Uch+wBfeMsW>?6U~58-2(5k-5a{N4*5|9OrF?fU1&e}m(Tju8>a4FhuRr(NXU
zBXZZpBkIQp`M;@Gx@z{9d6T&fb<5pU=X{^rOPiOvau_oC3!txSW2r)47Klj#Pgxjv
zC!247VlKs-j(k(e7=qA@1u6g&7|yg@@4g9#pOG2(_9vbzfr^iHMjqZKT8{388lD&X
zjBon?jV}*4KVjhNB1>|h5tKajZB~QlW9vieNud2C1Du)Fr$&Gt*nmSw2z|DbQM6`Z
zw&S#S5k?~J3vy!{#uSu-shENZ@5TJL%%+^VovV#jNd-CubbUZ{kSu#R1s;F5U^oRO
zPUw_M=~nKpa=f%pJtb==MPDM*>fT9_X?dTuz0cw==-?@L66f#goVg3885rxoia%{%
zYy|4e>uY-e-by`&zv{2B;wDV=JFL<?OM;VHA5$|JlPaVfcrettJu?KU%o9w2bCFtE
z@nkmNEZj*a)*gD2E(`}yL`V*G^#Gb7llg6jO5R;WOZ=&=dX6m)@RC+`y2FRm3FV+H
ztOpVG%4=Y+z31v-tvLMJp_POn3aFi?Ls?p&4xo@!!6FMpjow)cl%AwQjjdKt4;_T{
zxS9i|aRP{xB}rwt%9@cF!04N%3LlbQgYtq`E&%5`Fyhjczdz0&0o;T7r3j}TlK&XO
zz&XrMp_Qio-~>nko&Awnh)h>MM}Y7?P9;dE1#D-J+IctDN2AbV=s*2QcH)k=z?$O`
zr2l}RMQ}Pm+7Zwdj8RYh88{7RsQfZRXJ{cT|5|6M<AiFoc0%Itx5f(ilVdeh4BWK~
z=%AkF5iF-T3)G9KWoWq5M%_c*z>oP$eUQSP{rRKq{r%a-Nx-$Y$bmJ=T^=$w1NyT-
z9G!8qL&-`t@-XFjeV|f*9x>|K*Gav6p3}ep=RI)!WrQcMQvuX=)_FxaYt+b>>HT=^
z9<PjK#CN~K((xFY>_n<YNS>4-DuCkxz3O5hhR%T(XML^!fYbRf30rCXW+mZIF;e`7
z2>s|E{p}*3;*3cnt&$nG&_~XS++#cSIH!O9h8%YJBnyW?a5e|O^W(LaPD*j9@ET7I
zS3%!3ea??(geGA)7oe@hm3a6ZkFp@@6oRtd-$z-Xt`_QY?DVal*2lI?(u~#ivPoFB
zEX7%x20W1K<rWQobtMUmFbg;qMvrlE@>+K>dIoKB><tIEF-eZ_8O%~2ii+rk?@|yt
zqDJ8_D1{$GdeeNWbJir#3fA=g--p_IoIC@9pe<%@6MkP{PY)h?!F|af9>_Vm#TP{e
z$}N%qd|GBMIEkV?*gOF~JTVN86`N<?W+)2H{7uwK^>aZySHvma!=Cao<Z`g-DU_8m
zT~+HhF#Tgpk2z3Ufkl_3G=}RHh>WNpf}L09d0J3kI3UL<i}sUhggA8A4;VLp@%*tj
z*z`0i;^W8fplzTZulzpJUw5#%#ff(jzpby3Ehr?hChoRkK<O(HVVBp8@n~KY7@$<R
zf)#8|Rbb*bC7|yKA^OX^T9C?7*W=xS#E5ub3CNE3Y(wfsWN-am4~(Pykt*^<>^Se#
z<3}2CjB7#7o)3ob_YPpp<V&lC{PD?K3&AI&z$fX&>uNWr+v{q@&}jYx??<WzsuCR-
z`mudDwoIuVx2JW_!aMvJtjT*rz`=dK+|2Esg@;^+ATW9FOmzh^QrdB)>9g*wO%%F2
zIQXqNjCh=xdY%bzR<0IyMm3oA%&JZ8@_4Z|8FH8uKai5Vw^j~>xztz#>Z<N9F?$Zq
zOQNk?=gVW*vX>cU|40jh&9`8jv)yTs0<S!bY;9C9tv#|i5o{U+c7yWEC(v}ps_Z`q
zPGrizBO!>kF`t{Hi`4lLKSIGm*ni0Yhm9>5m$*GE?*lt~K!b0sagQI!?;FH<1|5I!
z10FMO4dJ2NeI8y$IfYum@250lqHUgtb@+`-<Mu_A)DS&Ms0RE|#;tcOOhR0sg?Q5p
zQsr&2%fil!-&6wzxU1g;lfYbiQ~?G;|B<9c>VqmyVGOmm6k3fvkb;+?Z}|(O?z^-U
z?hw_TAu8~ieT!S(TdCItgl9sW_C!a7o_m|nnsVv<m3H{RN*u3Wi4*jEDd|QSI3Zu<
z4lCY51<UozB0R6;TgY*Wf1SS7t}l)q=ttpKA>niyjf#MzPrdd&EMc1Z!KE_7@LVi2
z1e=B;nf@qyXW9qYFz5OXIuFZbH;tm~=)vn1JSm~?MKZVa7k^99i{G>x!{TT|xE2Jv
z&@C1g=uQ@?x=3U9Ep|bXog=jFS_tMzB_AA}w!|>OxSmA5Y*q8f?GV_UiKB4|PT`vQ
z>_NA3zBTF?(y>2W0X{)?GpL_nm8M%|ky{Ri2Nk2dRAD1i;bxHG&|p(EjFr%bU$}S?
z60WE{g`2Of0615wb*L07E4NA=(ltMbbg9yUO-+F6Gb?rP7GQB_v&-q`jZTV<nFY8c
zxiK@#yb29*vc=kwJiz4Je=XE>n^zyBgv~|QV@B?4^udv&G<&6aB&yPhth!zvffIS@
zW#E7w%KHuT(|#3fQW(Vg2-Z}s80zi%6GHF?#AKGDmojF$#Q3{jLQHDH5ne5Td~?@L
ze9`MDsDT}fjnXyObo#`DpibX2Q2!X25-e-gYk$SuqOWA}*(g4-1brn_%+kcf)RFZO
z_{|y|&-j&4jO;ohI&CxF1*LMc{EJ}8e_)2BEEvx6cT&By^W#aW4Rd5$f4wqFy7(eK
zq%R%>$GBYLmq(yfCkmoiX*b`1GPJW6$m2<jh*~S*WZ%6>*<$>>`kVeQ+)yk&(vXf@
zp3qvNQ?kurc%WgBnT^d61n^*Za-I`)ftl`j6M=XKF6tt>0=e-J*+$O=#)o)6k0iol
zb1bLU1VeZR8DK#P2IZjgcYPObANS#hce!6YU@#1d78j&m)a9|Sh<cMlwiC8es_0W|
z&GP8|z%Eq$hEWi`KUr&DU>yqKwb<OP7;y7?-JS$zBnsmY4A`+@?HrehVTcsZAke#i
zsqC{FdlTMRxHk=W<BCv+ytt6s$qp1xCOLzxUj_pb+Xsr0gUqZBm`k<9NXQb#Rup&O
za77atfjoh((02h~AFmVMCuhHD!eRiG!W~|G0H{7QqCd}EBT^k@UL4&dV`&q{5`Pyp
z*;<BS^fD54d66St?~Ul4%<>)@ETYLQh;H(7_-*oL$-{TZ;;qyVGRyDLZk)&RMfAhW
z^OJ#je3Hl4m&aGBA7P%yoII%K9p>58mnVNfJ$ONpsG*)?NR(JDczwY1bNbR3O8Nlt
z66`RQ_2v2pb6tmiAZ{Ns->|-XS41}fH{|n4J|BOSNooUzpE2q54vg;bQA}@gi+mKW
zHj~stw}1t3%lQQmGc}O+2l{&A{R5Ojlo`{mG8bD*PHanWksk&oPhcX~qR{{N)5f<W
zfWrTE3^hFQifS-`E`*|gO#K)OVgz;icDYPNMhn_iC$@!8wWM`A=k;PGjKzkFjX{bd
z+L%9&S=kKhn%zse#M^MM^}ofF(*FZE7~frgX+-S+DFoBhR&umtIpvWF)m6lKuz4qN
z#&w)A?$gI*N!-56i}3Qa8nl^=L3_Z@lEK7JD3eNFlI)xCo2U2UAlfCkb5&A_Adji5
zYyX1eFsUz<rz*Do1XXjDeAdrfcFasW<NS)?lLwKl(>IBkfkMB51hX56SV?DrdhqX%
zhS_-g4i>76qBnW&pZ6^K4zB|zk-e)$_CAb)<c`4w+e*DH>C+2L+@)~r2{<5#N1`@-
z6rGlBe8>qc(8g}+nna<1Ef?(HU$&D&%?dxd&G#HUE#b!@0$an6R;t?_LUe6I@$ruE
zqsfl&V_ISh%7!i$!*4Yj^IIE|<iXMM8rmgMwB5PHU<|^&#?i+6(4De%4{B7sBokCa
zCuizmZ#;2Y{I)T^>k+cdzr*?S>3NI$d}1Dy-wjM9Xu6XMLt{>wIYT0wz7DLdx6x)}
zG+(hnqZE$rNzb<9=?7jDn385VFPOc(EuμFXvQx`Qsa%FYaO&F;%pjzS{p?O(ag
zl<v6_e?4aQHvHTG%47Zj?i2;KrA;YM_O&wnaKe$953|!__=%HX^AqqT(&GQ7pR6T2
z_|~VSWk)2<9cs*3mCl8&#h4YvGhn68GhiF0MsLW*j~iA6g1e^*MuXAl;vO?EQNXvH
za7*}dlz`WhNPyxVV^A`@!~NMtqGQC1-!_M(T3myU$B<2LZIB-WyJlNPOR2X5m)XI9
zEd$3LR+*t~InhtU#){~tHwBybk>(w*T!0RL0fXN?h7@pS-lrMajp$K~#sMxjI=hXR
zGrIU140s9gqZyyk7k^J1&KYWn)slBC<7icrMT9X7$;Y3ad{7%}mh-5Hyyon>vgF(*
zX@a=x&y5?zj9y2+^z{GMy1Q2y_E*GuvV#v6qI?{*tr-S!w?TUj&avS>|H2Wl>;4a4
z9BEQ<OwVuUeu#kX=%i;M2#hSpgWsCcrvoYVySHVq!16Q*@B7I)!(kXmiy8MbC$7_1
z<H``q4RZGfxUN~LwEqNmhI^f8v`5poAQz1+m+`$D3{O1DqnY?&baY;<{Uk)!y%*!|
zD8@;MCP?Vom^I20e@ELGcx73lQ2!!|z&&&pzzG0Tae>|}VZ#T6;V=ze_Lif`(5+IX
zZ}4HBDDz;L7eKt?6^WcUug&?O!<)W};uGdSsUpdnNds|8pOf&E3GTAlxN0xz=C7Pa
zaYir=kFFhd?sgY{#36Ts+(kc2<iap{29*W>O<fD{KKA_%EqKI6-UyCPyTrg#w*Db<
z>PCWO@hp^kdJ{zp`eJy}$8M9pTiNLi2iSX>fWh7WS9{+d5La>Se<4c*Btn!ZD%u+j
zh8WoVFwsCl<ku1~K#=8EO^6a$vLGzT-VMb3A|<I=*I3%xXMb2t8rxcHeZHz~YORew
z8e;XS&9j<5{c7wFdvVh?ts1FK-S6jf=HA^U#@D{@zu%%ad+*GdnKNh3oH=u5=FBMD
zl3;-|hJWs$%pU%E!Y&EL+-Fs2hP3!+2sJ-Y+!=B-rsB0T=xAg%K^(P?<uDyba#Ygs
zN706Ci=Ss$0kpb6Z(?pS9L8@)sI?;%XOVZ2Q)q{T$c^K)L?hMvRYv&`6&F6=NQ-3^
z&Qf`gEOQY-m^OwNshUdo@GjN>2Zt;i4hj!zk!eI|W2*OY=6{x*fBH`qm7*)Y9Jh-0
zb9@ifnb#kopb30nUUv<#=h!GGviV|uOSWlp>#0Cb^S;QOvsuq)urH5Gapt*U%v`vv
zWgfxw)Us__Mg^)gkAZE}{1exVW~=*0beu>)j+Dg1l?^bY)S0yF*!CLUJ>)$E0Pia-
zZx|@T?LE036W(m3s_V{_^|Nk>A;~*^hlXHuLs?!qa|4TnCphuly9HnDbhsAY#Ko3Z
z#?nw$cEkOi`E!C;-73i}evJ-*DxN?X4y`+|ntt5@s%1<)0m*~@3(-tP5T)TPT|kwF
z`;-Lamjc2WOBCd08wA!<=E6I`l;R6_(f>IlJQ7}FXIO1RV=LF=Lim*6MSOuj&b<fl
z8*Ir8Uc{I2IlybQ$-Gr%VSeEi&J5%3EK+`8z?94;eMcUMgu|QagHDW$v-a{!rl9E(
zDVzAxcgiYi(enbi^L@~1EQucgq02yQie@tNDK1E;J$&gq*h>~14hg0-sKHJae-lMX
z!7sKZ27ew}jh&5w-;R8E&bFk-up3#c_x>7<++;SP)+#Y6^O|vkoQvUMd+hn4h04r)
zQV0#g79r?uNu?tdovf)m&X%t<?>iFb5IW9^_%p14cMWEcrcl^xcKi}59{g6S%6R`o
zUONI_Q&k0OFzYJMoN5p2vFzA9+oGazrIBh=(74<-@Xdrqq)cup+b5gcjH$RI@PI-8
z9s58_<$qtGc`53<KcS6{mdPpCRtFo8@nDd3yTuVk)l4Md60PXfJ(hPon#dY63L1}Z
zfnFG@ISvgZwCGmII}c=5NbUl{6$;8gH}acAl&0=NvaSNc0>UcnH4l#MorNwx>+dN?
z_VGm&ehLAeIBGUq1hw}P8jm%b*{XXfyWHLI^cSkhD5yEUc_em)P-rpv6*w#-4i$25
zz-4eFQQ(>gT#U=dfJ8xQHEwUbQtp2-zalL|+rk;44Y=$e@Eo4i(l?#{_`Z2B%!8m$
zD1i>zr(m{=>jcC*0`{*T3%WBxCDmA7_(%OFd^YAa1+^LQ`cVt_IVRZ}Hyv6Gj;nD_
z;A{ZB111zt-X~9^ARKLq68g)Vgqt8dd0#s29_&uV{VD?#rv?|{ER!I2zKKl`GHp88
z!Tbr*iJ2;t{pibBxdgADGaB(@1=|me3{p<K6a2Aa`$t?$-TEu<LZ-R}sl1=&+ZHQ5
zj4Y3`Um$(UDEuUxC~iy+R2C%Vq0ykJ^b+=3!O<aijE@Y#+I?QAZWdq*;ETz78zJT?
z2!uuY8z_jMq8LCYp+AW4*ht)=kVqsFKV-6repLzTUokvpkA~dYp;BCJn@iI#Y)yf)
zA_K^_-n=m`+yAz+{h76FCH+g5Iyqgu3ZQ!z-Oa79OYraDIo&DhRO%N|DCiT0Utozp
zsHH@b2za6lXCIuC(-f;T*MBTcaWsv7YMOkNX70z*<lAXdl21)DSEc!&?^N98M$=@R
znkGl3dHQ2%a#Who6|~D>zS-nGOlqeB@ZgkGOa@T>?o{|^1e@6d){!Rfs|5O;FS-mU
z^yHj;OEONECkHY{wza^LI<k#-9NdYC=g789te_Wc%f!MBJ^_@71+x{iaHT;@1CHG%
z2c`@^hXY%X^n**9O&^mylMzo~?njoR!XKenHVXD5vngahGGE-BN8?UaW|kO)ARC-z
z)??fomve!P#KJB*597?8h*)sq$LxpTJ@C}d>syRD+y92OA#7w0t*8WG(*EFQcw}PH
zqc5SOdT+&t`R88gg9)!y02aU-#wO!fsBpaQR2&N}I@9w+qLCM$XnMDmD91{4mQ}C#
zG>%i#%v1#_d~j`ym1d?YXLA0!g8iA`9)r~tEawvZkMz0(beAtsD>9g8o-OT=8=qaY
z9X43mo!Sm)TORcoCAmrk#u2)HK7>YwTlV17A|SVm9~a1F-Y*a`OF_n$lxeqknpM(t
zw3Ag&>_KOnvrRKbxcPxxvqV~R64zwdc^vA&*c<D|R(jj2E&K~vOFdvUS%r!uZCYTC
z{dWRCnfE8{zXPvz!WQCkENTB&7~tK*8oY9&um*DAnMWuLk1+HALQ!2XEX3P8(LG5b
zd*FVFs>F{7_hm_){J}xm%Z+)H>0mL419c$h$I-#!5${i!M}y=6KNB!zz!Pkm_W(ne
z+c~2xx%ug72F_8S@x@HHN%eKa#g`GKRos1@?Cac7l^F_Tp~mxRH_m{$j}9XKj7e!Y
z6ExrsYMdY8_;rPeQ(7YCrRjfR6JD*CDqkgOSk8x|;MuhJa_#fiNHL0G`I2rOx3g$e
zSiY|~0Rvu&to8u>5{#V-<Lfaa{Rc3DE0#apZBb0gid!2`?#i%wqRLT`=t2dCoEF9B
zbY5IeyR4kfv3W2qulO|QVBe^Ssb(udjOVQW21=c2t(JZYx@2^gBxAN(JH|vBj`(=(
zmhC(p^P69w-Q;?J_rsLMZgV3VH0V06Y^~>ckFZ_8`2saM<wAd)J3Qf^{XYnf{jJdq
z9$^M!=r48#nIPynxIE@<Wbq?1pgK#2JC#*VZu2W(J?M~sN0*?_7TIGy<~Bcr;NagV
zF$A;Kk};O>p%tEZQinybCT+*?TW{h%*O2QtOeq=Zx7>*=U`p9DD=FERgK6<)Ny&Fx
zzkfm)zkh4})>+}h)-U7Yp92VQHWRtu9b2EV_g|bGxy}8LsGfKL)B7Q82E(zYG;E)H
z>jx4X)_Jd0f13Fg?Y0LIhn-G8LtK;jFgTw(|F;}JBYh{=qv8J>LE}g9igu3{&>Srw
z^+fTE#Pl6c0YDY9Srsz=5JIBxvrmQR?yzRF5_`t6Oyf$!R!iVlf~3vnJi#F|JV4z#
z?ZnR#xG&NBM>g)E=T!xGhlSfbcR$fbz2!#gbKwYPWXOR{CrDT9;A`N6(0thxv&IX^
z=xp;aa%nb?u=2Q;cL}exTf1bzYsd&4`GS$6`B3M$cV#hO%spV^;6;2D_0nFlX1|3_
zz2Mp5!kK}oKhja3(pwW9ugJ;t8R@rhK?JS53oRBr;h3G2d>n7t`2Bx*%(%2it@kYC
zHT-Ns_$tt1_}M98Cw}2buMjI}&z=$1M~9zH3SSr(b|!4J!_TJ3If&tBrvtPIpf}@y
zdE$a+gNJOLdF0qKnRC4i{ITA3ME$&^ex6r9zg0iS)epUo+ACvYu0#ClUTQ7dPU!;i
z<N`W$u=Am!M_jLaKQ%(z-0SA8YypY1pbPFqz|(YO^&A_Fi#43o=Z=PIj>7*EY)l6e
zblR9AuA|*+xN5V{hQmZA@T*|!dt9EeMFy60E<sUaNr%vQRCGqU9qXuc)bIZu1#lh>
zyI}f`qa5hAybJ^N1$e_<Ya$n3CP!dt`4uE>GVgno$TgYSGav!zkpyCF-u8&-OP`YS
z$<w^KD9*g<=aBxXun}zd9xH*RAV<oUBjFLW1#ECx6j{$SnT_J7kn^u85!@ZW<$2s<
zvVCO(HTaP&FX5P0lXoR@lN*IbPn0!azrk_{OWYC~I1VwbkA|jTJP1wYpzxoa>=wvt
zTT1YQ&>(N4dn@S2Rp#)g*m@lPp5Ooqc_%=%3)MUmta)kt-H#x5xt@8n2Zi8RE;xTW
zY<K>K1YGAe99qp?Z+}*lV}p)Ag#`4o^$m1nQsLk1m3KoY?!49U2%Wg}k^)K35+7_V
zK18Yy<5I9KGjSi8p1yMvvJu3+Unbz|SX~3+;~fZQ9Rru6^aQn(8f-llP63Xg8Z-Fm
z>|m=oRz@?JHhz`D9aqme(sy3Yl;V)47&|kfxgTWi4_diTMKITWKw_YIh$~|7-EN$5
zFliAM&QaXUaIkJmddT>rD24E-&}DRT54-Pi=BMsuz+vCtYQ_;R?Ck{I!!H0wnYpF{
z)3Fl4G1Pht1Wg+qX>a&Q(eiyoV~mB^X0r_qse=D9QltY1&469Yyo6jxUk0y>)<9-`
z-Q;2{*fdo0a&TH5Y>;9lXuykb3GUQGS2_k?0@p?YzzNQ^Uoy{vY9Gekb_@oZD#Cmn
zTTU^L4<=Y*Y=3M`1Ho|dP*51~6w~Xau@+qEzIFQWhlR#P+tP<WoM~J<{9(Q^N6DHG
z*Ba*yf4JGWB%GU;SR%eI(i|mW`p8O4E(z0*W?Dvx?Bz?-OO%Zpxod&%FmLQjxAvH-
zeTPOKOkudd_^@#))TDY`;0$_T?;ZGTA73p31(NoWP`15N?YBf^HmR2`7kyZ#g!fjH
zI7b~RV<(bU(r9Z;8F^6;EhZ$-mhyB%Xl=vx->|E3<On#y>sO6zov#_#FgBkV2C!*I
zwaeMk!@TG2VEbbQnceKQK#B!N1C+o8W}c{MObA>!Ttt?_nzc%{jLBx($&7~3MY+TR
zGwv@5kKwEnn=-Pv691a1I1dymYe-8@f$zx%G`fvM#$FZ@EStYKPk!?h^E?@@XaAVN
z#3@ZJDO(%t1hZ9wiuuE}4Oz-T+U((>WNov98@<$R?tcnrVlUq;G&RPB%H(0|j`t?>
zyV!7>A~(l{Hb9i5?|cFMN7e<fD`Sr(O0lMlQe~9ni+OW9t$0EU)C{L?NCtV67Lqq2
zufj+L^(N%TtLlp||Hb>HgNhx%Ek1i$!87F`&v!IfoddJI*MqQ4X4QA3L57#Cmi3Gy
z>~l@#c@M*BU=q`C=}uI3SvSs=={fcFv5E#7uVuC7<j6#F`YoS_XvAo}$ceM?3o)+F
zgZ}{hX5wi<*bzMZZoqR0?;~5X!E|eo2sS9CbcGtTm0@k!cZn3ott)ZhLuS#Gv2{^^
zJAa|r=m0Jiu@ZSZ$tWLTSqc2b!20Z9V>Wi&ePjFsbY}SN;f^8-)A8T)Ta~YPNb=xj
z!<&)EkJ136bk_?fJBjE*sme)2coo)aEoA@p5{twrXJmEf#!%e<fYd?yHs+U#_V?+5
z7{Z?=!WVrE;q;xDpG4>ra(p=uwYMfVW^Dg85W}7Eu$5+<IfLfTC*MhuZK1eV*F+rF
z@&PoAmtdoP`|OzOb;hu^7+UUSk@w5mhQs?5KW03LIw?-2D^G`!+g;Rbe(na0Z7sCh
zU@H+$SJIcvivV|<3qDJD`1i&EA8@wihVbgO2#qR-k8;iJ3T_bzBn4Yvhkw+@qwuU3
zY&|Ny0r!4EJg4t~V;;19sPT2#9C?&43qw=o4oln>c^m?rV?z4QLh@PT#BkxVz~!ab
zMcKW)-h84}+8IQr(ULyjcjSrWC$lVwV1KJvBM|=b<3I+w1~!%l+GwYSJH%_*=cm$a
zl+1fD_g-&jhJ_8D0bo_I@Phk$ZpGp^bHZIBk`Gg1YGPeDc}NmE#HNg8#fWjgTrPYa
zin=beSPasrRAQ*5Wvmp8j%rA=!F`@s9Q2fzl+~I*+iz&Wecq9JbM{Y(a4?n}Vir3;
zQ(9WcWf9}-X0z@UZnO~tFv7x^YaG)8=gK$>EANE&2wV1PEdQVZIRNUwlWoxWI<q*O
zE?W#G(fLAX4CyA><6Wi;NjeOn*y_q5bz~>=all3E^?!@JIex#zO$Nrz>?XMF#SKK*
zAbx(G`2=I0$>d$9yjGQC(}|}tcmwAsv^Zoj;z|2`xEHj?k^{I`3$)?9+O(Z8i=Bsm
z%+HD_O2hpIp^GRZW0G<#i879T*De$DB(s(TZPc;ZU%(-!;g2N)f#@@71O_sK$u#e!
z%>UOQEV1C`m{e~$gI+|?ZqM^Fi~}!`amk{)pJYC)!9ncY{7+^^hmg~}txV=sIfZI6
zM>ZmKP4GF`8bTYPEgGd_q_iA=eu=<K1sK%G3^r%VRBHNav~Zc2bHJ_UX90k@JWdyE
zqrUkBAdz$M+RSh*`Ls1Ncx2>2vXKkXtQV|K4qOObKC@tDCPv6&Si$59T*NsFvaoOF
z0Q7*@C>1kBlzI;mh5b(mD<GMzT;XnJTtPIzp4Hp{!IDdvF|qwa4(PGnCle=l&t0|{
zTF*t+S<1oZd(5*#<te`AR{~Bq7SN0X?ch#O3;lX+_E?2za%2+N<{-<0YkBl9_y&~g
zqhUYymt;xYNtr8TAuiks(`!P&$=f>vxl)|@{j;o|ZJei8F);PU-WHsd1^QUl49_8&
z#-+_>50)Z=PdA%+&;l_0x{-ON`5Qn5U75i*g&ig^lSeQYL(Km(mFd&O*jtS}z^l#X
zZ|@f_!DliYZNT<yz*lY->>QvBx|8gklZqO7B4glGJ3*3Q%Qt5YVdw-%oCPD<#h(S8
zdawosu9LP+-+BA#^Z;_!eAzp6x!hWsjr>Pp2NNWhC?r+p?}X8xu^$OxWRYo948Wv8
z(O;l~j=bdvPNVW>DX7YU$Rzui*c_*MtBBi6kZHuNF(Z^%(4QPw>fOlTg!?FgB$QJl
z4m&gzz4L7Z<D$F6*TKvo?N%-gkR5ITpEj9~S#VDg4tAaU2^Y;}^In9)re=Q80{fbk
z-3Y*N^p!hJhN3yY10dL>ctQYl=eTxF1DO=XW}`XGOVH9*9hJ7jI?^vIgb_|B6+DT%
zWJ|Jx@WcHp_%90nyr3l8z`c<5*#)K9fr(Hl4w6djb=ko~QG04Lj1l&k(7gCFp`SW+
zU*7QM#E-U$!ZacKe&lAr`u(IHWI)pXO?as@r+pn&ehL9}wm)f;iR|lxW7I8JXS3zb
zEXW<)+2_i@)n6FbZerixG7-8uG?*OxOYqhBRq5a%Z2x_Ic=_zWoZ-z=BeMgSa0I*`
zJuI~4^@HWhBO3SBHJL+=ByF1b1cOw7sdXZ_DI4Q4JhQtpLah@lU|Y7FHwb(I5UJJ#
z5obuEqEz$;lC^&pd-vIt8OyPC7koGJRC4gIBTr&A0R26&AOU{q>m8vg&O~@O;V}+1
zzeG#IJM>P<P^^4%Juh&k$l#jsA2AF$HCGnQpbBghBE^n<Y<r~}r^{}<?joh*n-k3>
zD0G1L>LY`d=K1nT)8*m7P2wup$R9-+SS<tw@R3k(0aj+~fllCk1WXGhV&6uBQv9Ll
z1}>Ab2|I)MpD2b)V+;PzNP|NkybF<7s~nNR$PJi{N{;XH)_T!n-j+U%38#+y##U4!
ziMD-xgLXN8T88m8&OL=_PxjqIctt;e*&b&|(D|T4%?(|AqO1`v6l7X&E`$O~GX{hr
zJ16KfH8_;17OsEEhA2iuo(!%KUdMUp6|i}yg|=ZFJ{cT>Fa5N!6;xrhu@&5@fB^(P
zl#TPaAc4*ACr$S^$rKri4C7GX?@Kh!W)4@=+1oY>fc>xv?&SnS%E=BE@!gtUa1ZTE
zv3V~i1dYijN*i#=&Sy~C$jxZqsUtUICb&UdY0qjvn?+T_uhQQ5CZ;4Oe*`Oz_U<>4
zc&v05@f^OU;ezeg$kD~I()kP-D-~KsO6x+Ub-}Xgv9cu+TqgB`8}6|(si;(~-n<zb
z0#Gq2^+9)hsk2T~Dp3wx@{h_6pAY-PAGWu*ME(wyt4t6bE2~pz2sWrd6hT;CfYa%*
zdwm};if+WU*N$=g@FLFX&_cZDfTk#WnPMpjhXDtoz^RtH-V){E<@)%VUGqb<l$y~x
zf>#73FKfc4<cdt#V4ceNV2oxq+yq=iE_^VW`IO!L2_u^-HShqfVcsXn06&Bk8Ed25
zEeiGR&onWYRi<oeu~%GF-ZHm@pD71<d*>VJJ7~@1-H7KvuX_vmcz=U`#t$PDwxGWy
z#=`%=a2YQUuE)aPXZSZP_~cml-x+?Z6`lbXc2@pLw_tx!V08Q6h7pI0yRG1948|Es
zEU%&y#lp{Jc!h)~$A@3SaHoXp@!@$4#~umf1HBS^{H^>KBiwxTZV|3ehGACZ<pm!c
zEdN;~0?l$MV*@aCp0ZB>Z4GaIo3de;jQF#0_h3XC7}JXcTw?Y(#z!jw$1=7X?#(&O
z>%W}oJHG|ljy>5w7SlKuK>iKim~7u$Bzs9s{H$4?lst-Oeo0bt-qq@t@6RA?0?)7&
zmRlT)yUTii8F5&-Sq;R01QVCNzxFW@NgJPwqR_sGU&nZcsoC)~G+?4Oer7bjoAIfP
zUvS{vZyBlSKfqSzAFPVZImF9u(|5jw#y}c}HvTH!RGtRYK%M!dG~ZKcG<|$uG|kQb
zAPv{F$XtozebF?-QQS|Dn~P~UM;l)nO|$DCq~RI2$21*j&WNTNWtw;zA{rJ4j3cVP
zcQT$*>l0}76F>s@1a17`XqtUdJnqxp{Z?SwW5dkzi_!S+M&nOkw=T&OiN>#wrg@lY
zq^+zxY0VkGIvW2I#>1V?C*e6m@&q%CpBYVaFq+276EWI&82_lczsUG_+MrWu<IhFo
zUt#?Jzzcf;`IuIWG@N1}&+aq4uOp4yTvf{rOo1~Vql^o02Cx2ha#<;lp@lTw6M(qz
zsd30sqg+7TUl@mrMJ*mrd5jVye7VH^opG}N{B(2<Bt1qc5q!xOlF|Jvt;tp|{xS#>
z?Zs!M-?9te=*3=i)6skJk68+TRMzh-yz|?zen+iehS|>^yg!Zycqi_%X-C?p@0dUp
z5S+~57|B!RB<(nLI7Fs1QtBgVcK#J<_LDcq|BQcBn`IJ4_*Lb*2Qf&h+ri_zR6yS3
zf~M^!?~KFNXytPS<Ktw<ewG{EyZ^>dm)aSI3x(Dz_#JD9w*7pkFBKGC&p7ff^-g@R
z;diW(i}$l1^B%<Rsor+Pxy^aiBC9c$PKONdmaq#EMxNQvl=Ss-ns!@oqB{pZT54o_
z+|1#nvyE)1^07PJ;4^G^^OTQf8_EIWDgHxceB|{?&cKHBC*WaA`I9miNPdBJI1%JD
z)|A;dF9o0M99dSUZJ7?g9ZvY|z^MuZlxUm9Z^u%eo|+eY16S9kKhcyRcQx55xS!y3
zX)eMRKdxWelbUI9lN#eU#8ynZYVL&5=0L$k%V2n+NuCB6tldB_O~EaaqB|-N)R|wy
zQD^8m+gG;GEG3gLHG{JD9?*WWAcFaWGNCM9LiGj{2hJmi=T-+S56|EOZ#be)K^<|O
z#C#rmI_cScR|PF2%djxTBa7WA+&o$puk$p)WJx<AJpn;sazy5vpZX#-luU$HX3VWj
z4j$T_IlMb_6#w%&vSi#ohMx@nd~oE+iNwxe8H^2_sucw%FgD?^b!TX0Rwpik9PPx0
z)y{&-tgR`*r$VJX+W7~t&D3BE77sYFIg^%5ce1R>K$G3Ty6v2ep*-S(P5UJ5m5F!{
zS=BbqIauM)Lg$7`GjL={paXw6^&TkrA{HXOW?VsAIQ6hJbM&jW`ga~Q!eaOlp?2m6
z>zd<YT22nF<~quYLVUINNEF0}E8~eZ=X<~gwvw5kCGI*YVnJ{hyqCY&a~hPAB@48T
z*uT=KdIW6O#*^>p0P}wk?=TNG;_gf|(A6wcE$G6a^(gS`#(}3f3|*0dnM!N|@D;>0
znfGv&dPN$hH_$P20#{%{8sV&W>oo6oS;I@EhK_?}xWA(;C1JNa4ZaWPc>_mD--Gbd
z!dKyJ5v~|R=s7%=G7Vsk5XvfZz_$=SaPJUZb%+)7%;A+OI3xHT(rF`4r{T;N{9D|@
zR!|$IqqYO=K`u$Y^@0<{DGBg?Fn#1e+LD%JtV<QAU<E9AtphI(BUOo)nV=W!Z^4q}
zaAruu54gm!1Ab00*MRao*>{wzwV{K-PM{9gHVyO4%`WgYeV3TmkAfZtyYrgN85XPS
zm=T<hy_99$d2Ul<ptWA^z~vk(aCqxYQ3V^)Z<zvVhe70l6-miAT$7Z1-^%}gAFXO~
z-K+6^*C}D~^mztx$M8II3f*3}zIT9@7(-qKOE#Hdmo<jaE_c#A08ur*4gY`-x~F*G
z5STF=CVgiQqPYBg(mV^t)a06qQS6`kwZPqD!(mQA7;N0x1;uClE$}w;b9jFzaDz5n
z`p#_R$K3X?Tua}C{_~E&t%||1d#D_F*ZBAk@j2R^<o%1l&5pr6ABFn@7-;-+0_X5f
z2wbGxuB*b2p4xto5qrECV31K$ynh$CSEFzl-h?1J?!gdtI#J&o1xzABupi2XN#EI`
z$~5nQLNSi(H>Ivg-l+l?vf+4^8Z}^<+*>~WJVh7FOcS_v8!mk(mjnbB^s6N3UVxH*
ziQWu>y($LF;YVQ2txzS#xgiB-r@iM0T)GXX+V)=Nwa>~c$(toG;WC>h8DdA7P38A<
z00M4F-irlhEDD3W5xWiVEQGSr_Te}Hgk7Ea!p-Q(u!dxa&jO^oOwxTWnr?||yPKhu
z5H2meSn)%iz^#wM2@f6vo`iB>u8wp~=GTahWo$`TEwboVRU&RiJ0Go26GZ&_uy+TN
zaDaH`RiX$f7Fb{(s7l+*qZC*sE5>lQe*rM4^Df4}=8kV+N4>Q7D?uKBvbK3WD<8lY
z<A}ElfXvrK`E}-l5+&nH2lWFUEj4#@Ke%fTmJ>rYdu~mL?K(n@c5iu}W1*BHyN$}9
zR`rmp^)7Cz@b;j9X0s6#@je4SfEO0m=U9cT@F83|d~4&xE^$)j?E@U<*c=7DHxc^{
zw-79&&g{iY&;>)SLlC)(2gdgVYu=lTO6Kk@_p%M*aM{lVPPPsYI$jgS<=Ij$7Rvs?
zW^?E^!oc6g?U3=f{_rkoI$ieF!lzT38Ik~89Qqmc68<{Yl+{*A(ya%fk-#3a1HU2H
zUAsM_VsztJW$o|e9m=%0Nb{B8kOMD}PcyILn=8$0psr137YHv`x1Lfjp_x#(*_;Lx
zSsge9iP8IIIk%LCoh3%Dm+BhM)6f?hE}%DGmZJu|ujIISR2GD>fix?8z{cNgUJOXq
z`dc6gxGGlbFG&DueH&hI-y!}b(p&M1-JSN%K*dAWec;?8EMEPpsgoM1*k0sTvcqQ7
z^cbUpnQ#xH>%Ae=o|{C5fjL`gQ?zbaf>?y@4eXZ5DAjFFMQvbn$MO&>yTbcfB&{=h
zib**3h!Z#t!fV_o%!iN;A>B9-H{snyUOJ3c#z#|RF}sTSZ2`y%PvhFwgn3^H;bGzp
zoUcwr5lD5M6hO-6Ia&ANA`TCzVx=7SN~^YOHoph{tTWg50dlN6wb}eDQ9?V>%l>TX
zU}YFL2;??*7YS4IG|yoRjN0L^sJa9DCajs6f9-<qWnt<PO!a2d0UX%^8j7(MBH=OW
z@#4o5q9)mV%ZIYDq-GwGmkEo#QrU&Zx{=QsDU}_2f~4JYHSy6QPOyrP^{rH%SyOMo
zehM_3=I{l0(<LLf`6Sthl8cRnW%!#|3^%4Svm1~%>Dj_Ez$9^g@zq_g)?|Z-E>ZaX
znC!pcgyhboZOES;7A<_?sM}p<rbz%AdIer8STOcb!S6u&4%!*JAueGlwY4rNwMSu}
zTW|uBf5M!B6k+OrLB|h~6IOW070lXkP}7PL^e%$zJpbE!v>p=3frY}#Wyk}YWO1SE
z7TMpw=pI(jvjYWj4@PoX!MmH^VG%x%ui5nCUs(0+3ah@KiFS#rZ)GnNPe^?s4=9z#
z)MayVwQm;`rS{xoCiPcXqyBNYO8wuk>kn*WO8wD2==-2b14Fq1ghNG=`7DAhvV4SU
zgfCV!c@XcX(Bw@7orWfhmd0o@AGmSD-J*NUBH?E$)#rvB_u!ZuuAC1#K99AZW1-A@
zunC5w`mY7A6|^4PdI91hi@riqUN90PW$UqRZ<CgnEGI3q@h>kO%fzqH^k`I`!i0}y
zmB{?aLh~SMCwuD@^OK=|kG<4f&U}-<2WhR9T@U7q_y&L0nOCv}u<HDnpsY8U|3Suy
zn);P2+kWgWkX3SpI7<sn+YC_<+}#7DIzw_TR%dXx7hj=iJj@#0-GO(yGF3v4XD{!8
z=7+PFjeGXrfUFKCYNeHdzj{Z};21-s-gm(FECerna*VmY3>a-}=Mb{F6Ck^HL&`;h
zHG6h*h`Vph^?<~?9#TI?1*YZ>Y;1+_%wkg4L}D>lps<B*87GbDJ3o(L@4d(jyFyw)
zsC^w+v%~CfFPd;)3*NooMr33$gUvh!dhteibpT#eA0;YQ<oXANJ&@Led?JepXTF0J
zb!G$pMWN~v?xHoIQUrSJ)+F)wvu_Om>&zPpkoOIew<G2WrE?_bK7c30u4{}W5%b-x
zdvIUw8jAW5%8g88U`PlY6k>OVgz}w1X@`(BN>Cce!c12<jjGScVqy_lOa#oGO9Wl;
zX$7voQ(@N%IQz#15WlD%A)CyPwxR(b(lWw71W!Ox*b$y#6_Fgio9B9k7}E-cyDZw{
z-W5gFbHC3K*qnzFB8y3Ka~1%t*YhP*sPB|l!SGVSCM#Tn`;+6^=Qh$%wGT0!+&*J6
z|7P3%OtKf0uEA@a`3TaXePA=mXi|I3$C}KaA}aV1MDsUWfQ@u4jv??`Yi}m8*SSM3
zY(SOqMdrkTw4YK?2j8^>HP#+U3_5H8jk*&!Tdp^AsnQ?}jv|aRI8I&=PQs6I4#YKG
zE*z;hi+}-oV>r9sT&P~LRp6xAZRf^R4`IAX_TG>3;QLMu!{=_}sHYTSYfX-Q{@wL#
z5o?UQ40)hz$ahs(llhX+02^%rDUuESVoJW|LA0@LRf|81BaWjv`9ID>8b`s=-~%vC
z5|o~BLvYJ`!B%d$M+eiq4*<bt^Vn5Dfde8+q3_grpa&IUZ(a*KyayT(H)H$`V9e^o
zmNT2Z4<e=c+*d6D_uFVY921+4i-Lzm$?kqB>NzQDdt6a!=SVmY=h#u!sFX#!Fw5Hb
zv9hj5Su~u+>?kp%;bFSXid^Y7uS0DiKqDI*viC#efsq#)VLUDbANes~uz$_=2s#ar
z-WOPv`N%#v@iE)1x;LFJ#^DXieD_KKK{H|gS0E#@33fq&WH23)e<D{hit}-B1Y7qa
zyjq(_-~d(ahlUEosDsE1OI3Fq$f0wH=p93KtkxC`tosp)sQ|U9uPw%~g8mKp^0?c~
zM?#pElW%3?96;2_Gr3&z+KamF=7E8S(0<M4WdPe}Jd6fL%4LzjL*{z|n<?H9*8sR1
z>efTv9(L`ZM5X<B6F#>8jX?uglU=F@QdX)@|6h1T#_-a4@Si+I!wrapnTKs!(^$mF
zlgolN`^Q|55NFGe&?6)@rpMEPC%qJyGgKKw^#r1JyIw}^u<ftT+;oL-*1mpZ1!k~=
zJFMUymat{NX7mnQ#datVZ!d8#0vOpBu09u{2o9Vf*Zzbfm_@8x6p8$pm?AcKqS^cm
z<I%evBOgW#W7kW&rj(6*I4|(_!Lo?Ppf>ocz@9FoLeq|Hc?375VQ-X>s2Qi5BEL{A
zzOY-{OQecteKc}l*_0%b0HwVr_@<2ye?%?dTzsM1odxblhc8=FgMKg}w9swul@5b;
z68W@@>Mxw(!t3*1A?JY%=-J;y22I{fY35Jk-EBTBS=ubK+w(YC%3j~cZVhaZyr>u>
z4wZJ~T~L;WtEPEQ{e6U>Cg2zLdu$Xs3~y~W!|E=)3tc%OkczDzi3dxQ6T*&AVsI+#
zp$RZ*TD%*z-IF;3X{r=y=K_D4A!p&Sg%;;H1Ajtk^Sd+5+=Z%9D7li%v+l%~Kh3)E
zdM|MdPNB&)DEQ7l0FIA0_KqA#sWX4KfQ^a9!lWk2eD2>sICy8SK+Ktl!A7m%xpGB$
za&Utqd^YMEf~y0VNh=(93HCd14f(+ec*A_6Ecs*WEm$CjX0%qYLjzqp+Pu3A87~BZ
zMcp*gu@RzRtt0Sz#3mu{n35G;YlD!3U?>uTM~p7)0a`(N^V-7qF=n-(=J}yP_-aBq
zP39S3s^A-_O~Ife@P~sda8L9KSi`t?hHGA080V%29iyxt_OpR{f(M!f*Q&2zMKo;7
zVcP#=SB5%z$c1ZN=)jw|hnQuGKfYv(6y;Z8<QVmMXr9~GHEhEmG*-HX1%@uFRIHLs
zqklur@Gx8w;Nf|4IrM6x0?WkC|J;1lm>eLI%#trb{@j28`w<3DQFtbqmm_#DvxH$h
zD0zpL#_hg=dWkrwcHcu0aD;&m5fBMt#PD7KHaGu$6GYY!Iuq_Lq2~v0HbcL{&>eB1
z7c+E(p_>tk>qTsEoe|xP7>)zKgrN-#-4z!)i=oRIdfVhoE@MOvBSs}6Z7(qj)p1>5
ztXSG=FR_u32|I+CNXUD32vLxb<8}y(mylz22#XF4rP-e>Fw}2<g4-ikm{(!a93qiN
zhOl#HdZfS7e4Ok*WvsXol++Y<Se&R!Q)ppYk5|E`@jbo@B8|uSDj2{I2wquqa42mr
z%MA9X?e?fi3V2ElK%v$wY`bqZSAt2|2M-v_FeA-`s)NxB`q(W9ALmXx*v?>zGGD|i
zvBZ@8oXFzryU}{bNXc)1L0EaOfd(%~Du&i<yx4@CGR#NsR$P^4E}e(BgCifoA3OK?
z(~sI-=76gTbML{=72cD~Y6w}uH}DX00v6p7^WXPHA|g=3)ozfg1N<1fyZLlET!|dI
z)6EO>sb0=-5;N@a#F+zVEpm1%HdbFBuRCr@!~6(4Zc;*vIhley;An52gB&>WICw=w
zioyhUC!?zcXDBRT#o(C&oCqQFD-xlKj)FG>KcO}gZy$A!6!jCzD92p$B2sGW9Nh1~
zu;7s=k0y;QON2k7?sVSyXttmVAa|Jp+;#+QkYKKah_u?^PqDQ+k=fX7Dwzi^?$#rV
znYsCX9(bIANCGt`$@G36d^KY;Lq3cIauysem?2nP7@9^fS>OZ~IHi$Ns-m_X3;x%W
zze$>M5#z_EutP)YQuo_LOImOf_6uePH)WWAzlRh*#{j*`vf)1n<&zqbB(enwSVX#F
zwGh@La|gyxTgb)qcdTihC=krI>K0Xw+f<oauqM%Aq*SQ*ZEvgJ^c|lCMtg}{@Lixe
z=HP4-ZopWm*)1py`+<_{qyR;XtZZ{Vf>rjU<mL-9aeQP9so*adsUW|&iX1|CsQiLt
zag`Y{F2FPu|Dt20nHR!%6RV))8!FGD0&=1l*N|LTXWq02f>H=po|Qq8q5k7M9i+${
z{L7QSP71Ba43<yN3@&DCM6QYq^4iSEpac6RBgXV(v+*QLkw~<8<SO$%@I$lt4dDts
zuCoO;Nbg+mcj1h%H%1NA7Cuo>Tf6R<XA09ASyGXDpa}&!mSALa7LGGqCR8erg3xU0
zmX+zzJk0N+{-_XVMA_)z{7nO}&FW}R>N++zQvX;IWi;KQ09McypP^k7l4IQVw&FT?
z@DrUmZY`NSUXvMRkV{nya@>yNk?KU`73C3ep7iHAst2o)ZT;;;IN7}MCWKBAHU=|;
zjls-W!pzxV=6L4YoCt&CnZY%QS$HzT=Z(g<VfpkddLmmhJ<H~1Yo69ZbX%e0--lMm
z+S3&iLNmzN<Y4PVawZdJ4ZqAzYM@UBT@Qg5slgwHWhLl(q|Wq=^5ua@;1ToJe0_Si
z>v8A}hX?R}F#U%Iag*sC6zs13Y7Vp@<a#_*v%jFk5lDAO7MN9+3qPR5X$THgr9pki
zHtJtd%~r>%)iGU%kqJy504ClkA)vE&Hq+roy!*(w-B|W8AIv2xC`Snq-T^@bG6ex-
z9=tX!m?j@?^K9VHpah^3EP-kMuV1t9NZ<KQWa!md$X#p{tU==llCr9!9h=R!QM3qK
z=&~N!3b2SJLqVk7JjuKt_VJOYVU+$Jt=LZm&)r?&z=Zy%XiHYHBso}-5xfcWivy@Y
z9lY<D_o~WtDv$NWIT1|6f)!~Ymx;Mzc=u?td5Mq-p8TXOss&jGNgWA1V0w@<Wdvs?
z^I61A9KCWO|6Pw4R5$`S%<%v=n!Eulg*YJf2HyX1RQB=1LJj}0O0;ab4@Cb7>Q6=Z
zfp|q2?y9mt{DB$tv=0sd)_=T=`SHXe=21r57&Jrtg<FCrkax8Z=0cJxN|?`w$kh*+
zU-HG%<=d($6kSdw0qBGx6d`Oz(8cW+Trluf=7%h%xP<L>8z=|)MrNFerUO==aNpI)
zR?HBRkb|0M-=)l=qwXK?fRr04;=d7N8qdnVH1hPxk)<%AuEzX^{=v+Z$oVNvE9qU=
zwLZ`n@atW^PS1eH*Y45Vy=`4Szuwt5pc`!i>pg}(JI6m;8}Ru1dNz3UHc8TDY}D6z
z0OQg72m0DQo{lcxdZ(7-FVyuaW;K9sL?O?c0$qN?<Ja4K9r}Q$y{jMZ0Y9P(Qw7}V
zbm}?&)cCZX4&c+#1!yCdN0;HzSLgU!Ey#v}jgyM7qXlsbPAkUIlhs<QHb>9TU#`tj
zW#laEP$fE7)URr+tE*pCy=sM~K3sKG{LpSdmGv$l+OHdZdPke#v5GAXboH>Vy0fva
zyrjWZQeBN&p`w0|&uBBcKp|Claa@H?MKsqxCypHP7?XYtUA-RNZ?yIH>wTS)8!^f0
z=}1**`T7hb3HUnlB$M_w-)sYoq4&0Rc(hr$#f2T~=4e&E4Q)ML9eR5o2x)Zn`PzB_
z&_2+odxnUuA3>70R=&~K*4x#t*GR0-<2Q(Ik7t9Y2e52fGzaUXm3s`d2)^382HFEX
zZ3B9TmA1pv@9}kjeKs!D*L!@P0T8T1@r|_ca{Qry8=13)yb239<#cR8Qz}|5*RIx<
zX_skhar8pq8~Z_W0y92O&qd|+<s`wJRL$rMw0m=N{Bxpjx%`?F_svgD*GVXW1}^#d
z^5uJmz>94@Lrc}l`$)DMeSL$v7Y|ywx9vuc&W6{VPR&{Gs#(?K(pINxjc%8_(p6op
zm946&DXA^jHhTP;uTRrcQs?Fu=kQl6tEnw7sbArim)epV7aGC>pM%$$l9euCl%fgu
zB1>P}x*iV;MQ`)1mp8@leFGZ>hdjIUq3KBkMVB&x?qI?gxT0ZQbGcS7U4~hpmhCs{
zp5A`+Q}*Nmj}aK~>74_8y}HxwYACO&*UI_=AS;RVNk~jCbRDxiP00;4<y!Lq`yaYJ
z$^v5<D7kN-4TyAh^?361K`(xkqyXokT@{(#s~YReT&k3sw*G#!lWI#AljCQzTHUV9
z>uDG6>FHW0`BElH&3Zk(>pTM%qZsTu(o>wZjc74xn`Lvgxy#WAy*C=@Qf!4w)@%S1
ztQ+W@zhL1Nixyvbm9`0?vrfa{s>?_NRQcNbdi#6O2R@-AxzN${-oB2m&MqL-8}J)C
z>x6F7*3;($6}r~@ATT>L_eO|{A&XjFJ{`gna<0uVJOjQMR72m59$(kZDD9ufveAdc
zy<I-(cYaTQ8+ss`!f#LxYwl=(U<Fyxrr#9kV;@xzI$%$g4q8=Dk7qr_hFv~T6`&Z7
zn=~CX*2;U`#z1+Xe<8&72B6)c4|W;ez5oa?us+ZW$w)~CKJ3+piZ-S~II*h8+C_$e
z$a4qQAqTy)t*ggRk>%%*0ciq8@*7$mM;O0f@9F9Vp&-`+APUKgiY(U`XzqRtD<FD@
zekse50m<*jFr&nmolt~nN2^xb1|~rvhKzF*3;m#yAw3d3VW15%4h%JaC};k{p;k@F
zMKY`oQOoXvV$qDA&MqGs^YXccMe#7v7`?5N`2_qPvfQjqTP&yzZ3A6Wmawp0k2ds+
z^~g^srz1<L6i8%^!DPX>^4lhji>G1Sm_$aK=<5gC`n`Iap+t$EQk*|G2mQZ)<3QJX
zuc7C*&(RkY6wJ@VSe%EKtMqjn_2z~uy{vDb->Ff0m7$Z@bg9nU*Ute3Lj*ZibFOr`
z>aKS;U@+7+Y9);;2(CG6S2dKBx;1CjirQ86_;y!SyJ{Qo>$<iPFI6SgcASjDniC?a
ztfZ{ch2mN;CYQO~?r4d=fOK+7viv%|v!`vnAXQURR=)~RD6j$2*VTacis}-G;aM1d
zC0u<H0vOgeG}fWozD_7T=pd{F<&#Jw5ri_VYEFVz0AIJ}H!#?1`C5Lb$_;^9ZJ&Mv
z#|kE$&353>A4S#asx246<gBV7sA|7BVT<v%Z@_?f(-tsZ5WooRkwp19?b<3|&qfGQ
zpoK4qpA8Ap(>DliYpN@0s00y3aO#C?^;x+RROp{qI8UDk4W~n^sx2#b)d7retcHw7
zt1v>dEcCY8s%puWrD_d*9Qk}G5daeGcVeg>(kE*I)Id6%+MqU|4N}%?1D>`HCApci
z&mOF$7O0z^%gzk(U8ed>G<Q^7U{o#@BtJr;It>!~1MTeYQPJPiCqsrB=0rVE<@TWe
z0Vz~S6FCAMPuH5;1_T$rgSx%cP%%VcOw=0vZR<T$I`!50b(gl{-%XvHS8kCy%h%xM
z<}G%ALr*}Mh`ZG@TUW2Xymj^5*42frtwl=yFrH%*a@nw{y`!_M*BIQwTuMsYJ3OxS
z-mV*c{WlHx-9|&8X{ZG;R!3F|b^HMd{_rnf_e0O_CDj$DLsqq8%<PC0W@LWKbx38Z
zayLS(FeT(FX~<W~8uiuY*9|YnDaEClM6diGAmci*K&cc^i_{E&2vSQL^g@Pg><j3F
zqC0f->0O=rYy~u1AB48AQ|beIs>~{r=D17-JnN`Gv(rGniymz-%V-v0vyWvEqi?>x
z!85R~&(E<GsoPP8LTL~q8p`hI0~<nJ%-^6FE!XomSnWbx@MC}N1nCGsBZz5I?QQL#
z8m2;h=zl#MPnWDCn#@v~Sl6i9^*<)<j3$*9V~?2E4(9#`C3Z!V#pY-%XP{R}uusCY
zH=0fqTi|Im=0B6zVB#A+9!!5Gsd9eM8)BjZ;^}nM8Duhy5*VOG-Nq>FGrBN}4XSR5
zY2GRsJTTA6#c0Z*l&vUw3mVm<=XXI(Eh@sVo)2N~Q*D=Dg7(YT0Y|mj8e?=n$Nkt4
z*$Zup+73YV{L=UY><jE0pn<=?4Z;O&3<aaDgCQ9B(OdeU3AI5iTQgLZNxNjil&B2>
zd>w5AoKy9RPUELO5G}DofYBu=%a|s{7Q$C5OP7KY<pK5C&^6HKQ<;gXhH0`N-4^pS
zh){yEXQT6Rd_YXTOJ9fnMe<wf1tfw<$H`rNy`<{s@~deEs&CV(*V88Q5fxvpLl)_+
zB8}G%^kJ$ysq$XQLsTQ_lL3lP=^Pqj*g(Wg>9k6hwNSoMB82JCORbq9W?~{r{CPTN
zmOjc2nJrjpe3Hh1?uClMP$0$Tp`t=f&yc4*fWA(`Bi2gOFKJ>3woy9Byq2x{G4Xek
zfTM$B7K765&JaJxcj|h1AGm`p*ntUN><<H^;YCveqF$y_etkZ3iP;D8^aXk!N*x&N
zqQ-|m@GmKZ#==CC3;`umsl5Y%9*<QCzXe07IsmacaHH;rJog!v_{n!G0IMmZ13)eW
z0BGfhc|~=xIU?=z^ga+_psNG5$gk6oR?jyi2bl=x0bxpJT_#Fk=-z(xXiHaDR7NFF
zp>u<zx0(Wd4B81A3Oc%2J1D^dl>2DYs0}Huf&odbunk}e6*EUzs7M#2ok;_vp5G+!
zu~xO)R1J&@W=LQxMM`>$niWVtj_Xtkx<#NZM!j?<rV&tWs0^zfkMg6PCkIr6I+CYr
zi<}GQYfTnEF{G{<x<)GO2A<BgK#u{{I8Kc$)KX}|O4aImJZ)%cDo4VCBI)_n>zOy;
zkw~X8MEeb_YhckHGzKOzRumb}<9DV)dzRTN>=5qes)n-4l6q~8Hcx|!>~__;8|wL1
zTECKSPM5o^q|SAHT|HFR7A>Y|+ln_L%Bog1LKU}+TTa{JRlBOHw!(!h;&t+<wZrLd
zE~$eqywWX(4NH+%%DS?L=$ia06<Z=yxV)-R38;Z~?$#7QV+FB{&JyD04)%;;W873A
zIw`1kx$9hI4P_;6&JR|)Xupsq;zyIK-d(k-78~8mH5wy?c=G|*Qe9Q+g8sV#$}q@K
zr!APja1s8IIBSkkT~$-n098D0)=~axXv|e*wU{zg)vl;U{?*j0sYU}ztF}xK{*Ars
z`g(L~(Mn|a1N~I(p{6S;K|PfED}k=0iZyHOAj`qXv<iN5oc7$M_eP*!M~xkNw#}0m
zfQO7pS~N#wrOMsFN$KfrE21Y?dpaR^qu_BGv{IPc`#PvW+x8h0$=)yKUOl(UvR34Q
z(_xDXaG;|F)w0OQ>~#Q|^#)G|I9AGAhCkg6O;%>BF&QJ~oSp#q+On#}*-|Jftbqs9
zRE|O&mYEUL=4sLSLvPm*1fy>~fH^+Ik5{TgYZWw!>H#0rA_#d{A6sW@UB3370IZ@;
z%!H~N%Uy+<YY0k%m==}XKtB`=FrA0(Mdp8)`9LCi24ZFkOePv@SJtj-uGQ->-eOh{
z(E%yS$rh<Zs(}=+Cv+eV0!6w#W<gcHehk+#Q86&jf*A<vDUgChfRvcbpi<k9Biz;L
zxe54JxUSW@I(_QB79XCTu1<96YRob{Js5HDioQXmn!&JA!pLZoLTo)K7wrI>l7=Lb
zUsVM&A}k&RN)D2v<Qp9r#Mofj_;pTe@#s>XXb>{vwP%a0W(V{}+B}Miw3$T;v1ndQ
zZrc%<4d|~5vsM#SHDahU^VL-qt;nXneidX@oWy`UR{TiTil1kSF(TRsHq%|Ims8zG
z^GNTrdZlfS@fT{TmlpjKe_AXbOQk7HMcC!)PiL3bRgbpAE{}_@fCz8UA!O_IatQ2N
zSNUY%xZGpIshDqA*EOobq=nU!oURsEStCp@ljJjGsWQko>nc~(emYKyE1@1I<i!?@
zR+=;h*h?EU<Je=wr)x@AMQt`(bP%xzmFlX}`jUDSWgB{;;|}n~xGL)~g@sz7wxW7f
zDXl*_{<2lzy9S8vl4`e3$s(gDfs1sc(o*zGbvqk`%`Loq=G8K*S4$N%UjT10X4hgE
zMW>I~FT_G8Yaf(H`qf1!qBUxS1%DRiubsJBtHEgA1-q_pWd+RusyNhaC~UUD_LPan
zsis}5I-g?F&B+n5lBf4tHZue$Zuwu@>R?svQ4?LLd9bI8WJOQL3|cL%(eB;@b7{0!
zSxm{E6|D&;Jc5v2+l}a?V!yOSuP7vHvJb+$WZ^(f2Sit~rw^9a43OgdoVlQ3Y!M-5
z*K%@1{&Yhn22ZVu3ju5yC2nuvh!r#Tz(Qk-X6de67?YxC%>_#<sZF&f`T?0LGTrXp
zd6ToV1gMG~#FR;y^sX0y?ZgNhFF<N6%QlN80Wc+3c5}PoT|>}xCy~+Oh`80iD3L)*
ztaZX12#m1QBqU_Zs7WR@T))<!NGz?W76)MPfLT4tgRxabCglhMmR9C)BYw?MVg+fd
zNtmTJyKuI?!LQFQ#4jjer-UKhYJX*WL-WN~{f4zO)mlnUey_)9i%yNKx<-e%c%B2=
zoq8WkIeud!`VQ0OD@<T`^*eKb3UG)Ll+=xb5go(sUU|Sb4iuJfEE&Mo__2=3Owf_-
z#(|<}3x}B0v9(@XEd7(ZZdA(^`B;l4S>MyQ4z`78>yk(8lC8{b(HoP-BHb<R&lZSw
z))r>!M=6N5aJ8j%wDDtWj?o%g6;bkB2|X+l(7M~8xs_~=6X8+~HDbD2>Q>b^Xs#Bh
zxl*i^le}9ssj3ketH051Ol?W}UEFvZGmBe;kF|d17Ns86^3yC3M;C_4fv1dUAg)@F
zh+4cMB`r(0C=5u_rsquJN=+@4Xix$*C_|ohZ=VLf@W67X$pW9|3-t78zOEikgPhT3
z%I8dg_6=x$h$7AJ^#FkDUQkjre_$PCXTaBWlLoVRbTM2>D^-@5XK2m#oT@3a&!tk+
zfg;FdUc9EBqPP!6ReC*TZhlU&=4SD_2ezYr4=~mS=V}Iw>RjtA)a_M!dzBM4gAS(+
z%(dd7<iM7I2>}<WAokT-sI>%2eOspVIA|a?Ay?h1vPx~{vbKSC?{aJ&fb!52z%;U0
zvlrYi$C5i+)mj_Dx)T-@sKKD==gbTE2j=zkwYT-mLrL>QX__Z<=0LywD-zXOjleX!
zP**e8*a`}Q?3oN;v9O>l($PT3b>TgX1F}$5C<+v(cayYZVzy*K!N(?U497&hx{r&k
zmdPBA!Py9eoJ>l}z#3H0W9B&3Y}Rg-=vD*7!xl*cuo`J8Z3u}0#sfn*SC(ZFg#L^E
zH-9tx)!uBTN%-F+JOy^!XK*<k9v_}gJZteZ;i<*r!c&OHi6;log?MJ*NyC$b=j8UJ
z<Uiqg8_#QaPRaTcKeMn=*p7S!?+5UF8_#AuU3hZwFusnPIphAYMT*C8v{QdazaE2I
zzT1&pi)Sq!AD*pvZpU*so(J(ff#(H0Z{YbOo{#XHb-N?^VmwYf%kk9WS&PSqXDgoD
z@!XB)K|D|3c>&KGc>ajzBRpq)4(ahY@hrzvi)Sq!AD*pvZpU*so(J(ff#(H0Z{YbO
zo{#XHHH!3joOqVwsl~Gvj}OmQJh$Vy8_$Dyp1|`0o;UFP5f9s*PZ}N_b%ApcE!&%v
zjGf<_IqXP=O9-uFmm_&9e#=K3$>g&yCTbd-UeG<6HUkg;a41W=1N26eb`%-XYvpu2
z=iw<1Ig<H4ajPTwZ2VT@;niD{8fQgW8LaOsY8&V13!PUv7dmnH>SJLG{uSo@7Y)c8
zHt&#k=Pz*12UY$R_AeTIA|Gf@7)G(EhF@bq{d(;;Spn(SoZdFSS94<bAVAfxfsG`v
zf;-pw{pzK^$IzTzzApSLuVMyuV$Rxy_&zLRv>~DV+m4-1NYtTz)<fxI&TZJ!sHyC%
z^*YT-^Ez7YpZmKIVB~qq*_R=oU&b$Gsr|<|{#}ZPvYT*}<0gLB;Dd6Sf0XZh=HQ_$
zCmiK_IRJDdWE}J2FXcS@7t<1s<3R^HAjbjw&n~wB0rb_#D9ZZ@3>cMoXWHp_m>>IY
zDIOb+<3ll!;J86J#@lc!@y@(C{&0NKF+efi{v#a!uEk@+<pM4ja4#`4>yL1Jn()|g
z6Bz#{P`O#JT0j;Izj%DkhU0jcZJxf|bru}!I}32L0C(l3_^|$%2miY9@SP~F!PTv6
z;O8{gjzpMUkN!9~?v>twt0zuZ-@!Pz+W>dlC%|ougX8#o2jF-<)c&*SGJ*ionD|j2
z8l9G)?ZUf_7k`PzZPqX0vT%GW>#PLrz^CwG{n@yF9^Y}*(+D@8M6&+uxUb?H&Z*>&
Z@s$~;ha>N>O#5#LPDl6HANaNN`@g`nu(<#L
literal 0
HcmV?d00001
diff --git a/board/MAI/bios_emulator/scitech/bin-linux/libc/nasm b/board/MAI/bios_emulator/scitech/bin-linux/libc/nasm
new file mode 100644
index 0000000000000000000000000000000000000000..e312a0b2394252ac0e86a67af467f76a7d4522a7
GIT binary patch
literal 168228
zcmeFa4R}=5xi7vanMsB)FcSzNXn-I=K|Ul3N`PR#2B?4yge10#_yM?0Q4#hAt0WBW
zOv%pf==4-uy{Dd<Vq5yJ_mrOFNBqL@A%kAqMx>S&s!=)Zo^E;?HHHvV=Kg+b?@1<z
zZSTF$bDsb6+?zam*4Mk<^{#il>s@QTYwfjn1eY&%xm;56FHK697<$HVd*{GC8A%gK
zbEE>vBTbdYNI6mlVwg531Q<L|!q3Np$Bic)&oMqo<1-q5K1?I-fzpsB;fZy+BtFb9
z1?==A2p`#$;pH>qCzAAZrzFZ{Iw@MGr%CI^WqSEU5#~d>SjH6_@4W4bjq7G^yz_4L
zzFAxDnN=i7QxHE7&qa80@C?VpzbxC4vf&QU1%Do%iFiig;omGglZDUznG1*IU51Ca
zXXEkVDZqo`#NSl>UV>*lo|$+?;F*TUi)S1j*5e91$-k@NnUoB`9qIUorNq&jkLMaZ
z<a6qu;GYu#Hc1okT$}=Md5WLjE1fXgGWj>w@%Z6pCL`g_Nbz6l_;Ve1I$ZLdZCvQY
zT?KcH<3Haa@7ZpQ&z3$)usvSR8w``q89HPGf1^MJdArb+;e@j!@`-Z6GPA+;Qn=kM
zw!E^vR^qwgqD=2<xY_t$1J{jo(#`f*kLMWhFNI6^ui@!N_yq_6!&~q?g78AP4BwCE
z8HXO`--+ib^ba@!-#6f%O2PjS!j*t0|C#?$JUK}J*a?3RZZGO@)1NK<2;pZyZ!-KG
z!cV7!4<mdG`IGp5fp8_lufZk$U*l;)7>=Ol1l(s*!XGd_g?<xZ1@zzU)b}q4&jCF7
zLwslOtOop4xUBCvJW>ijvyiV6`M-&1!ut_cQpy{Ha8n9@E@nFLZA1kLKNI0~2;br4
zpM&sIDf#CkJSQc88PikfU(Eaty`*mi!jB;QB?sSXhEwvdL3niv{`CkKBAs%;{9j`j
z>9;uHdl5e5lt+5+V>l&$1Hwu9D}elk5zYZV_Itv&AiNIYr=9S(5IzNbi=FTj2(L!^
zA}72D;l1E*8p4#<=MZ+M<ll#IQvTUrUPHJ$rT@HnUidh|%F4n1BtakEMLjrIT3h**
z>&sSrsX|)2WcioN%a*VG^5VtS!PRS5mz6IMu9eo_dH0=)v~~j=Y3<tecW=FO^F4P<
zw<_!JLo~45?qK=Sm)CAl)~(;Xd9Acz)8;$xRyIht-geJsMcSfl-h8{fS-NZeUAJ%g
zx^&mA8#mr_yR>2R`t{Nl2M{1kqH`<CT6??l^-b&7-ZtP<?%8<Hw)LA+!s@0?2s6W7
zo9Nul{2T7swEk{s!|faI*|J{RaL0OOi-17c0s@dud24NA?@^VtlBfr$xpf`rR*_{b
z>aiImqT<T>&3E6rQ358^TiT$k-?&lQux<05%6dtFZrO7Ct#@x=&9<ypq^-$%1DRb%
z0HLN^*02AXw0Zqq_iSA+DR<trUP>}?<GMSylC&+G?nbHPrNivCKnG%O--c+oYj3~j
zZe{a58%1pdFbKL2j9S0$R^?W}+_q&4h`trfMgy&b$Ov8H;Q$61@?dbF?(;x-Q-^q<
zlqp-DD{UR)fq))?uFZskf0Hf-hz`1wpkwG3NYZh-7ywVwg|hCXTL>AZi$Tt$J6)1a
z)5YM_MHfoCn=S^_Ub@gm{d74HK~^)N)ZKJ30DI|TaPZNEk_phAf<8nSN-mEs2A6!g
zP)Y@K(NPQOVt|@T7X#7^x)?lW)5Typhi(SOdAb;Y7ShGQT}l@NZzWv};!EjbP+m?K
zowkZD2IAFpF)-gi7lZ#zbTPo+LKlO#`NwT8>3}39=C-3|i7AKhi`q$vDdeb3Z@e>s
zzbWLb%(Qri2$RDyIT3FcVRBmL6eGS@gvoKafZ-=an4Fiv87UqWVYYzGVK5#NVYY<K
z=}df+2(v}xQig94VYZCCl;J87W(&zx43~;9TS~rx;n^b07L#vbxIl#2axyCv4~Q^Z
zP~OC_B*JV-`96lb&LLt7TT~7)+$q9rS-F|v4iRPx%Tb2gMVKuuKgRH05oU|aPcr<Z
z2(#toJq$-hm=YlGWjG|llmxkr;Y}h;iICeFzD0y78S)W^t3;R*B6l!cD#DZ$`8dO~
zMVJyJcQRZc!jv4@WH=zglpwi_VM&B3Npdg4U4Lc$DN!=#kMT|srew)phC4)<5+(;2
zZWm!nnw-b*UJ<6m$ps8QDZ-RIc`CzE5vBynvl$K{{1yE}y;D2YtH0qoivJF+-CgwO
znwlE@KdP!%wvp{G;gNn3GAawbyE#(%pZ8D+RGGJeTJ4bAj026#F~$4~D#VzHh%x6Q
zTa`HjKsQFVN^K|*SgbSfSHIK-nb1o3D=8zQMtY({JLuLHNNV?u2lbwV(P$I|>^#j`
zOl`HHdW|){nCJB6b{C0xOvfib`9rtYoB}mvwoj6z-5r-^dh5OBLiEes$Kj88I`O*>
z#l$?P;A2h9KcF|7KY{9~t~E2D*|b9etwi8fF49T_YJb!3F@Bo204V-8e4x4YO;p_|
z^@iJ(VO8e2Iv4V}<)=S!dlPe+WDeiVDAY<6<Zt>ZDjX_lo4_hwDaXMcnE~@g@Md=h
zasW8ou1*rMvW4{eQRY|kNRQ7N9*ubjLxSt^FAq;c5$%{vw6aEW6Z_Qmga?8S4%DZ~
zZD<ig0vit%2)}Fs%>3DBiA2oP=F~jqc^N*o1B#A3EA=N5dXF(iM2;blz-^Se6CL`&
z@Ckp@Q!L#hk3iYgW;MV;8c43Gjf8uFxhfLwrz4LR0JjN%9IZE9y~+>(#-mK1c0d={
zce5ZlfrUn`O<guJ9QOQ?Z3)D!tS`8GQB}2h4S1B8%ZU0c^9_MFU}Z(C%|*ZmzE_+7
z9ZdsIyaa$zhi-48!$IP2`V&a6GAD|xZmmS{(%*E9b+_Bv-xNbYFhBk*e4>2?H|+)y
z3@t58bjXuYJG<$gMCne`<$w=4Lz?dU7-Uclv*L~<GSNQUyWMsp+4V6>eLzX%=65{I
zkmJy!<~b5JHPK-jz>$>6$#&W6`b5nkQI}AnM#yx{>+M)aY!#3B-!Y`2Byie%5u;yX
zF1vyG?ScV(YDQ7Jm8tiL{uudT7pipQ&95J1f74F8>+IfE<BJ9R!4xUnqhz#XG_|YV
zqW1XhXu9aanf~w`cv=>_+~4=_Yu9>n{k!~#NEC+MQMY%`Ke@fWZ`;o%gdangF5~jQ
zHRxwJ8K3kg!yA$37AH><R~zDDp5qV+3UK@wdSx`!m?kM1k(<-33DNLTHQ?X3*i|K8
ziuQ`{Vmc~8VEt_nyYL>>S1ni>|2ESWZcwLIn=fvIreODlEQQ<s;RYmC%S(Zw{z~%~
zm=46hhM0w$kk@=}l}n1>B=W9f__}I@my7V73~yliLJ{8R4_^fj%0nZ?Co@i#fwYaY
zDXoOHkQ7fF=U7$d8@*7U|Mo?xPc!wMFG_ugss8jYz`O~mR0xZ{2;j@izVC}ti;((~
ztu6x5w$bhkZ|J3y4(Wb`suFXa=t3AyCmcB!aTlzid4_c4RA`^2H$E@V{vxpb0_=h)
z935M|mFmzuPO|R=8u{)o!leQiApaGRdXKIAh1_tt4Bbj4D%}e?`6k0Hi_;cPS4J$H
zsSJ~M1EaN0?-3P`G^RV1t20lC{!I;)Au93*)MiIEL~y46k@jYdjIqk}9vi{rs4a^x
z0$Y8NsbQjQ6-Lo{(c+Tgmyg-;Ut_#4T5Br=S5G2g1p6cFyKcOB?duo^?LJvs{ci=v
z8gEN_Q@c_E8jG6`R9JKL--Z@QN_KSKXvJFrui9g|52s5N2>0q;`Y&s%^qPM2QlS97
zMomBHPAlpm;A`mA-g>Fl9EQZm`fhfAQ5HLYgYU3MXc#ygy5Nvx`3wj)L!SyAgpShm
zZ{S;%xd0Py{UF8$XyIye97525@$ZnQTFh-^hUS&3_sFzSnU5f^epv1Y9wW1~%3O`g
z>IXTX^r)ld1kq;$q&{KxF{LMbLYY=AveueYMY$Mylo7S&AMH7Y^?}}l@c^*sy0zvM
z%1+D;e^I;E;B_^o8%x|(iEGS4D7eVNUDJXbZxbuL{_t%e)@cdVCy(%m7J5H`QJ%a2
z<L$XeH|8GTNX&BxvO?LhM~Gu+=XzJYWR&J5I(8pH+66~sR|1n3dpw5E9`7b~UwAZ*
zdD<zC_ydWpM5*;Al-w#uk6(>d1QPU^H4O6*qvRL>>JoDa2MK@rPEI>~QDd$c$LF3m
zj)!wle>T`tnCT=$LB_L;3oV-B4}TYBIs<&Ixf$fKJ=&E_c?!5<T^V^|HXy4b;i+&i
z+RvaPM*D=oVcsLMaL8B2%B#sq$^0%BgCIBlHL#iVip<8d%scI{F6bMa2~^vh$pju}
zCJ?{E&KC)@<*J;5Zo`U+(&FW`<TbQRq#~j9di=W@;K#@l`i|SH_dJH*<9N*P!hZLd
z+v|PY?Y-f@xxIremzc}eOgu~6q6JZ5Fk8*GqvTzvLwq%GMn%)cufqxub0k4aXkMY3
zS*i=a5g~?GDHbi`{QKT+?Zu?Jr?SfBR&zq1tyTP?&t@rE&BxvQ7rM5l6(vH&lCsK}
zODO%>0J26~vO|6Il|}x22MiIh!N_0S6LYJVhWgejlR|y7l>Funkv*p;=2iU&{2sV6
zLw$|t$cZvwR9^}w)Zy|T(tI_?=1}o`b@*YI6#0tF@__e6C+upObvLn1#0YmEW*uUh
zQ|+W(e6tf_>sZP*|IJ@v^aJ}@PxJdC|BUzoWCmWOXVpti+5;a^Yyw(uK=Ek31?q$$
zscY=i-Rw5;em0iCD8EjkEewqR|K@EM$^0Ff`2xHh!o^<;4*BBaC_9FzqutQ9jEwZ}
zdn-jot`D7Et9&VRc9v4vd_*+z!lHyV55lm)@Rjwvc40Ai?ek)g2veAB32Mo0I;vm}
zbif#4OJkX<KzSM>;*+y8P>s>324q=CTWFEwZ+ZgK3tEZ6zb|)yyaL64I73=&lMg`k
zq!A$uW!OhPD8q&HeM)ijI^vdAbRrTi02D-qz-BWPD*CJT3L}wGzLGRNj3O~ca?xUo
zTXmJW0fS&t&@yghuDtkBNCx26B9C=5#%n4&=!Jy&3n)WdWOf(am*I_th0OseSR;w0
z5X3hkBC8P7{tT4C2kTrycjRM8DXTWWeTmZ-Fn`|#{PiyL6zoh?S)ANen>SD9oDc<8
zo0ri`eaqBEf~J^<VX-`)iHNAsE%h#2tc@qAS}UrJ(gH5UpiBMXOd^%{+a=vEO7g`&
z7HuIHas@ZAjEjV6P;pcq$ofdgRG!w*FDb#|CvHJvV@c8LdXKh!T2xXlwI}y_#7BOg
zM0eE>v~ncT)AX-$Bs4^dwtseooq0!0d*uco!3_Rgw1Xjv!#c(%|DJ8bb-vycnm0=g
zgzj_AQnNz$rIq@_^FXTh3JZ6sm-mF%!&9J4(i)l*>cuGyX={yy+LTa3)(xOhWJyzR
zH^S?XWeSbsCHzrWY7L=;x=dgQ_5>d-P_ES)_9oO~t)VTUUUdPS<fb3;<FoctaMM
z{u|g}1@Z4868cC!V{<nj_CvN*7}44*gp`!oL-9d8>XJjO>S<*&Cy~BbCy)yGWK+zg
z-f{+8^RIKTtrx>Yb^t+^E=FT(tlm?X9Ih=GPto+k7U7^VFa8?i+|FS35zL?nC9(L!
zqcBU2PsR`GGPssaE&ylRD@SwHpE2tdCWISKQ{`eIA&eDR^*xV@LtxqgVb50}bIG;e
zXb1*MOD-I9ME%6Vq?J|#$|?GySSI$vzPtM*SaSY=nL6EZW+gYFf1AtjBPx2qIZ)cb
z9BAsm9B8~n5;;i$h0>r!;_u9XuC%qu7tDe7+#=>c5g{DT`1<$eL!927Hy={B4a|i$
zfK1VU)#nE$L3!wAm;~k15tE==^Bw^vOdby#VFDP>GW`oDIunp#(Bu)XgNUNdht74j
zg0g|R&UmzBa<21h^hC^cHh!OTohJOY<2i+A;ggu>;Mt4k{HAjh6KAW=TxW!wm5J{D
zb6`W+_B`kNm_A@^5VIQSd4JQtqjjk3?U}yN_aDXo1(8EW_Z{)SHTK_Xr`ltG2}*Fr
z{^=;bKHa=q*gt&n$wSLl7Kkxskv+y(GeP43UCP90i)-P0Ws-kiN6L7WjzLI(e?W@E
z96T5!Sh2D`ovJCxh8(gXC;l^la9ubsuBZ_Gzd5d?eQsQ7xp{D0nOkix$QS(#`qV2g
zM-8oN*sDfiXTTXtP9S|?EV)9IFK;2-bY~1nb7*{&V@Ua`)G>s+`|@Kp+pd9lP|2OP
z+wZ(F#2$TZMN^+<{%b9P^IF-dF|n^Tq++oKP?tNlk*G+5%`f6E-QVf9X9Kay*;T-v
z)FA(X8NCi89+5zkgpVp?#5hx&rtG(}&_0f_NDNfD&REenLThN3l+2y$A4w#3B$9)T
zGE(TDDzkf~sK&sE#L>qF!U*IKKaC(qA%FM>!iSNl=`r|{BT->;B>JK;sLEOyO^!j;
zpBsb9#2B<dj6QS4=yS!;ae^YFes0|Pt{}R=%EsKp8FTiaY0w<DMRssr<Fvz&@#FWG
zar|)RN8B*R5SAPS)Zxxhk_Ubcj3wU}BZWPdID^MCqSp)z9?IzCxZ@YFTqb6mzea4n
zQRv6G32Wit_|n=e)PLlM668%Rd<SiSHMF>g=HKWKKLbI4B_V34{h>u`lwpf?dL;EP
zA_AJ?+W;_D^e2M-c8oI3DB=8*{Z{R7$ym5R84EjMPvsI<fxn5{<w+Eshp`zS+3W(w
zmNXbQ@)s5;c?;Jl<3jU?DgJU1=S7@*;TrXHX#N^C^KhD^kG6{7l>7IkrOtDQGoq)m
z%vGR%s*eV+0v%b-Onra`eVo0H1x@~aE@KQ2NEq%1n_WU{oQBcm)#uQ=Uf`glAMW2H
zeexqEm$CcKi&cHXZW{kF0ec8>m=IW7C-bRUZIB2_%t4s`3#OyZQqrOCBugfLkbd;@
z`O(28YpIj|+s~&Hn>E$u@2j0m$M7%NRQuX6q$FS~hn3gUhSe*q8n!tJ@Mzy^Sdw}U
z`qliNSV9@AAD<#6Bx!%IH`FF9d;Tyc%Tm*ch7nqcuzUE!uyRU02LsBb7c%Y1aTISh
z|A&~5SXZEogjnH=Wxd>m#0%vzfAgUjH}vCLr(Yd^ArQG2d94D>Be9(@>4FexUKBmT
zE;<qnRAHfWAvm+|lo-n|l!o1fjUp91DNwTPjV07q5|nAZE+x=dtM#TSV`$>2w65cr
z!L1^~SPPR|7Ne`oXHg@2a`w^(f*FI8Gwf7wayA(Sfj{O?k<PYT)BpNGyG<@cnViMi
zU4cBdJxXXN^T)SxIKh<k^@C_jnCsSfjbOk~^LBTGD0wpSRGWP$V0Rb7P)it%{MGUl
z#Mh5%B@DK9=JvvktnVGL``LDXDsc`o{4qZu4-V^}K;4TrB|821v@Ud{Y5Vmf*rIvl
zeOT!ZaE^3TSvI>}f3N=qO5Vr+svkMi5xFTnQT)l)jL-v#EM=Ph-n26ib*;UpIM(>@
zJMD53YJaUMy3yfC{xu-gdYm@=iN&9&7uTA<MEQ{5tMs0hip0V!sDKfwcNy%P#h+~Z
zvs{V#)SCZ<dLDMqmReb#T24{1wW4<omG{J4l5XY#R`ARSdUy9DCdvD1%uLPRPTLmg
z4xdm*%8PAo5eoQ@i-r>R(P{%~F~|y!tXgH>4hE3y;d)P%`5Z8SSKK!H0t{#`l#MYs
zqsqKbP-EL%*@ow{4{Kslgr$ZX%lGV|6rs%OI`h}>0ic(y2!o|93#u=I?GJN$N@YHu
zwHEcQHops)!|n+X^He#2JgpFVAFA>aV=hm8=snPv{(Ym3obMFpd_&DFtDxP<;!hTB
z$sRP)C9ri5GsY0yzb_qXwb<RV-7EB@l@S&C$SDPM(#DKJRG+aX5I)g(8P)P-MoCIp
zxkk=+i*t6VzOu#30O4U-f8dV?!;Zoxf{E9{3~->#j4vqDw&vP>Ogrsk(QCZ1U@v3~
zs@E5z3lFH4j4`&!q#Py_U$g@C=&6JsW666h!>tV9SkmGju;I9?yy{;<XA6}-g%-?K
z$F)?uLVfoso>1Qns_zA?R3z<SnpKCj^nyZlxQM6_`n;ts5$an?K-r1^vNapHLwze5
zd9Ru!MxZZS7b9<9Ipc0a96F@*W$xL%0PBHN{MnZE`jP#;E<M=&BEliPqv+@vwObGN
z3;VvmiB{cc@n?SRA$VFwhx)E)yb9*S!wWOEP7n3n(ufKl(As}u4G;B|HlkJtyk2~y
z!Eap*T12p;_{jE=f<;txVE66OVzqx;CYUF*;~V~;z0;E39PD0rOJf!W_lOesi8U@7
zYUnOyIM|Jd*DaJId>!1M@Q3T69<+vDNy*`Aa5Z|F9Kul8>U1=8Tyt>WgN+3tX$Tax
z$2huT2=}@^Dmqcz)i5FY6ND2=Ml4ehb721m-Y@x|bGbSyia*)@VbY3kw|mSZO}E#Y
zwjOO|FjAGKkD<qo6LNvlYW>e0tTJzWH<75_|C!hS+=*)QdITKdwebywy@Ig%ag3i+
zFpOeDWI{3`;6#iN*sQ#2Gkp-1(+@=bXo(BAu!1#S{gcpq+Sppsn$ycG;8#BtDsQV#
z?^zaFFiXjS`s-;)UkKYW=1Uo3->0vx+N}G%&_&Sp3q#jpf2mFmQHceN6*-BwET8<!
zV5s#R{CY-f+Auha-7TIBc$yb`tzocXRGSSaSmD8a5K&+Bxf!yz6yw4hm_cF}M}i;g
zp~cv}{N70{=sC}jVvF5u4{LT*_R=`;FAgmH4(ukt>JtFRgV&ZPx_^T^YnghMI$MlJ
z;7h$^egkqcpwqk>=9<H6%~ya-%y}X=dvRU_dK9NHj#Huzxp8zPQqeoDYkzNANdgkp
z_}(Bs?X=f!vK2m~TAVP++W&#C_^lmT)`;l-53-8iYNQUkB8tN&jZ-3OZ(@skWv#gw
zlo~a?81D2A<0cJ5sSnn}cL22GU8B;#@QF!PatzT<=LvE3V)rbZXt-X^1WW7FjWI&9
zk8+ThFUsm`D6?6kodqKf%47prQ|(=4)`0KE$TEGnalL#0`&s%jx4y-zzYD{<QR^lT
zUM1Om+h5hyZUh^bL{{|bD@?s7vDICdP)+j@B4FHU61}3!s5u?E={qEx$7)6zx!0{S
zXPiT^>EM`gmC?`zG&}YiD+2oReHhldBkNC!?l&Oks(0r(sQ~QEmM>+6Mms$f^{Fp3
z+hMNK55_9;MAKKm$b=cg7GE24Jbvb!aHn<X6@e=AQG!+!#5nJj^c&p+qmDCfd9fim
z&X|zcT425d&|0&D8Blj5sDB)6OS>T}+{UKB^i4T>S8;`}aRo@3OYj3mg<B8c#|Rjk
z^3svMIZuT2YPV4l(94<TsC;-z1;L3e0rL!Y4(;4k1<X*DV=OIjy_H_=)2njyBTn%{
z&qp+%XZiFM{o#cFp`W5s;F+;lWW6CU?d{^v8q@U8Fm}xoE8=lj$-6o*(de%-?><h6
z^|{vcTcfdm$w>>+s?6Hoig+M#-H<cwy>Ozj4i&q}CT%e*2J``AX<qu$9R0dH5z=ej
z#$r*i#mS1n<5X;Gz??9UyQ%=ZjDHoqMej*YkHC8jeR`=kRtm#}BsqJ)9Gq8rF%iow
zY8Uctl;=z@%P%hTH3p0{y^J%M|A>`|EC4jh@{Lsmt^?_1KD{ho?@0Drdx$3@%p?Hw
z)dJT+V^t200_7TI*cb&O2Z?^%N-Ju2xNOUwa}K2e(**K4+|zhH)>=zgbkL~FH^8B{
zi$4L6KLL-&+uW^MiRLi<zp>f4qTlsf*V_DP?;`Ig<V1l>ys;&MYU|l(3J;(k?0JFF
zki)*PqTi@sLBp{-m|l@z9P~8~t2Tdyj>B$K?X^a-t<!V?v;=Zfo|j&p1F(ia8Cy6z
zoW3|OoKR*)jhl0(9keAOeQ`lGRww=DrgsE+)80e-8&~seO;I~0c*i2^PY<rY{}Fnw
z{XeEhNMq-({{ec$nINn)8gRrVhI3iqLqzS5)>fO@f(mkL6jV@uJtm*CL<0n@_fvVC
z7?F>y8e<H9TXXP}m=iTmW6L*r#-W5MQsYSTS5)YBXvfDwmK?>p#uupo`en$Z$Es^F
z{{`uX-3z4FJY<EIEcOt`_6Z*D%<N|5{?0U*Mp&F#ifp^-OQAtu7)^*goJ9|gcRNq#
z0|84N!~Lc6tPE529{thN)S~Y!*5?wy1~bBp^zSQm*(QkJ86%k3lHGJv9fg^NJwW0J
z)i%s!IHx{fjJGG871%K@4Pnc70k?dwcD8(Hh58EpVGk5$%SueYu`8Hg!Oh`ZLSo~1
zmg2J^{ky)0*<mc)jpEshZE`~M3)K+`5m~N_dKlwLPr@Te7UmfXb9+17%1AwI0!0h9
z4?o5h<Th?WzR$u=vasJcWc{iKTaa%cz@6v=+=+h05c#GZ$BOWJ^5p<(tJnJUw<1qS
zVs!R$hL8P`0lP~J>@MjQ!ti2YcB8!_X!nP?QCeRj`*149&RcC(!5-sa#C{eQUfai%
zL+iyd(g54WpZKMidPL=A@XFF=u730FJV9u0Cr@@vN+&#j;yo~)L}P+z@=JfB3sk=}
zV;c%ZzaFjsW_EjWA$#U6{g>C*u1Y*h5Oek0tev1jz0O!L2&TVr=BOcHBCB&@=OiBu
zcX%F9k{65J^%LYu1Xh_l+4u+aS}~hA>W>6z$~)*zh%DMG%$Vl?#x}66ez<IsB*DXK
zbE(J(<uXvGaoT}J2*e~>BHH*9&j&Wt0a;&0)@pOKor%o>lkN7=u?$X^+xQdjf{6*R
z`n#`wZ4}H$G&l+Kkvc|9`nglw#-Df$Ns#$>U%lsiI0|(R;rJ8(zJL>%*#X<c{%8v#
zqdf<`>a~%3U3PZ~ece^4=4<=YbkRXXh74xlPy8#$AbN|3QT&Nxu82KqA-yf5*>48+
zw!P{w(Mu)*%n|Hlm+f(vd6i2C`f5k1*eiCr>a%uN-RkOb-|NNRwjd-_JWKt0q|B89
z=->AxmmVRoU8W&2GLv!{d1vc^zlmG)EYUZvgo!oTH)0ulr>TuU@jKAP^`2?JwF_EV
zZ4M*g!AQ6t<)TlO<M>3f2be#{99VmWDUuS1WpK9L#-I2kU?D3@eU#~#<YEec;+X<}
zsP8fb%(}!M=8CZSt(1N*MAVm58xrPWg4gqgEB?rqWTQRclGH!ijM9HO?Hv@QZ(_ez
zN5!N;D*hRoNbf1LTNWpTSp%R?Y=!7w{xRzz`tBfc^~ewn^(|0G+kykypdwcz7W@tM
zEm9|k9&jyE$740E3#x={@P)B9{=_e5{v_!O)hVI-T?^HT+5s%?gr4IPe;A?p6X#J-
z;7!6`A>gk_g{MdlCp>@Rd=V-Ieu{vfk_u1!KEm@S{=K2_B?7)A6`uG@P{}s_#5WFw
zx9MM$3Qzoe9j=W(@r6U-CtVo-AUugmq2I<ogdXA_N&NhYp9E1U@QW^te+1$A6Xy<1
z3jC$&B=G-I_2QxY=X(lm{IPam4ky|rH2-D+dvhu*c{7Tz{IRMBVYjPAz`I?YJ``^@
zVfkZS23Y1E(DBw7(eM1v!7%F6b8TVQJ0d?k4v9?8voQCy(zSN4HV+GK?LN1pd~5_T
z?X~SzunTAy-I8-)z%fx7DF8p(*|$TIN*g~ACa&bX`F{}~%ROb6%ZawI1^xpxH8hrh
zFf{<XxJ|o*Lz}ll^+%n!4jV6iUE4+ut)pF*LpawoD3hd&jB4|?@9^5d>L=Q~1{`V?
zCX5Tvmf_$}1#)m*kf*TMy?&5npTRz35?>AZf52;`ak8!T?od9~?nf(}*5)^=+^0#V
zjZH}tz!_S52<_8`VG<L_^Xkx;T8AA<mIFmOWzld^XUy(iWo|4lU@?W2zp(`CBKIQw
z!2Ul?bm85H{hzt8?numeoW|kL{s-s0nB_LO^>?kTaQhA{V6A}up58UB7nygwCJIST
zB7t8!JqJa+g#9=P`vsLxbigAm`}(IiBGqtAZ+J6W)B~Aqz>75QwU}1>pU>Im|Ji|v
zZvqJjxK>9xrf@cAG`#6@KfG8w=V?5O6UUy$BLZclrq};`<r7C;Y5wQ8KhdG%(GK)4
zQ~$I<Yv_;~Xu~s5Ch%|2-D^e0ztF;g_(;vMr~&whyMZKa(B?}GX+D<&svU3(=-)f_
zX;1bQ?etPkh*x+c>Zw@pO=c}R5epuoC$8hCCA+z%J=C|}-^37RjOrwqjE0FL)K)$A
zO1EJ4P>*tQ62FO$we@>Tu-)CUaM-r1LJjS+)oiWd5bQj#u`Ecec+<KXd<z~z@0N=H
za|@=?p#vSwxr>2wd?NU!l?S_GdzJkC6r=|Li?OH01+!Se!k|BVC)$@Y&(US}frXXk
z+eg@r0ax(N4Y6Q{6v754c6r);#Rs?e!J7><Phg}eKDfCXNs*dUdd)GXlCj_skitzN
zg8MbTFA`}?=nZXp50JeKGSy>#jmIO5nl{?)a-)eAZP$y~X2v$O(Jp5pV#@=O>$(3!
zyZZArFGt+vTJNyN5k!Mc+V&pK%Wa&^F8#=tii5{CA4AK&j6S--sOi`+Y_!7}a!eV|
zMt7+r?JCji%=PJp{daY^EH`L4f|1oG`az!2rbsm$fsJZPWX<tN@YG=4-+a@l`%6%g
zi8E{7v}QxcG`uM_UJBgDr6(h6erIPGN%{tP^%A_2l^!iRL1<-8L_HogYToQQ;8L=&
z+2AuRoHBPEcLk526V=w5ClQR~->@H)AcA?+4x{D>EWP^J$oi)TWlpSvRbSBwVL+eu
z5trsGygE!=ztUn^QP{ft&$}=;TG9XZ2l_{E_ih+=5OEvyar)bwU#{paKHK=a<jUIF
zzriwgg>QqlaGBIFJ>p)bwV(Ua1|zVce1jeczuxHC03B~(N&dR(-$1L`Frg@EpAefs
zwhc(w`qt#|n7L1Cz)Kt<NJj8<btKqT6=~?kO4w`0P)W!d8mC*rJRcHo)O1CzOTaD{
z*__Z-GxFeH!MBogn4|l5MZm$G2hJfvuj#5EUT1QOSMRPfm!c_vrYG24pbW2f)tMi%
zae`eCgzgR62mTFuO?OMMtG(0h?SS#3xh%s7cHtBU1gm>k$ME237^a)cGB+5(p5`+5
z2LE%xGtFfl1bdsy(ilA3T$YYtU$cv$&zj3z@u$#}A`cc}+O73o<=>@>;K!uxz?t9a
z9bZq6l>7Jhy7i!GtTAEw?sV(#;JA}&!U$PsmV>}H<drb%tuvbu0{t*ckJB1Vsqu0W
zW~?y3B$)PgZ@5Dl%WC-u2LLr=!_F1mQV3O~{%BcoI%`EY<QN|4>gMY+5Ifrce6ZWD
zny7Ln?6`)gDM1!zYM;4wj1}!R?f3?xGKliP7`Hg50*J#{P!J@?0r5Xq8T?d$c&tp3
z?m>DQ($Q$B#UP3_Cp~RQ`e6QaCml;#ycm+x#(t5K-(_V+i9bUmk8zR*v%4(Vj7XnL
zvL>Ss3x<u9j|wH1cpDmgRJ0!F>l13gocbELOzk+-X6x9Y|Bh@<=PF`AHd}$_eAz5-
zC^-k@+cs(k8Yz+9I<p=EU7uEGK4%MdPw-QhEs-k`F({Ec1|%}mk;pV5k(om!k}}t0
z%NzvK6`v}E>=BeH-X=TCnw6_50>>fQttaK}?P&)M)r81lAM`D(mqb%d51Np;T$?^f
zTrPJPS!`rkVo==1P~4tC9!S!lunF1Aa>UJpJ!ePW(nP|T^CT|a;&_oFbLjwc?Z_1^
z0x||f#zkH3v^gR2k`Sq_&T;wgw!7PI_t^*kR=dL}{Y6c`q8ob!E2)`g_NKOef~_Cy
ziYyhHX;UH+J$Eg1QC|WR+-(hPdpGwM+J(r_&^H<<oe^;(A_lsu;9FPomtp-pJskQ6
zI%ml+v~YLxk_@VqPn(z6DrkwLf|l4SXo;hOme?vN(^f%CT=6ZSD(WdIr8q3|??R7|
z22_uJc>g)K{>gyi!4PAbZ(=(osdX3**di{Zpr>(~kb>(|qyS2XV2>gjb{Gcb05!3z
zVb_5=$f*b3ty+>HA;RZW$jU^!9bS@&-t5{j+EFH=<(rqdtqi^A@Df|mB-2EjH!tzn
zX||FXovLJ-m!#Qgwt`8fIr-A<G+VihPE{_=nPPwXFi9EIJ5Dy2HBHb7rBZ-*s(Km&
zLo^D~_$Ei4`A++JlEtwOb3XCrHPoXK%rR>6v|hJ5eAP<4H~kR0kTp~5^*Z4XAXe6R
ztv5^YSIIrpS?P(R&{<hg0bU2Y@!&p=W8ddl11!<7kuwDyzKe_EfGTSZc?o~G2?4Dk
zKcO}v6&l9RqGxc+x!*|NZ+e@9e{HEqYYv`ksX$!97~{JJZ$r5w!Tze1M!DBo6&(WW
zq^Av}Um1lkU&10w)e)`Ci~}SV&)zYvK*^*tTMgJr)hqGhw>UrB>IG;*1z~x$*wOJB
zrGZ38ay!AEAI#ufxxoi^8NmX*0pm};KEjP``WR;3&BCxRYpl%E`V#)8@4<kn^%W|)
zTHobLw$?XA@kPpyV_o6j^$Q4oQ4eADHju+jJ^0J=wDyx)Z-#%@<4DJO;O+lIy!(XT
zy?A`Tu%DOVKZ55eJiPNoir3>;@7c$3EsmqB^mC++<F!@#VK;@j&Gz%0L7X?|K!2gg
z$Dcu%Z(eo71&^>zhC@;Qa0o%|oJ+kzdmxZd#>hXI%xQirD=UtbTQ~CjP7WHVp8u{$
zFkvk~elBSyx2+bry{e}Trz)i?xqWDEpEW+QB@a7vk#8V5P!*}j!6pjEq8G&`M4s!6
zbu)4Gy3|@@8Fu52;pEYAY(0jLHl(>eW{KEZNo+xLdF%9=<K}~QKBMM1rg`~HUnTzm
zWhT>a8%Q@Qe69{x%(xhJ4*NL?Yv__1XOa~=*%C{OgI($bAsakfTqmT%4tj({V0=xi
z=t3@tGAGpWrQo#Qv$O9}<o1X6g0uU$Q%#KDB6E#$U-4n=XdSLiZ1&1-98EAkc^Nw#
z-=J5LEs$x)j(-J)wBTu+VTN||i#Yi|ks4ow66$eCIia35A467Js@of~ZHVkbK;#P=
zSfnFPn6jNVPXkszEUHFAxXUGRM+ZBs!ZXY$&9O<lV13=m`dVA{9&BflMWRAd(NUmD
z$9C!}7UN+tI8Mghyyb{!<4d7CKjZJVH2rv0y-Rjqfm+WLq+`nHZ@LW(Vk=dN6wyk-
zljh6NJVx;3G`tL$7e2A$nZybc!*4>>Z1O;lIO6RFCE5#YELY>@7o^;7sex9r4~CP}
zKfQz!l1=UZ+2QzS=rUNd8~Kl#!*Qx^0ebDzh{FDfnp16l89U%y$@H%Chc!eSH|FST
zPC+@~m`gyc2ByF=uLnDc^XH^UG@d^~^QA1KWpGqrMSkKfAc+?UyvB-7*IBG!icZA;
z6{3Q*PL5IexLa%gSnDnJ@45?d==aL6*zfP_z&nrs;1l{gaM;-yz!io6v6S%NE91%k
z1=v(vdysE0o}2KzjOP%ZP0l03<-_pd;JL2&gWw+eJp3P9U&k05JokxpuW)BscM5lr
zb*peMwZ0<Ub=FGZuD8A<+^hMHw$=~`DEU?f+yW&BSnjZ<i#V_4W1O0SILR7|-wood
zcVtK_g&NLbON*jOm3Ge7N`;tAEP+f`ps|X-lH-4P3Hp5k=SkF4DWXsgc~5WXr0n)I
z&KQugrNxK;o<6x=I|pU*0dy2{B_-RJD!zK}^kBEO68s6bQ<Z23^C_$0TIw}u>0$C7
zRD<?X?OYn(-Fl6oakhfEh82X-3u1`%l>FXckbCn-#Hw7Zp?98kLyd5V!`^&Do?b#_
z&%N_H4rl5x81SbH8UBJX?dNF0qMn$zI0Rl;MskcL&WN^cDWrPoQMY#;9tDr?Jlo+m
z;n|2sjAgj*L5yQoZd8n6*2t(Bzi{4gAIC0Y{XW$Y3`(#i6}`^0KYeLxMwvC7V@97#
zP3M@AI$%WHSuQ~q)xP?sA^h<Q_P?awhM`A#N$73h|87!m9|W@xRzq(`UJ+NSywVR9
zRcBuHJoI<dbVk_<yw1D@QD_(F?jCh`ozUCXM9@RMU2A^uTvBU~O*~5+GSxQCW_d81
z?S?qjnv00xAkHVjWhHmnx>hLc8&VXuph*Bw;rM@cFwT)DRfB~P7W(U9y!m45FZGVZ
z7AUP8nr)zN&AR{+Zr}bDun$Gm<rKfwaE<;p=w)#A!{F#5B}?lo!+XEy0yr<9jJ*~H
zU7TLb(9RX8uF|sN-){dU()>T$MOrLB<WESZ8nO+I&K)H7Iacj-KnPb}(FvZ6Yw|#M
zw&ePsJFs+d$@|Fe-?ans2RYev%<b*{&EWHc<8E*2vj^eiW1g3m3P=C>=?q_=@-Xa9
zd6;%X%ER>YpVTtWPh<Fe{8JH^e3<_C@Dt|$J^%Oe;1;xh^0|;4G$Z{nJlCV2{O_di
z`8)FUG}4m~x~J=~>tOsk=sNf#m8DPfT{6yEyi=i@GI=?`YzxQXFz!yZW)r5VbREV=
zf<bLm&LbG+PyuC_l^rFVngxS&oYzcIU%2D{2_Gg@%xb@>wjw9e<SIOgO=i=Lm%?4V
z9U^|jhQ}E04|Aqi5q}Q9#D`bPMEFPeU2L6+qF8N5Dc*sRv!)DPwZt`mL{X5Z07bGE
zU$4~nzx_wO7gfB2X_zOqFWj-M3TcU-b5IcG85)3_JKD{3tuxc6F;eL&tTMNX3o$rf
zA1jxpmL=4mHC69PU(*{O3B)L~O8zQA(gzk%zIZpR892*;qxz=?$6@WXSZ87dT9bzj
z2Y=HV?EOa?`t^oW*dWqtIx%YC#QJmlmoCv8@*LIq6vjrV&ZmFt_D1LY9(QCoPZivD
zJW03kUAH&+EIoy>7~$k2!{3qeFn#uWgAc=d5KcY}2VkI1K2O8%et+;``uR^O(v#2m
zX$(J!^yI^E;Df=3;ZB5;&xP{;zqrry{QoANRDB3pcb*H?JA||-p11zv!hCuXX?y=h
zdOOlCgf|)2jr8QhWrY8^-(tO(hdCGa$M9~yYfWCfispfu9HV@O);ms_v;#VHq%zW~
z)Osf=6Sdyi%B9x4y(2?saaG7(Ki<LFJAwX-_D;l{cy9*%Bll*){<b%l{<OVgVLFRn
z31buHZ}Rts>KJc)91^%EjmbF5D^!MQy;GC|Yd+pXIqSilGQs}V_@`XPV$Ie6Wc*L?
z0#7pSC-L7V)Aq!FX{X5t&oARy0RxrfDDWC6@U*8et*tVDihVFBvX)WOf#w>#N}6Xc
zuEg32JUN25<`-*+^5Yu;hjKxK6yIQ%LwuE`C$U5Dp*@r=sPu%Ol1s3IE^W=0<0L~G
zP^Y*GD@WTtx)f`8zGG%oj;_>$xNT|lQaq(HX8VDJ+8KWhX*jbeaPvR_aHA~%EY6pf
z&~6UgS(l!N8)M4$1sGH=GAb9?cozWgf&skNChUz0Jl0oH4;%lXB<(x5FQ{~=E<7Kz
zL$#9s1r%Gkz$b>%1(j&&q5Nz96IT{_i{mrw_P5Jz<KRoYfzpIJ3(nGndYMrfKpk;>
zuLNQ!Z5=Bw8KgvCaZ;G|j1?zSFhFLu&#TlMdVwpU0ErSPjUP|ppO_1zLZJ)}_mHuG
zl4Xsu*W+r|OISBbmKXJS2~&Jnvjgg-*sA=8sd36lDDyzWywZpUBz!BhQ}nAQTt?u+
zI|X_1%YYHGj+)<(if7BWvW6*E%j6qkIIXa4sWA8&b)|eCKcBUCSIMB0LL$)4<Q)fx
z(}?$1!oFs6=1FH_^EuAQ02;{LWim64spiH13GtY7P?nn=dE>IWc=du(C0qXHc_caw
zJw2EY;T<CGd(Vf&UN1U+u~?H6e^cou%xd)g``<@*VQ(njo?WU;F)Fidfz1Z<vP*@{
zwbQ7{$BF$8^03aDVC#qF#g)@x(O%I@5gWpaOIVvjdEiF;5R{iA--Gi!3chIg^X7Ty
zwYyCuCx<qXc;}LQC@xi28<oW*l2--H7IQ=oy#+{5D8-<=xYP*dyYQOoK&wCWM?sS<
zP+}H15~PU|<8Jtb92m>9Q|fe{+$;x%_&Z?VKz(kw0BPW#AT3FU;2+N5<WGy~y`*N9
z;2&5pq^u#*@WCG({<-5#c6nmHn^cz#IgzGJd%l}9QY_hNB>gHNp$_j5`UE^F@Q0Tq
zqn6n7-fNQKYwYyP?C=KbGCQ3Ia)4rkH5Srfl;;aYoE9y}&h%bL87}~tP{w)j_n-uY
zOgQuC|3T3koVa@9G}Q>1ZWa@1ApdIR+aJQF{*aCo%8%f6DQ;>Ked&F?%N_q3l5i&$
z=GXpRRL7ySJGM>Mj||MI(b$p7%)%-tBU3>-4c048S{?yH74&bMkb~uc2zG><kEG7W
z_298cWtyG06Ri(R4Dy~oF;7u*E!f1wg^a<!awAw7)`Gpv;9p_#BklUZ>B7tl^Pabs
z)La7c!58d;0x7m7lsx}KPl6V{KfXrmbt^Z-zlETqr)!RB+vj7bxY($iZ}+_Ukl^`)
zLq(q5-)fE#;BzYd*;Ash3abqGhSrkG;d6QiR6*^f=tBhv($`=kA<y+L?=M2P`~2Di
ziwK-s@`r!+3HR@8Ga$;d&kbVNW2x4=(7&q~&46Wv`wz57=ll^i8Tk0jfZvBFKgI2L
z(%eoQ;TgxL5Ps%i8uK$Q371SGzGQk5FX2-25texQ5axVb$@nDBBzzKYYPsjbvi$So
zc)n3=0rOlUdXq#K@+Dl3Wek)3bTI@A7gHI!@}E<?jeR~-oFNo;um-%Z+`kTxIFe>m
z<P~T7!|yS)#ErA9#f#C~dAP9X_2T^vQ}ke0(b1?;`LOp)2f!y+UR2m~DBU0aS3qb7
zW|tMO=-Tl<Y<WxEfL;zg8VhzKiG3Kz)o$aa35EKaF8w&NuYTA&sY4xx3+2YmtLaj5
ze!`bI)H_1h2UBkaNoa9N3w9G}?~Zm@aQC<s=d{#Py=RYC@d`dz3!-}h@RJ94$8t})
zGWA9BXHOdJuXQ*V3d-MVfO!u@qZ^JWD}HPH#};oWUcfYfAbI8)oQEWxHLPD~`@>!d
zw&yjzFe<3vmE?Y6OjfWH7Y!sA%JzP&;3IaharP_yOh?b5fVvu(D>%<6c1KE~<&=yv
z?d-&@AK}NpD;E}eah@1R`ARFDmS9eMXL|F2&>QXg5$vkr;BY!#HuW9=70uPY_#GmT
zS8K#x;##fIhj){;#(<=X`xz>5?V^&V?;k*_oh?v@0kdFA7Er`0+^hmlZ$#X`XL*Fk
z^m*dfLWX=9ETqC0PeUQp9oUk;-e=T$jhh4dnr>rj0j^JB<!;Q^*Yq-VYmTmVG3EhW
z9oLQb=3hYDCA6~_D@!6}A3`y0y%q&1^R=`2%G^lVyNsEMx+_z)zKfN~k#YfZvDR0>
zP3e3kJ5nxShG~5hv3ChM#_Ov92Exe>!i$M8mk6^Rgu}?p@aqtEYzzEjn7I=U`n5)P
zz~A&Rb2fCl)Tza9Fna=v9+Y}faZQ)%(GqD&7Q|T{uHjO;4822tL*HNghU$HhHBAJ&
zxfL;1WX~p;$dIYOVKbtkJ53#_ot>-<1Cx3xrn;3;08Pg+@P=*=TCSmc7>rNA;L+bm
ztmqbKe1ONP>$hH<EShJszv(~02b^(%26Sy@QEqJBH*|Yp`UaW)_^*&0h1Vb6#X+hM
zIU3=Kl)JRv$^KpBB2?x)%S}1N88`2{UH^5@5tPR=PvUtK&uKiz@Q{X6aEo5IX7c+*
zl67fR+&+N)mKUhcu(o`G`V0Fl;?5iFw}`uK*ggf672FHhFX3E&1NObf;3$Wr`q894
zi>IcGd&jS(u7O}qJrg5(buxOZCj_5Zt!*2U?@WxHLd_J46?fT)F2aNUh!sLLf&(kx
zVYf!GUx<FhKGoit(NdGs{z1C8!+Qk1u6eO9&MRYa#+%$P^zXV7A#neh(^%$j{PTYu
z-^t&lD34{{gl9RP?RZw>VVVMW9Uj~TI`>t<|5?#jS#Pw%tAhU%qOS_IksEy#62x|R
zRkTM&^i_^0c!NoZ*Gd4Rf{zgQfBx6juMp+kf@dk7*?8{5vk(vKw-IhE*abo*YZclI
zeo@QCwqMkAzU>#aon`w)jW4nNqSjpNBCn{qeg9Y&Yme@xVm#<3PV~hz<%%7+gsj`8
zTpTY2Zmu)YO)nMQbVi)FcM3dW5VUOkBCl9W1COA`#@|hP2BdtVkaC=9g_MsLQa-{~
zCF$aBl47Bwr}pf3sRcs?{34MhM`Rh<vp+3)!Z;K6@v}4vG2dfJmG25iz9IVdn2{pi
zKDRwMV4f;syM)y1pLuaW(${?Rh&YcBq2B18xsmcd>Z*|%Ug(4>&-RC>BazxFH&W&#
z;X+y{ZY1%I9aKqsz+K>PB1M9aNP|Knzo;HZFt3-dKNh`J^ajy-fEGF#(HTW=FtYd!
z+}2ERL|ukF{-);<vWxS7gKy3wo4@G?!jtW9dR%w_7KP_k>T>2>itA1~y{?Xu%xrv%
z>XIG4k_>vLi957PGG@U)ri9<-QR~oi@a~Y^cdm2#PPx-}=Hs27OvnT(p8?y}bn+!z
z@q+?&qTQ=_{_BGMO2gzQ3tQVH3oxSjCy2Jh5DO(YN=sxYBa)hq_tO+p&n^4kl7Xa-
zgJw%<YBp-~&6ub8@bZ5tob(KRF<&@O&UQeTeP#~@0|;}SpGc(zn7s2kcB9&7EJJf*
zQsNPVBpWaf%vDF@aC<fH^izsIRyLJdcd>q$2UIxofCZcfTut3x<je!6VIH6qa`>O<
z4F6*}{Ey=BKf)RQJsAGg0JepbuMt^ei1%E<Kv>*QoqX@#{@#myE|4eQytw6Y7A}1%
zRk1+x;-%49cp-m8-aH(lThVWE&X;#t2Chvq8v2uO>xyfq?!%=W{q`Lycyrrz7#G0d
z4i((2^0_#@E8NqN9$7rGuyfjBBmda|jxlHp{;HH}3(l#T#*MgWT$#hS+Hru)yy3fC
zY~ehWIu46H%pG05Rpy5x64O?H)05z^b}$e5)pouW;BWdT^4$GwlvwATQ)kQkexmu!
zXJOPh;Kb`yxPneVU?HX3zAAGBlpQv*oRk<(4?y-Xuf$#cNV-67=dI6Vj?w^%9w^&J
zn}@UK$$J)3zAb=59Gv*$>o@I~1xw0Qu?{yk!z8O8fJEf=lm}eODBO0CZj`(A40|MY
z<2*&O-E5h2@>BP{e$d7-3pg<C9obVFaAW=t1;Vus(;=f`gCABMA1(*9TR9`thzp0W
zs(00z-8ik{+<vNN)ym`0&Nxf@8v#0MVJY6hdmu+r*a*8R56RcAIM+|&EhL_&1s>e|
z0dDTWJ#Mw~0-|!^C<V1lRL5-IrB?@V$`qgC@Of}ki6~<d$`Cpo{n;r)oS_|{HJ`L9
zxveZcG*41}@=6CW+pWf@k2Y!oxOAkbJ+x>RwmzXB6j!NUk%Kd|kf3xNF02As`%RbD
z>7t#2r!8=GL`?y%+TdYQ`!a%*`sA}dd~ZfSI8YzoV12ArK39_ZY*0T)H_xfdk@Kj-
zYC}lKAT{;4sCR&hydhMGGe3|M7~!B(Rs>qolKm1dWzJGYu96Sf=-;w}IREEbWzG?F
zk`-WmXF7%)W%`b3sQ8pvMSx=*uDuv7v-{SXt05P9h0nf2v_ibR?3@yI$}Q@7i5=7K
zJ=gymIKbO$AXvAe{{feg?sOc)Vv`u}%1vxMD*Mm{%mP5~&OsaP4&Vn_X2n=-DOM_O
zABvS?Ifami%}8ou9(Do>DzrDpV|Kj3Gt2xCgy<y%=mB3HouMCxq8N{NR7C$jr}jd1
zRGEH~dYq)5P~(EC4y}ZApp!B082a@wB+p0_1g<hq{G3V#-zpMt>WRU!p#ooA1j^bv
z#)D$F3zD7C+Rf{}{z+`7i7527L~LgleEdT{gX}nGtZ}#8QT@H<j--~vod$S~s==2G
zi^~hte%@TrDyZ4yp1#Rj{7%D6n~T5Oi;5f&NqWF0SWL^MSh>wc9%#cIULtRmS3BT~
zEKJkS;_x+2rAN!)x+?JXpdQTogT5B2*_8<T$`J99Au1m!>&6{H<zC*wVJjw^_EL6b
z=q8*xS7DC~#2%zkkAJ&ogJ(Q+E6<sVqr2~zFTVr|#oOU>fk-m1ei<#FPu4aBV&Z@l
zGscz_(6JBBj<W9*i!I4xE63+zhrWbY7ARjS;bccyTtZ1ut}Wpm6Y7}OLSl1=4?#jO
ztfmFfj+5oNAOQOYBq)Jb*aAt$*f`&Zjdo`V$sl6&rq&rYMS3QwuS&d=BzG4oAjk!2
zTJL-{H<@tvV1n10f*!O`UWX#(5PFeQD!Li(9~>wgcc-vG+&O}(JC(Zugiz){V0jK%
z5POj4ut1a)@52w$cAjN*{oy?bY9*}fQh)fL5lE8qA?6H%MrilBqQWW~!ATXj?88!+
z_>F$Bm2KeErjRGb&qCQ$o5lel+o(f<{JrzpHb9Q`HPVSInD8#3I4cG}tSvWG$%j(&
zU?jFGv5yuouFKJ|w>hTXEx&g@fZuL2V5)rBomi5StjV}!O{k$pkXugWo6;c(JI{&+
zA9sNU_cy(Re%8tywv4O-1={^NQsZ1yt0-2UcQJSvD=#2pW95ZX0i8+&;P6GhM6A4&
zPCN!hhj(H<(^AAIz6{8tcCi>e%JW*Mq97f{`0Mg^o+W0bVCUJ1bn_xRPXU;7`4KzM
zPGA&fTQk)xZ0G0=T~;pNo$X?|_zq4Q7erlRX+eHr##g9J(9T}2jML6eQF0<>eA8g7
zZ|7P2VEO}C=79S<W6vPF-f%h=JViuF=ADF6bQ)L8dnk#xXH2g#>+{W@J<TJDrk<%E
z)YqKm8=|PWJ=P?Gr=Z#F-oWc0u-jO|?jR{s%tLrh8rnG@ph%HKH^J>ncKu=Yx(cy&
zPF|Ry4l}<kGGO%~WF6l!xE%2@`)y$-PF-fq<qZ%?x(kzZ1B^|8wl8t81#N5>+1HcA
zJe1#=q};=nrf;xt+)-oKiG))A%JD|b6xi}Ad>m3O*n+02!x5rR<lec~J57XnB-Oec
z_cxZqqxD`6lN`P^Agz=yNtFSISrBhb5w!MvT>r7_r%-NWCmB02QjrhNI2~|{4|9h@
ziMiyX`Q<lRseA}xrh_F}^=UXLnryQ89LUXJ5AHgz2iN2!j_QX~dvJcZ$KUjG989V;
z-+I;Q!O8@bK!J+ccfQ3cgucVzPR?3OYt1VMKreGZYt45Nhbd64>1wAZP-|8SPo9;7
zK97BV`NmXMfCr+dK`?OEVTQlyevWy7dN>s-o(s~@4m<D9v&Hv&Aj^1=vWtworNE_l
z<)0yowK2+<8T?Jla8okk)9^i#HxV!YmWjFIMTZF@KF^LnlUj~-4fPUUuM>lbjVKL>
zY+o;08&@d!oBjfioO5|fuLf<<3!pp^KZ-=0YdZxk8zWpX;N%b}bu@YW=ZJL-@;DzI
ze6x^sfflb^G!;Gx?sCViqMK~rFJVcMY+qJTg&_p6%q^Aht{;E+5Af=r2;G7gwEVk%
zgfOjN31NHegwu;>hU5|MJh)YO+;}SS<l_n8ISm-pC$xNYq08EaF{c6k1%+wW*Tne4
zc(=87ARgD>55xzoB_e(&;5qJC^T<ydmsp28xJs>w19?KcA5Z>DDmT$<leMmXX0X<F
zEt~SeWg#<K?~OcKaH&81YgAO+L4c^_x)bkVB$15#91?Nse3DVy?gf*Mqvm>#+XX)0
zDNS+dpX$WXKL<|$kEqKc@TkJ6OD=eHji`TU`6BQLb_Y@S+(NIYFZsBrFz`3)d;7l+
z)|YpC<MxG4R8EQnvAOIF$X&pS_xmH2V`o%3RkTND(XWGthIDLDscm0WCE?ENU7T7`
zqwzukf74R*G+T}0OA6N@o};({*Qhz9-H*9N9`5OIVTO@qxFe|(qFj0Vd97uCy8-=X
z2_`mQFivNIYJK^G?nL>(5WST%cWPg%X^Jo=Pn?tR3hwbd2jx<7twM;hIuX@i2jP;}
znk@JltIVBRz##RC{OEZUC7XV9N)bbO2x@D<!};g&P|R-5=OM=b?YV-7VtP8r!$y3S
z4$FcYw1!T6_RHqx8l^~n?F-0h!qh)mV`#4Xpz_oYt$U+Ma@VD#TVK_ClDcsL0AZWy
zov+N7fBOZvr>5lPIBVk`6Ls2H9S$DugaAs=>1=Ac#)?C@^MQIR7CdP?$G}tQrw%$e
zl*3l5%$*18CY*&v!y#j$_SyCwW3jo2_Q96Snv=9StT~P?cWuAda8WnS1c$WV?K`eE
zzT(DfvkL5>$6-&b#Z*BL9@p0#v&PXzdorPnL^u{aMvh`<zef+A96(|s4oLhDO-DAZ
zw?Vx+NfnfBWv)Hbs>~HrEsb9?`5iJq7JvXjwKu-s3HLUt!;G)H^@a|Sv_s7{%5WZv
z^;(J;YlP^t5HEp}HBhd_T{QlO@I3*JFIQ?`cjIDJ8!zl(2;mMPg5|;Q@`wLFz~QbM
z8)YfaIoaYWNE7euI(Zk^c|jh&R&)mK7=IBj6M^Pr&4iRYHCr@Lv+x==6*_%oZlNCA
z`72uc^zFHY<RE$}c+1VKW3W(+kV<bMB&t?u)SLtv`szh9@FFCf*+$JVICF5f2%O3|
z=dYMpm|o18xPWcP_Z%DvDG)<TCHTi7M$nODPdtvuDD%z1gu~9a9wqKvo-1a;O!*yB
zSajv0N(Rp$2!AR4*Pt-?aRBX*xmLUeBi;af1V|b6q>U4j<qwAtC*-vtB=Ma?s-^i2
zJ2I%1lw3J`ddm14|MX+QM-XxbRZn30qvXh!0wi_l<w^kE9)so->cP;PBoTZ%WQ-c_
zev~RsgdyXZHV<cLhi7ZSH)nIB5!(#@hgSEpX5CD^zW|$)JH|)cJH!bvh~zvm7HjQE
z@WwdcFm)^$kHVDYJ4Tk|({ok)XQ-LpQ^Fa&zlnE(lyJUpf20uvVm-%o!2UZbUGXNQ
z+GD7*?%01@Wtw&G5U6zPR$G|vIs@k7dnKs~B7Wi{tT*iR6&Ff>X)t}JNFT&)EUAp-
zwBw$nC6)O2KxF+hgLk$Bs_pCJcoe=K-=@Tpz+Rgd9i^(mu)F{_xVOUwjhaZfT6xWB
z=RPQIm1{3?>V}n$@ojowchu;vGTWaNGUcSJo%U@k;v3;K6f}5?dWz?s8kOm7oc7Yo
zaPU3xO}IX#>_KM3N=3~u(s5%G-y>LT1MWCU8>Ve(6SgKB4~$&6Vtl+nH3zcgeuC%{
zvw`l#0+3SN3(_wqP4ab+qFQt0P8N|<VdvTL%ON;nHN%%@fdCn>t|lrj-!R`5v8_zf
z7KTN<YT?7-1i)*0b(G=JiKA`(h=4gKY1_07`wfBmJhS}!;Ov3cTQDrrE<@KgKVZqM
z!&bZ5tKScM9qtMa=wHoAQU$vZ?)!p`a`zl&95avEJR9*#3hP~F`j0RWEkqdpGe3lX
zseoASK*T(yj?eu050F}kkojZ!ss!BXWa_sWcY}z#$%%`3NF+lskBnb8N{o5dIX+<*
z)=uZJ8OD$xV?2wBEF9fRkjV0Ri8IIbUrma+ey5+C_KvRh>gUquk}lkb-Aa6s)w2OI
z=>V?8Nz7#x%!_`Ep=&N{VEW-T#<OtB14cPsH;G$paZp0MAdX*L5}lKnZN>??qRanW
zO+W7Q)m0pj!ZwDhaU$-0_$zmz4ru4xYBoaW_ICzc2U>!7hb7O2+oyfS9`ZxYN*5L2
zSXS&IUsSiN&l+CrAwSggbliYbf$M5**y*2xot6SSov@hqxYbF`9r##{-odL6Y&U@G
zp%Bc&{VC$!er$&GBcXOIZvDX*K=Gam3~qb@ez1OzqkgE8{c5|!v3)LO!C~3(J)*~G
zC8EU}XX9NQI~|?5VuwgetmqXRUw=$y6bwEp&;kvSnR^<ES2V)7r|1<hBjLruPAg$M
zNJ>8DG4vUERpxu&qoT0ehc?qcMAmnvzUw0HAcl@!!>v=CPnCDrYMuftjwHj>kx-}V
zy;C4n;wFhwf74zJkMd7a0pm{~O6W~*@fgt@Q&O`4?>hvSS_kkJ_1N=xz>5YOwvV;4
zuHd+XIMKYr_OW{WW&<{AWdDp53<4T;PALU1BE1eG@s5!)zj!>6DpwYdCnDwY;_)O(
zxuoZy3*X>f0Zf)hHi*zQND{1qytYKyOcXiwiE1E6jK8YZJcji!8rO*sa)Zv^f_pOh
zjWp-hjB;^nMmcZIutp1B3<c0X+lf!vB>cF~s=q36wdvlCbJI7w<F}#5IEY;ycJz1^
zV|t)n^LGA`Ibh+Xy?_RrIx&rimY|}gY8i;VtnCd{L-0)S(bM)C!d3FGSh+!d`)o`^
za~gT;>LqcKoOo~p7M<CCtjVx9jD{3fb<9>hV(<3<oS%(oz3RGJ^Wi?hL@nV~7YOdT
z`!8SY7A(}-`=>8<+l(~QlA!>uAsGzik+G8~AK<IrH?_mbT;ns+ru7bFuXEV@!&b1j
z5jV!TO32it8C;A>Voc=rQMQ~ubEpvDV-V_i+>Sa+9UFQe4M)VQ<prrA7CK4}jycIU
zrN*XwbI92r2x9+>_Tm^nMIg1ZZQ_$fyJ9>RUmTx_&wCgHm+ls*Tvt_y6kNxPuX>fa
z3Y5R#`yPt;`Z%`0U;Q?U6sLsjD}_fIqU+!rV%(g^9ar90A0G-4FhoZJ#H;H-fHjLS
z-zN-Dd!&BXD!vO5;H~JqgqH!&!tbfike@=1YV)zjg_eO>-iWK!hsi%hEc>whE<BMf
z8MWq%_Y=Y!+Mb?)jYK(4fJ>tGHG$YSybr2qKYCI4btN-WmI&`x0<v#b3j3`z9kM>~
znRf8Q9#@?)47!T+UyUp;aFDaPFk7@YuEW~|`gU`K0}0~u03+r3so3pJR@|q@`3b*9
zZsW%eoqQAEoL947{O7^%89~x8((mpDPJK)-e@FD=7en}*e?eKB;E#El@C#xv<Tk^{
z5Yls){)kB5Gm!o?d<@~+oC9&+8}L0g;Ja_YrwsU>9Pn))@EsfQ?H%xa)A5=0{|yv`
z5HfF}?<x9f={o{n%yZm<i+P?I@I@UTzK^i_2|%6{keyDf*#^$+K7|nL&va9ypLWt?
zo-W5{?~~#CFvT`!>{}Wf{{8?<1?&wX37QSQoB>~8z~>wAc^%*2TsC0iMNh&4CWki#
zLA#jC1y(np*%ano6a|rYE}KohWi+V9<`Dl&tK{Qs?zgo=v&~8ZisCK^*y#Wkm=_aJ
zP<TPW_yFL?j{#6r>VklO8325pfPxPf1pHJ0rsx&ZJp!XHWzH<8kJ4q%gU_6deW=9T
zZibt;f~j)_&{;GWr&uLIK$QaA=S&}VMd_?EUwee<*cBD&>idbg0^<Q>vql?ZD5!v?
zv&wut3Co~FSjvX^9l$2$o}%~1;7?*MCBh6L)@d(vSk8*E<Wxt*(hATttrSVzAaeNC
z&rrb>Wj4%CxfV8w!>_uoI4|uf=7JpxX_-tLRA0l|P;i3#%B@ELguPvMZLv=~n{!?@
zr<D?_wYzQ02jv4qiBDnv0Dk*Zn2!lx8s;_+F&$clGV%hYNoW~=6K}&{JVj#gtAPHd
zA35=qfWhhjj}y-ZPmSj{Xo-jIn;L&J;;UpIDu*cvg*MR<zYcL&Tb;vE^WhNqee7Ub
ziRfmq`5+N?0k4sf*n~YIMW|jFgTimJ25a(KM&pe6wY=DU@C#hd7&E--b!Ccw-+u8W
zE_;m0wV{%q=W@P))MY-8j&3hBvD-yXbC-kU@oV<>VpP~dTl)pcJYT}EfnQZ^euPzy
zFjrvTb!KX{pq|D2sM@>)b6cFd$<V8OfV3+z>z}Yp$iO#3^o;m*v|sfY8IetS+I@Lg
zu#W%%@i~Z{eFAIK=HtoDc5c3R@D@Ht1b+f){5*hb1SP?d-3)->)Ca6%IQS62yy(&P
z=3oa7j_BAX#Wn0WV}Ub>!$Zs5Y4I1pQP2^@LWJV0&PA*nbFVS2RJYiD(Z|yxUP3{8
zl|&H$wGT4ecm}NdIUi(x3bHyA`7@9|yLB&uB0oLWYS<2iI##dK$J1k#C-YIZMLvGg
zC%g4nG9NuwKJp2Lu8z{j)8m}`5c__-k_M;Q0@&cPM#5U~0IWIbG^kVqmA~m;2o~e~
zO?S|TNfF+7hfls4Z3b(X8Qu&=9j=vcal+sF7Tc8vZnAbRbJM74T^FsD?{tzki)5VW
zQpVKEcRP`5l96^EpvQS<Ag`5GKnw^x8o~(Xg%)OjhNEB}Y^3<b0$+?IYL@&cpvAY6
z9WcDKDJD?*0oTX)R-XNtQYEu|F;A!ch2)h&KYoH?FI~-ZHX?(aL&O+De6lJM?1WWi
zh#=!KnS9v$u$pS^63oui$J4{n=3gELODgiMSy42`j9N1TGkIIoM}J<_eYNI%tj};7
z2Oy5=6-U_;%G?2g!umuAhH^=<hYhV<l$gt57dsF_xqb}wD@I=KV2)vmUR{7A*SqQM
zsqmD-{=>WZ85F0YFh_-Ta-{r5Dt9C64<+qM12&oZ9CPJEAnpKOG=aI}ZGCN?y}t}|
zGdcn&*3KoAVDa1#P%A~nb1A>dq~f`POk6{36Zq$ELj}|R($)*+;_P%=A6<N-upcfZ
z58ptGRd_K<!v+x0mj$#3ywdiJ(Cc3KX-!$?ODw^G%g@`5Fa=Zbsk-7Zq(IFSJ<b|m
zJVtaRujoK1uXv2;ARf^%AevWbJbX5WeMRn0WddL!cbGY>sxv<UIeJ%|8ef2q(hnAI
z@hVes&lpz9-P}VeI)Q#)<t_er2XD~!6jys2(x5d;DgJ*15YE-JoS|jlm{SRO0p5Q4
z%|YJQ<vDgFaJC#akpi5~LCwj6>%f9M{W`Kh@0yMmXwK&YJ1{=kmje@;t$~IcwqBWp
zavY@s!;VlHBW)RiWlpF95ScAsF?&ca^MbUm+N3RJv)3j`!}qX~q{YeuT)4p4l~|19
zLV*;rP^K7P?e9L~zIJ<Ux${H7cL{qz0q&o}0@dHN6oZs}Z))lBxg58|dR4UOuzj1*
zuolLB9L6dhA)0mAzDF1*_VZv1u$vYJg9#k(<bNSLe47*?i4Kt)-2(SMU1JxjTqB=M
zg%Gg?>M;Ab|8=-4khINKOYM`%#Zfz(x{!UjjcQB~B8c;}jVa<{`Xc-e6v?%7J;oqc
z$;%)iz8>BvxLkmBAq^<k6E@u;4`UsUy87bt0VK+Sk)jmpk1GotS<k_N>>f}9Il!5A
zWrTb$GK+;dcua$gnt{@Ae{oU;4wrvSi06<e+R6!TX>l-5ofPwM>RXD~I$pqv(*R@9
z@t{uQoY(+YE9bZZc6<sfuhOeEAH%*R$L)Z1ceIsLTmhFo2#1?}>jPGxm6KJGHV!v4
z)=PHoRVawL^ThWyTRHPRKfnAt&<uOam@9`$A?*3;sOIA^0N~PDar3BE09uE{Fok9S
zx-<aP#VxSUZnFa0VnJD|$$^wt5Pu5i?FMmpJ52EQe-igDfKgS~-gqXN2?Gqw00{&L
z5FjWhYEV)M5)BCn_&^6@0zN=()t)c4E$R%QKoUBMa&kH~ZMCHjTT^VSy|&l3+EO1F
z9!>Dkiq%$Ht)jJcPlvWqd4z||_xr7V&dixW?d`qy`~Pj3?6ddUYp=cb+OM_OUORa^
z&%wx7cm{(DSBI~Igs;hl4E-)X0d%r(Y6nI&@@Z~{_b^v=SQ{Cd;ocx)1&BFCoz4DS
zyf+68#>nY($YA#8;S(<?4(8*(nh8z037*aBIzlVMSv+0Gd;hIEdjIQn^xAcN<H-LP
zb=37nCm6|V@OBdq;02poJDzP+5261!ub5)&>58D|9mX5id0}HZ_I7$(6a!G#<^d@j
zN!0&g3VSQA7nUC1!jQd3u-}ABou_I$F*n^_z<C_YqF=J#Y&f1;9ax5UAfd7W#OYYY
zm`6l`y)u9+fe-~8wz?JA$4;rhu7jfaXw;uqNUD<~WBvW`jLUGIkJLiNT^FEAapFg+
zqG1vBPxR1k8b`@WE5tYOg6$V#y3O*_uXl;I&_{-Manu-=bC+k3*yRrL+=z!(Z|y)X
z*-fU(Nu;{o6+wE{6|M-fQeB9M*sc<tt7{*k#1TnuSe2$hq30fx{;&$y3lQx{P~-{I
zDbgx@z@6}CB%~4B``YbjCx<?1+(#v%jf7B-nJRyX!E+H*v`4q8vNwTY^~G$Qiol-+
z3P&GA-5}=rYoVV%fHa(6sFldV;{u*|t@oNclK6M{4>UF3S2UOh6k<8S_8GeIITV?j
z9E@>Hf?kbfsTxNd<B8(6=yzpX4>^XXW4)8!9Z#iZ9fIst$igpp7mqA~!%lu0$>vU*
zp!3wPH#sc8p;YTT&xF-eh(S2EZ@AdH=Hmcfq|H+gYjKH&L+Rmep`*E*uAg5uBR43M
zmE_EHDMq@KreW%u^hfIUfLe?%dMdz~A6q+k_mv>XHml~D8f}bW*B%mohv%trSZjE0
z_qyz^YjywQwFSac2lpe4Y_>M%V?Zzc6SjhoP>g@j^@yIQ1VLN3pwsZ}q+wm*q}gY2
zCCF?Rmg2Y9H@#BphI)Nv>Cj9&1RKjwKsL9`#&@r8jvcFdLB^H^_)<?Zv<M-nzA6ZL
znLvge$Pe+d?v{D@a`aTH1=f$LauT2p+=#Y)jcq%D1>%8O%*Q0h@^04laba~CkkU@c
zD)_pE)u6|$4lPkrV{8_$Rj7f#9$Sk`Mt{VKDABY$l`3bv`VeQaI2~dzUpkmjJO&iw
zbcnG536f&P{^ZCW_5e*~svfyHeM1jKR_8>9ZQKxO%_)PzCOHmkC4S)GIEac@A+y{P
zfc=SMgvuo%p4r7_vH%u|{J<)of2iUpI?t`*z}lT0O8V4`?Lbr$XyRT9mX~4m@lU{^
zXH6+rMP_|b7aIsmx(XlbxxP5oU9yEy`q@dT^RqY{-XdHnB#dy=EXK2w^2MJ;S!-zf
zjq=(MJkWqIFuplJB1J<V>dh%ZScpsP!$gs#pFc@=l81M2w0^!iOFv(RD^q?)AHgeA
zuvzu5E;J^B30OK(2vd7{z#Mcm+_GZvP_GBumSO{)t$PW!l_O4Gpx&RLD`Uuu`Gy<}
zEaH)Yi=+|yykM4`7o_Q#g2x}39Z${)Eb<T3>lh6nt5Mw`hwQw=G19nNVy<vvq9ve`
zjIjkH*!FGoLx~GtpZGGu#&wcoLORD3q*l3e(4Dfxm31d>Kp1BQH%gvFs|+~UL@`gR
zI}cr6NF4IetO<Dx$@6$R&uM8{1z^sQP)>qNq)sUbWPKXo$+fsMlW%O1oNr1_s3d~z
zuVspg4l;f~$jglc{=}Q}m#L#S2wAP`^X2^F0F%$L&o7p#{ntTkcVN=T1+GEy>Qws<
zoN<hq4Va<0|5&wplrbM4P-f`1Mmr}zEAkdh!7Xm&TDZxLTpBy-g@1sf{s`{+g(5{F
zh^ufduq0X|;p<`EjP{anI47y^=|Whma-4g#*t<Y`;=q*TXk8BlIwTU+z6a}h+FGz1
zG~=yCXRM*&Gqo3O*W1jG40gtn*EMvoeJlCHi{?>w;1<*;qoa(DvpMXre~EmTbtf0e
z*;6~A(~8+>F;ZPE8<{HKfF38byJbs!O_bz>ujj2mP`L7#3`(E_YZU3`7%B1g_97VX
zqf%A@zWOKQv1Ude7`&)R_6<;~c<7q|xkhlG*umCtdR`h$6|@Y>(SxMlDDL7=E;?eI
z!OOW|&w#e%x!`0u7aT9=f`#?Q2{%Y$5oOSPGxK~Yl#;)OZ)yMPx#pYBz#zATmSEPu
z4CSd@4ush`@V@dep#@hls58;yl|8;MZ3BF-1rv=mR3<?+6CHw=TBfd$2E}$KN3@v7
zsl|k4D3nY%e_R;ih?lJHtTva0l4k?wLK(GZ{l*$b5vh1?1D>WNU(qg9GtB;SMO`5B
zQgy|1>-%CYm~sa7E-XOhAQ(9K9E@q*TvL<`c0!kkRIN*dk7_~|r^-2da<VR$X=o0n
z7nwpao{Q3JlFmgZB}H&w54c6-M2K(<rDXbb7OnculD1Kx(&D@8*aczrs&!Qb19erb
zafv+x;kE#YPA>EO2C7bc;RCKxsD}z*P=y!$E~);G4dX4DNzK~hotF12*o{>z3Phf*
zu4p*k@{icMKra2wI~B^qXa{{3I=9wir557uFF?lGogxa+b1L;J#vQ)jh4V(&-B8;W
zXGL0X!u=>mf+Dt)F{wOz3~^~y#%WCj?BPMbu?T?j^rqR9oJYfUp6lb52bfsVv*8TA
zYJkm-S=&e5%6`0TWqCWO+d%D}Pr;W`LtjP1{`K!bb#ejEP@8fM&e-Y&Op%;^YyB|k
zi;|o?*N_&%ITFjz9V*g!9FN^c=V{6!^Wt^Ics`DKoQ@|cCD9>T{lYgYB&IA{ru8o~
z9R165Ac~9^1iyD9pt_}>eG7;AiGv8ZbS+~(mQ9`LTAl}tlmT4})gQ1oh+tSiBf@AC
ztR8C2MK-ZkmABQ>33DacZ+r&H&=cB<g976|mf{}PM_^76g}@41bpl_p*wN?wVN*jt
zH}f8k)@K~iA?PoT>JYZH$Cf2d1Az`7N-$78$MVY4`+dH>Y47&~#!;4?mmCXtslr5O
z@GUe7&UcZO;LJvSC83}e*9xUm)2=l{UAE!|W<z@AcY)dOJ?^L`_T)e>(;w@F+uQw8
zr5XL1N}XA|pC7tj_((3!QfuhE*{TgEbN0sH!E!PzImOL?Ka6j%l*Z;?n=OG4C+{zw
zXc@4-aP}2q^hRlod%qN){mTL%f~6h4vCP9uixn?#SZKa#4ddX4KH|Y;lgL<e)pW~~
zx5{g-nrV4(ft(hZJ3PNj4)3j+iCnnmI-P%Ff+sh&-CI*}Y(4g7T<aT`q3u*2Mk)P`
zOGH4e-oMj{z%KaUa&|9oSozanjp{fcWTQ(gT^vL61b<k)?aupf`U8*T>1M+tFI@eE
zRUB!vC;+>P?74q#X6{d|DoU;Lr&i5Ot(p##%SNsRl!a<I^CBvY0}p3CusgkeD9_-K
zy$VKnk{DKVF%U}T)a=cQSI;nHIN5)tN-#ocNM~jZtD-dV_Vjlc<D;`o*X?T0$53}~
z!1e$Kj4S%<)xFDb>gaE*R~I0lk>c<X1}Wo(lhbw7GPU)NbaIaRkMsxjmg;`jSAn_*
zUukCZh^slBjP|)T{ejnr)cNTzB%P6+u|(A(!aY~jbK|)@1oZ*l&d_vGe=sqP1g;|B
zFoG+=34AIc&_!X4FYu?5g`IGK^&42dcSC!CaJv21I<*r2W^^<W@ol9fht=1ShUS)M
z6~5@~>%c=Ed-I&|tTYe9jW!PtH#q1t4_`$>Y}a(YVP&&6M}0P3B<3=8gA@|7YXfG6
zUC9M%bovVn8l3(hTR$bZOPrj=>S{#DT<GXpFc)GM>S_99(+Qep7&l@_Q*%IJ(?~Y{
z{(ALQ&>P!T+BDLb4za6O=ey}2S+B;hVgRmJpGFE*DAOyX(>31$ym|4Jo_b=o#r#o`
z`&W4kC1UJEqf4ke*0`i1li*jgkzn)2(-er;?hmUjp{mGyLzmTZFUrV+>q6F{iFJrb
z5wa=&8@f5^Dz1>V(dt@zF_++4W_wePxU-Ah0oM!K6H_>KYbbSVku^UM###wy(7EPw
zOVv~$1P&-%I5@0%Qhbw$jszkne>v7c>9T?6W%a@>HKZOF42|1C(6V~<*6K`ebJ;z+
z;s3Cd@T)caj|afhu1(w(V1lbH*wP6y%)(9l9rk(r_WG{GFGt2+-?iz`aytZ*A`dzN
z9x5-qMSvq|kX3d_EeD?oupSXmH@pN{;%BRT8iVKL!w_W;kd(dl%x1)8pZ*_TVlXmQ
zPH^=wz)l9*UA3hRsj!#Eucp*Uhi<e(7#NJ9C`*3S3mDjXefQdFsxYc)dT>6AVzrF}
zF4LlF7|ty<0?3U6Gg{A1SAT+C25a%qN98EU<S0=;wsSo4Q8^~KbF|nw9{s2sQ{6ch
z+c_Tls2nrgImX*L)}qcFv$c&)z4|Qn5~*^EfeJu+Y&{p7z4<zf>0J~GY|~<E3;dBG
zsWSBm>1Ezb{LGxlS*cZ}>JlU*M~MCl^R8Jv6Z)@JlzHgCG!p2)W@`Nx(YHL9Drda<
z@U!fmlq!`kJ(cpK#-OEaVd#S(yX>g!ei99ob!YZv^wwY=c6Mpv@n(JQ2|OY5IbK}Z
zLNUQ%Jmp3$MtNHp!XBWDQse2bvI+@Nv8Uz5`YtBr`Irz^<`w8rSuqR4m^PVM<>}wT
zzs>~c+?8mWqn`N;WJYvy8v_1F0Da+?l)F6eqPIrYAo2Q{W_?+Dqhl-HWQW6j`#ESi
z*S>v77h6sIKdX9LbKpiXmYtMxmBhGmlIkj~=8=S&5`cx(uFJtcYUc1zAryV^8c_f(
zU2n~7cA+lzb?BU7gpYt$)-g&e>!g8-foqF2VIg6p=|x#5U;Ifc>-2t4{7Po*XG>Vj
zT7V^fgk>AnX>R*jmojXi{cLrXeh%hKq*oLx{L`<$GKx5E8&1-f1>61u(Y7w`0R$n_
z|J%Aa=&8!l6piY9Fbb<EXvM<ux_nF~ctA3&qKg?D!Zr>G^f>@3uutz>)Lz>cY~vmm
zw-AhZz<@mphosaV8wj`(+!TUl<C9Xtt)C_?-rE`8y7+i*>*D_01P?4ajZaJZlI--@
zP5mDxejw>lNuQOK?nQoYqC?W}l=Knl^dZ3SMgC*SPa7L0?cgm=*-Y~wuP3?0xLeYG
zpPhz$Cz9pHJ(BixCJl|p$|uKl8k;4pE1gE~bR5&EQ*FN*Ld|~gZ2)C#^&;~a_YmWT
z08(2&PiNdu7{}Z?4z5xB&peS87oEr+vjcHyCU3<6lS=U782HQeG9|fr8rI8txZ0dr
z#r~rT7u)p~bsK?N{-}Y2?GK|&7B-;64sHrH<tHx!UMBXDl6;3cxCilKLpTNf0BMJq
zmeILMT9ZGSkF^iZw^=-2Wx-$qccsv!*_7c%ow*kJp}wrRK67o6HB3MXz6LYw!+R#f
zONRGr)`tGUYm0GKPW{?cVv0hS(}y>uGrG28<V=n&e(7SWaEDF5tb#pTZ2ue#y<Kf!
zfLRL>eE~JXJ$!%bMP~=wA4Isd#e>k-B}7ZiPNt)doKG{Y6Kvay;g0c~H8ZUnZ0ok;
zIX7nb6>NLRj^_;Mj_<VNInTM{*CL*+eSU?jwG$slENur0V2n8gjlS((R3ui(Uuf|c
z=sYxGEKyT0wOjmu*%tFm&cWi42OXT!M_Wwxc(itwEhg7yDLk%#1*5jbylFit;{CwU
z#&UPHsHEmym3sA+4L~lonDFZ*wwNXAI|lj@Y%z;ri^(@5A#<?BERL-$MkgCa@xKhQ
zu*Gcfo3CcC$98LL%vMmM#$z5o6^LgTg~6V?S7TbmYnios%zU1!Lzjsg^mTBMfd209
zL<j+R4dypAA<*;DY2$nFUYu+J{kA*dSS9;cPIM8L!4;L9GoqDTutT-QE~f53LOuj4
zdSRzyk`H;d$Z{@cR{A_W2l%SZMsE_jb1F$04<%`lHGzEtJiwCK`{jzYp~&yGj+AQA
z&(OlMF4S8mlQ776AEb#Y`4W0d=XPihxM^-TFNf+DR(cBcL#*)=kO7tW{FM3JU_8Kt
z!6KEa*b#wJs>padyQu=`G&25)?zI`WqQ#E0F#z|-&~<TovM%@Hb_G1|u=wa?oZy3G
z(MZaw=wXbPTNvWha2?_G+G;_^ajR;!SyyDi8fC%fj+?7yllEZS1%NR|&efKn>lUE`
zJL`=C`}^)slAAPz^S55^&!sPldSil}*d&RV%p%Z~Pq8B#oXBWCa(I%3sAat|1F7j@
z6^&2d=<|3sMl&Z^OtQ%t5t*p1J>f<lmlY4W>^*D5-ct>^m7dpOs7V(!_C5P_A3+a!
z1%{q@5Y;yHboCONOGd_bu``=>#b!AJ96TSt2{o=ONuGsnG_zjz@wyw0I=LGK>eW(c
zI3NUEr|FjJBKys{f~qYH;M_Fj<90{n0^{!sw9&lSUHkY=Pi4*~wB9?=6jDFL5i&X_
z-gTZ|CaUkN%52s5e8)_ael)Qlq-HyLai_gBgpOOJcgKc_maLX-9XEtGnjgO;&%D$x
zYVQ3s$Bd3#mMRx9nb?Ge?aqguTa?_m1mjQ5$GM5tV#`==(>Ci_r-<!TqhHDD;_@e)
zq#lPVoqc3lb;Tdn_q9J86^V+#=nV>t0^@dft#N~RdlFac3*=GP9P|M6ro<LhML0Fl
zx@tBWfd2Tgx2?E65INVn22a#R-xL3VvtG02&xV{$V0t)E(GXg18*2u%v1Sn@^e+HM
z**Mx6P&SP<aaI^o7vm5bJcjP6jy!HGv&}WNO(YD1dh&7km#=EyhAp<=v5HKyMXz1u
zo-K6yf7tjosu6_#-KD^vpw;BTwpkc9jURyp;yxF2o4v{MSvZ#FaxF)<S?`9aPMh^X
z7ro!|et}xya47Pd`6ku*eQ@diE^cDYwUzfW!aaFFk8n`lk2-0HO9pYj3r(aa==IRu
zw-orJ3pG`dg{d_q#%pXBXCjvb=<cz$61fW5I%+OM4`9ZF-Qoey6}Z8ORNJnyDq04l
z9;}yutndOCvQ+c{H2Jdt%64iv;92HP%)l3IC*fH^Y$xlP!8Il$4+bxN%AxHxG0t&E
zMwRp|W(u}(eTpr~p&hiJTnz+?&m#t9ptWh|=Skw;NEdhPVwX5LZ;iKU2;a)=;+|aF
zDmD$K@Tt4RXflwzy0eSBZw*g1QgS5lb#b>WafMi$dtlpwEdQVu9k${H$!T5Of9pKP
z4?qWPs*FFeM$Wn%13xsHSV7qb5}1X8^Rm;;_cra`lviW+(H2nu4Q<NfXVIn_Ea(m-
zlBk_-2V5C6s@?e$zfY%?*=rBSHu6@&xj3sCp0<r7-;&ERwvoc0bbUrNd8M*9V=al9
zgZ7UOKVkpquo3o;X|4@2EEEX)$AR^i^Mx}S4mc+zXVxANt4AD_NYFV`Ky2m+V433D
z-Z=u0@#k8sCAV?mYjBaT_p+0)C^ERd*PkJNa%rzWJ^bXVUVpy-53Q{zu@~-Vbk^x^
zQLs67CzKK+>Qc9r7~QCa>IEp84%%&Yo|ad8YP)lcUn0eL4nOhQ?O|0lpCe|jS^J1q
zhCpaS#-EsZHBy{7mH0R@mD=BV>i76gC-!GPa#Yg&@rGoBB9(fUrYiMocjETU$85DJ
z^O2+0Wo64zpUNaoS1Z#WjcRE+EJF_}5>^)u$b5Ag272Db?vE;b#A~-=Zhb1OzQLiO
z_95zl9L|=r?{H?Y0-LQRGhsb3ZfSh}^sqX{CG`$xw_t`#T}=LUeD=@G=!0?ZL9{WT
zVmqp0-B*<M!Kr2KV;(5f9zbX7^?eh+1Q5DC-Dd5Bc;;y$ln)5ueMlUPQ~9<TP}I#1
z{GXZu2@>^8m09~JX`X3I!&RUe!=O+-dvj`a5wpS&6mJG!UI4Z15l=MN8oe~Nx_F6I
z`{<dXQ4Fg;ph9J^1A5f0Nb=M^3PqqJJU;*;tk!vc_y`y6-B^wQX$Hqvhy%Bq9?f1)
zKj>LZH0j*s)E$9BYMWSBB;*kbt6dKi{}e%peR-?h&R#4`pW;68A>_|>Q4#tm6iyAw
zxqL@%(YZPV*sORFGaMN@J-IlmTU~f6{@|Fx8?W&|>yZ~u-8LO4Zz~19!7hSYfRAjn
z%4I?G!TN`tev^tmW*ni;J#b+vr7i;Dsd6^BdgmH+uINLmkMeob=FGZE=4gG!<WWsX
zHEZ|VZcDk%&cW^*&9h&90xN=8eke5vYtkO*U3zNY!*fpW<KGAPcL4tm;@=_sJB)w*
z_;&>Vj^f`j{5$ULsr?XtPrTPti>+FSm*t3cn1fY2P{VK<<=cOK0R6Yn=MjCpA@%5c
z^!Vi6wD-hr*vT_IBwmxkpb9J1Lyx95<z|Zh66$JKC{QCJP*t(BIcD#`7Lc%AUf8{g
zGF7jKxZM4X-isfq_J^WxcfiX*pY8MDy$<?3c)x=_4?gIq4s5DDU{wcXJU`e`J$zH`
zp^oa{rrN_D)fm?Mt?G~->N~1O;zYcodKAuhJF5M308s6hqz^l);Sb;hd}7O|i)*jm
zkRd&BH5!)ZRYGT+mD+{6+TUMfgThQp=;l&@bVvUGqI;62oBOS6K{XzWa;7o8UKIQD
z4Su-f#WIL*ypv-3dsZ)9hkEpAxs>`@_5RpVUvsdFTZlZ-x5lr`{jj43EbE7rug%<=
zd@{FY5Sd$pCON+SZNIrEuSU1ahjtJRaw4xjpdFpS&K}bkkJ?w!HVh;6cn}PNK5zCp
z$D59Rn%=56;MyHWUQ0&Sxc6cVxbPri7U!DlbG^8GYF?Y`pKl6`?xx&K6_Eilg*B=`
zI?UtQ6YQyaa?4Tg;X_VmIoZwX#xbU^i-Ubwy_yDFrk)olttS{7Ul=Uy^Y{qm6j!1i
zPD7`nrRp25ujwl8`kJX)@a3rCG47}LH?vX|m8@p-XSH8ysjXFfF7_fztjo^z#^<Bh
z8N0Ekimg8vrn4h;;n*jNNJ6uMz9dt&X9><HD_Ad_qv{x#y6Iu7LC42>0t<C<EnjhV
zTEg=Iw$#5~Il$JzIsbFpJY>!RH-m{P_k5n~9l&w~=YYRQ?{R8N8FbF{R^aYsfmyh_
z78A;_r|`R_o52aY@T-cEY0C=;_4@YUm!l+n2wd!hUPp*uy}o_vxOWiZ7wohzao|c2
z;#aS)G#xh`A%6AxR66hebf_;KI)D(raQ{D@w?CbF93g)7`U2@xZ#v{hh+l9wkd6zb
zLq!PjtJgOZzYs;ZCD>}$QVx#nc2Hj^=Hx;SsYzfd*1=Xe3$^mM@K3C{1TMBZt(7J4
zo?chNlmF{+P+YIB#xIpVNRPhNs4kUHSX>MF(I;_v7rApH3!qz?z@U}4g@1@(k{}ps
zBhY}+--|sEZh{gvcMJb4RR^zRA;2n45Pb{wA*^BK<JJTQfRlfS^LaqRd6C*Fe?#g?
z{H<4yOMdtZkZjRsWp8awVACKk|1i%zlE<rP@n5etN*-7cF*zst5-z8MmYm33tB?WE
z#y?BdRRRavBsuz)O+T9iF#NMrl{+x}1fSrpoq@<C_;lBB{IgUIbKoR7`j&mGATvJ6
z8TbV979F+JJhUuz`*d|rxikSZ0ni&3V37*9!RYH^I`M`zfn@^v48VHTC(^J5fW^Wi
z$6Q&oOx=sqblOQsp5Gw_`_LS-xu}bBD{3PKoUSGG#P%1-abrPmtpYH76XgZlT4ZfS
zy>~QBop<z-)|T9=$O0%8w$@Za7tQWv_R3jAbR4veW+mkkZsN?!G6WJA0s&~Jj`~u-
zV|&T&%Jb$x7yAZuA@DuvH`h*2i~?vEdqg_Un@FKXu<M5mT+{-U2yP-5pb-6TRIvRm
zF0`<2x&iFC3~G^cajFaN<Lu!kG;92;RZkq!?_;8NE545Bp@J<4Y;q&?8FO8Lx?62}
zN##qh?Q=k%_$+>SPhN(S=y`yzsN~=hoo=f#9!9lP6;5eTB~jM?jP=Y**VC{29p;9x
z=wmCIz0oQVd?pCqxP$~-b)_J8Wod@i1mm-4B|Yy$6cTT8({hM+rlLP-Dp3~^az_^j
zFerk4r{Bdg%lS>VHha<b(wgXP$8w{i*fPz2sD3FBiTCj9=&KX&;KP3EvF&YyAqNC%
z$}`?Xjh3keU?8X3?&$JZZ=UfdiM;(h4Dr3jU*sbnA5gk3Q@4UD%+RA@a_D&zFVAC+
z>==a02$SZ`jTB*PVkq*+B@6WL$p@eFjKT}G0{3@7p-VdxD&w38-pUi2lLgE_7Etc|
zvD%`%WHr_zUZc@Qa9<ihr653G3Xl`YF_gzs<M2wYr~v=Qxgfn3goBMm9fRi0jRqE?
zB8g{!0r}gygKdu?D418PO3ccDGb^<+cR$BvDsw68`oIHveOr~wnJRPOady3m=(Q~P
zT4-F8T`!n+LQk!}N0ln>-Qlc5N&q3ricZ$y{%m+GclcCiWQ6>k8yP{G5fS}|j)>-g
z$s*kCBYEyvi-p#tJa~}Ux&4@@ivu30xZ2>OgzC>YN{3`|DuZP0(eGw#;V0-w!qyJm
zG@o{M(WyGaV;_}a<4&qdp`?RIwfxeIZ1$#noH@JrLp`*pJ9*RqHS;ZQ>4@L-x@?DB
z=k0J3d5o`A*M_E{4IEEz8_+Y1H{1+KG$9K2k#*nA>ag;%AUf<$=(YZ7hYfXBtn{Li
z>}&_|Z-g=Qq5*vyPEp@Q#ez^iZ+wfy;7w#)NLU;&7awR(1;4;91bJyxe?>qHC9qT-
z(Wov0WsT~$cBH@JSaYs<47ZdIbaB>CJzB&jXevP-yt{!Ivy(BsRkWYX@vJy7<4w;>
zDDMO9sg^B?7}4PV6YT^-k<mI(!s}6tfqHET0H{Taj&p!U7_(TFOc(TTL^_7q<`Kqc
z2c%GeIo3uR9UQ-Q(g`t;wy{ghaWRl?R3wiRdw*W@utqgSe?deBH>$;U5-w5~*1K!D
zbrL!y?vrIjK8eVzs-q`LCYuF#<G?1krA+jLEw+Ae3SG8Mz@Z};oO3hA*%8Kr1L`C2
zR|q!i^3a)!0_JWWdO>YCtJ|(-WVl^B7`o+D!G4k66U*5UiVjDTBhaQAq6$;XTts=A
z(+9{%!&;T*m4(c~H<T)>{TO>c$2Rn-W2w{(+$84xJNqppH*6_kCt05>#?<P2=dgyw
z{jA`(yX65?u}8G?(TdI}0iZe`=eXb(mxt)BQm#G|Fbf&Shg$Go{E{NGgG9tTit%f9
zun_ZV_UPC;IEM)IR)@L(r|;=hhaNy!^9k4H!hznZf^Q;*&Lp*fK8^RR2DZ}1wUP}t
z3vLhLJ(~%{)+yn45zc~^1uOe?X07YITO)Qg^rwO4h#14r1hvpm?xsvo3^5nh7Pr38
zYOM$j-g&qOErItWaD9h?)))Pk(|+}1#+0h;eoH+&fB=L0Oz=6=`l2@(Lc6uTSc(Ir
z-uVUhBc+~aNk1lw)N+uHFLNWmaG-#mf)kK_{+R`zqFlg1Kp|~-AHCvsjv3?8&krJE
znDh+T(qdppZs?N58zw@ORj~?h&dLCK5JTxOd2-IG3gAiJWCNAxlRSOf`#pMfD(})X
zkLrXhO}9q+IF?FO%ij?*T3&y|S*RC=H`byMOG1A#t{zZn9x?>m=~Gy)O|1cSLvbOP
zcg=P>kslXJi)-Qh)S8deQur;$O=0-NF5>fKwFeSp8E8ibj|O8e!WRhOio_uw&VBk)
zw|b3DEHyo@yco8*g|SK|PpqZVafu%RTc>6ph?xRUIg7x*nk@d|DJ8scn}`7v=O8x!
zrs7=n67n#d#Y0j=4j$n70I<pIRy2T%g~$i4m7c`Mk+By`$VICP7EA}U@Azj1@Nij1
zCi=#?WI`5{2T~E75+4Yw?~cz-O5sJQv@C6MCptzaph@=fTHgno6>KX;!-lOlmsSK_
zTyZ9<@u~yhz)(a{99t{Sjs`kYbX$hE?aq!Iq=+u=>+o=S@+-jb3g(3Vv2eVzpvF@Y
z9S_((9L9Cz65tUHAW4zGp!HhmD4p*Fq8H)VPJiEpZ}76AFSu=Fmqrzav04-0Ghop-
zlUK3*gWEjr^2WHzi<Ha7PmmG$t1c@tHCcEPUQDD}c;Q_eFg!AUKy;8eRYzY-UIsqY
zU{!B5^g{`&R!nzxOlQ;Pr+E~d^<o{7VB_W3D{)-Ii`_wEkT;=7PrQpC;6S7`82trj
zzK=G|R_{UkiN{a4K{s)8tqka$QIv5UCiP+>GDJOoF}7H|hbD~!L?+I+ufo_Nt4ytX
z;2_jHe>#5gN6bMmwCG4|&ly?7X{vXAnf{uo|CI0#%8u<QF_&;aLSrO$=b^7qBi-lL
z*n>HE%pO|dKE6UXl<g}G7ddFmoX?eXpPF9hFlPkoQ(Z*ti93J}W5jG5C@&3!KHYEA
zmAH~+8W-3wZ-P4<<+`IGjffiPM47-;+b~bMU<42NoRbI$%px1+t1cK4B&<j%aH7+=
z+=jW`1w%aaj-Hd)B`{aoFjqJ*!S*(!rgz3Akk{M2&s+ttjJ=sXB=c;2ag)bjqOlS`
z>L6&-S-G6T2>y|IM;JFEQ`Yvbq2IhZAjiXUk9Pyo$@W5_j@zYiuz-Y#LRgJlfHgM-
zWhNvkaTrx<@*8b7{GXAiH#{01O2oHo01x!lWrXh~e7+I4;U9P4gYERn%iU<Y9270(
zz(WZ3xwvFnWXqj#FR4$D&e+}H7FabN=BU!+K}#K+dj#9A1;Umw82W?vybaFM<^Jb+
zUYn>vLaZMzb92dqcXj*yk>$>wDAr#R`BdU30E7Sf9JExhZ6iKf##FZAPb4f87M_+s
zPSG4!=3p+3+|UA#zF3PymM8CIKJ=34t#U)m*h*Sm-4}IWA4)ulANF1L{Q~3A$xtkU
z^UZw#<k%%}AFDnI8w&$ma#g1dvxYDZccdTa%cOw0tg~sb@g=0QZ7a|)x~<C7d>@QE
zE{LYQR{@;~uG-8WVSLk#7t#7baZJWDaU{={8b)0RX530l>=!jp&^t#XQh@EFoCFdp
zj^9$r2|PRCw$hc@L{{J&q6({2e;0M2)UT9el#fo&2)3EP1IIBHw}+b7#OFPZFU-G-
z`%|}0$J6RXs&J~)!^85u7ze`eh;A*26`2cuT4dE1Y=1k~Y``tMerrA+L>O0;s-YK}
z*d2kK$QWQTUUhSsyd6Z|qJzYG;dTG^P|Fv&G77fS`u$1jpkkGxN{!TXT6wU%_e9HV
zdR7&wyQVngjJNWz_=HU1u}9(y7vV2#{qmCeoj3s4Ssc3{C%O$eImF}bOHQ06fR=ah
z7KeI06dcW^>@$t&)Ole7#WRC281H$8LxRh|vi%b%6H8AJjDYzD9`nS0XLU{;U-di+
z$MGHcP-{%#JnORVp4?d{@k3<FtHzY~kKne^uGzDsC!Z+5Go20o0Q0qj%X~&h`}AB_
zDXX1SWMU`gy1vvJuZm2zITCE^f=pN!!KUU<hHMtgFOnSq)yL+m<{W((V^;E84TfNv
z3;pJG0sBHVZb^e7cn%Rg5A~{~+U-<wwa`zY>a&F^qp*fy0O$<1aV26#_eyO`2XJ93
z`Sd^JLwar41i6pyrFQhz5}O6~h^{bZUuG@i`$E=&yCJ7vElMp6SyvRq3%Jz9Q-ToG
zxri&k<!9WP1dfxWG;t2Z5gNe6>G+Fsl!5bE7+75qihBi#dF32p<uL38L}!-hUWYM8
z%kE6H5w0()UrllZcbo_=rWn3b3Y%qHYPoJm%k2*I>Yit2*Ff^p#@^9Ft=Gp$mLtxf
z6EAZP1>A*%!%EP0_S#;_!48|8-{XNealCP=cF?{zvgC18mOR>CI5P5>XUn79C+IWZ
z6x5RkG;zuQ6fbPWu<DHXsG}Nc)S_yMm8egry*I-(`jzw05<Oi!jWNsM788H9l9T7t
z+nHF0M?SVn00)D|@m}62HXhYw1#~Q;Ex(83Zl=J55<i6I%QntUbRi6$HV@$GP3Y`2
zaoYzrlexjRwFF%8j<w>Q|93oIq5hxYwidqwKEnp99W_nQaEb3gL5uNUapm7mM{a;K
z7b`sY_(L|uLDU|8jNgz>{J-Az#*a`&qcSgW`pS^li&cq@Ql{~9N&9p<EgyTcq|w>r
zGqy>}&n1Pct1|n33=f54J-$X&fOd}Un>4sr=HLFD$gD<V7pp_m=y&%1DPDU3D(ZKE
z2d}{iC@u?Jv+>1NK*`Mvc612fA93c1Lj@lF@lb((9YwuTRdbOD_f*k$RJjD<Aa5TW
zgqrI@iQ3~FOZtrQC_4#T>_#JjP=@)_kWPOKFNk_m&S0?A?~=oyZoJC51a<=zVeW;g
zWQC3(`f0k|o8;MT?$~}*t7|tN<yxniJM~Fc&c+?0WR<v<{fHZCE$H-G;R0ON^_jb&
zTcNUJC>$1BRo*J<pJGSz>~FvQ?TP+QZi_s-6ZtkCMHMb;_EA~YiJdi2ZiONMpx`6+
zt8!o@XIQ+)xfSQns(LKXZvzYD{B|tXGtMEC*58&QORw)0O#H8K5yLD7Luxp-O<Ncr
zmT!a2ppGCi0}TzjfIdIe1~p2sKnkmuoo~!acJ58g{Umbh14XXY@ZQTW5DUFeruYXC
zp>eKpa5Q<sYBWA*i$!v1;4k->;oCB=lW$x1V~`d~xsbaZPSXgcE_V<>I|ds&V(2j?
ziB{tEbi^}cX`?zF38D{!tKDbZhy+wuU5GycK#;9hOW0~c%Tx-{V>Ni~gmQeUdi<w@
zvk7)_mpdO&zk#OA7byIe^F{lG+i}G|j)+X9{jI3<h7oX}wp5MDfMSur+Pdg$bkq5N
zK&Oi=4kDVpWiI4Pb#5veR1tEc|6;g>lT;w4eFClYgKbwK4)f~b<6O~22XDM1luAL;
zhseq(=|lbT{$ZK}xB>)k0lKVRgEPFxiV%BeC^O&y5f@#LTVdMtO-4g}i%@nO3)Fra
z%JxyTAN>kf*N~$OIVLT&oB5N-CXElzHYqrrz?~G%<=Y7D=8e>DE^3V$SQi(?=gBgH
z4O)8~8d9mtAnZl+VlU>}m5d+^>pGNZ_q!GY{SS{)H%~)1#{#ywkaZk^t_3SRF?&e8
z1dJPB>_*|q3jmD2&3-+ECC`i<4K@#oy?8y}AwfTH9=h?x2M9>}U@U2wR>gBSjI0?(
zF4H_Lz}76y9gu_@SiAg(c?MJ!nG(Mnf4jp=)d?&^gc-d1_m=YkdB>8h5Vhj%aNRrh
zBQaTs_N+Y~{CQO<Y)3zhXr~zVCMwybH{FQx1v6&(uxfO^8pG-m7iI7#fRci?Kz)ss
z!+U-9=VpAWt$-%e(FjoU9B+RX_t-G!W$J5{%NqMo<dbEufiG4ei#PY2#ev4GeaC8s
zv6`cAv1;F$v0FB)t0%aHxE_UMFrqk|%-QvrlVOTqj*-5lOW1gn1*{(BM#Be#Nvlm!
zu<cpYfHbWvuo^=ZFGuEWm>Zu*#WZ~BN6wdX)GI_7Yz-G9)z@(b+q>X=QSzWGVcS(x
zu`<;1>kNTVMnZCRJ0FJ%NBB(pM}Ni2f@YZZqfCRMWY@v(zz}~}J?ngOWEAWLEqgSm
z?${ij)J3Q`D<i%=F*ByL;x5sGjspA{YDD1i-Wobto^^GgUek3W3ULHO1PR6zVON}E
zqp&N4*}M}40u8Tv(L2|HFY+5LerpN6qwdESbj;GOf7tj}^1ZAZ?dr6uT%cZ%o39)8
zYPs!%hja)BU9MV<Qc;nAMet9t8yiUQw_R~yRz@nOWF>H1655BSR->BRu_a3ez$5wk
z2EL?$&^$a*mflf^{1Ry&(IZVWx)6+(3XFC&2y5{ua<DmE{ooF)Xsz<S5O<g+G-tJm
zGts``6wdzrlJfySvtgB&`NG_>#QEZ6vKq6?JJ_rUh0OU?C)J*u*<Na*P*g0PqTR*a
z2{Z}fEO!kgrBm+u+-6C&%|54Bmi@+B=iRg?-Ga}tXYR3kW}}wE&$AFdy_3NW24v>z
zZ@DR?4$$UuNL*T<vX=_Vn}IS*9!O%aje`%6Yw4|a(6RPk!-pdo>@wVh&S|<~sp89I
zxMMerO^QwG*AA}>gqNr<IC(MkhE=Qcg`tl2JWU^8s@5W(5GyN<l^F<ou+{Z{RO*k!
zEMoO?;(Kg*8R-U$LsG*woe7V#W4)1zUYKE^@trDXy|mCFg6pNfps9o+_v))s&=gx@
z8r7bPTo{8fQRLjz&*l7aVNp1>CZvi06#pvEBCT)pXbr?-pc_`dG_|Hc9YYz25GBWs
z3>E0%9jKg5U$BiTI%7LxH1n^*r^9bO=wRSS55d^q_H#gW!j&8<hE7+p$Qx`IkNRuT
zCexd2{;4r;44C|?0;yG42JJyK&kfVv@E^dIE{U@pdat;)$}AmGN(#P=bho|7g_m8{
zUfZ0Hx0^xGQbj+y$$6c~W8q%Hah}VCr9;EVVV!ZOd#F#I$Meer7IHYbO@wV3_9vf5
ze|CEDB3HtIVc~0_D1OtPw0#9nJhdtedb^IiO`e+hm&A@@05Nx`&uVej)KMGQlv~YB
z0nfRS1>ZY1jhIiXUc5_)jfNfH5IB{a==s``S3^4c9^k;X=C6LB$>6Z}7vlfoee>0H
zhlk5jSdiz{#45%1F>)GpX{Vvi(4$#}kBl4S@9=&O>7q<aCIg)v`J3|UYN%Q}Xzq1(
zB!DNK4QPo#>_|)V5Nxmd{ef204Huhq1>G<kkF<i7YX)uFo#dU1jYqhOTNCQZ-Dtzp
zDSGlk#;0=D6!qk`x#Ecr>7nGrp4?5Rh_};=vdXpJXQLT2gowtR%hYyUX2xOnj1SD;
z&kz3WCGo^Ah5_*W^{NJ1qGnQ|B^ltds8QXIJQ$iQqM_A+&fw4TJ-u}ZuQ{ke%>KiB
z1w&Zf2tdc8m%QQ8VqnX?mt!$hxEa4q9`)y0Ft44BFuV`r7aYM5ds#ZPC>;tT#4qIe
zG4ouBaIbH9I{lV($Vi7)A;d5E<w?h7a$KK|o0kq{XsAlZMeL9oaW=|bfG;(Op&J?c
z@GOMZBGeR8V@cO~gnNCh_+?$x2C!~R8`C}NNEyPLB>nStx-lDlRq;5=_Ma?sD;}gm
zx_W#l*-qxD(|{VCJXT2-<V5%uU?GFBA?2T?>b)5Rz=5Iw@SQ3$Nc|l}@=Ys4!}1T_
zzj9#tDQ{YlXte{dsdCb)UPk?3uFc>hh_z|Ue$xtD2t4iw5P8$;^R;eGcXY5$xk%ov
z`qIEOa*kskbY+{FhRNG@K;e4RicHPCX~n*au2oLP!F^3u=Z!B<g|VX&avuh{T?DG~
z?A^k@wBsM}wh9h<H{eWMoSoi}@}Wf83`lwOlPdX=)@InIj%#hst%?*h8ZWy+5`P4(
zxGW5K^)%Yn+}WsBfLUgq?FE{x1Vv2<pX88z9XWYPMJ0I!8(i%rI$41}Ur|X;NE~La
zoa8i#W5p#7^O&{`0<J2J3;Q>kUghE*YK@<H@Bu>`+<|zgD(VZg(#(^tY674ka*i%D
za=I=jG6{|WfE!0E<&;m{d2YiW^#zJBLn#qkhh2KCa>fkwT-eGMd7A0WG$&eU)!}Y&
zWO!^X-YfTe)`sLQnWiGRfl^0LBU>!oCWjd+{$H#WT(n}l6bdc8f#Zil%UWD)Udq!R
ztKm3MdZJ-GhYBKimpg!p<s>h{+cpk=c;t)MK**m$hd%+~5B)=;@ueo$&!qkgEcRlq
z$5fQ%dsOb5K!gUkA01;H$h5DC!#x~!@f_2>yo~8;taEpHD6ksEb<q92&Y6z12*v(w
z?4z)Wx9Rn7W8X`jfp4MJiw9gLFEuVkP8>jPMw*l(xws-}=!Z36<_(v-GjORr_C;j-
z4VT9B8!nfLAyBeb--oS=F2b^V&emTdt4)+|Yd1c^#&d3L@F?1-I<N<kXH0k)m?%S4
zJe3g;l{gbY-bvOba3hQp%$k?!8}u;>8~&{9?}5>ph7b&Sd6#*jHk}K$^XwMozz_~i
zpPH4}g>UL$0v#S+eDcVxoew+a%j2>0`FQNIC5>u727?TBUy?jF6Xxj0P8t_xlO?6z
zrb~@h!9X@w7ioEB^wX!{<(j^-=;b>9s#E1Z*EaYI8Izgpj0nkbz{e}VAY0?}hB*bk
z4Q=bd`$4l_v&V&l5JUS(1NO7ktL^yr5YI7st>26Bp-TF%Rd_u>JmG+~$UAhA-(2Li
z*1`-k%1~^lH#ut~mjyX%0<FKQk|-bE0zw?u3W#f!xP0gUTYuFpVLu$@vD7sk8!M~u
zmyoN6KLZ?j+oZz;%tQRj-Nrt$v697Wn2j$YqC3{(mHnc8wZ?jK^<-phxyzHIuHcE5
zOioQ_sJnd5M|{C~<MVtRZNqA28l;QG=lNJbSQR3g+d0V$-z|t#zr{ddW6M#y(;r3y
z{!{Oyzn7`K2qUv-j65)kvXKzKdJ1W@Ps@s2Cm9?SQ-PC4Qk2CEBRjL=F4gc(Tr1(u
zN1WYorDy5}4QSQ|@1pt*{ohU=i)6l0aWAsrv6K_joN8eUr~2>(%?U>6X*u0|U$_d^
z2_u{5SLU=LFt(DBktxYpc6K~5aW;+$k`puEKLUp2@XYsfg3)Q`;N5WYX0y?r1HT42
z>-BY#8vKWaJBKIr<s5XZJcC1%x*K7Quqj7v%gd<M_4>KiUm@8eE4B~|EH@&hEkpR!
z$FL;*7{jUq=2o+89%5y)4k)10w^8P*Pi1}QscZCi*ywQgJxA{!+rI$QyUvV-J6=5q
zs~O0Fy+CS~`aV`G+!fq`$pSqi*tVU6@8WKA@l$xJjYQqjG6Zwc=)|`;e$mWCc4i6L
zARV&SggT$BLVaT=s#<c*4|FjmUeLKHP!(3&b8(voSAlg|FQY6CfQ2q%)lZN-;|-hy
zv>$5uMM4foTLSF83uQ*KhEb$ESNOU6+<|?tU5SMOxPpNCDDZ&jmIJL}wH%mG0X&h2
z9J#^ved#7ht?{eproyEVcYB@0#N$EhIvR*=JSKf}$dfYv6@&MP0oZE)lkC3e_fT2-
zM2oG9exe)EQn>GleF$!B2@t;7Z|)6v2k%LG%{_znhShT(lmIGs`70%Pgw7pS^Fc^5
zD6&m)4yy+M$u$jb*M^!e!mW?USls1_lyc9gGm-u~0hN|nd>@6aMOtR@JsM~^ufoD0
z*j|h3#cz5vy-yr)&+jkjcpv#@3gF=j?CeJMO6ml$qVXq~J7;`Q->8?<!*FiZ6XVL7
z8-Dm}x8o0<5O6-Z@?FTG%x1p?q0aLyJX12L8dv8}L=OVnuzqVj&NUbQ)3(G?Hr5c<
zU5v*m+Kl$sHVn1$XY8%)M??!AT4*k{@;&;qd8~Q}LSYIp#0)wZ9)~6GfS&x=@yMXq
zu@jMxC2xYzV~_rR-snx$-c&wzjsG&7JRf;(wnAoKUjC*qGTprWD3-eRM{+FI*7y*Y
z6Ox>&4P44w4hi?2F`Mr+QybTqI<LtSuYvaM88Edm^;1?)y$WLO9N-P@!vQ<OPW&qp
z^YS23uscuh=T8AsudbW`X<KpJ>F@SF@FB>TS@;Nk75w?9wtSNz>Jhg*z|dzIdXS;7
z!A4`tqYT}{&|?g>Gqe?<SS3?%&jSyLB9I&Padg5&!^BiM<5J}WF+7W8-M|9jDA4y5
z{$|=Wdv8;M1h~gpj(&hW%3Ng3Sn))CNV$-<6II#qgSSeT)ccw`rk!eEvz3!@W?w^o
z-E7qixf%X$BZUunaKYeG(&_2abV9su-o9>#r^$l>Qn;}OCk|{XPuPyQnGwg?c6LMq
zA~0kT$nV6>C(wy_%@8M|3=yt2frHx>{_b@iS3$#>#a+;cSoCBSv>y>DC|-ZkmW=x`
zq4rr>DD~58s?04?4r-L^D(Jh!3)*rW+U{khdhft}UK(j6gOq)iq-XfEjM$E2?c^}5
z4iRbjl=3scXGlq&e_GOzOi7Rhloi{5CAXrog~Y{gdl%U<pvkz4oFco(V%bHGZZv-8
z21(onA>bI08^uF>dvWfZ6CH27N{}48;c>|r(U{RNhWTZH$5oW(X+5=%<lby<_)$|y
zV|>LU@!ChjYT~gIsh-+B@MQN*bQ!*LflfNTr}mXR^XR6A-*P|Luvg$;;ft^8??(xL
z9PnPi$8UN-24bn3+>^*`kWkI-Cp>&?W30J%8c4~y95v`-SRw>r8@+lwUfPX}HfAFt
zEw~9Dxq@fBCIF%SKkhWt$lhMzh2Ao~y^53>odaNGi({|-eR4^NwwhHMK3dJ^eTU&G
zO7!Cd&sWVuSHy64s%;<F2P^teHrsjj<1((yhwT9-142Yq;%S1wZa?#O<zp;6FVpGd
zJ%tW{Nok?zTG?gHg7XWH`TnMcgAU$51267am`64(K7KRy$Tyn}Cuj?zN+3C?CtrHx
z=7D>jK6}seUJ~~@I5z(?hZ4)+F(bkIiJ;N0|N4q3A9{Rs0GUG7SbOg>!gy~02Q|5^
zJE~k1pQkB?1mxa~j5nK$HNl_7Qp2k4_w<7@d7QAJzv+Zrl(6?t!FEcmreo42+3fmn
z(D5HoY=U!i7m`KCyP$6%9mi>o<FI@+F3LC;9b`<w8&~M-oKCP=%ZE}L9Y^)|bFvS0
zQ9Q6f7zH;aKB&QoNbN>dvAD8_s3|0bZZn`=u023)G8}UpwBKetWc!IYoG!o{UvZ#b
zeGTY!l#S&PUf(GfS$hdVA}szdBCJ=Jy08g~m4Z#?K}-z)Cbka`XJ``?A;Bi&@l_I(
zGA>6@wqycRB?)ArsziQkMPHVW^^N=6(D-`jd!_=dpYcmdeL=_*ozm039xT9SIS{{}
zp?LcS{DxKY!4tSJ-->1x(?k6(%y(BIO$HvwIL00>%H{(ta`Sri*<<Z@@a#8ZqJGiE
z_sivzYEMZdL>>LmI>*vA+6NmyV5B2Cm`T9gj_|I_Duw3z<{@1Chy<z^iu=SGAo&Nk
z6I|zY1kT^I_&|^M{G7xVeB#U`uXaBV5GHxxOcb|SQ?u_sFnSQ|%VywE6x|vNzt40m
zKCmfpKBf+r_iVHG@T=HLz(ORx5Jy@67)2TP_vB3DzW-Q$bVAo7VR>fPobTy+6hU*o
zuj?`SI~YFdYW-EqV3qLA1C(7bqF;^0HOl1a9ILu<0ei*%WIn>?isNvnawZOXVM>1w
zF3P4fEy$m3k1RSb+()}`YV;ONM<vml>7($2*v?$&e&A!dUX4Ie=!NJh##WF~ulmqh
z9{5l7w_Y$M>ZvhyN$j17HGAU=3&LtV>(o<^0kYrdL1Lq-L?Q(#dR#Rj5mjwe^JQw;
zpI+nJdc?(k*xBfta<tSev&wnAf{Q-EpLy?sCNTJ)-uw0fsb}YWx|EL{ov<2b@Vq9L
zLyN=TnR}m^gz(o6r|@Doj$X8e5Aq{(GIU^L%@3@Pao@dfB;7Rp0l#dnL(z9L>(~LX
z&>?_>_3B5bf~CY)cB5BVgSN<@HFzX7!Zn^<&RXP3-Cm&93XUeh!8e)T<hJM<d@fTB
z_;s|ZT(4~0UxGzoy;ZmicvH89tV;s$_VO%VhN><K<NgHvnC6{{pb=gICu{fb!)R5n
z_VUf{^1bYzKH!60Dt@={+q(aCK-lXm-Cw%)UBOW=*cQYjLW4hTxDbx{nBY~fj-Xr~
z5HLz6F8iDwt6a4N>yXIAuIr270)>FRK8cbZaX?<a!<{)MFvEVUyljjd_rGnoP#j{}
z?8o8kY{)3iL*5IalsvtUf<hQieAfhMc77F0hoX9+-+oVucIPiP1ynaPZ0{ml;Lg&-
z1*7BU65N5}k~zm*Bv;mXd-|TlE#Nk2(U3)+a6ywtO%dBMZ{m9dhFu;BWkzL!b4__F
zSEtj!6H60=Kk9Op*n=Li%L|$XA6~>T_s-~pR(1xi)xrSyL?64zesoC8BTLcW({GxI
zvB$M}sfrI)4{2SO8WL=S`%t`VHsdfRuvqt@ir(f&HtOQgTj2XgN{bht50OlM3G2TN
z`*WfbDn5vgZB%7Q!^UD(M@?$pkcfBQu&Dpip1hoj57zw6xE^xQs1Ch{b(^;=r)wYh
z(}-&tI7!~a;|=%wK)U@i4Pvh7$7vr7qJwP;Is~jcI2=sFSuiA{W2I-)ioVuk>w;}x
z1*2MzO%As41iSUvwCJ3U%X5R<UJ|qJo2`QIp&oBE+Ir-=$g0*OXGcD@X}5R#JkRP+
z9P05$SK{N3_-JfB(i~aRx}mQ$aw&e#jMU=ytjI;dZ4G@{c+Nunb&=EYdv;`UM{S>=
zDk7>;{35O)NNf(a{{YnBWSRm{*D<>F=(_0X(0O#^&)X0gys0iFC$jJL)TMId{=oOq
zq=_#4pe<XEPL7P+w8#6pAUk>{tiq3;74<Mju&o&|RwZW>Jo027>KGl|w!>Pn|7I&t
zbLf}e==9d3*F~nb9z8pPhlz!_(T9HNkB-0xX&c;n6r{}s4vno0q2!Y&Q{x$?XQ}xf
zZ*(pZl@n2!jR>eqgY7ZYr=!t>QV%U4+(^O=Bb;But+^4kMtj*M{F>ePe@HJEvzp#k
zglu|SkDgA(Oo>k4w5JY5a>pth;+?I|Ir+i1E$BSL=Jyku5yah+9k7Ftd3e6ZA4TTU
z=sC!lpC)!PvYO9vX7*P5gKZ<z<#IQZeD`ENl|(KF0wn5NEK|+r0OQQ;5&I5{SdIJV
zT@Y;F4nV+z>6+9ZBVZm98jmI(#7AfA(F>xZY!Ex1wkWs<pgrXuy%1iQn>`ms*0dg-
zC&77<TUw8vBf)bbH?$s|Cc$ZuMhBo0B5h}@j8wHAtrUPtHtu9Qcm~8$W4kaiao%YX
zds?Jm-g*hGj|`c&GCBywu7niU;bLiSWHAQG7jVc6KlA1w%))x8gpYb_ML+J3U^-u9
zelTOF35DHvZLo!2^Mf;2_@PUJZm#riSg0-Z_IUHKNh~ngvtfBZ4htcyU<Qs00Ze7H
z_=E&@hu355SqD94g;nouz0)%}S{AQ{h3^5piDC9~_WTZt<Gh)Q1ed9Y@qzIgW2E@B
zk<l0?Q%D?{dGk@m!bm<|dd9BmJMlWKe%>2`d^qWWM`ZZefLprPB4>4?M6rNvR5!D<
z!x;>GA@V>xGMohqmRE4ENh+dWt#sD<oRXmr9sxA@R<7wu=JPHilySd_j)b|1K5c|Q
zxg(GejCa)myhrO<{UWZkwazJxj&EJ-;rS&2eaN?!KZ##Cu)K;Mwl0AyH=I@m>^y_!
zBb=PxX?z?5aac_QKd=DQI7Sf%e-fs~Arvr@w)BYzBB7JckB;YUlGJTpwUaFg>|iLL
z8$BoaDWv<NE!I+R$GA-^4ph695r<!be{@Vc`E#z#O+`it)%1!XFP|mG068}_@%blU
zKRXWA7B*r&If<(ZBaE9tu+a+UbnV8Zk=jE9`gpZBk589v<xk>8{Lm*vJM|3KZQf@-
zhit##@S|NZ>2e1Xo<9k`hfA>bY_I|$k52?_<xc{PhJ6&^Hk}G?DB<{%;8Y}V)~VpQ
z58le3#B>Ml3#Wps1i4%JlOW>--xsss;Oq&s+?y4Ly*b;9%cQORkwZ$!`_)sy4JRCb
z65m8Y0{8W7xRBr*MmYW?*Rag{PX!Yq41bdKgn8gpFdRF#@+Wx?VYZwKhL0w0<xg@b
z#5K4LuQ&(HJm;xbt~c3R3b}Yi4=Gq;d=FTlrqKc+zVl>X*1F#BDUHsovPJ^z{U@Ho
zW{ln%d{68I{L)3?CC09S86BG~oT}s42JX$HgCU35#9=jxKw;tp0vO9dgXrA`uALTj
zT$z_@J$h|qI0oOy;2v+$IXw&VJXDWTVMyBbyLeBM2CIA~)|;@l9q`&TclE2`eKxZ$
z!=N!^cUaw;kMXA$4y2C%MfOv?zcqN7`V7`+7>zK3E>k~w_e9F*1M+2Rj5?88hCx_;
z57~HPSKE(HJ_WYK@WW`W^uo6EwdmK7%XpuB$W1eF;5o2X4q}lNJrkpSX>?knT7#LB
z17LS#wYA(^XN+3P1zkHz^uU9*KY1<g^QhmwkN#WSem&RM7-|>ceC2k3BS&LSyt4d^
z&cdLpy=+9h6}{0Z;#0n`VqG9Qh<d(p$-(&3i(vsW0g=c_>XGzkycwjeV1%c|979+5
z5AB3gHZGU>Py@~h3qh8Gdp})Ru#E<RR)eA&)K&y>KU#eeL}Jz&?E`DKBh9>|K##uI
zx8O({P&wAp0<+<r-s%7s6ELnVmsNUmC}U#F_knS;+^Al}QKz6mZk%3g(A4UXF%gt#
zJRCA#m-Z_<w9^CAVomB)lKOdvFOg3QnUU*B;@{sB5^<O2Uz5mHi%no%!I^c~bIk-|
zd4KPdD70SvkXYawUs<aQ@G?gHroFPIb<agBoL9}EIMb|$k&8Vg!SZ-2+JTnR4S|Xw
z>q}zW;ZWtceGfE@#!8(Fp8;ri*u{7_<GvQ*v$}M$Jl?*FhN#Ji@<+$hm%uro?-y)f
zJv3u?+|Py<r5%vq0kLA-kq)GCY4!Ylq@Zs|?vkzNA*;*_zOAzm3{$jj{WH4;HDub!
z%qu7@g1e-cK7wtP5CweS=n#bPa=}$VN{B8)N#tCk91-b(1xR6U4XRHCtIOI4e2~w?
z@3^jX1}u?J-s^&V%3&~+9H#~Eei*`(Ds3<Lo)355_W!`=e-xqXzmLBU`~1i8m;X)~
zhjhX?{~r4fpZ{O|`=8)<?h=U7ASYVFwwQfiF_cGo;C03g^ylO)Y#aDyiF|_kV1MjR
zw7bt5X(Gs2^kv57;a+zJ$;XAsi63AU*4f2D9TvfWV>gM*5i@mDkP5mAgH-qh9Y*wT
z!^mn1udfD%M7^z1<*83JV}{3?SOHLzu@>~4f{w97Qysw4C~_7K*YFT_wHK?X(#WK(
z9G8J|DBfa?QKXD^P2NzDN84sP6A;?og8EPIpie=Y1r$?-wxJGfZ$rd8sR?{=IxyAZ
z_RK!ngJaPI°e_JKDPFHDRBL=h%c`&jRNsQ0U}4f}GUV~ziC3nvgKR-yJ%Uk!>|
zs+tdhlE_HVgXib)J58t>MuyU%A@&`@*932+aR0s!z2v6|vp{$yIOdNQolH-#?RnG&
z8aoRr4ERs?(;$04eBAI*{nCo(`9R1!yi2|c#&G-ClCQmG_sZy4zIT;L_(2ZY$nHAS
zZn)(6-~~_<rBiKu$JPe0p1TGe*jhD^Kf(4I#%mz>6FCWh?_2GY+b_0k1f~VsE=K*q
zkzv8Mi*)F;U|YEk4G*@TgOEJ$%r@&g&2BR&O>~2ef*m?(@<4b<DP;8Tb_Jx9ABpu(
z4c@&2oJ1$@M|bVqgg*Y00sq`__af~9{B!;eg#B0FZd?wmJI=xD{MGd51@G-nj@IFP
zhKJ~|4`DHSHft4_R2rFx-#`T35d)`-I0Z$Vri(a*w2+fi)k!vlO8iaai7}7ioK56?
zf4pJ8>$NK`*ShxLClJC^O_%C;Z}VF|f7c5f1LVmoXkfv69Lsa5fzh89KjMIEgwapw
zcQyeKpn7!~lyI^niB52hE>r4VLwK?Q{i9y3hN2M~#QSswleO%7=`rnh1G-g`HY%?4
z8X|PYJiHSG>b64opby=X)(zuq0sVtRKKgn4BRF<8+h4#h)s{a+ipY)M@|$tS#-8Rc
z`rT%BDggw5H`u<3-;2B*OFYn_K<yK}Yc*oHKOdjC1tI8c@86BAz3uz)i#aEi{5150
z?Tq7pI{stq&2h%%#R+FV$5Vjk%$M~k00(kiC|}MU{~@-pIO(BRzVARke?N01^L06v
zlyj!w#}2gRVOw2E-~e`e_~YXZ>Tz~_G1pm5>``~pvDEbpJxxN2gKhQc5BSrmOMgrV
zwpFA*e8IMv>5qxQwn^y^sByT7(AXvg+qmV`AA^Ezbn2)-N`h_4^anIIZ=^q<7knxG
zF*w+^EB!G=8(V1vP=Hclr$43!+wM<)4AqYGbxLWlEtXCRMDEnF(;~O(z_5s+1E)o<
z(}CfUMjbdkvRDU#kp((1J#v8#gd*qaz>LTY9T*WQ(Sb8Cf$CQ1{yS9xgLQO4^eU_H
zb*#405a;Nqb0Vkdz?qQ=PL?FI1Y>u?(Ah>jCJMwNLy^gr$Rs`0-R|x>P(R!=L9e}}
z3Cn|bUx#lkSgF$Z>p$W;=AB1<{s((~{`HUh{O|1a`EPvUzyELElUU>6UrD$AR}6gp
zTYdgE{AC%$|JX17`~SR8`TTQ!=JVh3oX=nMQ=gyTj{^VoKgZwgKEEH~wJ7_s|Mb}%
z1OvU@jU!V}*@e*yobH>4H=DldW?<s`xEgIdg{U-#)en!PdmH>T_=>R`#4-c-MM@AF
zv^XE<6{QGq6VmIOZl@+z0uja}V>@w4dF;72xNwzdTo@v3T)hC*xQIV_x$#^U9n&&-
z@ut=uq@`EAi9VFx`OoojzoBVkX^9<x25ns=+ic&3zTT;;i~GeQSU3ur3U^3cGk7#N
z?coo+)1%=XSRalu`m%`l6wvCbVz=pxn?N-jsQf@RADXbakwRnCm2T3@kqcwHpmmj>
zk4$-}XJr;Jx!jpy=jYzVNZGqg9ij`*UgHM9@}%b&PLer3!e0T_8Rcv-*oy??|B1@W
zCHKU45$ZH<w&9-#yex09jIyC~gYk`oCco&@%lMQH`|UJrfdlK^aFw=kUJAHdZMZcj
z!}&MN+6MaJ2pw>1Y`7~NI1IgG!9TnFAsc+#c%r;aedSM>BpzoY;Z1bZq~7=;vc~Vn
z@enqObM|t(c;{cZU0kY8gH3@)V6*v&V^ZE6d=7GO%4Q9={U?&rO^YSmxB1Nmn+eMn
zl%4njA~?qmqlBAr(i4BY55H(T5$}Ju-)%=NG6H-~x_s+muNi*`h)+U`Yab#<i@dEB
zl%v07VfY)iYNwzjADJjeBOBbsbpzOzc?_az?w_?B{Rm$CTypeN9zUn$XoASmF<Xwr
zHfn$z#pFbqJ0ZMXsiAE-(q^-6Ia-#6EpT8VM^8%6cgxW^C&NLGo;*p8203uS_Ss|5
zc6RxYqbIc-UH(?K9Hky7lZ__urBS{2TUcMJ^WM>7^yVRm(fw><2u{7xEFixYkdO`X
z6hN{Y2)Zk-oaAaTSKKGBoGwM>bRITju>AslvoRrKTTxiz3`9`I^zb}~n&b!BY_1ig
zUM-<x<RoWV#rM5~RVaK?c_l!_!u33_zP(gkzYn#&eWq%|-+FZkVlf<8_i_4+%@gRH
z=rg!0102+R2@VE`qgZehsA9=GT=E9ec?p#h?bXYyDpOWlvHpq8-${H5Tf6Ljhr#cR
zQ+7D$)b)V3B!DMoVB36jC}i|kSu$G8eX^Sue;dGybblQhnT@^*TDnm^sJ@=&-;CZ%
z-dex!n~1XnqGv(qL{2i~jQQ+u%m7FHKf_rs+yqf`#+zjnvYgc8OjPe;35~-8`)k<y
z0Ib1nvm&hNaNCU6m+?n#Q1#ZJ7oi_bAR0L}#!FdMq0}B6h9AVnBk>8iZOfJ&Y%Kpv
zb9GUpyAvNnp*9a-)G@-ikf|<Nfx__5JVf6q3XAkrIh}>wej%&7!>spry}}y9Ou#3B
z2~=<-z6taWkN(Yh@#ZW#xr%nT<L3v^nbwkzG#+zjls))u&^MwI8KS?$D(%o!3PWY<
zPkaDwyZP|j0r+FKQfQ2E+>M@Dw<2q&vi^ux`61ivzcH5kuns6)=4zMZ&FsT^nIP>_
z$5dCl*liE*P5+j}hK<ikG1f3SLwG6m_#+g|)vts2dq<)k|74?cQR;DSXLPBlGBsj9
zM>$i*0!^mYn%ekI13svXbboLE&4yum$dQ40418B(%e|?cooUnd*jpY`c56+3weIgC
zX_R>@>^Dd0{ARt^T(0eCu@><?i7uUE?oIr41bHp=;#yV?Jf-XH;OutM*fq1BxlTPn
zjILP~FmwAh1lu?6;k?liP68at3xS^)P}gbbZy!<DxvzmQvU|jJf`F@{<I}u+EqL$t
zO>wF3?$|z$S?zVoe1d&mZeseLz;v2p?n#W4db!*Fs{`6zGE1FD7|%#G?E?)+qf@4J
zHP38^@Y07bcFY?c<CKV6l7WdSxGVt~gFkp#&W^&TyMMj@5oP+8leL*LwKbG=HD`co
z=qE~Www>64O9;RptK>Efp4jCq%HE;jWNIpKEH$QOW3m^<t`+QmVFf+;l$b9iW>4Z5
zprW(sGBtU>j8d{^w1pTu35&5i^-j{f8mHubdoMY#z2G)qyUDB;cRIb=Q?YKNe}~%q
z$oZ$F_7<Vm=4cl=)?39Z$av>LU#P8(%N!ZjMRMFdA56v&Mp!dUpZr2S=jNQqxHOpY
zB{ydDg0u>TBePur9LERSK16BM$_CqID1>JA=g68lB*5($KtMHn-wP-MJ*ZlAxTjNR
z`U^llK`}C4(nlL3oH}3u(USNMQESzYYu}h3IsKHpcya*67z$;4SdwYC3#2uzVN&@e
zaK?#t(={KT2C{4J8US=V<3YcQ>Hr?MNM@G<6s#DOQ=el!^>Uof+Ga{UPh&ktUFGIT
z)aHd<SDC(@YR=EFHc}1*dC_x>Lgc1~xa+UZPRXX$S@r7*!R0mw1;NVg?w!BG_)^@?
zRhlRVBaKcH*IBnb?;xwl)UPJcoFBUrx7emxHB#IB*gAZTLFvW>P~n<L#4j)HK7Qbk
zUhArRh0S9byWoM`wsMhm5PXs^wd~OJrKwv>)q_~qLd24z(eG`hl%ggO;u8L`qh>Ok
z_#xMMwhAXYG1F=nk~}yy)6-KT2jbsJrbT{>LD=r9miK;g!^|}cB+%=VF@|U_gQ1|k
z-m}<v0r1`v&DTO}_lj9+DEbyhbcF`jMeB;$vzLLgtT+?(PChPx0~ETca%yzl>RfA>
z=yPA<%gUvx$0<!}0#LEl;C`wcr2P|>Zlk&b7eTa2ceHVpu)rP+5+|_pAU|bNTwY8+
zZPqnqGPbXS8=Vi(bR&#bcNTPqMz#JphljlSDzm=oj?m#hn0w$>Xr6WHycsW<msVLd
zRs2Mn95pBC0}yw?UbCCt*8T_wYft8&*zcSrQhj<_s-MSkJW9sCZB#ZE+2o~J-#Ppv
zS^u|}|JPXm9iXyV{{-|%|CIG7pc2xoA8LFbd`z_ROcQg)-*CRVMUTZ?7eI_<Ef4q8
z{4$pp;aw{<n>`3uo8jW@LA$p~MBSbpmlm7hGR^HWlB4HE__}?bWd@|ofVu-^+M5TO
z(Zc<QjB)i|dm~{k51<^YoOYxjT6i0~6Yem4vOBJ~>aa)1^oQidw%qWd;3#dsg^>Yr
zqmOa_rlUrRiWG0Y$fiTTcaa<*Qg+|C>^JsZfJ76xaf-F>d8gJF7TZFBdFp5$hD0p9
z26Nwf2hJkh^T7D@+8}f_M*^oC)E{)ZDm<2&?N71irnP9%$$AkSR*PTaS}k568&dN=
z?ufyr<f6{h<IJKS#=_Kod<piEgVF<idL1qH9kAK!VZ(av<F*a=(aifbCch=KpEX1e
z3}*Z>q{GYvdZ9%aw5g*DwvXq`daL)DIjBHy`({9JYP8}E$@Ca(r{X@lmpG&EgmkS=
zRvbo08*{Umav`3d!Pt<_k{4{>Ochhj5OaQ@#<egpPQ8I%lFsRejt?aBFxEYh2iqDk
zgFCcMae<E}_<B&|28TYWIg7yiKLEQA*-XpL)`HrL6rpUm4Pq-wd)prcuh`3MqYP<j
zQ-)-y13tw%w{v`^UMf1zdYa7u^O|#UuG<nAj9a{tirJHz%!_w9BNH|xGUUUYy;^${
z+hfPfwWLT)Dfh8x^J&7tw0(2D{T+nD^|t){7K?pMaoB4&TK6#pJCZV;W_+JjceZGD
zcbV`a6-Gp<Mk1Ifqt1-;*>M~bTY@{asz4q3HPQN$(>j}qR1`^^orvCwQ}ED|L#%d&
zOnM%-^#{KqT#qKhyp1-Vdi9Ef&g|WWA71yZxYP?KKh?6ZOyt5ENchNk%2|P+UjM`X
zJ1*US-_4SQFT=9OmiUkAzwuw8jvvu~6MK=4D=u<KdXXEay$`ng@1Jp_|6liCEnQ30
zF$@G+I870p|Hg!0Vo&%pQ2~;N3IBmU1UK|it1|Emw^3~pjTp?zqBC5p;0*VI*SJT&
z2B3mXMo3-tCh8@ks#h$H>dU+Zv}36;2N~k`??GeMt50qh`zONgumwBpO;29|3=ui;
zIK^uTT-fP>@i-X^HEk&tO&6s_d+e!1n@hYZ%J3W%kdfhYUvSCrkKbU~whW8pLd0^l
zG@BzbGCY_x?zCl?J1|>@Jp(iZmtY4bJ0ZI|uvoL@c<w)3W1wru`<FY%eCS-}WpVi*
ze+MerXPNB}f;+C=*0VyV?A8a2+g$Pl+r9{vQXw1t3{5h)PdMesAHBlW)2LO?$KBhj
zvWRFR5%5p)I4RHrF1LG&?8bEWR@wK+rUmw~&SdDCHe~KMmlxoX45$sa!6Sh1SLc{!
z3+y*IV`_C}YE?+x_{S3|J0JH|_Au7?9A<s$Cz5MGo3X)tXs}GpL2BYBe-pZmId1*y
zGF8m9ujsUNZH(nvW5XIG+sCW3<D$IDGCkNzeMS7ctH6)6-2p5P#F}V03}j^n@uBHq
zD=S}^2I=L6wzD3LXtQNSlFPePk?GP%x1DS^6B!Om&NsJV8J0@&J+WsHNNp<t8uL)x
zd;Wk6g~f%?P{G9s8s_EK?b#*Ly&>OxgFY3^H_blyFM{2`FJmW8M7?Hz(q~&vXhTlm
z7hAbSs0M7y&DvM&TR*H*u<Zs^INtEO+3*79&RRc6hKa-^ZkWQ}j!QhPN6w6lZas2V
zWJK$cX^{YK@a&m4IC%F7tTK2*Zx3jO#S+Y}_QJ_TgRK!-Rh-PTR+qsbc1WyQ_6>)i
zF>Bb%E#Vz*0YvXk+z3>l5y>#8@3_j-dhD!V+cuzWDZu@rNKNapGlOk>(=pM7pU&1}
zcv<qR2%&I}EveP>#1=CZeL=nc6j+MCC9kog<NP2o2*~NPau1s|wR(~9WfV`49|N@P
zHEY8Q8Ar>!SFnp@-06+=<~m*<8QX2u?usw)<Bn?GABY(U>eY)+U_b)&Qg3WW?$Ua7
z&y#GMlEl5B4fTo7x9?7d)o%d_V&Hzxx_n;6^Xt8{QprLXc)|7K-n=?&j*gfwTXnOo
zd7GE1I0Vn!&aQJL6^Yn{TgCBjLI~)XBb0*FB5d@aBD4p_jZ=OnquFKN@Nbkk)>US7
z5<Ny3-*C4Qy)*|BPl1Cd!{MbSLp}a`&1$b$y0aZ230UCjd!u3X`(Gd(^$EqV(zV|Z
zJ!Q?Ypt`oVwi{(Y61uIr1r-IGo7p!o550sVQ&|7jzGC{d;@4dKinT0YE|FV;=aB+Q
zUF1wV)<qmmYSC=nR^x&S@7G&?f$gTqpXviLzO|z87f{%$EJqQa$rNEO-fLSbH|#YV
zUa@NTaQ)Ws3Uqe8)v_r=>m;X&&_i5a!AwI#EURIcovbH%WR(uq{(a|~%_B0PNMF2`
zeG!)y8+K>)#e2D)Ui^x=_^|}n^{~(NTek&bC%n;Nwkf5)sTn&lC_0rR&U{C8M_cl-
z<_he^LsBnqf;|&7S`E8FAV4`{IkPgk44QYNvkwloe-9r}{jrBwD|W*HRqGtw`|HFf
zjW_je{;+x-D@qfOTkty18kqGu#_0+T?CD9Z3D{lhG1Z8eGFaa~=I%m|xNkon#{H5<
z;tTT7p$@{R7gvd*k1bQpKbH>Fh&P|NvTN<;v_Jn<1Q+i%@4$2oLracWpTXR~i$d!H
z7<<w9Sobh`8Kbo!Y;+v6{%9vgdau~YlL5rwP0mG5s<MW$I?$b9@kAer^n#v~{5Itm
zJipVsP?mPf)DYIL*Q!HajB$@}fG5o2N8omM8As%4zyr#V5I~)*@#cz0pd@)Cw&9T+
z+T}hHyEBv%!SjNAp$|LpoWvXq^`OCA@q(n%M`Ca7E~KDmb@NZ+HnarCEFSeBlKl>U
z+#pVSVtZ0%Pe^Qh@&ONW2oL;t#}P_IZVScTjJaKQgP6NlyZ}(tSg82{*oSc+bxvCo
z!wZEo%Q;A~7u@e25WtK?6-HL8VQWRhQ|r%)?ZDW-H6FN+q?(H#T#}0JQVVhXY}W2d
zMITH>yH$mJb@NOYZL#7hbQd%5b#(P!FKuK|!3X&VwZW#Aw_Uj9qYb;8`e6GZz|i0u
ze1>Sl8`mzg_>1Vn7j(upJebomNy`N*55sdBue-D3bpUtP?vxi<qdiU}O(9EBvRJYE
ztWmakwS75SnBtF~;cP{-5Kkix+tl6R^oWz}+_ju;*Hxg+d$9d6e%Kk^7=!KPic~Yf
zo=6*F3V9pCQq#$3v*ZfOqAr=cV>g1x3M7bK{e=I^+?&8jRb1`E)y;r_kVXZ?Enbun
zPzKorWC$RO8c<|djEK@R)3a#L^w^7l2?`FN<49hTyvZA576}@SCNZ0dafyQ%(Zm=q
z8bMS{)YwRjaVKh=?|DvDb=Tav)6?e7`~Q9S*Qf6C)H!u(J5{%;ZZ&K4DtyZ}@Om|M
zc>2((BQky4=ij3L`}`K0^{v<?Z8=h;6<u<CErPUs5Myq=GyCi^WmkCS`u5rPYlR+T
z$FU0)JR38UB#{j_(KqvM|CexuJVPy+!}5om{K4e&`=!UxilGMKi~q%sqY_I^E6Kk7
zb8W0U*0SfwpLs~!>D-%5Sn47d;afI-+hvAxSQtNel2*Sh`xefv^B<=z)b$ZNobSIC
zpT%#c1^qN@20ImOb(X<v%MNVdhW9o5mu0B3ElcrszyhjTPH0&J`^>#b`3CkYJVJgn
zUxhJ&D^bW>=I`9Jd}qt@TUzI!`FObX3)k%4G5dCSLYCd$I=^l5MeBB7HFq;YdUF@e
z-7R9LTVQ5x;XuMg)O7hRn8DW{#G5fW)3n`Aq4RG?{h2)Pn%!65+scr7b59@0+X8tl
zFk1au=JHP=vWGDyb4zy2mDUS6-f|Q)M<v$V_n*VwC(`IoU}G9RA?L@lPy8Ca>5W*A
z&%MDn#lD{F59@EOkYE&k7JRug29foPkT~*9690MtrZ$XTxi*n{9PkxXy5skcf-j(T
zpFwWrN8XsQ=mYaxMScc3G5dhL=wUBP{ADmc^Pjvk@?Uo#2|2}(=`*=vK;(v-<QD(d
z@{{Jzdn$c?k28l)erU}(n@Tp60Kxyr9n9Xp6AADL{#%uCuISgY6Mpci&E#!sPTJh^
zhY`=Te9(HP*IKf<rR0m7R)<>Fd}KY%n7r)^FUWKTKBgKldG<$F^}ttT{OBcf*rj+U
zrCfZDt2ds2diWM>M+xhz!p_0?RCo7*dHg~(UFxRCTaR{1kI07OB@;eEk_D9CgV`wv
ziQi`FjWVPUF&=#g^W_h|S7w+yX8%K<p5qC%k`|36PAnQe6yp8Y^*x$Se!;K*x@<Ty
z9{=Tv)WPee?B0X_J{H9rv@x`|7mGzXn)SLC`Ieus!yi2vjx#!PjKpn^%*i?&4shCV
z(t}$Uzhg$+WFr)mUk+eo`eIEi|CJSWN!|^cu}wa|tKeR`h~mp|(Xsic8LN$C|3Um+
z%Ho%sr*2l6cbfTm#4-3cG5g(A_G?ejaFpPykOO_#roKq-+y?~|5?Ox;%iQdp_$UG|
zLHN#PxAyZCPxxEg=GB<Z>eD*=<+CQw&aQzXPf?N9#XDP%LC#K;=t|mR<q*GP8p_o1
zeSI~6A8GB@5ioLhw%~J_$8`cgPGj?$r&PKer5qpF27U`Q5AS%H<M@|<2xMTuOXaD}
zYjz|0qJ(@*#r7|sMfe`@SeU-{5USson`iGVX`cOfN&D<9V$wVX>&WqOSv&UDsQ$ee
zkNz?RGy{bg|MlCl)EbYL)f~8&1i-80%<;5y=S)J1x12L|$IR(S7$n(?E$7VA3v_0l
zr5EU!X^EM~Aw64WjBYvSxYqMW;vYR}I-g8miC|xUoWbe|1pJrwAv^ScL>im5X(ir(
z|JM3BGbuR%WdnBZSLErX$EGkgd1gQS{T>a@5Jq86$&NW<?^x$K=lFykX;=j_@;CN&
z{)W-ijq;h>xvlfxk#5wfI{c=7trzpf;5f<KBeBq6j`SJtMtBw3yWmo$?8?%LR|Bl_
znEy^oh?o42(B7@bbHYSsU!?eO!bDon1+XFQI|XQ7^PGLUDb^;I6>&nnMx|zRI(tCt
znt`pE!CN^sxuYkSH!*E7*^;~BmM(mTRbW5HyzEwHm`)4Z&DYcUJEqG-i+sIWk^S5c
zkv0$Mq*zc=k$o4exqECjJXi|pbUnX}{|({3-I0pAdRpnjO@o@B@)^^%c}I!N7K?Ve
zv(3xtTwwPy{yih7?u%GEFrMpr%eifg!e=6QEyQx1{@gmIMdp}V$~mWrP0(8UbGp-h
ziE6%~<Q_#^7=84$4{zC?Pm2AAz|iZpM6?x=_5EQz_`h+o_$IRcPDBY|VIoSu>$J{1
z4pk}gMfR}HYC)NtQPO(WNKUIXz~`m?uqjja;@=`!3Kz$Nx#BpjnUkYqFU1#|2eU)T
z8Bi#1;PVcJ68~n)a%nOH<+2a<_F20>3$<wbI2VVgUcxL$A6<7HbD)Rh0D_U-#}7=m
zHWGhIi<fSU?;c%udw{>e@VB7uRU&#Njgf#Z#6eT#j+0=<v^R}sB!2gp8JL6M_NGbM
z?Z3co`C<`xKP!7Da5U*)x77gQkJf2v${W_9&+K=8b{!?LK46}G`oQ*`A_dh)ta{Jv
zk-s#8CFeHGMMKo8P0#uLU>WALCh^w=m|t3$odiKkvKKyp7G%2!#Lm02vrR?zc&jZ|
zv}!qA8kfBnO7Gu_tIgR%5lqW=B=%LhoN%eb)pwXU!U%DF6GqO5EYGEo-rikSM7H*j
zx|LfPiCEyD?XtH$N^7tMF5gVcnK~$YF%+TfbcBpS&|f`-nV8MEHj@bH=8Ej5pYygN
zyBcG3*c~eywfwTGAajyQW#&9A3%>-%KBf5g#3k9&xeAVNtV^>0kRDYDb^)DydrA6G
zbV;(mzZ)qx`=i^jsqtGFaA+=PeM5nN1vhp4`Z9YcLfXpuv;X@{6T4RGR2bi;9VnaI
z?2?X=EuognbGs>>GZI1W|2D+feUzsAl{?%P4QPuDKv(QjOR}30QF2y;b4j)r2F_a^
zS(2UkKA%#+5!`@z1NYp_9tPd_PZfVx-Uom9tAvG2rsJvY7TP)bXO*`$@4%qV*aPYC
zR`HRy1l;LM_mIS9h{4dcXby6`ZZ5OePV(AyE!lmTeKj{jv(Nqv<&jy@-ZV1%Pu#Rm
z;9d4!c)~_~W@D`%;0^#3%We?>R!vNFI<h(Y2Dt13&bNNe#m5i644()1E$RtqOAcWZ
zbtxsJhGs8i5GgNvq1=zmZp1ylxf7uSoALLwk2hogI_~S%`f2d?BJU{iJ1{#+{CeWI
zAG~Fr!=CKTJ4)7lyc>aDwat{t^c4ILnbcifjwzz~HU>W+`_gY%hM$L<FT<H#^525l
zVQxG+*kWm-u!3?j_*jO2!t<PxE!=jYrB{n=zhHJzv-yD5`cV4Xj*BoacC?&<%l9!`
zijMi|`lSnl66~_qRel!5^&<K@6a5Zu>7nXU$h+)We1;d9IsLG_Me!@fiF}f?s;0MK
zUX@U=|A+D)+QR+EFxz?|-rN{~Y8k{Q9pa?-ox8N0LQ9c4EssFG3&_3$7w7R}JGRqn
zIRPUW7}xIcNH6({@~14PJy6c|vvQ~_QTXXRsCy&1=HeapBfM<pV{r{0<5|m$k{vU2
zt3FpZ<o&X*ZU;wB-z)w4>Rs$4O)<2$l?^F&zt}AMUzE2kK!wlrUt9h#FCyzXRMOsa
zFk09433Tf+NW%6BBXODi<1Lco#&7y0?A`|peMI|&f%N$KyvIAl<G=&QZm!$N+H+jp
zwRv!pfCIJ+2NP;&*@AoMr@4G6?)zNb^PX1REvVa+XShf+95?~x8C8UOrpMR)cizJp
z;(@hEu)%d%l;pY_^B#^75B+pBF72B=<<^g}g}wMjbRX#{akqPk=&n?zU){GLpdx!Q
zc(*e8Vt_KAs;K)8o@4*^KOH!~<-JFGGA#74m{u$#_&5t!%r<=Dm3!uyD-^CNnD*WJ
zGMH?yOUf2HU*vJie{(q{DSUxgPVd;ppY?eVukpV;JT1(A4#H53jE~Hpv%^tCO>RAn
zy|rwd*gwQb#qxfm+a6?O?HH?kGSG3uxmn?ln-3m-#Zh%_h^FLl_P}>PZqGh}w=g7u
z$$YF=lU%RRJ|2S)TQT&$D)Sg520F0Y>-+&GDv|Y^0BSCm)QD_&6E`i7mLl5!XnA5C
zK5fG0?QNOG=VC|T$oi)MBEHv$+p;C{>GSn#n^17^*B;l0n_rCByMH}0`(t?>T{^dA
z@z1k|K}hT3pU;G%6q9M&e}k4&j!*_fHk2WeTf-O{k8I#v(Id0}vFwrA|6Kma><<+F
z6m0R|TDEQ5-}}1xuVYuv0|TyGe$REw|Gq6d_`2C`*Uf(8x}APi-fY?FsPfizkNQ2l
z-Ga5$IbGkme)c_nAMfIs<K?~UXSeyiypLy&mxKH`d;eXCh}QmHX#ZYE?fnuysh$$T
ze1y>Q9@EXs#9G4$44Xc`JHiH*HA%JqKN8rB2xc?G!YthbI5E8E5Z)^Y@2?WM-6p&}
z`K)<XvgZElX7BBsHP3g*nio1}&Atv<^I|~O{JCS+{N?)D_xt1e5}r9(^D;NUK5!J{
zF+GD#xgSCe+O+&(e7AQq8qB5H6gn%LVz)c*ZMKeIpzAgIuE#ZBiK>1ihDk%|nYns?
zIc9xP&$DM^TumD;T8p}8;9yHzv3J?bcd&tD&j)D&x6txzrGYj3c4G7{R|oF|)25l+
z+;yd_aqG9XKPzNN{!3V2hwpg?s&fHc&wHN06?RUiiO>ENL!OUqZx_S1g%$|*dxG?W
zPvf6+p91r?>;Y+u2)2Yp4}3~srnp+fc!^Eom+7VOKC%n%jGpz5_uIVw>5Gl-$5Xw2
z&85`+V=Ysz|0UP${h0*Ta^m|h30m}-JhSAgqjM>H6clhQ=rej>s2x4WgB?1+iciX2
zO*L1!|7yT1cc$L~+U4f9-dhQ8d$9)+i_F<Im@D4OD;T3K#3qZVHBYq;qR1_TT8`V<
zlHOU;E{HMyw4dDCB>Qz3Gyace&$ZBF>&>u!+g{`*_TR)+_5@1j6{QoK+;cPpu6eR`
z5YJl(wf2`V`fY9(%>36O4YMdd2A#Nf{vgqZ-R+P6m$x_Ro)0nuvTva^IdFFQ)hN$b
zXC^;%ReuaLF34h&koMMI2TsO#=>T*K7iQmpH;gcC?|onpW(|7GDZ%bsm`m5snjfKx
z%?H<{FKRsk1^oQhUMMxg)_p*!S8Y9T{AT_i(YiAvknxa*|G4=!m?4gQXQ<3R>t~wy
z8N>nNiP<aZN6SVhc3+m=TiXQL{v+DFmbcgyp4HmF4ym%~V(!DbZi>hmjltH)U1zkM
zf%&kbn^%{Fuqrq-8JoV#u2+X(UsyC9ifTO68$(^0N6idv?jPTfPfW=y7pqiUdR3O|
z@v@&`y!mGoqC=J|+OTc-n(Xfgo(NF(y(V8p_Ox7j_se2J5Fg(nz?SzavftI?kI0on
z>Rv$oJ1_+{1fIG2sf7P=*;_w8Y4iIJfn|DnK+8`2ZBP4y3$nE=G-q#q@1YRZ4)wiQ
zUR~xP>g_wZ{p;o}D{wt?Az#q3sYmuOQSY8LjOd5$>0X<f*Wz+P_IPTWhU5N+1O7w@
z-Q2g}!OZAJHavzK47_r15@Xd9&SF3lX2IPuUBcYDfG2QqI+CxU*t<CW#L{dT#@Y}S
z7Q3a{1va+$pOEYkIpotzvJ)+W_2Xx{aY4ygnjM@&QFaftH|c)ze;+M74xEO(9<z68
zcA$k=#t*SK=6`J}vJ;Rg5}|eF)RueQMb?i-GPWG-RG!u#*w+~qv%YV`BRT=NeZ}Uk
z;=eR|uM_)S$afhFl-Og>5*uO0eoziU>?c_SvCsHoUy(f~hay(}?M=FGb_24lW&45C
zHamW>R4ww0-Al54w7-^Tk@7v(z7<-SJzabwFLdm=kw;|xSjIm0*Q0uT@jsULW8`xX
zllO~kgc<vzatLBS#UhCPZNAuJ%~lRY>?8IDd4Db1SSRlX=b*z;Mshd$KaDD~lf`!~
z_MAs5nD^V@!OZ_hHl%Qa!hZ`+cvqH^-bD>qn!OI5So+)2zlUwd3WjB9N*652#?hct
z;K1e&%hSEreaKxRGv_SH4$LJ5ZqCCXpwyN$B0I+-=_9mvyEoAOM^VZkCU?)3086sJ
z%`qP;3%vGkVOd?0{Xhoem<@B+eaKBG@oDadQ`1M@^BfX;-G|&>GIQiTdvJ3g((>Lt
zFYuz*=6hbmc|qMva4{xg4GUs+U_NBtVZ+KCv8kC~S98SlYi4JkksI2s8aSp+i{{@v
zO~dw6hqI32nJ9p-0H>nIfsnCZXnW?+?7fmY2l}_Xw;=mPlTszEgP7EtW<E^e8_~;e
zZ~kCfWIfx1P1mr+lING<V%-OfMP&UYxX%AkC)-#3a<VkL2SMfPGI!cSe)3;H3e;t;
zd$E=bb-7AL;!IuMXw#IX`Rp8m(j2!)fF-NQo|{9F!87a)>hiDn=Mmcv9EZA0KOEzl
zgERkQ>ned{0EX%D1uXCHP-}B-AZ^zFKAxY)V4tzr71?jws4<?=9D;bRw@9GPs>z{<
z=jZGV;wk@Wq2ozEjOWETk3l@Yc92Psi|57v$MO7%42+rl{DqAg<GDJAAfDf}NPu;!
z$X=C05zou*4dS^U1DPg2>4)*W0_P!!=Z^%+#S`0~1>~n5Z=xyYO0QhWWs`)G`!AeO
zpYYEHT{T7I{IgSle~Z2b#=>$L`x_faM)<lMGGs~iPK#s)*7do>sr_h*4>X~CUZ3-T
zIIpoci1WMeNu1|xUbp5W?(dsE6c^mVH+{^3)3N^-yfPgcdEVBt`;RXkIFfy!i_P;T
z_IY+e_IeS8G%_~e8f>bft2;J@l@`kx>#}ux1LLdP>r5p&L5bE0g>CgBFdz)r>Rrtr
zpNb7LKQ2ojabVbHY}Wt4JGwCTJ}_AJAA}+QGQRo&veh61w@`TV!Bf*;Z$4O-{z|?X
zHFk$t@ICY_bD4JuZjgD`^VxfKX{7D`+05McTBScyC@U`}kLgw2-`svmx~d}k<aQ@N
z-+kD&9LUdmatQtqV6R0o{p!jYCc7|LF9abd-e1k3hv9$l>`i3-awKze`)QH&KZozD
zk8Ezo&V4L=WE;N!t5BQ$>vrzD99hp1t#$1j!i=mR4|jhC4)BWXD62{ODEx_1Hl+hV
zb2uBRxSv}AF3I+F{h$prek!s<=%*BZDzZmf&C*b_kG;|Vept7`Ev5Uvfs!I&|HaCU
zY~b3PCD~p12e;!vMfPPpV2ON==Z9K$x9l48<oj=8`ei@Ykg#li+p=U<FUfu>cN4G3
z-fnnr?!bE>Rgt|k=WRCr(>ZrDsUn*;Jn<Y4*Y<9&I53T2jm>#Qy(+ags8{mg()I%<
zq3+QSH9p0aurRyqZCzSTb!q<K6ztiG{$BG3$iZ*R1@iB!xY%^fyS656#BILNqOHWb
z9X)y|?QS#v=3q)!WpYUt>u#V4YY!HUY{8O5_I4_=4fv90|9|7Q`GZq4Cv?S5Q*tB9
z;0IS_5?%ROlC5`xm<E{@*-z<VP}JB%vl|)I2s}o*Jkn<C!l89{v5@!D&%^Nl{>}y2
zDfIg<RHDu6KHw(n8N6Kwzr!q%ci~*j_$pYD9S3&K%JEwk=#Jo<@Ol%k`!j>ON$PX+
z2g5T}T?*Y2hpo`ND@uYjfu~t&{fKn`y6_5!S%gO@w_S<ACKKiGv3b)q?K%UmIBMMo
zT*Zb}F4y48PqB{I_Jx;hDJIjzIQ8TUJT{GwT)Pt<u_I=`fA#E*FjnC-95e~^<j0!$
zjI>3PrK#l7tK^SbHly=ro@C#|*C2>J{skV9;b;0+LaLrOZ^D)M;|GypOrzjl?Y|Ii
z>!4dOK(Tg8X=c8*<wonH?iq+!ult}U{A42c48V=dE8TN6t`^jt3OCp9l=teCgg$UT
z84!p2u0jYB%ko|nanzPY&<azXX3f)nv)-<p{?mgNnppJ9?zq9^VP>#p*>Zuf9^B6s
z1hVb=GRw2&BFQ~zDl*mlzqsQqRJX`gbU#;5p<I6)${d^XajEO$z-q|fQq2U!R>?b<
zf$BcKm1B_@G7JAZb&!v+Dy<^Bj-R4nB@+i#+S3Cr4fR|LXhF6f&+)LUl9Ig@_<<u3
zPTeLqXs!=KtEtDdWa)RmtsEq18N}$Bag5xUQR|ukTbOg@x5G*IS&)6^`?`wlO%JHZ
zzJQypgby5zaCY?MB|WxGkX$Hdf_8eR&R_uy)~yU~o$Za;yHyHNTlx^}0fJbm_je3{
zn;y{o>Ki+HvbGF=qi62}hhh&r-n{cRb_2v(qW&ChXpw=3mO(6+{QLL*d^^Ek(6#hu
zx?<EHuM`6pE`k5{T{13##FGEMk{gUMwf7%QkNNSl_VJsu@82%*Yc40IGJBWWI?FkA
zF5u)}+vs;^u71f3>ni=1W`E2#7;PKV)v$~BqwmGY6WxICO<!G+oudaMQ3ejl{+iiU
znN474mx}C{Fxscz0FST8Hklzy<o-}j%1_UndV44{3@hwUs=Kvg)*cv%e5lAC4vzlx
z2^kA6y*fJ$LbG3mgCsz!`zm*jdBk}`+Pt~qz8@gpn#<|7r~7Yi?SZ8Y+dpbPqdoJ^
zGK_6;{xJLM^&huCq*P<3p)!^%OI#64*2EJlRU+9`7i}zyM=N9Tlxm1pB@<;$(PXqC
zMX#}BeU(?0XiTM}jp>wEn~X)%v80y<i#K}J9CIkm?M35>#+a9A^y2l6v6Q#6K3$i{
zq`h=9T8}5S-ij&1bO>HmG#=L;yp_oWpvJ@~FHz%}kXNcqW3)0J^U?_~(G+X+Af^eD
zYU=T9MQLi7DpjQnM3u_PE3H1YwAw38sg;!~(Uh)-4lBw^tA=^W*yWk}B$R=|(PS-R
z)R>0wWUMMt+gP89Rp&$}k`2+c7M@8(YhzQq#%QX+TUG`YGHHgq95*#yjd<jB9Pvz9
zM2DIhHEPsyQL{1H5bLWv9EqfsRF=dIxIH9&iW=58)+G9BKV>nmAr@^+c}>Y!Q!-H%
zOQn#G@zrN|Wl@7vCmM&P9o#Uc44jHJR(r8zGLcL%)l%tdCVgWf%}YEt-s`6}MbmZD
zyl8bb(gf+9uA`=8N!P`oQdK-t9n%R-urFg!)-;vzpT^M3j2CkAAvCO>D#d2nvht}{
zMB^Ex6a7`kYNQlEe-<he{>oEp5(zIRxr+i2O*W!nKvpHS1q5*`%jl)LKE)D%$kfFe
zpvB6%SQ2^xsX|s(#-{XDiJBUfXjIg&v~0}8RB6f^j!>hScp61vL|@ex>eTykI3-zt
ze2hZe@D-;F^QvP=B?M$xM?muEQIk(s=gz2@pUW%AF7qm?>KDbT>bylnsuB%Ipn8^4
zBxXI!T&l0CZ!}@*LWpEtQMPiJuf#b8R5c`^htwz5o%+UHF;6wcs_JX%W7VRFN~RT)
z2z8_(2A<WbF%j%L(|B29VkOFdX({4{vR{?1zk-rIr|_WMrxKZDRZLYTYBMRRu%0#z
z9eMKQG0&2U)v_9)RHNXqHcBzeS1DDGBu!KIq!(L-Xr#d#t)bzVeZivH3(r-;RG$*Q
zsHaoR)=n11Wi!uSRI$8(oVoMPn>k}%0S{-MH-G+l=jO5_Rexp7%cUq2Lwi7`SH)rN
zn0rjoqWqx%vR-9UF+`xTEE$U@s-kJJSBNf*jnwXF%9}B>;=Fl_7tLk?;p2|QAfGqO
zN>j_#?DH2(dO$!`tQsj+x!M!Esw$(%t<{a`=qf3@@R*O6n-wrAO;H$*^vXoegHA~%
zaYih2&O=V~PFgZ`a^7rt_D3bqQ$9wnDyF!o6iXtKIkpNVp;1-Vr&Fpno~Vq*73xw0
zkZ5Hp5znM!ik5eZr%F>(N~>`;W&&4D(Z>2JoYSkDQ1rw=m(>lEWT}hAoBFDxzvXah
z6ib~t#$Szmjhu&?UY&qBU>4WZry0?4V?EJUnjb0k(KuSd>eVo0Fr)B6(Nk<wva&uN
z_bR2ziHf68afhkS%ylRtD057YMi!ZF1TeM~r5a<kD6pv0O^KA)9cqw_MlV^JtViNi
z%$OlfuUD6;jd`(njFmN|(#g|76G0O|<3Zz8Dt$U=B4`3=Jc!T6g2sSGD-_vOlS<XA
zhKAEY6G0O|<3Zy<V?kp;qg8E6)udDmo@4MG!)5g<5H725t|S49u2Ohhol@1%r5d_a
zLx<|*SkM^IXjL6o;Hj=t;HpZgDyUfnFIDhT1-J?&rA|Q_gjL2>Wu1aV6rX6FT9rtu
zRq<%LQmv}0t5vHi5#v>;c4}p^A(ce800kL0(fYJP^ShD`ib_M`3I)@jR;f%SBAf&z
zQY*!+7MD-!LA<L{sRn`#co44!Pd%NwB(OSg*2Q@dSE*V)u8PttTs(veIhCL&{6*ss
z1f^5ax*C;CH7GRMptwrL(v5WRG?oTI035lxoLAL!Dpj&NovMP{)IgV!OIDHMs)>ov
zlu6aqtkkD!eG)gSpGEbvs62zy*i>~{d?g>sRrTfes*?WstS*Pv<<L5!NHgtbpegS%
z(2i$wo2u83%~ON{j6RZa0?9bSg3ISgY6q9saY5sP#)&dgi6+JgF7KOa=#T}jJV103
zO{%HkiYp<%;fh9mitAHtOwJh*+>nXafsv;q^^*&pqqX8zS2Mckv1k~*5H#_ssj8u=
zHVqGQh6g$8=dsK6^VsG3dF*mLk6sa@+gRNwE*uCJR}u?%l2|x1v3Q~~Jd>>&<(4k5
zt1bhFzDVUSAPklOymYI@MaLJm0f_~}1!|(1P>3FS7*|}mif&4~E9JUc+)BEa(~)}>
zM;(Zx*2hzE6;C9Zt`xV?oMLjPU0hOky4B)V!i`p=Uq5!zM0=^?tTD*Nv_eM=4(vpn
z^&<{zfzBNWDMeSsVHVI5gHSClZD>-L!gO4zE~SG`3=*GiwYUnEIo?#u6CO0C+1$Z$
z!5Kqmw79rJ*l_3t$%=j}i~vs{RnL^EudcsB)mPCr)ze_q#nY;0b$slqrZM`gYF6Rp
zr3z1BRp3M$R858*zb13mr+RZ+uWwaN8r8N2r9BCNCvo*PE}3s|c@N8f1y5D-1Xq`%
zpI4KDk_lQ=C|Z+>rJE2etVleD6Vt0E2|ER$$;N6#SJgD(?F?=*25T%Qxag4J8D88N
z7)}xp&J3whOJO0YLH`>zv8FNB2<;&c=DP+j0kKu821x`DOsJZ8^_6s*0LH81jbr6h
zt50LWj)!BRR~#Kb#3x?OP~z3l1{JubUMB%hykW%Q!jX^>SN%u=suu?23!*34Q&Z3M
z#tlwzQ7cqUO)`eSL}U5{su|$wYd&B^(7O}alA0#pv^coTHJ-$UgG!Lmr$&25D16*l
znY+*r%&mQlXz3KIsza_-N|2R|2((2YqBHt7s%Gpe<PhFS6<Xw2QpFnZmW`^63IWp!
z?G+SOh#_izbreuEs;X92$LOf4rc6EDh9)*}lPc}ic+@uYkZ0sJUGa!Qk84mBT22)2
zs(3vJ5L%!r1Xu<8%@=XSvR{dsUx_xZGOb|1qiA5!vQ(yO@Pd$OtX9!v6WUo`K)q;n
zm5M^YDC$EL7B~t$QA{y>%+yj>sub+8YKo~Ql~6DqjTlRSJ;F7LaARCG*5XtP1Eo+I
znYfLW=<?wNGXQI#0M{zSS^=t50HSJT0_`k1wsaF{XA`I=m&<KqBGnW}5pImpdSEO8
z37$l%(re{v^oP>*4X`wLufCEF)S(-rD~?Kx8><pyXtSy=Q&HSRaf41Px(;asmcaXK
z<7%%7Lm{wr9=ci>H$nfav9_!!f$EnV9zkIbd_D!eLySb=b;ow5tLpH|fw!WhvcoWi
z#G+pkMT(g|d}+1E&N<!>@SY?gULxZ&Ds;LEJv~r`pYE$dPvQI&&Yw}c+CuBD8KQRb
zbhK&<t-a<jwJS6TPeOx^R-u8oYYR1B)1N+g+O;io#93;mxZ6U9pGEkv8ARc>g$B$J
ziEFjQwIXpXCHADmo{(6gC9c&Hae~AiA`$MkP*@~}L?Ya_h!(hB3tTS(*Hd6A1(rhK
zP%Uu17KjrBo+JX{ZVR0#0*8n|xNRYiP8Gy%3ss6YxVyH6Blq)0PP}_S-{G_?6zTma
zVik_uyM7QNs?WUNN}+NR^jd@B%=`N^ij$xl4T>}Gf2L8K1l?dzoOyqzMsY&&wqL{K
zh5Mwqe9|mWn&n9|H2lVp!AOm796eY)8T!WY;vRPbuCwFu`0Ma+qY52Vp^sGP0~L<+
zQlWP#c-^%_C}-WZlB(A-Rm<@tRE|`gs#En^ovJt?xz3Q}g1ap=MN)M#)eOOH3r(7#
zLf?ac+rWRD#Nj784mcq~Ki2WQO+Uj4&%P(_j&;!JyWqMJ++SCrVJdW*#Cn~?aUEoT
zyiV=vjj%z``u&Xr;I@U{+X&v3D)i{!K^PAW@A(Jl&nmRLPaB-xaGrzH7J6<ioZV|x
z=mojmw;s3qz`Ex})#IkUe^H@l$?z;0p6#=fS9JP3$}2c~iS8x3m*`%idx`GV=x$!Y
zdA1K7UhSs8-SCI7uVL8NkmDcp2WKCz_VH>rId+2s{+j8pS%qKN1I5}w?<puJv7t|T
zf3EjI`ee*^Z)9u^0_a1BSI@x<&})faOY|QU@S+MmFR^}siSR6)7pT&+bY5Vf&(e8;
zLZ7Ac0tGxvXWs@o<k%~0%!+4`TYKK8;Fkze$X+`8gn^RwiZ~|mvvgjdkY_ij&>qoZ
zFK?fxxIJqjDa#8!+Or;auYvZ1{swv-bO7{sMiFVfn`!+V97K_d>|Uo3#Ya^b`4>hq
zg%Q&*lnU=*sz1+|?4eG3kk9*G<fChWy$w1DdKdH-=pzD9Gkg;`!h8M&5ijHXG3Y}O
z=H8x{TzsB!+yf_k6Q#o4NQfD?m!Uk*NbhMzx-cwALk8^bgS6k>8_sjR8PDgK9J|+3
z?JQ9`ym}5^fHD<!Bb{ErZFtYi5KsQ+$-kF=_tNh^UhU)6^SpW<SK()wWUr{uo<5Jl
z>5U}W^BCwI(3_xts?a+s^rqCDYo+E;;rFgZZL6O?1ny<iQO9w8G+bVzqSv2wB2Sl{
z^(k8V`m>JViFdS&cWKLr6D#8e5lQ9W+W=v&L&)nY^fz3-0+U83^fGN)sC})}XJ-A!
zYf+!4qdrepp*Vatz+;07{eGYdJ+4AepicKjB1S^j!h-z)_#c3iUK)-YI*_(rq^%bV
zxL%%!ChZ&K2~~MbY~pKT6JHaX_?p<n{o_^Wz;G4%j>HD-4Xr*-i12U3z`@1!Cb@<i
zdW^RZ%Pm|c!Ot}lPE_+6d3Lvch7+H$JVYWaFp<zk6^<MN>Zw9MfL=dDOn#^y3;kud
zdX&y@={y$tGjHMimd<0L7kLZkw{#e04=o=j-u+bH;lyyz1hj>A=tg&kG`f$l(d~WD
z5G3+FN2}gH#@)71E1BqS3tbN}ZJ`#LW4djj>t;a1lh1;45}gypxdB&0383K&N6>J>
zK`Gu9+IpO7+bM47yT_?*yFy!zSKD@q8@l;;hV?}W3oe4WL7K4}#GvCELE<_bxeDQm
z8;&$WCvn4(tK})&a3mp5;f8KOy4{L&yHz6ppiYBd>omZLDe_Bw`h|Xo69Rr;N(o$)
zPAMesOT!5l51LhIvv`u`^?lax_mGun57!~tc#>vu9g;58A5TL4(Jc1E9XdkmP-XN9
zQ9V?m3U^zmuLRpi;t01b)EiL`y#eMoROs)xe03nM;e`GQYQ%#C?h}aXWfE7o;YgKS
z!VO1i<q~c<@{wG^4M#qfOSs|4-{cZ*IC8#R!VO1WmrJ<e$a8WDHyn9hF5!kF|B_3%
z;mBUOgd2|RlS{ba$O5^98;+#q5^gwhg<Qf7M>28=Hyo*!OSs`kja<SFM`CiR-9>VJ
zF(1DxmvF<8g>nfu9QmAF!VO23%O%`!<Q2Ju8;(3Jm)gBZu9t~>p|}^Ih@g6vz-9LQ
zmzWy3yLw-M3UC3;NEAsOMN&s`{ViO73)kO*+ylZ7HylZ#XBLjUB@f_+BPn_Cwmg6v
zj$AGe-joM$!GaE9IPw>H02e;w!Jp*;T==+#KAw~Za3NG4{81jj1&ch`B@f_+BM0RY
zZaDIRT*3`UvT_MG99b-vaKn-PatSva*)5lF!;w952{#=1r(D7fN9yDfZa8wOT*3`U
z>g5t{II==6;f5oXatSvaiOMD1U7<P;sa7{wg)Z%<dLgY3VPdyScMR^X-V2b}3y{Do
z;CBVQuE6y-as5qPe-onK5K(Z!whht7>5o$5c1acFBh)H9f{RCOp*B2e3q8rpo#Js@
zv*r?mw@WHBACXIL@CaOZ0xn+eM29Le7BmhtMxiZz2<mTFq2J>4JJDmUmWaZFK&9Yp
z!y`(R8$5zUJb^@B?i7#P)@iPF!nKax`G{O{vuho>@C01E+(~<PhYEdLf<z%<)Wst0
z5)-uzkH{=Hcm!rV0W&XmqR;RrVU#zE&>zuuLsx0cx5-NfAAuc@z=$Vc<mFEBxUP8!
z!FA1I&YEe?j>nVG@i1q{X>-=B%^6NGXUB>;gS#zsjAYf(Gsq9OEi@Rt{2xKUUEse<
z8aJfLu5jd5fIIaGcel(qQf_&MrrYGDCiF)%%Ft1oX+C0n<pz(SHl9FjUhaegDL>RQ
zdBWWfj7&MBQC$a*kqAP^HPQ#YoPVj%hbnXjw7V19-6^=_&$<md0X9eiY+wSEF#*bu
z03&q*Y|sgS6B6K5NdUOpLZ?UqjF1F?+ZGxQdyaNRH?{9eQ~RF0-+rGGzYmGGi^L7W
z0=F%+9xP~|j?fJgPPjRoa>EgMah4Nq@aoJcF~=hjbOdigk?8{(Enc@#U^s#k+%_%p
zds-w;(CJzU5pG*(BjM1s5)HW9LL1?u_h!^iG<bb*28Es>)4GjNn<q({jZB&ecoLd`
zh>X`svr#7vPLMfHWWwDR8Y`iWkx=2bg+@!Lk=@h9kDPZm4TlMc>|Q&bk=ng^EvDmR
zWgK+z%%mu0wY+FL9cyU995BXR)3MrE(o1EUFl3{LFrwb9(kcvpV3Z@H=Lhksr&O|1
zt<WR3m{;>H29cRGnam6Fl8VJH;~JD;U%C0{+2_r{ngXsT;Y=P^r{o#TGKz+1b<D#I
zV7e}u$kf((HOWMS48A~o43W|E){g3&V6UlPg%v0<J*BMYlR1-^n|oFb^(ibg!72ib
zB#B3?+u*cwDkl+xk{GF$Icd)KCz`4fPy~Z-);~txbeeJu2$Mpw<P~}<+OE{`F3(`S
zPJMbc`Da#CAowWe`mM^bni{hz0Hb-}XV9FJjmDu=E+afWrCpUsCNoXxDIFluX!NSm
z(PJ<0YB3eb>D()$$z;r%G<woR&#n+i#%eLriyY^iHoRd(&UhPF&{wLywh_fcN|K(s
zj;*SS#W4IPqmdY`WEl%YGMGy3hM7Zy!OU7BG7)P{8ZiscIrup<7IN&4ndr>)>mf)!
z(NnRPW*VA2PR3yEgN?rNBM>A2Wp>D59tJ}j%W}CTIm8tTC=#7!-g9Ya3yY+;&iPs>
zJbZ-0C@$9qVL-iFFBy>eXjX!pwAAW`%0yg0Phxoi*XCg0HeZbNBP{CSVg{^i;(9Qz
zGKTd^EPAUEe=HKqLmi4>Aa9f_giw?*v5&+~)^mMC#{jwVB4)yK^#i9_7vMad;^{RX
z&hnIoOe*a~o0>52Yc(|tqL56DD@-UcCRldm7VVrFh;n^YG$}bF3(B<j+)6g22U04x
zl#MaM7_-+<Ut5<(pv*C`79BG*x0c1Vbc@cOKf6MSn;*+%$uiUV%2kkS1M*9QN-^jw
zrUh04OXN`DJ61;<ovwzUu}+~1!}zF)DAQ1R1#B)xr1N!Mn=BL`uD5U&v6zCNs&8n5
zr9>jSRe+fr^{?=;rL?p<XTXgYyJF1a3JN6!%B(QV`J95PgId8MZmd9z(Q?$M95h{5
zkE+`Rm`^Sk>{u-C4YLojj1V=iT9%4bV{)v+${%YOt@7?NAS~_Ssuk<Snl_HyCsEn+
zfV0F%^Dw15n_8QHI?vefESL2!Q6?`J@xew&nagFW4Z5=|i&(w6EJo!FM(0>~Fpa3t
z)e0--s<3G8bgY@{tIm}bj$C+ForICb0zz$KP&bgpO>84MhoY7)T!dUhg+cR;`4?>-
z*-|CZ&X@(7vN+PM=A5f&;37F`GLRz6>{6oTrd4u`5N8DIv1TvD<&a$E#w6srM6r;1
z{SZpNiG;)0DHNMcEYGk8TocHoMtiwpR2nO8hM^_utayIqkBOr-<z8hJI^`M$G(bgh
z>!nUGrw%960W*8)C{`-v<BL83n`l!ibuBGTu{yByP4TXbB{A7lYs1xxP&=zjOD$au
zglTLc%Y<*`na_uGrHYG?&z`50B&HfA@flT#o&<8Qwy~ToQoh@>T2|i@kadH|1m>y9
z2pdN=dd%2y<0ni!ebQviHtLnSl3yZG=Fce6nv4Qou&gz)5~c$ciA&)U$=VJA&s#Xx
z!vta`j^-WRCcXYksZ!KES*fa)fx{~uvs{(d%L7!*T5rs$qZ$)j@2g5pb9c!l6|>J=
zbjc;&GLuW5B*t>)5e#uOjdiTa2G1lcdzV<B8XHwR%A0jwg*OTd5J!5WDn3^+LX8?#
zn@BfR=`&Zg$^*DfSdcJk6f&}NI(JyZ9F(EXDn-X=yT%<&j430u6w1Tug+|>4m+VYb
zVhM(Cv9wdBycMORPQik@dG(E%RbG@U(>j+&M?R{uF156#Tx!Ynt@&bFgO%kO^hF)(
z!WF;Haz5$aM1j}qj;Zb=*eF0YN)_6xTvbymBpH#OTm~*{G!ZmC$dYjMPS~gED8-l?
zlcE2%9s4)Tkz>sAR-qUxDE8#vF(v0MUUbRA8B1r)SY*}<CQvKQ+WvFTL*bsQbgp(~
zY^;s-+eWuUbj3?U#Raseqi9w-24qSu*1=b2U=o>23(n*+Tiw-OFmF*llVNbA<aHH}
z6bUCFyyzsOWma=Zg4y%N&X~2Zqa2?KZt!!@>kxdP!0{9~D$%{Eh@#eXs6o2Y$-5|`
z2DDP08%xiun04A5^l5PRbbLGb(?<Br^XAO4##H)PT-M!y6``_JV3L<xbk;bps#
zofNbvQhwMZ>PCq+oHZ2-9?@NjqPrz>b4y}v!|2pzR$|>w<;;IK%+_FvX_q!ZtN|AJ
z=+4&vRa3CEz7cDAP3B7AInCMBRL1Z=WNN^~@p>RbUO4gkf;QA?<#G{7r<3)SSh9@8
z9lBS-w=TY5<(8GRh+FS&OWRe6{r8*j!2X%!UWeWpGAaMs*U3_K>Ymx<C$`S8f3ClF
zVCPI14(T?!VgpT>(}_dl!3EQ{C)b_%q6z5CZTmz;7&1|_s}!g7abwG{#M^BrR6!o5
zweDFJ^kx&yZz2majhWa<m#(dhF47_|S4TNyg9;f(Ur=||882--bFHI%C1e-e+Yc02
z$k|a*qYOeLHVU?;drMZuev7CvydHx)BRtna*?!MCa~CX-H!$>oMyQpnjcR^9z79$y
zYSNyLN&vfz2>P6&`%F^J%ayHyd6QF$S7AM_<LfYDNn8T!(h~X{TZJ`wjR`sF1@`#7
zMi$zmfvT170vZ!?8pYl*R`#h;sXEje^ipuOx<Q}yy;Jk-C=BvO2Jr9(pp9tmvzq^u
z!THa36${&h+4JU@H%a|AAO>CryYL|(7R<5k=aU{oSolUue|uDn{|<fof3wf}|D^lr
z<aPH}*75xRH`~eV?8<a@W#1egUstM|-kigjGiTO_`TKH({B~i}3$c76v+D@*MX*3$
zaTLt3{<d%t-ha`rTglPl8D@ke>6NC`)esyC@$+$W6w`~0#cLG!(6tFLp2qe{r<|{v
zGTe#RDzp&x6IkD?nDkQ4n|Y3HJ!mAmd|gAy(C=N&tD(B&5`H{6YxW$zL=-j_3`Y+;
z$$DF_kD8+Jop63w5uFU5e(bDDD<X<=wJ$HQ%odl!yvt&%Wq`jSicu+iLW^D<2Z`-`
zlYa!GuU<H8GLdfz=3O!1dp^xuW=FH_w^cHIV{|Z|Ta|Sld($8EiYlww+4L*ocAvVp
z7c!crzqix<dldNCDo(b*z?xe58I^1Hxy+k^`Wt-YtZzJz`Jrn&*HM?{7)+|j8+0M2
zJiqN{<6H4+8UN!L@+wbOW}EaeUoZN5M=Q{G7-okQb>Zkdv=A`Wm{JIRif4N69c&Y(
z<uXkkhFMTp^=w`WpAuq%tg0@CW#1jEgHcP*2BG{x9sO<HB_al^^z}!^>;!gragkD)
z8}wtT^e7o$HFEB&Lm=esG61VOS_S)hVZuRX2ftv*C%L9a&DXjn^vUt9K0e~AjMrnm
zzy87!m7lRq#jwO3F1lYFs8Vz0%~+&rkuLmNp+1gr7#0>Y&PDJuL-5rAN@cmMSdT|n
zm)n89oT|Cuz0PB6PMPRr)bsr@yeCbX;z0?1)l%yryPyN~ESj5Ry*~D_6aIJn<3~@P
zh}U7=N6D+IGY(T6wt65rIt*Ew4_SxVs_5l%GGOS@CZUuUbV=>UrI;y@d8sJ&T|m}M
z!KeT}{6YRBccPc!mD7AGjG0QEdAet%vkfo(EAeTQ!V5qwi7yZ_QPIFrd(5WD+5I-$
zjELoi1NA4an2LzkS0*{SFEcinj}U%+4&>L6_73C2$xw8M8xt~~i0CwwE1h%_RW=<f
z_|)_U8_VoqY=@d+gknlNuD>ZKvwkb-kaD?L$V5;+v*hD?rx2O$1U^1ys_HaD?=+3R
zX$sZVCZ8*t-|HY5^!Fa-r9p-YaovDXD!ef*)5+Rl+}J$I4;?Qvad8Ki%_GNCF3UOy
z%Re2RABxV8S?kESg7uTU+-}FM`JR`58=GHI#&K%XD>`rfoDOevod=|&DNN~i)ld8n
z4{AtQ9R@W%S?lTawmUVoHs8CRIdZrI`|4dzSpDy&eu^08D3}K}V*b`PaBM+_L<12S
z+qBC#^1TAR)CDH7m<}uTRA!i%#b!7rNpRxaBRUw~=uzW3jvuInvoN?h2H!h#EY0jb
zAsgA47kIw0qqVE{FsFeEg%@dD4==4ADL-_3Wq{Kez*{)$lfTr668{H9-1G#UF+&|I
zW2j<i)-owJiMnU;$%=Zu-;hf<f0vJ`+OaYPjwE*WribJtJ75RV-)6^97Dd=;+-g-s
zsSPY<QUDobS0=?q#};P}TL+BoOK~;rm>LCv?nIw$-(0h4pM3(uNvR8+T|j27MuUls
zlg^VFG;a=P(C6s=g{~MgYRrG?14(`wjjtr(x?f6`N*_;V^h%S7H2Z+1_|`Elt}5mJ
z0C4f?Z>gT`ER|I~b~`1kx#I>vcIp#ne4U)+32n2S?5(}8uf~_d#BpKHazZ;Q=c@E7
zo~<|I3!k#$q48t9;E8U0aRIZ8!C~aps`@mv#|5`GlDyNmcCuEcZRL4Avo?;74qT%(
zFGNqd5Y6Q(|4geT4@EO`rDd=$V6H?(f_a9Vf5wGS&UenU9X3^^_&yl#siihr=q>Vl
zQ)~la6C8??A5stoPjZ8f2kw<bi$SoPDSK(yr1EB;J1duN-hv6Rt2t-^zYWgcVN^DM
zch2JZ3o7!rXV03A?R1tIOXOAu^Jq-jDR%yQnVB+meVIqDFAj-z=)lMWr&j60>5Wn7
z6=B+?QF})2dZnYGnVxz#kR#Y4(!s0r#*~e<-64*o;(`9)*Bd@`XxY#a-pStZ;iY3n
zl#LnTm5$Ac73L1S{1{%o6!uC#KNKY;Q^ij2noC%b%7zauE7cEW^kjrrUFqd@tmmqo
z(KdMyijgy>8$PVBakN)%2vc-L#V9E?$*HYxy)n74I;jdqn{wEihRlv;`FKrH%j~O*
zHyR5aP};c6&8Q&#|I#r=hmI;}nRyKiXMQn6POe)%au1#S@5E^>y31&v<@sz#Ii>A`
z{5p(|0%S=;f%O}Xpm}GXJNuGLoCkBxp4agK$F(k*fA+cOEyThPY!YTuPLFt9GJnQ7
zf{fNR*qeFY+{G2n$`((ZnBTI_;{poqRmtJL9-uy;V?jrNjsbBu#lt`YLC1rR261OV
z{@2N1P+!oeLC1lP1aT9_exRP92<TIwLqTB>|ML29&{3d6K>VWCzj@v<3dxNvcFfo5
z7^1=oK`bQ3i+BR-G%>0$b*h>+O`UccSXFtsnmSDlfm^Pom8+9aRu^BazVHRb*Rv_)
zm2o<0jX2uRHQ=jNSE!8CmEw&vc10{+%FWnd^aD0?a<-?F*TA6|Yc!d3Vrl9`+~x96
zeO|3mBNg6Yv7H{qkEC~kg^=+C2KhK1h5-j{Wbh8ER~w3UrURMEMM2(T<<%1_3E>3|
zS7{2R*A7y$?}Irk&-EuSxVk4Q8*)Jy7E5B`0mG7xsu?f9@<vIo{OU!%--~aK^u$pu
zu~n1VK(RKOti;xYW-~R2hsD!d37REw9QMxTnts*JEf<#b0*BdO5HH{P{klY5_TE;<
zu;Ud6>Nsg5V^(@MxdMDlkzAi+7?#FDC3IG01T>$rGR}krzu4OW+pS;;JocUF$Y_UI
zgi%&90tZ80ByMB_$NbVxRiXDqlimTwLuBVfhHhDNQDk5pgyn*9q{)5}vU7yqKSJ*?
zp|_nl+l&I``DFaUCp8~lsWlBK&BIGm*q?F)b&yv7-;I)C&Ii(2U|zj^+IOkCPno=2
zpYml?9x;_pnO9mmR2U^F_Xct7s;oj$=>lP>#}rjOF@2wWJ<?lB>hYs43cbtbh+?<a
zm1E6MzD^d<Ofx&uP)XwdwlvM`m)504>^h$4q<2Uz-Uo=W!-d+wB7LMXIO>}v>R9NW
zMAaye4u;XHjsaq<NM^r#iifEwZKp65B%iOCN>*PptdKx-$2&xU9a+TTlL=uLxT6$#
z5-6sgb*vQT1qK-b*|d?q230n@k-ENe_TFH+_&H)654k!83yt;k7}A$%A`DamL9^n+
zJ+ZlE>Xa_R^Ly8uWUeT~Hn|vCYRK?&BfAh@0)#61JD7&(D&p!?W&46=Jpm($os`n`
zWo$Z3%Oq;p{KGO$_V(P=DBNtA*T`XrgzmE=Ga9c*T*kQw^TmrzI?gj;ythyz#FtTu
z;)@$EJ7r@I*ROthcTw&oj1gC`5%wx!fG*RCs=JX+aqrX`tKll2jCq4#vK5V-PMN}f
zV7y1zKoD`{INn*1OK8kZfc(l0lPNL9<}V)er@xs_!J=cVv(y_j@_PikNpdc9Ry34g
zZEJ0a{C2|M$>=Vfb29L5&p4K{K;#8V@xY64WsLKuK_JXCwiM$Ce!l1+53DAV*P}*F
zFO6qLDPKp*Ls!m>lk<}q)K@NJ#}zlT>Tv5(w)Kl*6-&yVx<;VPTjsh^Cc#;9kr~E|
z@XOR^YNUsyc+$<o{0MzP3nyJum?y_FQuA>a%5WDI1%DrxtJe6kf*UpGcI9PgDp!A)
zd15Xo3~FKrXGBxsHSMypX$^2av&W~rQBk=ZD^dqrW?^2)e)ExMw}spm4cwc$BBjL*
zD&L0{#dJ!ccxo1!P4fvCUs2KDmBn4owfO`Rn;fD)oYPHbrbxsltP`<NUX_lX6u$sp
zjNpYumBPW3)YQ`IY50=F^OT3?q0^q-TrAH_V3?B2s!UBqhZV2)kTp$BMft+GFD_7}
z)6?uH1Dva0?P1{n>zH1nZAO{J)JmsT5q2i^Qwe-51p83S`0&%p{3IF{j61W;YQ+~Y
zu`HiwqW{~)5`h#-9X=_OkWd>h{=^(7e^L&-J|P+SBE>|<KCsk~Tg#&5LviJ2h&m;-
zYWT3Q9_!^kSv;`49QMRRCHyzppaU0NI(0*u8D<tb$f$LVWhUV;kAwkuq})}XG#&Ew
zu9_cz!Mx@^rj##mlrG@b0IV2_hGZxlv-Tucw^JycVh3_V=&YdmcbGDH-NeitjJ5M&
zWNz}W!&AN%=|+YhjG)sW<H~iaV&A^Z=FHMnQm|ndU8?qy{6w&fiyv%uvOr^G9WUO_
z!FPOp=tV!3p<cZgfo6gD{9&AL1SLT6+e&)>9JKlNlHP;+_Ub(dbT}vi>Idor>ILcn
zQlO9e^y+;O^bY7Bpw~gKfnEi@4Ei(ZdC(rv)1Y0T--8|lJp$SedJuFU=$D|Mf$jp`
z3A!D03+QIhw?N+jeGT+w&=*11gEoS$0bK>U60{PO23-zn0M&zHpeSfL=yRaOpz}fV
zL1%+zgJyurL0><tSMUD@Z3f){x(>7+v=;PvPzH24r~y<9ss^n9T?D!SQ~^2<^jXkc
z(3zmmfTn;Zg2sYIf=&i`puwR2pdO%q4d~VTpP+X@{{a0Bv>)_W&|g3=fcAoRgPsQM
z1pOBD2&fHoALtjLAA{}$-3q!H^bOEgK&_zlpf7+@pvyp2po>6DLFa?c0nGxHgC>DS
zgH8dJf=&P(4LTguA9M&P1o|)nok4#Gy$bpZ=sD0+peI0&fwqGl0Q~~=Q_v4Vw}Ea3
z-3a<Js1>vxbQNedC=F@^)q+-lE(BG8&IQc{O$SW^jRBnk8VWidbQCB8>J7qHb-h3Q
z6!ZhV0eThmXVCMYXFxkazXSaS)CRg2^mEV;LAQgx3%UvP70?Z!^`NUkSAvqDIH(%5
z0<;XY7_<QNS<qRaS)g*zB+xj}D9|aOp`a5$$AAWb27vm2N<bg?N1Xz_4SF54AM`Tl
zMbLAg-JmByPk??4`VD9s=zh>IK|clE0s0Q;M$lJ4n?Tort^s`>lm<0|E(O(qDnS>6
zJ_lL^Iu~>nXeMYXXd-AVXcXua(8-{aKqr8X1|0$F4=MqD*soXbw?Kab{S~wi^bBYx
z=uuD`=w8s>pu0fd2W<h}2>KGJ1+)&d8gx0R4zvPvA!s4!Y|u>58K7~Xk)Tr037}&^
zM}h```ht3b+7Cs&0=)}*1GFFX66kr*GoW3d-+_JudJyz0&`&{kfVP5e0(}Lv3DgW)
z4N8Dwpk<)*LGwU!K%W6k0*wWo3K|MJ0dy?rD9~Y`LqR=33iKgt=zE|yL4N~fK`((`
z06h!(6X;3M??I1&9tO36?g#w>^kdK+pj$y(K;Hy?9rP8@7eOtc4WPB4FMw8o(x66A
z9jFp?G3Y|jV$cH6XF+p7GeA>7<3Xo^P63sIP5>PX`YvqN&7g0BK8vPh9%w%3pSXVy
z^bY7v&>NuFK?gut&|g6>fnEeX2igOA8uTRS51_|EkAi*!+6MYH=swUrpu0go1N{W_
zBha0o?}KgwjX4}?4jKkJ5p+Cg5GVrb1L_4*pbz1<7UwF^#h?p8OF#=j^Feb#GeA>8
z6G5i&EO<Kp2<?x5&eWAh-THP!hZ;U&f_r(~D?%p6-TlW%!$-_7b9fOld-w(7esmFh
zoEs2*rh6(hz!NEJ!ABh|#^)|ZPZm?)3md*GeSCcGVt&37!<Qx>B4B0mxr=cU#A2cc
z!sL<gh3D!?jD9Si=wbNkeSEH-#9Thn!|+v+&(X!zlbEY#SRu_kN>b_~zf1>P?Bfd!
z7@`2naX!PtRXz@RY@QD*arovEbMy>RAbvb%`1q)&#isbM5(gXSlgWG!ft80}rj!X!
zAmx`yti)heW}*7WIV*qpeA4J?F*o0dF=UI0E~cD4?&EXwotU4`mcd8JhxD{E-Fzp;
ze7BfeKDYV8bM++VhUb>g`+R(^p2S=}w|w4BK1UZ<Phzf~VdQPdqa>w%<d^ASxB2+o
z^0}4af#1eG?3BT8`!KhB-bl>R(=DH0@$pel{&?Kr!`$+@!6%dX9`eA1!!J|HgeOoZ
znZ!yAW@Q#CpPWDSm(P<1>U6P~oA1OJvc*IfQ$COP@wxd<%+F`b=TYQCdRm!oz7u1<
zTg)w=hx@{F^(5wo=a$cYK0a4ZVlJOsK6{bR(Z$u1n5$<PnI7^eNvU?^EzdR%%=eIo
z2RIHAb7Z>Z^Bq%OET3CG-|%5>`FxF-D-+@I$Kz!mAN91@^FGWipMUbnWWI;M%EK>H
z%7iD7^2;P<%cqrDsC;rx-<D6wL);H%K48+{Vs8Es<AQ)fGMO2a>6VFc<O}IF2*lic
zFEe>tNG8`f_+?I~p2!CmvvDBCe7Bez-ee!2Th54)uaGWWKjGKqTqD!PtS-bT(_*eJ
zbA5cSF2uUih3hnsthxRWF4bc4p;J&O4qWfSI7nGC_9ba_v6!3h#HfqKq?{SP%Y1xp
z9EiDmVddrOLzNG6>%%gG6^aAbwD{w&+2~?1Hx9(8i^beHwD|bkI1qFB+&HZBVQw5&
z8>~<qxYouWhaVYTEat|67<I9j8;9F`d~O_wxqNOMzT?B(IQ);n3dMnIhWv4O+~{I4
zHx9(8i^beH{Km)U#(|j2=f>dyALhp4Zi5wy1IJTYk61kI5gCN=a9C`*XA$V`!#oG;
z<6x35CxXx5J$zW$!Tv=(aWFi~7dCu;ti<7a-^9=5vu%Kjg&@~+BJrjZ9<dW0?0^p&
z>R_)p;gN5;gYEP2&2+FmK5UkQ{n00r<;5O;K9&i4`1x3t?BUlX>|mW_I+&GNsJt9z
z198p+P2Lvb<61iZF_?U)4~6)+w$FbYS44PR1L!|aD1wjc{QSp>MeuPwq5mi)UpIXQ
zt}pZ-BZ>%*>lvl4ApfNAiu={z3*l@rx8F*P;aH62#g?^{kI%JP#Qc1=95#>-`DbOi
zHj5bZ)?#k|y3QA#t0yrxJkimV(Mlhmt0ys+PjobV7m?4=#nqFTt7ll{`=5*bG9Bz(
zAD`R5K8N8sY3=r}XZtX>e?6U;qo@1+H^s+CJ^AA?&WE{ez(}7==6lEk6Ar&jDHEPR
zon#WTw$;ikRByTV)_+_DUHGgJAJ_5vk9Fijx)kE$I$-~?p@{If7T8~p{)cJSQ?C;y
z=9W)le6e@=Y(3iS<8#X=F+ZQJM=d@+w|o*KU!k~jt+PK4cT(n1y$;$R2V%;>B;QTj
za*L18jRP@1pN+$}e0**kh>@>Q9Jnq!1fnkX_zC&CiTerGvvdAs5qzHG-(KEFJ{*Pg
z9AZ5?=LgBxP5C_0@oz7;7ZKh`*0XbdqzJx3aVUhHjBuC_woEhF7fg5-vw2SJSrd1Q
ziOnK_<7ppXSb6fC&L4c3*eruSW@Hx9a~S+mPdB{38<`e!!^`?GH@v?T5ndr({$1=;
z6JPiAHg(xhxD1X2gVc8q7bG0-lMe|}NS8ABW13kWUVdcKg_y`>LG?g5ELKS7DDAa_
z`!QusFRaUH9XRw&_{i@0M#C%PP%_=qOmL4ed=~5NV1s-Zn8_~306%7uhv1<OCh0;<
zQW)<keoQ|XxxEZlD9y$|zEL8l%L#^$m_Iy=6_PpD$Q&@;!<9aU8krVzZL7r!$s7kU
zRM3?<!pO9kE7M|yWR5qwxu;P@q}c?Q!Ca3mf^Q=H`qO$U`Q|7^Ow!uPztas?C=RCw
z$ed&Ni1}sCC_?6>0GSI6A2Gko&lVwba)8VW4IeST%*92>oDv|j+VBzc%e<rrnP&vZ
zY&3kt{4(o{kU2F#<|@NS%r7%lgv{~)nb#OTVt$!xijX<Y$aL-5*T^?rVU43MyRJR^
zk`FUpaKb#0gZXv2)?kIo^=I<Ja(3xv@}aH}^UJ)+V1;B(50H6>;Ungkd210eXBe4o
zn*Ex55NI(s&3@&>3_DIr{oKL)y4+>3Lh+j^QaU=@i{Lx6Ba7VaARmB2;mr!*`&|*?
z%?{xELlJz)da<8wT4xQP#oV-h$%lbCSC(FIFiC5QHf^el8HOC+9zUOBub(nlp){L|
zIQYYR-S83fhi9=uGS3P~mtIHdGH5Y3T|z$0O_z_1F68s;>0*98-}m!5>GD<)>2h{J
z+z&N+67%a~u|nx`4*2}X03)*y-)F((kKdpo_~sctw|t&p_$(Hl?&VZErU;qy17wac
zd=_(M4lP3FxdAfA89s}-GDj65^Sl6=<%Z8<uFOeA$XpO0bFSgDm@9K;5i-vYkh#S0
zS<IDrz7KQj(YzwUTNn`D3d3hHH@sy<$gF@&{}C&K&$oPCMAR3-w-`QIAKY@CGJF<u
z<Iq@y%q0ObuQ7ZUb7ijaVQxOGDk8k40pZ<X_$=mzcWn_eF9?wNHN$5ySLT<Bkoma)
znRggIi@9;X)rYz7M>qR0BN`{AZYn~T3&m$g=dL37mVrg=r(^4W2EN|Y3->233gEk^
zi13zoR8j68D1z_e0KRQS@LdwX_nRX4Rs`@pRs>%(fbaK3@Kpxz?J9z=3Vi<hzTfa!
z%q@d2`!Fy|_A~f>4(4yeUCc1#_@4FiIsJ*J4OXZPuQqYWpOpH$;UnhP#bSkI#=z%4
z-Y!Cy8b1^6-!Fo%Hh}NLBKYb8_}Yu$s}JDoF<AE_3#H4Y;FFA-?&TyLQUu>+0et<y
z*PWe+2k;$MM0gDWe8-sZEGF|~CKg9h=FGx2tI_y%PbU<iOTuL^*C!Rh*A&1vjC|d^
zt6d(zcWM#gB?I_QD}pZtK7W}QR|H==fNxR}e3<|}rxn3>MF8JS@^zE%D+BoEkguD3
zSQWr`P7!>o1NhD@B7RqbkNM#C-7YeG7ISU+QXgj6CG>?wg!g&N;MjsF_`0jpUkKo<
zEh4-%hR==P7Yv`p-1x2ZVQzmZ>BFo_IID&tbh*khIC0+yKE~Z*u6<cYncbALtBp)I
zem5IkEat}VCLe~(mud(x>T3?>Z~t7(Fy#2Y<mYqR;u{QBsC`&#;*dWnb*tec=GVny
zg=DTX!rXNEwUKEtH(h?^!`yWFxr6z2aWQ|o+~wzU(&Y|=6^g?(`2@+O^>)KY%&&{Z
z3dw8+pZ|EY2wm2L$sfO6<bypUCb~HBd)#1!biveNCz*T6hrv2xewlwVSRt7k17yBp
z_=x#szF36JYXfAyK|aKtm|x~=1}miJb>Q<K?-aq;;%CDBLGn#6+z+`vfUnolnva-2
zZ$l0y@uL@=zp4}F<oicO=+YXXOJ5USp)|W8fbUa9@NEj<JG=<KF9z@(Nj@Bf^!zX2
zl4jGr+}Z@LN9lc%QWop9R>i?MPifaJa6QTZ2kW#}1y~_nHV4GvXvU#eVZJYck7dGL
zvoPGm-C|+o<)okJ!`w9s#}VsMIJ_?hg!g$P(_(IT86W0`moVXxkNF_$Ly)FC>VR?G
znv2=>BgCku#Uu|5U)0Cv<^wUy2liZeAy26b$p<AU(_#$IVpPz@nD<Q9iZ1wqFsmnJ
z&U5r+cveq~xq4bY%ADN=pC7a7NqIaz13nuEi;;)NWG4>97+%Q31&(p#^QW~ZkSa5}
z6e`zWfmh0O*D`*UGI3bUUCX%Hhq-GRTa7N3k21pphEkNe&c{cY7F+MbDAQtVjm$!E
z_;1J$fo%C>ct0{SEhc$H0LL9hrp4U4d8?1ltt;R0VQyWy(a0>MXCdrsTD1=DPbm`-
zE5!Fd9XRyO-9_l~^#HzK6%pQz;A2|bvdPN_$cLklp5LGc-%*VHyvfJI+hX{>8Nj!#
z2tB_Q!1r(weBTb>+d;mP!s+rI@JV`3_i_?`R|Mb9Ip6t<T}9}*CGS0V^)&flLki{J
zcXPh;7ki2bZ!5e@{JcEh^F{F862SMDBJ{k~@U3;i8-9!~pB7UNc9IX9UI6nP?0AQd
z_7j^H=jy~!KFs~@<uD&czOa$&$K3B;4kaJ*h;gvtl^8x33sDUx5<Q*ph@I$Q?Is^=
zx(s!&f10$m*mMVb+s8N4!Cv=avmESIpG?<Y`}tgZ?dOxW9dY5|*Cp(P*GZ;>S($~(
z{P%Pa9o&&7Jqz*O1`g(t#Lt8|5q$j4)WvN4iSe5ei{<(gka3!ikC;sxV%>dfa(jR-
zXOa(x#oX}94OS?A-w%*^p5e2YEA#9kWZprAe8*z)g$moHJHg{m>x)fz7ISsEpa@-l
z5Fqn1@}d4&%#~SfutI6}L&!u_lv{R_<U_s};`>p6E?1lIEavL6st8@~3eaU^5xV?1
zfbRywXEC?_b;3|~?P0M(asNp`cwaW*S<DTu6Xt|xu|nbf)GFtkzs~SZDx60@bNt)O
zZ;}tTy-;{Rx1OEz&E&&Ti0^L4zrEZ_K9tWwe7~@so%3x)g!fDMm$K{S8SgfH#H2j}
z79M~I<M?p^R${O_i_r5P$nb~vu#rj3AKrrjm<{jVBEtJsKzM&NGKu-adm;d{;XPJF
zc=r|vk62gXx!5NO@4kTWY<d#&hiB8%#cX)Rr04xcrrZAQL%Oj2b1~cg5u+Wnm}}2=
z`}l|njxdOIXFneZ(B*aVp{`iW4ezf8D^!nu4Vivh{*KYbVy<24ggJJ}Vuiwc(8Pgl
zM|gmIW~jb*EYcIteVAnB&A}MnM3fQ?akqTT16L;f_^_PJ04yhy>1p}+UTkH41G>0;
z1{0b89gK-g!5o>87q)HZ7k%*qR?-3U@!4`lK35m=b-;Xl_Wl040KN{G!zbe?(^oJU
z)!a$XAxar+jSrJ?6oaiK=Ex+E$c4<LkB^w0>xu_pA{Tr$KABRF1`d$)hyvp`ce(tN
zI;OFUh&j6G`Zr(z<F_;z^N20<V+hOE+xeZs%VTHx`34LaVENAMjCmHD=EGPX<ojdj
zG8vd#SKMzqiBVr0cU{LkK2qa+e7dgWG5T@&tS)8b>y&1ikC>aDq9b(WG29oPt0yt~
zvEfO%HGC)f_*^}SxqPCd;X96eUFb=ylb#+W;rs4@@RTQzI>LuZcn15FFFYA{GgxmQ
zUzh?77V=?I_YC#{?5-OJ$@eZ~O5S!MlbC&<wlWLZ<Tj<G-Rw<U4qhJjL(c&llxo8@
z4ID9BCVmNwlW`U!kMP3ZPkemjvDgm`Um;z#IpJAdo&;YA;klTV`FkVNVy-Sb3h+Ht
zgf0(37yq%Fd^iflVY{CR_j}2Q@>z)Q;Q+pUMTGYo@G+0vdh{mvN)VolSsOx(x>$^P
zWXFwP3&6t46U|;SSfMyP5}-@3<Fqa=W_2M(T`cD6(r&_YF{{hLB6QgST|z=0TzwqP
z@Nihn%Hy*me3)$)iS;*n7K;0$@aGTj6eH7OZg@j|m>b@wiwN&AD&{**GcpV5`CIV#
z^_*t-EavJt$%namjx9pZ-yuBdBuz&-qm99_8GO{iVs86DjD9Spz$axJ&#w3Jx$Ofn
zKcBT(>&b_5W@YlZi?Iw^Omsw;Jg)YI=jus}ek`9`|5p3>Ts?`oe4>X5FGW5_7gtYW
zuAa=JkVi>M#r-lJEau~L=f|Q95B&K!3{hZ}<02pC&W|l6=IH6Rf9L!7q%0Yk=lC$U
z{X5eqlldMpe14fyCc2PGti)heW}*7<xH9DvJhpFo2Xw(><zlvPdTRh?`=&P&L%LW#
z&iz@L-}3PhvodcCz^u%#8kvRS@OvujJAOpIP~kS`2_Fw{e^Nwve+b~ayNK|1g3tCR
zm`^-@4L-K-E@s>JUr{EoLUG>(8Gf0M8JR9-Wj<Vl%qIh6K4oOOn3eg5B4qwCK;}Lp
z)5WaJXN!>eRDjIaj7%4^GG8e|=F<T(-!(E_%*y;n5i<W2AX6QWe8)l@7qc=yq)cFi
z^8J|rnTJv)%8QFxnZ1B@SC)1M$UM@>bTKRQup(sc36MF&$aFC)^SB~pJ{ur&q><@j
zR_3rGWbO@+dAgD5VpitZB4j=nAakaX>0(x9c@Z+750E*ZGErV!%*s5AGP@~DF9gWE
z!072>R%S&JdhQF5S!HCpn3Z{P5i(y4klAQtx|o$&Uxds*2gqD)WV)D@nJz-+Ujk&V
zH!@w!%DlP=nJ)#%{4XQZ#jMQhi;($pfXuH_W;f;Kl>ok*is1We0N?ja99+!CVM`Hl
zcr`%gPmC@uW@Y|>GP{XiHbCb6My88dnZGPT=KcVgJB&;hvoaqlLgs4$GM}VOv;i(=
zW&WNryXj9H2$1=_k?CSq=I$b7{w+Y}OO)A7KD-{lx4#I!zX$NWQ3T%`0etTk!S@gF
zp{tpDPs61e_-Ujy4vX3MEj}AS4E<z_g_Xz0a`g4{IarCG&&(l^F+|LBWOAI{9PNk$
zFLU8>oZTEB5`!*<`WkOq&(3);!$YJC@xA5vx0lD6I27W0+j@4+UJ>EF<M_9iLyO>h
z*Lrr&!;8@KJ;%Sj99cwo@58gd&prWsthX*^>)2?@?55rx43Ig;$aFC)bB2-WVz#KA
zQABwE3<z(j3D3oBcngh87qj8bD<ZrP0>Y~^;klR%ugb`DF&p0UBEtJHAiUKkJQuU!
zrHxD%v*9%s5#C1u;azXSb1@s<1|!qOY<O1}5#GN7!n?_Y=VCUzuNj#xX2aWDM0g(u
zg!cmzo{QP=ZZk4n%!aq6i16A2!h67k=VCUzd#p^C&%+IlpIQt?OFs#4L!ImNqb5As
zNn77-c-xDR8FKjSc)=fyOc%2<pD03RI6&qLMy88dnR|+m*&{&ae#%7q?qXKv%aqwo
z+g}nO^Btq7i&>d(6rpF&0GaJZri)pb9~2?8SAfjECum#lVpe8PVBOjBLjq(DGBRDv
z${bLHOb&F~GHA<^XJopVm3eFtGW!I`Jk`i_F)Q=rB4qXrkU7!FbTKP)Oc62<4Ujp*
z$aFC)b7~PX`vu6HXJopVl{vQvnf(J~E;TY;%*tF?gv?JtCVn0Irt8Ru!(wjVbPX}|
z2Q3y>9=*!3($D8$m;3pgK4wE_%!*W(`DBK?9HeTAq0r`Zaj;4sR^njGO?ZX+m=Pw5
z@7O>-JTJsIAb_u>i0}>z;M-J0c!vk@eW?h(BLeuoT7;eh1Nd$%BD_K1^V^s2f{%S#
z7qeyeTa?*NpY}*2Q_rugmE77xJ{&F<GHVi_3c!>nZ0ZSMY&R^QlxuITfRFn4h*_Br
z1z=X@eLk6bK1a*En|!E8Hauch=3N1pm3cd5cJn@VR7j__n=TPgr;Cf(@cIT|HoOvG
zOc%@Nrpw3F6NiggnFj+fEAvgp!I9~v%K`EsepaTNF0TY&R^|(o*-g3(MwtF%AmiS%
zaGgFnfNwDQdKKn7CV=m_BEmZse8TGGwe`q{qmb?Se~ozo@jKb*Nz5OI6N`w$kN}xw
zhL4zE=7=I>o){q0>PgHmvlu;30u$|-TgReC7Z<bj;i3RcdCXCzmH=aYuzYSETj1j(
zW@VlefLWPm`eeFwtekwPD>gj0j-4KWS(&3Lvzt0L6!Gw<%l}X&4i~d=_;LVd!@Ggu
zL7wGv(`BQN&rO%L0hpD!+9$JwfU)x_@*#dUJYrVQh5*dUtf9<q(xo)S6zF(-lQO%p
zJtqh7-Aq0lh3fk-@cHxMDZ}StHhzByz-;^;16Bfgme0+H?LIy?A07z6tju5dWV-qA
zWAY(AZFp`z+!26TnOiBdn|v6Kc=(S!l<5^t&k^ABr)U2mIv-rjrf2T}%<35i#`Ls&
zZhC%1U2wRVmHA!(W@Wy?xH~f4^xRKAq>Gj5rsqomn3ee)Wp<OEryxwGi<-{5;_*sd
zg81RFvY5Lrh#37?jC^+e(&v19?z$jiem?tNQb9iGX=S?Wf`~Eh7IW7xo$CwF)svVT
zp1XeOEFYh%Coz{#bVM9^%p{+qi>oIwS5K)&noXVIm#L7}1{?3g-1SSN8J^0=UDneW
zzEgdeyMF0pVve4=je{T@o{vwLU5y>>!*m(c*x^2zQeHfb`DIF(FqmH^u@Zw>nT71&
zsZ0RhQ4L-As1V=C0KQuCAzcdbl?Cu!Rz!HCz$dKJy_~iQ^5J`#LgAeTCcj;>cHYIT
z4Y79K#gqxs+IfrVyj?5$SUc}xR;IP{E@ov~J8v=9E?GP8VpgWL^Dbs(7Gvi}BVCYH
zVwa@udP=n-J;Qitv0S|kz@(hfp5fQ*<IC0C08Gj*_!y5bfRFXaAD+dipv7!>#4<iU
z8=l3wD}!SYcYm397%~+O7o$8L4+da1t$ziq1oAAOTPA+y<0EEe{xATuGQa1O>6VF`
z$%k~Y;SsYkzY&00nO~ty@D-{nV?&+G#6Iw`Ojyh<6MoF*5yO1O$7k~>2qPcmG9Ej@
z$1>p$&ti<b#cX)Q9`o_p@GRC{nHYz-<0tijCmydtW_R{wd;s6;hR<SQ#Lpg`Fw-X>
zZm~jnG(nWK()3yO0XeB~-cAhA^KGN2#aul*VUC^_E2QV?0eb$E;o&I6Hz|Pcqayew
z2k^BQ!8av<FMMM6dY%!$*OPoGpM~N#HGr>A5#g1CPgtjWI@96yCm-5Bi@EvN33Kw#
zVukdahQR#&))fekI#|r@4-%td7PEDl&o1=w<!p$-=*Q(_-Q}@}d`M4=**a}8rnSY~
ze(QO@@LWBKk>B!B7wXF6Y#*PiCo%f5e4?Y_JCl5lF0P)$Ts^}IcFuz!98>)=9c+S+
z&+WI4VR+!Ty14z;kv`1rw+<ub=;`)bhxquYCx1MS@nO0>(%2C`nM})&r!l`wVqt^%
zWfHUfRx7hm`TR_%bNT#=(bHmXz7wNX786}eIosspbMu{;pU;-hYsrW7v@+d%C&qlY
zn45piox&TEOY5tAn45pAec`$Jm-6w26%rah9&sP$=3mSwlj#!jz=XpuQ_{>6sFO@$
zHvg>5Lism6)H(m|r7kC-IvUK)KVr(kL>H5PKlAaq`A5vpXY=m|K0Y`9h`D^Oefge`
z&()Kd%jepc@A&v!J&Cz|q9f9j$Jc#)uAaomS17G#AU*NR**RXekq>Q$#lj}6K+L4G
zixmoQW<Yq4nD8v-hSv#m!n0VR@XnOTQM>%{IK#tHh;LQ^-yg__)qREdW(V;7k$l~Z
zRn7sQzfFAwd?AEqF}Excqb?S6%lr#IKDR6p^Yhs<|BR2%Elb3@i~C#?2e(|m1wQUY
z>SBT;{fV)BTFfoi2Y_)eQWvv&66>y9pOw>v`y_hIZZ+&A@Zqo+?WdJ_60sh6OsClp
zdRHfO;)6W{FOOq=e6B4x5*XCTh3DoUG4fko+%y~D<I}o$^sb2UZ28<Y>q|Z-4#aHy
zh`I4&c@bS9tEVr#|F6Bfjf&zr12{h5&g>OYmxwJYP1gpMDA}Tth#s06#g`~r(rQCJ
zwh>$!G%6fekFParG!~UaRN7KPTau7U%(hhzO^vm!wwzP6XsE?V?3!4m29>nigcvoX
z>Hpc?k#RMo-`WqElV9%a-se8|&YhXdtR$;-oKk1)&w8DG#CfnDpLLv47un7n%Qb2D
zG2@gv8D~%T*n`q(#5O8C&Ys%Mpk3rWwkCY+W}WrerB1pr>#WDVJffZT*rhJAoq6nq
z(vIUZb6U@l)XA}%b;0w)d6I2$M1R(CN}a@*?X1_5JEEO+oKk0P7aU`_zi&x9%UG=A
zlsfA;qqXkmf`=n>TI#YR+F74_vZTM8j$x=q)8IBOqR#r<GfC<!<Fr2aWJI)+ahf^r
zji|Fe_qZZ*%6X5XscexsgV%&JSfxeglsfad$IRK&^*J*tbbVUSU#X0R-<4bIg7tJM
zb@F?3v(9?{yb<lJ=TGWB>G$thjD>&X5N>Q0(vG<{>oiMUxzw?lb>7?5^>pmB=!}1E
z>hKwI%AZS_b;0{VV%Vhalh%o(m4=#+J+Q4ZR0jNO47GNhp%T{{st66peuDQAzrj$g
zsNQI(1y33(X_KMmlp3lG4d_DJW<xDOE&NzpW~h2}An7SXwZr$cq1uqRjrJ%*1G<n<
zP7e5ywcSt!*oYdm!m-0pZd9WMl{?9ei4}&bKoe}=GgJ<I(7sO}s6!XBf56y~T1j5C
z!u><?p#`y3hRTF`hPi>W+E5<&(1!FMF<zWS+K&xYimS-_3Hfjkjv7OG(Sqb>Iev5?
z={a(u0!^?z&z!>pABt+32XrCr1?Ca8@FV`G^ns0Ng=3eYro)T<2q3wR^MXn=L%qnn
zU?tk&+|9h84e2k@53+sa{u%R(8gyd%&zTPdko*gBq60~L7(Xh|gq*#GDu=d@`K+fc
zs(;CN5J2+Fv_&PFp?<}9uo8RF4(ERIpd5|RUg0=@&2hqUkaL6m2q5z}<U%u&e#=<U
zgpA)Yhwz~diHA7nXh7Ow<`D6}Cnp?#ASYT-aD*|#dz3y9K=PkBUzpg$7~wp|_|S-g
zW<#a?nf9ng3zAQ8jiVV!f8p5B1ZN9lLL(ASa&FOpgx5H)IE469<itTZTFHxQv>^F)
z@}e0@r^$;Z*#64#!UG@5{NzO!($0_@weTbL4bCYXZ*q(XV8K~(V&dO8KG@E2eDFa#
z&%B`yUC3@D7p@}f@8m)!re7e>Tbv6tL$#9+E3pT*iyZSM#&enRpca0_cQ7Vop#U4v
zij=n*A1ePr`+ss>z!~5g{TK6w(s!7T_vjOqXok8%%=`3nm42>~_c}Sz3daZJ!+r#i
z+(lbdq8SrE<o^AL<B77X*j{$E79B{k+0}ehAV;^WHXO3s)m2o+P~V3-*n34A(YF45
zWBVD=z3jd8ezAS~NA>BgYcVl><o|9O&iXq9EX~2^sS%WSqCa{g8BPoaA0xH9@j2MR
z#~^Ja?!p%#YyK!Cf*)o4wGWz>0{QKV3l7|a&m#_We`5<h1IhFK(BQMIyf&Y2LUmu@
z`B%O-D~#{glJ8uT?_e}zrKFzk&$^X-pPGD^g84Zi^fOd)hMudX-m=g4q$!*HH<&#!
z$0u#Wf5(MP!EG@nXQZw>>?&=5T`fQbI#CyIR~{T<KR{_t&?Xnx7aqkoA@9FLxeM*&
zsp+k&IkCFR>aVLhTy^M5i_=vOGGcU9&bD_<sNE^b6G)+tJ$F!-sH@b0x~h-YRa26#
zTHuGq>np?s!m+jiJ;$yY7s~%EWi`sk?--`5#(NmsD8?~DR|)s&DrK~;oRmK5P7?QO
zIJT2MZx@>#j(tBPlt1xHtWD@3zn8k&DY`mzzpmORkpHXXMlveW>9-)?IXmC8Vv#%F
z`9MiY{?fc9`Nhsu*Z6V#x#|={4aX3~;k`^lU4ZN#qdXkmucNFE@5{U|r2Y|PaDH;=
zCubgWH&<8bxhQ1*3m6Nf_iOA=3yt|W<q_1-rtv$v%6x)z<<(W`<IM9GT`4%wu})Xl
z!);c~;9MgcQz3m<Q&z%Hp60E(D%hs0vZr<BF4NW8ox0kHHaK_a>aLlrJGc`=FbD%N
z0R0e)-mt@lD11on>$rk<5y0EHhzmG}H{r+YcnvK$fmhLlqi94d<L!%nko83Fe|c_<
z3zxE<3_v^vLN>X1<a3>@N3uSc>xisHG3WzXi)77`bxPKf&)~C=bxGEq1PsEFEY2Yg
zU>|&V9#z<Z&3GKk@fh-ugISo2@kqr848>r?BL>m<fcbg{7jYJToWyZ7;xJypUc89s
zP=)Q-jP+QJ5<G@H%*R~J#)FuQ`;m@R3`4J3hWa=CU&Ffy;1bTmj}{z<%%7cDxp1s&
z?apjNtwI4F##E%BA9Tp^UH%I90L<6>*xzY+y_WqVd;?kdGNj!w$~ef_&9>KObFV^T
z-=LJZKT_7=h4AZblnWs3q<#|nBf@pMW&bkAa~`K~400YM{$=)kko_H$60-@`m?h!&
z7eu`O5U(d84a1RuK498{TZ5nV@C^6oIo8S1W5%Z4d*8V9@efRzoH=Ex1UN3}suFYF
z;vT%j{fFAi+}9DC`I*Tq-GjQ<_ZgdQY91D2HMXD%yKw+VaT=F!9Wh&MYA{A(0%l+y
z7GpKGpbEQj07r2emv9|1TWODxn1C6Whs9WpEvUk7Sbv~R<Cx^WPGJmkZ)Ze>uCsQp
zP08~>+mkjW_pJK~`k*{RW4UML-Z$@Yxwj7{*n|J$wfr7f?tfVm<R0$)u1(2)1Es7F
zsgO0|rpcT(dGZ8j^0e7=?{<!HjdP80jpYv)Bi|eS>3gpK)f|kyalYi*NgeG<Wh9@z
z_kT7AnyX~hQcrFkrKdPl7MOdBmU;4vi!@h3Zb^aWa<5uOXsGlQYp&w_C9b@ZlF&}k
z5|8Fuv}_Uo4(@vLSF-zU-l4wGo$JY^VesDzJ%z<Ia)*jX3kf50?$SjIwNSc+g-e&_
zFXQcHg`Rw7>%ZINSwOBcd2VQ79g^>~k~PEJq)s;ZoFZ$K#L0TqPPvv!S&w9spOHd7
z<H(vNak7rN+3^x2b&^X;S<mE}mbMZn>s}klWxX>ub9X#%$n%TD$-36ShbLLrq-`7|
zpR8|_V8+Qh*h!qMj}j;KX538nCAX}zvJR)v$htmCoNN!lj7uXfjX19iBD_hQ_&UtE
zde-}T4!(4`yc62YeDir}#>u*$v0naazwXV9%L~UzSDD0R61U-zTjLgo<K*}ni+E-_
z8>O}Fx;3uI66fRRhObmUZgp>Fzbh<p^~BYGOx!w4octU*NL*cay5O8h&JB<`mhs8Y
zYWL=7t(<+cKPhD#W#LldI*IEf&dcWub2G=foj1B?m003xEpM2+Rm5@XgPYV>ZoPe+
UTszXIxn(>Rt<{(>D9wET0h#s^00000
literal 0
HcmV?d00001
diff --git a/board/MAI/bios_emulator/scitech/bin-linux/libc/ndisasm b/board/MAI/bios_emulator/scitech/bin-linux/libc/ndisasm
new file mode 100644
index 0000000000000000000000000000000000000000..9fe81a3a3e9c01568eb6ca707c052e726e74dc7b
GIT binary patch
literal 66888
zcmeFad3aPs-UVE@(}4y89UvemYO^WGB0)gHX2Pz527`d(0$J%`Hj-`@hb7Q7(6rIa
zylyitqvJ9<uA`#3fC-=h$0gv#CZM8r49=in2m$TyoVs<B;@Zype$V&U_dIj;)UB#h
z=U2a4Zr!@KJI%^T(<U2+A*{n8;sjGKhn%iq%ygLCFyRsLqMzs@l0++HlN(l!GQh)#
z6Y+o(hyy+*z!9AhC&<y7X%P`{#7+4^5Y&rAlb3m?zyU|^5n|K5Le@*(fnuAYz@70f
zq7rF>ezA^A3-YrrEyx*EkYD6qGPtaGaIz46nGbXa=u105KVY`muO5nU;oMQhFT&ZQ
z;yeumTC21h=Zk?0fB`^1fX5}kg}`|L>u(SA2HFDM0JcLv2I&bE?+_!8S%U%gvvsiT
z`f)B2=L20-W*?nIyg!hj^3K7zjf(fgS&jqFT~!|Yv=h)vrFlxy;(C<*$}wSHNAW|H
z<;G}f_Q`>D7<U|<(1Sy8E~vKBZN&(rr&Y$gSf>XT#^B63z;s7=JQ?R<YHre}*+9~I
zr;Gi{^gJLP`k6R)#D4`i`@nPj=)Vu>gEZ~3{O^I8NaG~=)i^%}`&N1#B7Kmy^mihC
z0{(NXsmIh5Q<cB0?_s3HA58z5egVnHG`<SyB-pd`HRMtM+c?wShrlq+pHGqgSW6#3
z+Nt^X71DPhosEl%`tO)VdHT!rkAM^DemJxJrvM+y-;Oi+Ux10=XQ^}?>}=QSYlHNY
zT7M=XeL~~UMLI|Grzg@!z+b8C^+Wn)t^5$AXQF&Ac=|H}={4Zzsq`46t?~9?yeA?(
z5#@0SOMkCKItS%B59t5()Po<V(({l$1AiSzv;T{bw&oMlex$AW#`(DnX^tO?gZ&{I
zu%+)rItk-x@d9g0A=i}QV(!Enu1TAI<peQz%Cu|8r%juC?c~WBlV;AHnKpjfq`6{l
zeo?+p%+13|<d&8e6^prZbBh+`mlhX^OkeI2kg%0)+A8yvqD*nAn0w{5bIW`=NX!*^
zC8haAzC2NwTbNz4R1{_w6clHRywcoUQKl&9NX?y_?OR%sJ2$I2<|{5JUYrYiit!cu
zOG=QYps<9eA_|ekTJwraa*IS>c0q9&Y@>)*mMmgXRg-i$FSj_44rJz7j^-D^PhW09
zfyi52n(xb{vt_wHfikAIC4L`#F3ZimRamVr$jM&>$Jlz+Npm5|EAeM9MmElKvx|#-
zrNsqeuIjj4^cVUvHz(7Vi6U8LW$2{LQf3w9$nlHE0?z9`9t#<-w|Gnr&f9ogXq*r6
zSnxOx;<*4}JmayjPsO^_8jJTdp0Qx2^Nf+6$ukzRIXq(ly@_Ys6z1`aMKgzIEcjlY
zv6vU|j0LuYXWU?XJY(To!ZRlMGM=#*m-E~e^OfhGLagT*H;CJL#v)wFGj2|I@r;H4
zKAu|(@c_@bpdaQL3*BQpd(b|fadUZwXI$Vf@QfSF%RJ*|6PceP#8x4q!&8wH?K=@6
z=W(<zTkd7F?r;=GU-p2PTwSe9vnRZ~CDv8RG<(F$TUOl*GR>axdYFD#rrASYcp&O3
zWtu(Z<<eePF4OEW??|RgWSTwaO=WtXOtS~QQ<+YeY4)Tyo#|AWW{-O3Fg--3*|Xkx
zOnYRSJ?v$J>Jnv|J?$-FTF5ke+`EM7W4|DyFMHlw&h%lK<_LJ#GhHjw90_kF(^WFf
z5%J!~^b0c0k?}sv^usdE5%NCCbfrvlq`WUMT`tocG4Cd(OJtfO=dEITo=kHDy*rpr
zmuZfqx0dNtndXRk_b@#K=^H{{g$@UfG=|<acH_U=K$SE3`|Gd2KJ;~Z#*9sD#v6cm
zzdSs#kLyvcrtVkcc@d;X{(#m8wmT#FFyrMq7`asCeE4%T8W{yydgLZ#-B__mY{J?H
zEA=N4&v;`bd<cwXD17ZJ!*S8tz&2-KwD6y}aa*WiTV-V>99VU<9HQB?GQu~z!v2Kt
zh|tEDQB_Uw1%z~}CirA?jD2V3J%CuEWbbRvyGz9)gK!C7?Orn^PKb()Zz4Ce@pgs{
zfk_EYR??w7Wsp1AfF-|tsUh5Jjv|&;o`Tp<h=m&5TRJ|%Yd-9(3{?Fk(3s?2_a=yF
zpP)1BbcGt`AiNKFwZg>q+gsvZ<dY|tq<E{GM=Mv3GCq}Fk9bXxtz!qK)m_WVhR?$|
zc)3JH&YX!x>sqx!a~272{5Gen{@co$Ap5{0%U_7{Y>BT`#SEjqbLG{(_EuB7);mKD
z$-9HQ-D_T9+iKq$1^sL28WDQu%#-5y6aJ2-DRyVwTIM%|K7DJfRmv>WzNNbQ+{&mN
zBX26om=4|u2Lsy^>aPkl{O^8@W9#IITo>8kL484vTwuE^u$hA;+`)k;@me9Q*G)o)
z{9kOgg<?Uo)nTv-d+Cw6ScG-M$6>Di@yh?*$9*Vh`S=Z1+>o4wx~Ux~Q8ybCA7k>r
z+xt68FBo`T=<af~Fft9@6{>-?uuKP|?lpfxfp=PqDORNmWu?#9I)<AKv&8JkwX(z}
zTZx4zksjShVI&hvz3fKR#MvF}gG;u)3$BCB^6GL2Gf+BI!Nk?>;6V<e$@tGVhghG4
zi<>YBS7G9W8p0bXd29c6%p`QYkaNVnrZ22{KSyR%@{z}(2n8!m4}(?iU<bNCoOjj8
z&QsAS{G=T<n+`*0&ZhRz$)%(&iI?yqG?{CH_dL#sr%|6u7cqT*OS*#Ta7+3nr0Z9-
z=yx++)RJyw`j(dTIq;zVnwIofrpL9UZ(@3IOS+Qj3vB5QE$NNm%@&PDYt0soM}Ohk
zWv6hr5!ftOH(ye8BeS9#nT&jlLKw4(<yE266+sR$x{4P`q$_qEp`e-;q0Q@&hx#fe
zRD~-T?_V9ho8*AISvs_*e`Eixq1u${MUGH)aHns8S<8$CMn<Huk%RLXiUqbO2CMwt
zYl2)#F+!rgJ#5xU4k;1$AWMbioJx^yxPzY|KP){9R`~`h@4P>w!I48JQCL!jys*tW
z(<3w;*q#)lQEAu$H8-k$WvC&#k!zvZ<mg7Oa}~iVgz2**gRspBZH1lSZeKSxFlFn?
z#IWp<0kXQ3t&2J}myYXZmUgL}>t>rq)pc0KR>(`x_{@-9hQ3HSz35yT4m4iqzOxi=
z1U9q%xH;q^Q8DRoN=@mg3V&5-;~Hd#PKEaMZ^D|p!3fKY^{vt-o77c-rl>y>Y8()h
zL$fU`hs&~d=M<;|o8|4x-_`7-$X5*<4kxaaHT^)Z+HB1eUprM|6?!+hs^W1U=o@dD
zyK@`vp}c!8PYC-Hqkfn7+_y0XH^NTx{`&41$H3{<E4#U0X`MdB+ly2xs0r6#b_E+&
zeiij6dAZJR!X{Ys-(yszdoO08^Q0e%!G;y%y@Q$2RvM&h4J$6FwA(!TlV;PKLcv~S
z$>J-wROFtJo`xFa{a#=m&||*~PA?F%BM-^SoW?N>Z!Z~7z@(ZGZ17zH|3k-D{X)s2
z_&207V}Vf-<R&dWGTihsWlvcr?`T$f7b;y~MBYb!W&eZz?G=xou)2wRjqoH_czQx;
z>&e|Gw;G8(g}?PCu3kI0o!shR(zS`V#hu$KPi}RZX)K^-+L73YJYSMX-bn1lG`mfv
z9cG#@c9dT7*odffQlbmx`9eqX!X*r(`H-sgE~YWLnKoT?B)S~_9=L21D$;%lG#c)8
zJ3)t?6+RK~+PMvVL%&^4f47RXGs(MAVsYzml4L`*iZ_HuV8i3An5k*3ykRYQPAe~|
zB@ecRPxb|Tr;WQ>IA>yFqRe~wtUQm*`?w_!4jVG>L~~y4Q?5jh@U>2^l0L$2lA+q8
z#>g2QhMcf7_(0T&hRS&pIO<fJ#Oo76wbhNSLhl5=i3`;R4z~{c66fz2p585#<|@Ck
zhqG>*d5>D&t!4^e0*S!##6)+H?-6RIxG-^|HB%DIQzG(2ps}@k9k=4x-W|Ei=|aCc
z?{>Pn0Rw?lU?wmRC;*lKsH`T<g$FHBla??Tr}|qf!>rHDo05QMMNvPy(kzF4TXVSy
zs+`PI<t|m_q@iA>9ciFzi@v^Xi~T@jE59e$;O}A5Y)W8xQlhVQO`4ONxGkL2fnN+?
zqWg{;c_;bB;p<-aEMgF#hg|M0qeDwQb$><<?&UHs(fvy2&<xK6_bYMLhh25IfkHpX
zI%Qv>lNSG;``>%G|Luct2rvei3M>L<0`q_Zz;uikPyJ-mZ(a!Xqs)8{<Acq7zHzMY
zW#(hAChEJI`Mnr#YvyC0gF%W{ZI<1v+U!A_r#L;}%{DhW-N7u3>4v!VTdTfn<$h&%
z==w8^#s$7?jhQmxEe?2i`k9Zuh3U}J#6T0qp3gtgK6f96<7l(E*Xc?Cx&eKFA;1`5
zDlij}J|)PuU1#=>Y};frpT3}-bTUD<ZLpb7htW=%uiD8ul%U!v^UZd`p}$Cnf+eUe
z)KH1=0pLmCWuOW;0=x(80i=DG^k;$Dcha9*%zWvO>8DHjWBMuIekwm*(g)K|7k#Mj
zg~^p9d(<>2o#&pwv`POtz0P0R8f$dB`dO8nVHeh4!?|64ZI9IYiDucBxmKUdIgYgF
zta;XEYxA5-G~*jE{koaa(4LCiWAetqwL5S$NnZa6p_|XtOlpJ+qGr+wp6Y_}avm>t
zxnH>=wESpvk}K3WHPGl-+&47oXrM9bJ0JI&4P7_HO_&_=yGCwx2j7DtI{jz>h5cV4
zbox2*Cj=VL@%35R7IWR#vF=Hf!4|-GVckQ@evg_d16d*FsJ}<eWIm*DjxJ|DZyYcb
z?;lJ<V;@1%*M96%JawwO83rm%4HqO!gIsD_`DdAxckm5Z*&Y|SuUp*!aOlH8V^?4A
zK;s3zOX|9}*no`JjI5XQ`9Jv6TKV%ZioqYQa`5MUc<~$lg#AYY?=*(|$1tReM~2y_
z?kORjI!{P>*M0jRA+1PjowC(^=Q>2g{$mx+Mb(F${ojQ@p_wBGmQNd*>O`yD{&wi_
zHQ4meWjPE))d`MC*9vDU%3}#ahlG|5nK+?*+K|+8S>PB8bW{aiX)Yi+4CHTe5pow;
zx^^@?4Tj-!^_Q+TyJSKdIl_Y1pkS!F`U@v`>2wN<a@oVYn~4PO7ao6inZ;SjENfaa
zj(t{&zniZ$wZ4>o((qv#zPutKRhfkcGm~|*Rzey?qS+wg(!w5EXzrZLr16pLoRO)9
zEKth=msBLBR(}c4+p)m3QO#9U%S3qMsMG|b&(9&8rRY71O7#ZE@=P|kcT0n9{*_Nl
zPIc6`<2Aj!M<6F9^=HhIiZzRJur6RIk!gBq_KP#*8)<gR4pu&<rBgUT?0wx*sjZjG
zr=_IE$u?948n0M<6`CwN>TqjwoI~$cH*r<xV9y+aX*VR*iQ?6baaiZgA{7%`^+}KV
zyG8wpGcqEZuyGD;!-In~T27-F_I49OJ4{XZ`lB$HQtJ*rhl|Q)3T>>I*jlr;K(iLl
zSB`A!Aao?IFSB+yMyDM0iJ=CS!`>U2`ZJa<Ubd^2AKihIzazWfy=ElxS{Uy1B$Mb~
zbHQ26yJR|t{oPXh*wygE))p0C08*6%dlAI3LaLf}Sq$uba2B(h3@(IjDa(`G!57cs
z_yW=2AFHSPl@44xtyO@Z1y!WExeBa8)V%m-_dvn&ad^$J5YO-Ev6?A(rOhR-QTQ)2
z9rg`CCS5|C6a9%{e`C$WSDoXKQQuL{uSRrR&BQIvD`c4y6iUy013-i)Cq*YGaj%1S
zRuk7c)2QnNU2;`@A}gG@&N&`=p*;g8ovFw@Y&{>XI?5XbZXY$lkr*n(aVJX*RrEt5
zRM7`vO>meZYJvlsV|;aN7IuXydLR*=?%L3CeXX;@7-O-UyNkP7BrP=ERez+s>6qVb
zs*gd0yHI^?dDCFudF4$bd|k_%#`!vyH(lgQfc$|m*vsE1y+D^5)CU^J`L0}fPM~qH
zuh&YXF7jPn|A)#z;|O2x`Vh`JzN-U`xxQI-OHm=-AJE+&@W@k_-;(w-eM3w7U8b*W
zNk7AMN=y0?ru(;~A7Z*Y)8$Qh{&QX%0uKkUpV&iaPu<UWm;yIn=h%njz97d@^|h^;
zv_sw+U6qK*{+qNT#Q*OL1-&R8nshic>4ngw@|xgHRO6@#a+k@8fi6auVDCRL9PbJR
z#~?c}63^cJ7_wqBuQZJJY+TaOjnb`+(g8e6R<LN;h?XQp-si<BhdQvm8=s}0fVicK
z<OZv7N{Q2bM>)vk{gn+9N2fY{9m5k}aGk7uN~C&(@0$9a*dHsy;h8VELbasu^x}7&
z+{%yhF)b|`I#77pX>D3MFX|gTFg+6dfzQD%ykKc-dVtzQVB3(%mJmLy3<Nf_{lech
zAY1G-$pGKk@$-qmW;t(tZLD%_ldI~w<N1Sge}7=JoT%<Kl`y?ZCVoWBmv2=O#y+>Z
z@4Slf-{2W>QRh`n1JKjHb``5X#-Pc^#!WxGk5^e^H${0GQ5oIHfr%9U$QMt;Hm<>A
zn78K#*lSKoF!rQJ&i@u;#ig_koj@NpeFR;)SF{vq`o=7h5ZElQCtnwD>lXHaVqM7%
zDH~^^sued@hSzMI$fh=?`TDKw!0VwS)@WZ+{pEOH**M;JUj5)oZ+qCN?^@~Y#B+yA
z?>RiTs`U0~v0ZN2o@|<4`9#ZjhefC%#ksK(?QyR;2enPcHfPcI3@&Q!ED;?RoYRCB
zU({lBfYqFupa(Lv8g~fSfM5?K3^~(UDv^_FI5%(=oUWmYZU~d{GHya(vlQc*z5&m~
z(-Yotx;*t=(SK%qV13)>_^7ayHB5A;8otrtNl9_Cmbi)Ti6Mab4u6}zbcN}_@@~SH
zv_P1usLwqyk^>Jg@tT{3`Pt%p!*++SRaCacoV4v*>T~*TYBqxjy!~IetfVujXrN^d
zmK!F%(8j>H_HXGX=hx<_qgFOL3;{Y*evZM;tZU+vxqSU1JmmuGKl`9v@`Sn{K%ngn
z+i~Oi3p)2n!#Bk{sKxNpN6s=_zRaB}mS@5K#9-C(jwko94@_f&Ce&YrXARmNFrog6
zP{WfBpUZn0Ox5?QeA0<{3gcZXpG-wOmGQQfYpRxa@lI~3Zp_)$u|K`jLD!|2e&XU!
zohSUh=6;$Op6TuvX!7_v%1bEFgqI_mWTo+&SYNuCy;<I6eDRwym=~6-I97&u$)<a+
zZ}H&uuh`(0+Y%PCy7#cEh8no=c(5)!iBwH63Ej-uhz{$bci3%GuZ=%O%jG~BI;Ae-
zS+UAEQHCC?GDBmPaiL6hOPLO_$|R!9f|fGhec3#K<~mJ(JSelUrOZ3A%A}$UM@jkf
z*XA;Eh;N+GJk$E&o#D_xqsQ0jb*^H8#zcSn*X0njs(hU-x=z2Kf2ZtVeKN<SZ*(Ig
z-bF2SjgV#ZF-T~xZD0V;l^5xgTRCVb5eJ6%Gkhv$iUP~rL!!RCz-BpQK0LRZbF|sy
zkQmlp`hwloTx1xmVZC0_HQjq#i=TJMLZHm)z*?IXsZY9mV_zS@EL<X(=N;Tzs?6)<
z^+C-AIl-^<u4pkiTA56&ANgdW-}$7+H{>@QZ@xCH_FK-F?YntGeYa4<EbrPD+lLOD
zQz0QxbJktZedk{88)df$Ygm%;acyWHUZndHu|8~Y4qZR7Yn*(setdz$9I~iCA<_;u
zsZ4Wt!g8UkcwArr<OUEr^Sz?`6_M`!BOIaP1}NkwGI-s}_X}QEIlli;b|@Ns)QL}i
z<x6<~Io=0Q-24b<2`Ic<UI<-fO}tBe!$-b<SMMhAb{Wfh7gDR5__ae{=J=3InwjDD
zv>bBo3i)<9L!aUm%8Jy`^fT};^kemR7aBi?KC6xz;hWEdla8k(onF)<oOC)o?X)xO
zJRWkM4o^Jp3{5=k3?&^8O+)k-=vTgDy&_TXNL|?EK0*hu>$!v9v{H3WKZ7;#On8PX
zZbm}N^)C17k2v-{s>8l&Cvrnc)!`Wlp_$dr&<(E8!i1@h(uVo6Y&fIxQ@)fR+;`pq
z9iL~ept&B^DLqat8d{NVr2M$DRmx4(u0?&#d}%l76z$GD<&=hdoC^66t*IXi{Zu0~
zy)mUdO)ncqNz$p5nboecp<x(-H~|?@xs*B~WU9l<8!M8o2uqhzestgA!x&r5z4JUI
z0%K`XtmqY3o*;Z3!d=+o;p=#_4Ruth@vi!F(C4y58xS?TVDR-&92L1ot!D<@-XBeX
zSiYmi{K&v(E0LL><9?2fk2AR6-@#jhxv`+rBP<oI4ei0esdv>G;p@3x;S;J3>DNV8
zLWG65zFnvxJ<>@goS|*MX~CSUSj<|bM}{4YMwQLk{DQ=gs?eb`uhG*Vp9}3cS(_f&
zdH^2blVoQw>hE~AN2oJnb|j4j8Y^-eZ!|wE;s-AY6_bth$T~8rF~641LVGhJFQLpk
z&I|BFMGLnmUtnXpD|~YTK2!Gf3J>SEr}&)-!@Z?*IO(30q_zImX%j&D>lw5y$5%e$
z@rc%|(!HfkxC@KBx5R~=t5cjCmbv6bh&`Md09gzAfG_({2`;Fc6NCF#T+F&I4v*F9
z>KabEHzjGEKOt@M)hH3qy1ro$kB3knhscRadunyI`i(lxkEhIaB5*W8zGrl)my8(4
z8qN>y_uN}VxC_7g*D!Is;qfI@PCz?k-2YSP(1v#Ptzcuy2Df|5u191sXS&P(@A6Z9
zeBYIi9^&u5A;TzdTH=c@Z<^yzcnu2#9t0fqv+@0g(S7{wWX6R0sj#tOcC@@{Dhqm5
z{<ZZ(kYC<3gP9BcZC`UieQo`D&^C={UKaAOBS2p3P{V8Zj+sa~U6#w28%Ai-iPw=X
z57j2`KIuOZnsg=^H468ddy!k2a@rl>RlT8edDEpUF2m#LJ7Zcc8c^OeZv`5>HBj|b
zeY^6e)D>tI5<63NEO*zR2VZ2eHf6`M4zi1Q5uv-YD^vVu7PnTfBtq}HpZ^pu<0qXM
zGjBy(+<7W|iBHvcuPk4FB9-Y$Cy=qT9`(pr?F70NT!8t_mj?Jy9G_=?!WFn2`!4H3
zJ64e!kyoi)^Eg<TB+C<%t7`ax3?CqkACmW{99w=tCEveBeXVL*)4R}CybZh(50^&m
zgp}jUzOp`+L|ZW5YT^^Qa^S!X0qIAWtVnl+x-eqqp(^<$CA_cQmL8e1FB+XyeHxFe
z`!gb=kWiP1Y47Z^=do;PPj#cKFSl#yk+xPwqRKe6m)7dLWkmjsm@=iV1KB?LW@Q7!
zSX@HK%SQ>!zYUJ{apNZ-?*HkXIFWLEQ9`KU>hjTpeMu?D7dLE(8#CC~b`4e%_N%{X
zc19!vwy`c?&pD?23gL6l_8K2z5yM72DY~mZ!8@)c^~g%ZL#-YO@HE-EA$}bq>nFSF
z+k_fmsqQm+X<j+(FWFvPa|6AuRNP44ZNlR6j#nVQKvYb|S8<-)gU5V+>?LX@J2@Wp
zLn^&4Tm+GaR9VDT*<~mjx&Y;P7p;%4tj=?`z1n{&grT?AhXo?C7V|{je>nwQfpNm$
zZdPP7jMewU7*yQi!gtQFj<!jUz#Kn}#@Ej(CN%axR^8|r8^w%Taj3;!;Hb+Svgrxo
z4EZg!w$)!Ir0iPRw!VF3^_Oi^cCFwVc4;NPz_y}qg}*Uc=A1DrG8Cr6*Eix87OD;3
z6u`bAA-Lc7DGIGT7@in*$@{Z)4+$LYCZ{Vu_zp&wU*lcR?v4w0k++cDyh)6bbu}$d
zGrJ~mifgo&-GHvia9tP4M8AhSq=njruW?p?(Kd9oGgRgZ9mMw*!n2(0gSY5*)3Uch
z{u4;9m{KvlF*H4b?^G;u;<ZU6QceTRJ4&agAH#dkikt4C<NRt~hj7=cu8R!Bdx20K
zdMu3BZ^vL}Wi?-zP1}Oo+KGzX1KPey_B}qK_n<pFdjG}-byim@+Owcfq^glksF{Fo
zVqoYe$X9})vV=`k{ORN`^4z~RG$AoPayN@k@YG;vaJk;-Y`*K5^UIH~Ecm*IFNiMk
zL_S5)S&>=_&~_01Z(GLF9LNdIa7p5TlBCeFlnDtdro)xtEWR~7!5K<K5Kau2bc+LD
z+D)cH8P4#8#L#$hYRN|=RXQ9kON^X6X{pma6r?AGr+SQCaTy7r^rX-ZRXwi-wIAdc
z9QcTfJs!T{bqBw=gn1dBETwZ2`+t;jdW9o&8uzY|f#qienwIJ@YO&EclOB2fW6szF
z<K{E<okI;7c(Ny#9?AMd=EI0FC#nCTV06W7H0&nRwaIK4%qNDYc8i;u6uPRLOoe7S
z!;@vhCR+_dL^W(tV&sBmb-D+AS@%0!E!d-}58u!p-1<VPu9{SS@Q3A5uDiTB&u|5I
z`<p+<AD=WJtw%~)!ivPO10TiX%KN$|O-fKOoYo_JoyXW3mzEGp>%p%lm}6?*;%Nvw
z36%Mr2ah|~CH3DL>KaaS;eAb-OBo66sdwOuFXjSZuCc10mt&j2e#Tc*uEG1dDXe-@
z7_XzzLm#CaM;{+YAD?gbZu$%iN94wj%x;{1#@K7j?a}`rw4I<tg;QKLQ>54R8!NRw
z!1`eB3&P8jcr9ShI)N3n3#WFAo6sX=Qo@Qh8Ice9LJgNq2Hs9_tQ{d)XbNWC_-=9I
zlTd8=ci}Sb4hKx`7L57^Rfca#>c7pL32~D>8Ti2BOyteo(!KtNF#h2YnDwoatFXcQ
zSlgfe-~74a|Fb`GHV*v1_+x!PV|hYGqy}F!L_bvc&s5IJh;)=*u(vv42|BX?o6mFQ
z03_Cbq4#mL{Tdgx>s=T=vJ63VSY_nsiRL|UU@RH2qC@0EF6d@z<&SbMsfG3Cgo+6;
ze>Fs*nv7YqBR}lo4tBJ7q#ROyyDOeHmR%6fFB3h=%<99A^yqL_7fFTeQN}bMLSrhU
zQo~(z%l&TE(H=0sTDz==z`ey0Zf|Z4)37z{hwsqdeUz){r;|g&S->n74l>idCDmw{
zh;sgY;r1jqbX>FB-wFE|^9G5RyNj`x;huVH_<Ymq1jFf1EpM9Z8_f?DMqry(J;qox
zxV)*4I~b1zbHfa5zqjUvdrWAkar*Ij!(4veFj#)xfRgTY56JgL{5}+~V$+@SQGNXF
zqd{ikNmaUeKEr6djE`m2^)B2yWcm?ihJq24-jL|t@?%~&VR6ITPX8CI>;NnKOu6-8
z!`m+ZyGVQvAGek_t?+FQOI`mx=^2r0U;q~c9_(i&gmzUtDCFIl-%$0PBcCI}UHIke
z4bIi;<0kNH+5UR$ZUUR7@9rQUOBamw`tTJYQ=1V<$Hq-rbn*_ods&z9SoLaJ@#C>g
z4C*ez)}zvUHKJaxBOZ@7Jxt9ctlmn~u}1KZnKm(~YvAYYHPUJJSLnfG@cNCrTBA~2
z*PTP34XLu8#7^!CeQ?dJ>!KT3BvOL8$uB6v3;$K&(JjS7@1EQpmSrktcEvX&*^l^~
z<6)R&Urcr`xWM}i64ymmaqzc>X35>eZg<5bzRKO^j7mvhGldTK+QsO$1?{})7!<1?
zrb;0em*zHg4{RNWM2&E<Wen<i@YVDp0cjsdGa{W$5r@Nxp6guGireK)4C;>Y<9@uK
zIQZ7lJ@~FKQs#Gk{axgyzcULmsH*{mIe+l2WA<{K)JZJIpzbfSoD}l{+{B=612QWc
zwz>RQR4g>i%LU)4?&I$fsCI<p1tJBlC}2=`0|fGFiDwprI_wqkod!93H+1H8(|k3$
z{B7h_av_STiEUl74bC)|@1o{wwKnxpIq%IYVWWAeE;1UN3tj#L=9OBWGT6VgBF)eW
zy0=_ugeq9rtTQZy6!|V@-<j*cf3z*HEO~7VJ>7C`)U@it<}s+7k4rq%(0{L45kAgt
z!-Cr?f@e@KuBq|(n8~^VBLBc1IIx+F@Fmu?;%<8rgSwuu!mdnB;GC`z{4?H74C-1-
z`{hj+`_Ngv+(AAOuHU6y_i~Ej?G`(T4<Fslz8=}m=dLKT2JQET@PBJ|ROo~LpQ5Tz
z39oB^ry9}X#r;@`LJeu=$W{a!*#el4F2dBm1RptZ>f_pNac%(w_}p<cKBl&w#<4`s
zL@xRlpRD?Om;c@v=RY4$(;+zn<lJb>#xbb7gnG;MG5)^gw;5yn7Y4TC;ZBY>jkaNF
z26bl;z^+yPQd#~|y*#IMJC<iq_ukp%`^xft_42fz!14_09yq)FSXq9oUY_>HVgNQV
zs4F<Tyy^cqy*%x^X`eyen6u0GjBUTAJe|_oYuZ1{AKK?v_ct-9I{>G&^5bILZ_n}!
z>Yh2f{6+qr=>LoS=bhdE{3_-q2K@fF)%Ul^vbX4E**Be7mO*_+OW9@qWY}HiA8@wa
zjx5Wd{$iA+x_OPS?;@`|_bd1wLPDskIoU(C6_4-1jMUx(*2e{^T=)>$mk?Ou6uuwB
ziCEgr_f~i>5WwBd+5@8;NnZz9@P}1RD}_j1@uhmtZ0?)!y@3BW_E_%`vtE8-_Wx>Q
z`HHb{%#ZJ$DBqQhz{r(;H~y$ewx`y#i_loy;p{e=bt%XBOoL|ty3(OCFmf5bpdbzS
zj|WCBci&YdUtz@Xt(CH`7gDxj_5t44?c7GUPli*Smc8rQUt3*a2RGY+#+AMw1Gixm
zjs`}p@XPnOio<s&nmJjxRiLUI<Fg63NxUYowPA(chLygysubrntHv2^#_sMds_}S%
zH>UjHh3~GN<M1X4uj^|=+p13+c<zV}`x9RdpRD1Y7rWf$&d|a7w!x~Ec!0&Xe-4F?
z@sA0Nm2b;RtW9Lb8w2Iv$1#jH|9#w<!02ep-^WE>-4Ts$6~bSZIX`!lrzj`CEVHc8
zbK{`Qn-SzQ@G>Z6;AfEK$;$VYF;?s;F3q2xU&MHsr)+6a_Ta&TZ*J>3`?zsXt|x1$
zFIP%#^~k@G9jG$$@(XfVeo!V%c?RWsGP8a8i}07oWu8pGuh`QMe`}1t<ISI+Tjc96
zYmlY=9{g=?ndkb9NtX@v^t){6Ab8{{EY8X8FX=2#@(5`!%L85(E%Fy;<(7Ji^Q7}0
zUvaT4>Ghz!B?XyF%RD}BJ_7tnuOv!!BG<Dhx3nz3xX5FgktK3HWw+*+lzGO;ri?S2
z$O^ppOXS>AS>{$x=Az>KoH82AEGx?`%)-w<%(qGMN{b6UCB<d=KGrZs_RqMs;+lz9
zW~60IZ?1aC;FQbTioRu|Jo5%+UF<2%UFgp*Wj_^pGE3+C3(-SuMe+!7*-%-?%0p94
zL7BJMUy$R;%Js}k9&s_dXWnH)FUDJ3(`4~)nT$cR8*)qYv$cxNQf2?y$XWDn8p-|7
zM$V#t)5xv=*@#a278k2=#T?Ep$t=b6Lq9F`WO}lT3kx%?PS-W|4k$AV6&9D~Vj^Kk
zii>hRoZLm3g_tNMx!L)7`MEi5#UN3dC41aol$lk4!nlU;XYQVPeakK$<>^a1Lq-<N
z@yN+l!pSmZNnfPpBx@#7Xy_c#_mVOSny<D&_z@5D@8Er<mkVF%2w*rc47dz`L4P?g
z0vHYq1DH1yNCt+8vNHSuzbMNWg@u;`BY@$+FyJy^D3A;c5%bINr}H8gg>z9l7tx$0
z0HWDAXAz(>mk4C%l!+Ypk^^6I;6qO7P#_r?B611@G&x=YRd$)khMU<al8qwSptB1^
zwpYL!jAa#wEU$pY%mR_=6-)5r080uoeOY2jws*c*lI1HCOEPnE#NyJzvQn`)E5B$F
z5}Eih16;R@8I%ftVeuk?b;T#j{8?x)e@mdaY_SY;WXRlnfT?UzR!FiC83j4e<TLP=
zg5$3ccncUQ5M}e3ot?>|2$6{pcCvs>l*=rDAvj%@>CF?RWrc#jYrx+SD9!a1F+i^T
zT>==uwai~AC|k%Nhe4Jo&GD6GBP=Oo$i|gs69uA#olxR0^X4r!PdVmEhM8s_eh`5r
zGG&OMs3iN=g2l{~v7CigEQ{rt=WS-a&8(L!`pgXd@RTV(yyICV%ks@^m5VySu|#PB
ziP8epg^>BB^bR581(Ge0Yynv|s<?!0LdbMU9s^1c$_zB87(W0}xac<6FI-e)o(jy<
z{9JkVOT&f!0xyI-mC`>M;W=}@40CeW+`>%!umowW(Y}1x#P3VY_aQCMC?L;fe(pju
zKX;*-pSuwGnTv867UdMl5CII!P<9qlva@hzXYs_^c&01|^Ohmw*|$PrM#@?uFjnmM
zLCY{lhFJ^+I;*JI2b74S-1!2{6PV<;En!$@hKpr9M}}Dp7c!7(QGjcp09SoMS%D}h
zE-txEhDGX>D^q5OD1B#`Bf~6&nK}3|jiDn)SW!{HD+Z&;pAcbyb)taRM*&ug0xS~+
zx#%f|q5#W60j`e%UKR`Ra~=z@blfHuFu*+xozE~wh5{FJLCJickWu6-W^fsUWClZI
zh#2Zdz#{0@{Gx0u0z3gCpFNY$-}lJR=Gv6c1;bn56M0JuhAt^dHqRn&iLVsf51g^^
z<Sof86nTE!07^>K**xW|WWJfi?~LHG&BJUj1;LXH%{ZbQH-t?4@KYl^;Ri(!0t@k5
zA$etRvY0C>9K|n^_)1VMR*`~SoY-G^rC6t6v=lqDB9t%jWujn7X)ab{c|wREAVFS{
zSs6~UBAi)Mk!gjKB(F&R`b%C>E`I$bk2^h{vI}yTh&*%=3b3Q{3UY2^Py(_br=V!4
zJk2*xL*W53hr+Ld99d044r?jMfj78-^YYCu;E4$~93cY!?hL|gGfP&KF9jGEG*1ps
zUOxL937in(st|edmu2##$1Dlf6d*L?%wR)ua!uQ^H`TbA<`8n!c#<IkTm*jeRAime
zBxV<7HAl=0m9(<aEVIY5y%@DD*_<pk1m2<&>2qclsG&<RLfE9?7iN6;jho!ULfi`%
z3tSLbTH(Eb!vZbDm7kLdDl=1LFV4wjAhJvR`3MV3c!L|6WyOZ!YEzj!V`?#!1u^Ln
z2eNVJ#PrTC$Ok~-4wQ`wv$1|-R^dhpG7DFJ7VdFbK7j>16E|4gS+dIVL{_mMKV6eq
zT7vs5BXBP>CtGB~zf4>YnOK1{;U}gkJ}YEziQ7aO)?@r+k0=qv0*gmcnJB_~ggB;f
zQGqC$kJEfCPy!btJGUrH6lLOsWdN&z06kxz)dEzO0Ffzh?<?tB=E1^}eXB=gCXYaX
zeY_}UteCOB*!Un2*gXmEj67m-acPbR{VPvJxtXON+@Om~eICL6(-JXC+(=R1GMT(t
zEHq1E??+u8%VP^GF6o;i`evJwG1!=uq8s|=jKd&tAI43WdO*UHQnAmITU6|y@Acs4
zg^Ej;dh)QR=0gy+#if}`+j5QO^MJ_;Ys-kA5yBR~$cN3IC#N{KOd86=^GkjapH}#6
zg}Gml>ycZ>%mV(f(NfferwEjoC-;f4jGr*_EY2?|;D(<0MR;l(jQopZh`pJt#e-*?
z+#){4jPm?P1C}Y?RWk87mg{MLIzdgPnVECVUscLTOM?qOugB}3pX<pj$mKH#2Iaq-
z&;M>dz5m^O{&(~F-_7TLH=o?X{&(~F-_7U$UpAlI5DK|1#O~7ELz<gK>}m0)7*8?W
zU1D#FO)a*K=9W`#Lh;vdg?P-x=JhrP*b6hvWhet~UAc#q`&#a3xwXY!dOqG;`9ziB
z-cwmF_LTG!yAdrPCU#ZhoH|w1s`IWYW7XQ8qL!!bC||y|qu6B(M~*SPyD)|!Rb>R$
zwr2^RpubG25mp;Rr;<)iBa5)g7?LK8&zQGP<{_*y)}~RlPO1=A8*8C*Rf<|*R~wvx
zT~!WuH6`+duqsVB+(Upi!nmL9a0g|$2DTjT&NL=Z2s_aUhr6RG#|eo<)LCVmEbmFr
zPL{J}4dravQ^+x%Ld%|%Eeld)AgnUhNXe?8l&lKM&InR6h>}5&3^Y3<Xm$opXx0GP
zEQHm@C9*U6ON$7rjD8H<?p2UK4LeT@<L|;aEsURqaf(hFYb0MT<Euo~E{FSBNNUX!
zQqQDyl}Vn_oa$f~o<0gP+!dtf%)$v-2$5A~R3WFz*v)7y0$6$6w8;}vk13lx)8-n}
zCi)cy)<~PkqD`4V7HlF1HW{r&0ME<OrsvV7=Y{bcm8$|~w*_Rk1=wxpv)j%`xAic)
zEns#VPUyDtWVa!#HqMpZ)?IcR!YZSi9Ej?5reo`*W9y`2$f9F1v1=V2Lk=8cw04~^
zJ{878!r}hAY}hJOze?&c252j?sF#UdtEfi~^o-WZg4N}ws$8njN~n-Ul}zlyU>Q}&
zfr`=Ea$&sNO&I?a##WrRiNmNr8Mq7>D*XtU76Z~^Kw3l=Ey~2M04*X178$LT1*=z^
zs?}1pTB?vml}zkfO%-yWVzhQO>iajkQ--z10~mk@aLqq}F_?$=Jj8kSdXRzNH#HU{
z;77y_cWc^@uBBmwyIkqGD$`*qQ<_5PaA(OVLWg^vj3RWn^JNsF!@WR85jx!XWm9;7
z(BVEMqX-@Dy)uf>;oc*o2p#S^8Aa%DUoWEw9qx#XB6PT$WE7#p-6*379qxr_w8Oni
zW*~I9%Vfq!G6SK*T`Dtn%M65&VEQ`TU&suEC?PYxlo<$7Vl7MjATtocsLVJnGY~=|
zGk%mA2p#Tv8AVuYJcy2c5FPv=;+cqNBA$uPjTcUK@11hyAl&7egYKQfE}A3NzmwsO
zGQ5dKKao*{4)@nGiqPS{Sw;~$+&9Q5LWlc08Aa%D|0JVkc#DkBWOlBMB6PU(WE7#p
zog<?N9d5sjB6PSH$tXgH+b5$49qx1)Md)xJl2L>X_kI~g=y3lmqX-@D&t(*$!+k(T
z5jx!8%P2yJdxnf6bhwYoC_;z(7a2w9aG#M;gbw$78Aa%DXUix;hx=9;MObSTqo0d~
zQH0aKk^HwX{)OnbNr)pbzDZ)wuUdsQh$p!!t>UWG9yvyPtV#*ys<g^nm2kqU)K0ES
z2&;{@a#d=RMm@qR!zEXxlk)0Ai2KQEVerOfoRrrwLgdMd_oQ4o5hBC9U%d)z81+|Z
zU!ItH%go$jX7Xe_4i6s}#$#yfN>nOChr3ud8==F!LgpfLxQk>iLby<4-so!NjqV-Z
z=v<r7P}ipJ!u0}D)kau04PmvhK}tfhX$Y%~^)z=8&G%-|O9r<i)`vt-1|AupMZ1hg
zd*GfVL*uVKMD;G?k@H1$tqhHa&u3kC$hr{1v)g62-M)(bh&aPlsM765PoWQ9G#if-
zQ*mYrr=7;(eqslMcNy$7zF-o;y9{<3Uowf{T?Vzrv*@>Hh4BnLjR#uGd(>K44~7c&
zE3>wZrhS~4hqV=TzHH{<1kblK!O+;rWQ9y3MEq?TM@W&w6yaq2g{_Rr5l6UN#+f7U
z$OxH(8@BOX&u(z^yYAhvIDB_L!@6O@sP6~rtA1c)@F7wkg8EQ8xDHLh&+UC6jQ51`
zgD~Fb>@Gx+LSYohYURoj<&EeUE-$GV@>KBOqulqxIEv`kxM?sjj^Ku3<fryTcxx&q
zJ>uOFGLF{ePwmCity4R&1M;Vy%M(*<?ek`9aYDmR%7!7t<dz$elk#?q5E-}!pAe3{
zr+^=T6T;ZrW(NY-4y1MhUkk^+I$?a?CW63);1FYn7~9X-e#Sm;bC@h{rF)ME;~*l&
z9+G=V9ze3nIKcY%1j&-1U=Pb3KoTr3y*+D0-2I18*m3{o@auEe9%SyPo1gPi-HX6+
z|6WWIgp#i%#VdO+Zl-&ifYZP)!m<Ad&Ob{-oKv5#LGldnBk&W@2pks<)@7h77+^6N
zMRF~;TA26>K!f&w0enffchGGHj2%D#w|QmkSp~(vfO_D2;3!ZBd`FvX*xn#gX!TxK
z6;k`z6Q7qepTR*U_c1ugvileuq9=#g==}^1v5oszi@5vg)!vgx9c0b>7#yPX5H0PO
z<|y6A;2_(ykHJA2*~j1@E$w4)kcIb^3v_c84Pz({x{k4ljcg)<14yEYG_?oaeUN#3
z+OP=A9Y7K+&F@)D1L&u{4M0>l4(?^iJuJx~Jiwaw1O%oIgomi!&)9ymzFL;!P#&OP
zd$36Fqjn#(D96Bzq1X4b>-V>TVm}m!RWXKO9|vY1*?na9k=;jjpV_)E;n-nVKSX~I
ztzm0G?qP{Nj2%D#2iPZj%2Ae$Ific&8aujipRrh8M{?73k`@}U^TH}2*GPo8m{;Lq
z#zhAhmkQ%zT(kG#TKyBWf5kL(*MP_AZ(L913E>l5XdUi<n0YuM@d6UY-=O}RFrHu?
ztJd}861-}iydkdR4RI`TjIp>OjxleD>&zP>PFN2{^U7yfZH$sve+tbT2&;^dc+|t}
zcefHolQ7N*qY>8r1Y`Hf*2o)WbhTXn<SsTUZ<7eQB4Rx@{w!C-Kg$*I&vHeK;Q178
zzb+qY%rnzZvr>7IEOuf{zK%1~FPSV(l9kU0VCCb3!~KTI;v`vY{G=9VrXMv~oOT&*
zj5k-i&E{%{6H{-RDV)$9S+YA2RvFneXslY(ll`%3jqJ}g?9aZ)G5VrE`<VT?#_Ug=
zV4$}&fUw%=CHoUMSLhK|8MwvLV!3Hi-pR}5BWpY@#>1l1v{-Ih#0eJTq(y|)2JS{M
zU`UGytK6o+)uzGK(#6$uu?r1$fx#rx;A+z#PB7S68bnxabdm<;bG5<8Y6DNz#udW&
zI7v7@ZYzvWaQ+16%Q3a_qXGDh{T}#bnC?JVpfivNv<KP(tpO(>fHQA9U5&sAfWHRy
zFQ6WX0AB-N0G|VUflq*4!27_vKn<`Bcnf#~coldFcpl&{MLh{T20Q}rm!bX)+ynd(
zxC7V#tOZsBD}dhvO91`~)k2^U$Om$POyFkV2H<*N1~47C5|{*}0T19uJMIJS0xE&q
zf%U)|U?s2=@B<5hTLCYS1Iz<%0%ijlz_q~Dz!YEtFb)_6i~xoJmjHc$9zaK+HDCZg
zzlXjAP5{S%?}6`tZ-6g>L%;!GFYqz&0q`!c9e4|P9e5dd9(W3P40s5*7q}Bx50nFo
zfns1jFb}v9xE{C$m<pr;V}N16V4y$H8#o{63Umb80r5cepYR#@5vT{g0S*IufZf3R
zKn+k0ybinq`~!Fzcno+DxCgisSP!fQmIF(GQs7n~2e<{84O|CY4NL^a0K<X7KtG@-
za30VZNB~*^(Rbk=a2%)yz6QPk_5&XS9|Ajp?Z6gb6Yvk<8Q=-vFTlM(C9oa{04sn+
zKndUla)7zO4Zuv`T3{M56-Wcd0G9(pfx$pOpf_*<&>ctu+5;}Y0i4<Cbe#l#0KNwz
zz!BguZ~*ue*bRID>;&Ehs(?3uSAge$M}Y@{dx1Xyw*zZ|mB1396et1~0C_+ba5FFm
zxDJ>GOa@YcQNRdbC@>hf1h^RJ4V(|019SvjKy-)G)c_m=z5~7j_5&XS?*ZF^Ex>EQ
zOTe?h<G_Q!-9QBp1eODSpa94LZUJTi(}Bsr6~N`d5THNM8@LcS7f1p+0BwLc;O82r
z>lAPt_#XHc_yX7ud;)w3>;$#}n}Jt==YYQfe*x|V{s624mIGx#J}?)!9!LkS0ww@s
zfDyo@KtG^2a3OFW&;@V<Z2%{LzY26U0Y3r9fTO^-z?Z;5U?1=)unTw}*a2(@s({yl
zmx1Sir+~+Shk*xxdx1X!6+j4B1C#^HfF(dFPyplsS->s84Zuv`THq>R5-<)J30wvY
z2KocNfeV2ruwFd|JPcfozipTXOb32Ox(R3megcjI{AIU)14n`HfNy~#z+vEXU@!0~
zz@Kod1>OU80&fFbfwzD+f!BanfsMe6!1KVfz|#PKeVD&G>;d>I!@YqXKri4z0DoL0
z+yH+*9e-^m|6M))6u@ABzjW;Y+5nvZ{B;`tC`|CT81QHBc=sbjPoM)Z1i-%)Ao>7(
z0qejQrRC8MA^)_AKeMhMosr<*apRw6YW_Fs$e#nqze{IA9Vs}E0!9O40R9b5GB6al
z3>XFs2SxzAV~+$b0xkyn0sVnXfC0cjfWNZDI#@s3!gjEaShwXj`wIWelk6Y%CEL!v
zVEfrmf2zeg4g3#K2~+?ZfOWtcU=^?&SPJ-og+LK-E8qokfh^z_;CH|*;5y(M;3{AW
zFcC-v#sDLMVZabzAkZJ^3-kmo0L}x>0XhS2pdHW}hy$Yd34qf;Bk&XOBk(WaJK!7O
zOW+`|5BL<=4SWE+3%mnt1-1a)@rQ(6fQ~?WpbZcY7{Hm&u+9NL0{;Rcz}LVRz~{hT
z;A5Z`cn{bCYzL}<H-J}xmw;!1zX6W`e**3R)&MJj+W<eX5GVu|0P}%tU@mYIa04(4
zm;qc3Oaan>F~H?OGB6Oh2<Qo%2P6RrKs@mCr`T@*M}Z^2=fECdH}Fs3ZD0%V8t@O`
zY2XRqVc^fe{{VLY>w(q4GQbZM1708-xEZ(}xE8nym<WsmE(b0H1_S+op1`?4XCMKH
z2cn-~Jpq0K{tZNcFM$2P$H0fc4xk!%4R{fF8h9Ld2)GZZ1VTUnSO)lk62J>&0k;5i
zfEmCvU^0*fj0T1SgMt1)Z=eT|1hfa@0Rf!;80#GHJ@7T~1#kfP6xap42kZpi2DSjN
z0WSm315X2w0}liD1NQ)b05$+YU?s2=@Bu}@0w5R21a1ay05X7UfvbVZz<6LRFcP>7
z7yx*HbAcqF1JDMD1I~Pez6Jgb)C1oFUjc`JeZVKchrmu?8?YI86?h4F9(Wq~8}JzL
zFz{#KF5nIz2rL82fI?tCFb|jm%mA(g(ty#x2w(_s3D65T7w81E1sp)rZd_|X9q<LP
zANUA(7uW{83A_wE3p@cl3_Jkb3;Y2H18aeD;5J|pPy#Ffa)4WaIly(mG+;823XB3S
z0|o$nfF3{+&;f7)O}lXK2EG9f0K0+rff}F+cnx?7cm{YJco=v9xDWUva67OTSOqKt
z76YX~A&?K`0CRyGf!RO?a1C%3FbPNl#sZfE$-n^MBA^#=KF}RV0^C4bpcP;MKVzLd
z1^fj38>j=m0uBNDflq;5z<WRquoZX%*a*A;JPkYnJPbSl^v0Ul6F48x_XD>fy%_KV
zr9cT#1QY=Iz<eMF$OLW%eh16~GJteoI&dX085j>-0gM4sfDynjU?^}YFc7!|=m)$A
zJOexlJPJGn+yhhs8-R7dDqtB90geENfc?N{z(>Fbzz$$5uo-w2z^(9qJ#MHo%W)53
zKd#p}$$MH#%upQnBKBjt#@TgODvo;``!QK@yzfi9sUBhA=Yx5qfuk*pW4_L@jKvA)
z97;FZrenU&*>z5(8%`aZv}`h8=eS9;IOzxK<T1onpYA6)ma%lw52d@rrqlf-r|YC2
zO4o-v%@^HIa=M=mfj;xl682Pfn;O^ErsF^U16m%PSRZ07ZD`@z+c^HKK$gx$PV>_s
zf&Y0pY&!aBai=3^*XPu@6XZ0T9Crg!9(J2@PIx3G>^8|c6=&JxzS=$qk11a)P9Ixx
zv~F>-J~fxVv+4A)C1=-J^Xv$9XrE<MA6s%9TZ_}@;2~Rmx}W6q`t&)t*QV3`B&X~2
zIrtHEnlHMa<a9qB7(c^9OG3P7x2bV&+jROItY&@CTW#mRMg^%n-n4Q09DJ3W=BGXf
z|6$Y7Ps`@tZJa&_AGO)!xEql2u-lY#!XqhRw@J>aILjuVW$bhCA?1t3>0?Wd)-6uf
zr{>^&Hl04U<m@_Y4*rok^qFN-A6s%9TZ_}@V1=zd-A{6Qefk_+XVd9^lGAni99%`6
z=8NtpIo(eO2G;P<k`TAqZE9SZO{dSnV%7(})pmUjF0gU>9Ly!B`Kiyrxi%gB<o`V8
z*f@O-&am0!xEmgbaM*3iIpLAiuWXXD=AdPh?;or=D8~uuX{-+q+!m*g5jj4LbD*fx
z$96I~qlMGQFO?knh3_@&x)j!D<1Amu={nu!P@7Jl6XdAlI|X}v1C&nZtoq35I=#L=
zHl1D{IqLY%1zpg*mq1ipKn^!lzKgN<^*PF>#p!)bjy5e$j-R^T6Ky)(7jnAJAw13V
z%w^;Bc_tLc_eFL;Pkn2Sk;UnLl4E@qr~CP%O{e=wPS@#verMx!KfhEQ-yPZg+^_1h
zINeWjtk2?fKR>qVbU(@II^ECrY@F`rcE#~spWV;Rsy>U;{UpcwEKc|H6`M}?lbo*8
z{d~^G>3%+;IKE%w+~st!jz`Ghu((u@#R#EuvVFb4DgJ&<N6w*fciT9=7<DL}opWls
zJ2gLPlR9fX(>b=mqd6MV>Lb@n;{rCWkH#(6>Z2}I;}+X=<27!fjhm=(x7uuS+^xf|
z<Jek<UB@|L9d=(F8uu%k8fV$;Xc^MZ^Hm%8-qn6&t2XdGvi+E+bbP;SKW<hW-#gon
z-zkpoeeK6Aa&Uz2i0wy)((#?LoD*oD+@~OY4LAd5i_`Zg<Y>#{*q_!|OttCsYm=N^
zXN}W%>Tum!HuY<h9Is7_)Av$iZT0DXlGE#xKB_Ui+@{n0B&X}7k4l$Jo#u<~Cpq0u
zhiKVrTw=GWalLIieJ^z(>(lyL-%Fiq<Mh2$7jl}P`d-Ry)6q}<&%<To^tH~g+2ptz
z9*A(*ZOS>}k<_njlC#zx%O*dIu^+#DV~ztq>#-kA<j_8T#$i7il#ZW;*yr^za7MiO
znG!jDzK|0dC)=Rbkvf}BpD*O>I%{5kY18TRg&cMK49D*00qXj+aJrx5_`#K~lXDw(
zKC$U^Kgrp3mY*Nkbh@A9sN?5y2Ecx?jveIC27WeYKej8*V<(WVB8Q`A4DL;G7~5Vk
zxYv}fcMR?o#a#rBep-FPqA%JwtKH<DQ}tOod99GZ@sv&H5FVM&;87bVuNB2UsBH4H
zJo=*Byie&YPPh3-8>id6UD@R4f%aoPxuE$up`1$|lpt^f$iWGIen?-ed`4HP`p8Kg
zJKY1|u(-iy@~m(<b*bj(uV)cREL9voV`Y8LR1ZS)@Yy(*#ueK*h$)xH0z0RgLNZt5
zWE;rI7USn#?VOn}?aotNGHj@dn(Mn!<LovqZm7~Frg{)Fk6B7*ar(7las2F;73sPe
zN@sDp&f@ravHh5?bo?CIeoR#yKVP=DZvwf==4a2ceOkYaQyf2&w(C+f&aNA#xREh*
zmuj3{cZuTodAYs5z8YuOc@)Rb*zLOWG|sN;syKcwZ`XCyIJ+)Ear`Xbu4}DvcAZ0U
z{QTdp`}u2g9LU*qjfxwmbozC4oLs697N=iF|FUr{)#5iaHO^k&5yf56B2exMaflq|
z3pu-PpW@)ouiE#C#@ThXic3>Ey?y^A2ZI);x9=Sr*HWzz)f#87?@h&xhroVpQrrYP
zf%MDdKunCmy`XfHVsK9@4&5gEMQ`5|HcoHfBQ_4==5csH<7E42TCH_Drv%Nqd+j>y
zdjF&1rod0T%?gdP+qAf;G1|9Y=`2ofU%<xc?OUO7c3*VP?#oiUPHUe}aaSroTTVh0
zYn;74i@OQ}`>{ajt_ETEC0B9N6sM2-JR9do^)#ElQE}5_=w{hCT{lB<*Tm3GvvIm^
zisG(~p&M`Gblq6RrN_{Xv~jxbGR4h^p&M-DbX|WNr_ZH6in}g`%?oXuZu4BlWk6>?
zx+-p_oj|&y;;u)W<F1cwf{oMbYpu9hF?0?ar|W(`Vy=UhPH%go;%3LNdECb7Hvgr#
zIWcr~Hcr<aQQQqNbcbx5?&m%mr|)|{v2n^YPD0cw?sqbEcJQ9!ZbY`c{<Q0;2AnHZ
zh?`<?Tb1tSv(3rW7RB8XgL_?Zb7OF?C~jU1?nT9A#^9b)TviP3?~2O?XP;+}+c>?i
zAGUE2%kE(n_iLPet<yOrXx80h*J*3(9~76P{A@W1al6LZ>$A9AI%Yf8D_x!~pUE|f
zn;(NKSDZHnw@h*QF}Nj)TL4ZrI@Qx$s!VaW#^8#;ah?^#;PREOFb0>SbQUMy>7X2s
zdDM*;qR33172c$57N3=CCgv!vBnCH=9QH2@V{qw8R~mzxrnoY2_I{b7IA07dO>zDh
zHpeP%Q4B7H9NNA(1~;4>+OQ-Bm#ny@F}OjhzT3dD4f=ZB&&KK3QEwZk<g$hf6!&{8
zQ=2c{z;RA2i@|kLy5)+~eQ9swbYEOHPG3LcY@Ags&f=G^&}XUm*R-rm&Cf<~^wZ+>
zIe45pjKfN$)BXIHvT1R;pLI449WJL0%!nfz=U@hhL+x92P6?WIhwM6S?b)Zea%qev
zTk88n<LvcW+$tr|+gGb}7N@uGpEgc!-#Z#-uTSUf?W?xywD!HJxYaEUYwnj<HO^k2
z#Rb?Sw&NwGTZ4SNFVB&~HAYU_)O>kLad^e_E8Sz{@Q_2!uKSDP*2d8NS>x=wyA`)C
zhOUwv{3K`Bg%!6Roc&m*xR9MdIzTQJ|M*c1Zl%WA`|LK2lfG#4`d6IRpMIqa$Ea_i
z;%<+@6)LVG2A8k6J7REo<Z%1}U>o%Jk(oA5e;;|Hjnm&pUQaGgh(E@#nXYser`x>B
z#_2XEYBt%Q@*Qrf2QmEp1UP=CL7Nt5z2hZk`9e;<-&ML1Hl6-%o1CSC>E`+j58iE3
z2V<<y;#i->(FvWC@9d!K_ZvD9gR}gk&7PW{tk3e(;&eYP9c`Zb8#+5@^%?E)NP^C4
zgT+z9ql4B4a;(qrAcDh1oi+~A7muWbL;3PQNK&VNmi5b*(BZH+{j;o7HctO6>jXK}
zXX$9uk=Tc(#1A$dZCc#-HjXweu1?v!3pNbEnn$$xwbEIfY##|6U)Xf|b#%a{)93uB
zHcp@OwaVr_W))|J?~{Xr_nwt&CUz>_eKEMVmF`dA*gk7q8LcLV<9-IVV+*-fLOfv0
zXYviDdoTvKNpTOw;9e%@6yh)7q%WzS=2Fio?&0Q~mdM|g%|}|YnqyCp!<_hQb52X-
zuS)kQvSfXp7VbgCJr;wzPuYB2apjusE~T?Lp>cQGxYXa^cs<AuwG<!Hbma8!c?4`6
zbq=MobNcr@mQ#m*p`TWLPNma1_KQbzbg@<+xn3H#(8l%AxLdXQs7uwjT$^sZ#?7^H
z6E*Gzn@#=NwCnV1)2@^2F?`}-_r;;r_bZzkXW4whG;>xsOSR!|$d%)VHPWi{T5$Xx
zpw3zCAjj`ySe$Hws&lGMN6u;^IqIH_QQvrSI4n-LIYx0$#n6qgak_4Z;{Hy<wqp=E
zLx`u5Z*Tj>N@sDp&7O*TCWh`@a+tdor|UW^?pf$iZF4^}+MXQx<vGOdzO+(0i_>jJ
zzcA~29y+_tQ{-Utg&5p%8>i2uUvZoh>ae(fAZ@Sjdu7w&beq58G@BOpqE(4@uA|M~
zLcFBqS<$b_^}=TxR)%)|k{phWTAmd>NDgE4ij|?A_bJ`0$dm2!w2+@@9LGq2b0oq6
z9JMhxr{eyp>f3~JcAM`g9XY$r>KL45^G#**wHP*ERXTEZn=i)TESt|No3H-|o8*4W
zrq0=Iz7fNw)pl}rn^xO(&a!E>{Y|BlYf`EQDIuOf8@OiaoV8|=<Mm*1`gQadn~t31
zVUrwnn-Qm<dVTki!(6gB-R2(@w*?wG?#f3bMOfLiILCkDv}?uEy+uE02s%fi{CbrL
z!Y1pnakALT*c^5=ct=7GZLoA~pKg<7Y+SR=7+kYW_KT(CUeU6-lx^2+Do)xgi_J-!
zlGAL$p2NCV724Vd&UqGR(^+$ZI^7rQ&f;u3YtK7BhVCp*)5+(D)OoB%Wc|v|o)|-u
zyUE7M=Lf~jBB$A;M%snV88#g`>s{E@F*s=#x=A*ha?U3u%Kk_N$L~ZnkDt6AOl~we
z%@^}pNlb)EF(NkSA(w3DP?vR$4g6JoE!@R+U1DOQrR();&SP=s+c?e#`Mpc{(hZz`
zt?1uPBS(L&wwu?OhgqVNO=n&!EgZ|}I?I;?>VDN{rjDH6pVCM8%A>WdKHX1pEMwIt
z=dIEiHl6M#IbA1xRJzlLf7?%Tzw*;VOG2Ea4(GFc@sJVXM;j;W^GHg3Z>vu}iz@D0
zo6aFXDDJS0lh>Z&_S$U9asLgQa%_LYCOPZ5!?IZ=gj{!BT$91`_z3kS28F0XoQoJa
zYurBo$Crv0M~&2?+zy+L8jIVebk&+otG><P4A|5;OSj3U)9ZWjKj@xSx~-_se*B#r
zj%{`V=_klxUT=@V{Z;AS2FHHU=jZ+4oY3i<b#0QPO^ai{SnnwAiorRAN7i1UxOZaI
zw^r4sb5?!iSf9n|^{tG-S@kVZTn*|oBs>Vsql_F5i?cM$E3|ReeS_S5WpfAOcAHsB
zXK}jCn{1qJbC$BXlNH#G45fP)`S$v*v2l8RQ*E4H-*{EuKVehe)Kf8jyk2mO1;=_U
zPG8T+v5dtD=;WM1-sLu(zMhe@>#XZ9nL3QEWs~_j$8onf=_BgoG0;|@?k72xv2^;p
zzR0H2{UoRBq#vq24|SR^x}W59KRFJDhnDdBKX#iM*U6@n`vs4bi4Lp}(Uvy!6p+fJ
zjg8aaV>-!ce(LM>FNbV4X;9fbY2)<u`WQLQCdb`SI=f9dCw{{wIj7<*o9_uV2a#{>
zmyV)7WDA|M_DkQ!;H>@9m*n85rQ>^8%jO}Qj+|w4e+<sD`I)l$J{__hACohL_`sIW
zWUbPD7=wFH>1x4Q_apWVk9WZF-l22Wy`!2saJx{>u6sl2bk5SfqIA1s=w47dowIaL
zE8RyibdM{Y&RM#LmG0vhx<4zO&RM#<mF|-mx;vFl=Pca@rTa97ZVh$#AWP>g-Ad}f
zeHKHvRMn?*md>Z@+Y>`qq;xuG>GG9sZwy_w(&?O~yG7~t#n8=BI-Rq08A`W5hHkpj
z>71pTs&ofp=*BCZ&RM##O80pT-R0DwuXWDS4W$m;!5F%Msy>~wbQi1o4#m**R63or
zbUl>ra132nrPDb}*HP)dh@oqzbUJ70S}EO^F?2%dbk5S9K4@O=U&YY<1di*3&RM!+
zN_QlN?mOzx*I&orjwtS%7~DZspUzqJ?N#-C8$<VzvZ-^H?gQ%JOC*MFhtlbsrQ4=-
zbuo0Cl}_g@-6o~`E{5(!>d>D$XX&1$4qSZ<-QSc>=Pcb{mF{Q^-2>F2?cc}X?or&o
zVsMp;`*#d(gW`^X!)>W~Z-%H?3yx=tv-VibTTKr4O^b5~53}X5%&yb8MRpzE_o%~X
z)5-TeiYrmNAFRUKxquv;|53}cqF$vtZe?ia9Hl#<<yp~riu=jR(9Sn0n+;l?6`iAW
zCy`;l-(Clf^F`;Zai2~dxW*W|DN3hvmTr73oyYWMjN(qkusK56)H%y$ax9&)IY4nu
zF>Ll#Hg(Rj>4~LNHqTYu=@>SXluezpY`SCVl+8AZI}^iZoU*BNmd#&2H^)Ketm)gR
zxSwO#{1F_-R_836-^bD^KfhJnFEMO>p=|1$W%EERowE6<;-WEZ)+(DiXW9H`ES<9X
zw&Hl5+2{3J%BId)HeXjdBZlr}rPDb}_q@_MV(6YyI-Rq0k11VT4BbQ2Vg1xOOZO-0
zz&T^+{zuiPbC&K7RbPAz-Fl_dIZGE%x>hlC%au;&EZq{NYaK&Zs&qPM=?ayO4~X{h
zo3C^_XX&z(u1yTxO-iS8mTtDvwT+>hp>#TD>82@NyBNC3N~d#{E=}nYV(3OIoz7Xh
z5lYuShHi+`>71n-pmZIe!~bX9H!miK!{YS&W^Z!1Z(5vw-#p*06YAoFt#j-;eiovR
z&cEg?N_4c@G(63eXipB4q1hLWbJ;kj#>J`n+-$h*h#r7V<R`}9PLo61JI3HnDqW`-
z+;PQqj=}v~*-VPT)hk^WaP~R>H8`%<I%kdTVd}tjRXX#1NV#n3esVZ;&QPBTe;R`m
z9w`&G;JAKRIyvs1a!I~x(~+}mZjZrPHaFXBn(tpso3B!bzP9QkXW9Hm49>FociM#R
z9K-B0z3q=vhePKqn-9m}ESrC(P1v(^dfV@^>GZbW5reaAuCv+H+rElAtqpqHe;<Rh
zZ2D*ux^D2*ew0ubk9Tu1xB_ym@O{S^oLA}211D)ui{(6WI6N_Q*&1ip%~f2_7`mG@
z&aRuIxLz@IR(<5`I;+0kAb1_=b0S08)H!QTToZ#69=2GBso*##ES)|l#@lrIoEQ^>
zvuqBx+0^I6rPN_;t@`vi(LV-f+3ZD|(Di|@_O_o-9S)td+TJY&XW8sTo3Ll;^tLD1
zbb8xc#o#QP(fw!Jbdpf(%PDYdyHy`K%g^I6ILqcy+JvsJ!B(DqM5x2{a8V5IYjXcj
zb@w0JczGXi{ChWNGZ0uP23!cO*=23Gn&7)LJKtf74-A;A+XhHWVD8A>`HJuG-I+VH
zx-@HDaH&C=>PlhCXeOmnq*-00Wm=}Wlcjo-RYjAfMU^$VRi;^+Cq-TU@E@7xb<w)_
z$KU74J^jW=)1=#vukOY3-1qZ*o?qV|F&H?G@d2@akeHAEhdeRoe*T@xGh=$5tpPFV
zM~)v6bJ3s9GxxLM$TRozhXZ1|&mTDYH23rSlE=R2@yz}F(*ZHv=Zf@6-eKk{YquhD
z9eh%={*V}__hROE6B3g)W}f~I<-3kN^ScR&IrH>qk?%;JF&Fc@35m)2^myiXD8J_z
z&zz^k%<;_cP)d$GbDk12^ZIjSZ{&Da@{GBd^OTr5&;GTw)2z3geOm0bip@G==65JL
z8PB@D_WnQbS9#YQG4nf=%Mvr@X}=@sh$H35v+qwkcE%C2?=w60lB3W5{o=D@&ORk}
zP{o{mO3bBVy3bF@A|1yIj3=l317gohjP*S@Aof|6H$ki)j`;R^enw*adsYt-a6a!*
zm1oBE^ZwX?n5DWsK}?=^ooDZ7zCY$MN1nuVpAQa*={`T^=+k`OeUiu8^?2s<e$RlI
z?(+`mle_?PrRYEJ{b$0*|5K9KK_j;JJPe5Sub;dp`1MPUyuIgPKuq$aUs?a|Pwe|s
z&qa@?V=_S<)8k3(UmSUQJROs~BdpJPZM)=I9A->%<oM?SF<F}&|3pl#t<IC{r+<$9
zy(3Rzy3ZdEi0M9m<ml79whhTM)?i-S9}bA=K7Sy6l6UmL{%iZ^#N^uQnBHs2b;k5w
zOYDywd3vu0#UxK(+cJ6b?s1MMdm}MfpN{GAB=%iLo*qxfB=6XP{m=Awq)(pd;DFeB
zj@UuwsgHdz^|MdnI`%MqI*<N;`*DbW4{gAB-%{i0m^t3Qm@%G?9Um~>ob<^N8W4L&
z#ZC-}y{%#=2gKe|u}22Pz9upDIy@lu6_xiWv3@w>+uNSkCB}8oF>~$vV#eBa?2~lp
z{2Y>@PZ>wY%%ATPlfiXN--B}Qq9bqbo>wtxW9G@dCPz~8Si6qtdr-$@Uv$j;9P+Yb
zJae8BlYE^gbCJ2q@uDNooTtR3jn3=OQRO`^dB$AKc}mQj=Ru42l8=r!;?6#e*prSt
z^K-~48IOED7xQyS*by^7ha8ufF;DYz$Pq`L%u{~Jao7>F-;s9gkfTr8%L6_;=Im2q
z2UX13r^NK<5Z&iv2ln5CA5nABG4t9=Oh(qR{&?zM@;dU&Yb!Blp1ub^Bzf$a?$f-s
z5|eAIW9BuwZQpqJ@9pPJj+l9kT#oU~YxEyKwy(P$@1VtI@=K0?b;QhT)RmYqPuZ6P
zK9V?`efIav*AMOMQ)2oW={_R|_Fto)%6Nx(tW?arMiR4(SbscqjsDS*XI>+TIrH>2
z+H~ZZ*GOV!p81~mTSuNbPl=g%=6m9A9C_wEC1&RJ=g7XvvF^w-=P5DCJH?*yYww*T
z)xVM$?{XbGsQMciQ+sK~9v{$WRrRT3W}o|FMxQ$NM1PVp%Jt*>(kDlBK<v*X#y^#Q
zazN})B*s54c#4?wXU-oHJ3yX}nb$~S(x;A@_tLT>&%8zwbLQ!L=?@%v<~5R-<i*rH
z<-Oa#FIe;MON>Lu<eAoez9%uBKOM8@a=$dUzP&GxXN+7qe%Fy_-n&I&Ok=N4b6+GT
z`Q~`CH*&n`$TRmvV$w$E_2;khW+l&9gSjsfGuJ0$_2)`oUvi9R&QoIMc;@wc&5>u$
zQ)13Mz1Ocw-UrN6VlvNXWaAu1O7(e~nDZVyCw<ah$ILZIOuEuBa}8f`<e6)bm@`kW
z;RVTKp1MzSuO%jH(6RnLv)^(&=NQkNr^KX<&Xc+5dm`@0Gv_HWGp|2KHQrN_XUxT%
zr^L*89<;9i%z4b&rx6P|^30#9K^gBC)^NW?YX5l15i@_L9+sFfPxEK$m?KZ-sr$Uo
z5i@_L-sR|1_VNI!aya{x*g;=EWI6kknEsin`;<S!OzuJR8r>%2@jZeW>&Iy)G5L-`
z$INT=%Z@zr8c9s@<j+s#mrP~v___RfW9*rZSw`&N)t^PCWBCCw`SV!$^$VTukSBj%
ztYiIqSK4q$Ovd{;hka)MUn{o^xtowkmvVS`$UTlI<lGG9tg0_iu3-b)>RjYjyIq1Z
zr|Oky`&{x_yBvLb$Q^?8H$|Dj9LnlkowBX!yOiG8kUNM;NY1h<Ym}R+uEz-6KID!g
zg#wmPMGHF^`OuKtj~J53V-XcJ(Z%o`tQk?vU=|Bl!v?nD_6)hl5J3Vt%wrXkcawJy
zd04<2Hn0u%z2qT+1ag?iDjEpgH{>2YN{K0C(0rJAVLdeD?!Y=h8|=b+lD)ws(kNmX
zHEf~>&m%+b0OCkt_EF}AHEduT?oTo=M36u|!ZpAyyr&oglSre8?i1`&lzl=JGnmB!
z)-d)YeIbDy=CO(fwy=1bJx3E=41bEg5XB5;v4AyfU>oi@{UU+{a+t>|8rXvC(?f0_
z!k9)DC9Gf_9ax`X{}93yGMGadb+oYy?`K&zCXq%F%cx-!J$NSBTf~t<0ZXW&h5WOu
z={eSfSu9`;8`y^XdDeso63Ag5t7u>gt|``pFs6}32`gAf2iE6U6GE6m26HH*jy87T
z{XA>JB+@8i88vL82hR(v32~%Qz!IuxVFx2T(~H=6k#)dIFg`*Ud71JYV<Z^^MJ%I+
zP4wV7&vW=io<k&&$090dqKn~IxF-<B3>L744a}$5BQ!8_iM|j+5_v45f+o5czD!?;
zVg|EVz#2BNjj=0S2PBZgJXX=b7Lr-|#v&?cV*GXbguIu6H?d|&Jxy7}GHUAFCS_06
zJvXz*h$98bsj9L?xufd(y{6xtGc(K`(td$*4I9{2=iFyl2P7V$OdyAOb#6<QuCv@z
zkao^7!nbjsL1J0T5>~LT&UK{xRXaXP8Nw7Y>RerwZOUC$m%e<XcFq>p%yq%8`zXVh
zMpm6GQLd=^I%P-d7rDP6{bW=*M_E>NIUiR2w_jsi$T{y-?srTg4LMh&TvqiO<tBRY
zT(jdTRTe0hR9*7s+$#TW@*(GHl$+?m<F(HPDC4T0qAXwuRdsIU!*)AAWlYtjFYitE
z`9hHPkaIVpKFvO5)n46*x__E=LFRuW>N~twM|iJF|2LvO&igEi8ORumj8#EXjoBOF
zTHkKRYScF&?VLxKJs4Jf)Q|EGM(`N-B8sR%a++$d=7^WE3oo%WmQ|aPhwZk0%9yIh
zPTS{_lzCO}@=h97@1y^Z^^se6&tm>o-nsCyw`n9l%r!tS#<TSd?+o5uCDeKTy|40Y
zUE`i$?XsVK@?*$j5v%mmfQ$E*4?+5yL=nr#)9)gh=)yz)0i;mCG~;Bkf_1bRa~Hu^
z=?5*w-hrR-V`>gEkHXD7$8a<D80L5vmeKOk9%<H6#47LP214{Xg#dlUA$_FjzX+)>
zQ`WGFo;sJ!un!o0jeJPE6@I^t4lK@1A%i)T(eLXNeL?D*ls$MJXKcv1IAu!J3zSQ!
zqNUE|_>4G@RWz^#*JJE2!kC8ilR3e-kb0JLC9Gf_9as@N=6{yGgS1<DioTe;4`EEp
zIyn9>ovYu)9QDr|>Rb1!Io`><5ymvKkh#Y{%0B%X`#;8BevJF}6YRgAYl+l@+-GoK
zvD?nR$Y&F*L2|q7%kXo2)`0xp|FT`KgzR!u?O}*=O4T!}oTDtO`bN}lzfI}pGr06M
ze2-m@Q$|(YleW(VDC4RgN!jNTlsQ!|@b?nZ#}Z{#)jMbHa~7ZfMj`PXb<g~F%Mt!w
z!w>1}M${uOalL+%XZZ`P_qTW#u)lN6J;i5K8FQZa7D}|~V3~G3EYWrcUD`)ycrTC>
z<g;y+yb(UXO72{OcLk)Lp=_&qooAvAIUk~&QuP??TvTgKQsz-XQ=OZ-&(0~U_I1@?
zS(S?q+wr6-E2<p+4elRAA!E8(kBhZ<S%-%;Bw54MIi7#D<^=IoOw(osY1-A0qHPrw
z+7GklGC8{_kk?YVW90eB3DQ15+dOSEw27;Dj(7uE+N`5UyG;~m+d`A}<Mdr8$IE^$
zk+-9A+iu2#tf5R<SM?Y<a;~o4Z|(aS|0B#B<M;Ek9J6rq3`UT^7N!p|53D0J#vWko
z0p4v`#S+iu$OQKv^5|mtAvHc@)Die7?dfY31)lB7$7wUpxQJo~vsl0yHn0sh{bvue
zzgWj8?}QMhkii_<@bZobViIZeFvA>j0mj8D8rXvC2z!q(WIs~Ot$-y|(ZUY8KIX`N
zv{|qB*XbKY)DUM4G1ibrf<C365!(9^LlSu`qJkzC=xYr<@~h<Upi91sb@>p+G<I1}
zfIVGf{u^o^ciBTP*J%<_`WRy$U0e?z!sx(ao}-AcX9?s`rJojdu*h|(pb438owiNJ
zFEM5ZWyUSCZ_Dt|K8{(&U%(h^jHq=MnZq)2%%Q}%E6C8-9Ci_8eQ7LX6Dii2WSm7b
zn9~+w%pr+!`i`nK*64E+J$Tsv4c5605BUMKFhU=GSj=^sJhz%tK1~0ppouPqAGO!%
zryfHR<D83PM#Wl>us0YXCVMi&vp=hz|IK6exgMn_XxEpXvCArDOVt}5)&$94BX>jP
zZ&SLDvv-If0co?K;sMoXoHC{AJF3r-)2tKHUXDEPsM%Mp|6a~btNS;7w|%}d%Co|`
zb-145Ucx$3Y3>6^j&&dR2uieBK?fF}rG2yuBa0F`u%70*Aa4mR?5I9=@3Q;aR`Us}
z@yAm3d9V7tTm8PoysBz_r8^lH>*&CuuTg|Bg$(9U#tM1sXpy^v9Q!wqRWz^#7eC*9
z2xA&ql#ra}`GYKZ_I2)SETW7m>exUFZEVB(ZSEQPFpeO?sJuaYw9r8h)>mi?4@NPL
zFk(m`i41bcV-8DLK@IC@qJ=iLVa?Jfd>BU%Aw&?z4ARJ>h<Pkv2`i|ffi||VgC4Bk
zp<j40h5*8dVG1)yBZmS?SVS3XsG)%tI_P2-?ys_b_~1tfQA{F%6tc*pge9z?f+}jL
zV;xO&(Szq}>?y_(Ko~JhVFqdBP(TTbC}RyZG|)l^UF;%~XDqB^`0MNi{D>fl3<@Y=
z84a|s1M5xN!;c82kislVSjH-<Xu^7n_X&I$M*ty25yv!UkVY1H6fuuQl(C8`>exUF
zZET^79;^b_03#U1ID&{Ej%g&3K?x1C&_NfwaDRhbjKPl}!iXY{DI`%q4Q-6R%~%K`
zj3~;8f0H$!i)fMkK@%hI&^Kb3MiOb{kjESru#76|XrP5Qw$a5dtao|lF$@nvm_-3|
zn8zZPv4RTpcR9MOe2ae6@w0Eb+&33p?t5?;Cvh4t;UeC^yLcbp!(ZU9@e}+MKf}%M
zkdMPSiPLxq7x4z(#ryak<hv;C)6|Et$sBH_O#da{OHpp+U2gt01S{|jmz%G}tjL>;
zK{-$2EtDg;6LRoXl@(?^@;zM}9^8(*vHP~mE%iDj|JsHX!X4OKJay~oC!RRz8-MyU
zpL@V}bmI8L(TQUN&K>z5ICpGsUa~)dBNG8e{a-t0O<eo(rR<rrl-a9xnbNfjm$T=u
zW~_<SnQJL)BKhUZG_}j@Rcqqv`SiruYuD^bCY`k=E?mCAU;EYU`5e_Ra)$Vo<eBUl
z68nEWm%Vb8q@-QEa)oB}eCE=HbC%uRxht10oxjZK%U81J<;wk+j(ce(`ziNFllw~k
z|1@$B=tE+19D>|)(oXKbEy`(va(~Go_oa9Mat}&7xi2GBx{#RkC8gY-a_uBn+R1$!
zpmVu@^`WaLIB^rCo!qB&Zg{y*C0FiU=}+$0$D!NFeZ5P&Hs_?B#C5w*QJ22uxsm5;
z^H;9lL!9cjlk!>Ub{*PvXt$v!rP@iKpEugA@%*kaiOO+Kszchyk$~<`p5yeX!Q-A)
z?PR@K+GT0C^>Kcq4n2j7{9fv^zQn(|+=&a!?>*IsLXVrFuG{%}5BT}k+I+rsyDu5-
zg0u^MK)bIR?c}`@rrj*(^dbF;w;+2g^ON^!g?1(CdORs*9&@UccCiva1DLJ+f2{PO
t=lX3<=(S5s+DWcHbnJajaH;x-#G4<`PVOBUQy()24p>Y2H<Y@+{{*y0Q$GLz
literal 0
HcmV?d00001
diff --git a/board/MAI/bios_emulator/scitech/bin-linux/libc/trans b/board/MAI/bios_emulator/scitech/bin-linux/libc/trans
new file mode 100644
index 0000000000000000000000000000000000000000..e536c0466d5983df247985d520f83960f9e231c7
GIT binary patch
literal 8984
zcmbta4R}=5nLZ&C7(!rz21KNKQ6fQQWcX2nM1hcimY+xxq$0#&GQ$l{X5!4f7%YM4
z%`6$l=+vJrcD0L-_^f>%wC=7ywEk=aO2FNAsmr$P!ft7oZf~AR*NE(xlIY#{J$EKd
zDYku{y?MU*zVCcL=R4o|&bdD)JF8Yy=jG*z>@`B<3v#WU4(D9p<JZ}exk3>IqD)K>
zC1NC+D4W|39l&1DgaUvAkPkRPfQ)b@XaZ&QJ=_~)0<iUKLJ(*#ifwr-_}14PPQoM@
zyf9J7ekmV8y=wul!yb?XNnl*;<JMr)rdxxJGlNYbz11BJyFEgbqP-08$F6K#6QG1{
z#8rSX8G~`a*JNlS`eT1n0aE}>(`djX!1VxLP8%U(LSQ&zI$%_$Z9K3XM}{Z5F^49}
zA!aY;kC)7mO$ww$OwQ1kLpNj^rvYC9xEkOB6asj0o_LM5k<49Dh9**S=v-3fgt^Bx
zUVLhCe0wlYS^g#v{eNNeS75}m!0+3W<qO4a;5o0HtMQ^pECQaCsW--XFTjNVI^gm6
z+W_3U%eH538v*Nb_=mtd!82d9j{uf_KkI+IcpUt~9R6wWuR{Mvz|{W^U?9ieUhq!D
z10?72Z-D3L$X^4$4sss~hW2j)CP7{X%=q2~By-~L0Y4x5PXJT@p8(6Dzc$1F6!>J0
z|DS_bbNc@e@MVw(kuchSLOJ;6O#f-{CivCBlz#yz%dvMr?<nM~FUB_pd^Z0I@_!}x
z;%AUQ>2I`{4BQF*YUtA6jo=S}2Py4mg5Q(F&jr66{oR?-zYF{#<a-2o&fiM#+4*O^
z)PZMy=#TvROZd&;OAcR@3#{j6uH$*4Vd*zkEnazdrD#~TV)c^6D;ic;SJzh6HPkI$
zvZAU%G&F^pG|><M5)BRh(AK6%I3&E9zZK2!;>&osdv!xpYxGAV4I&T->QPlRdxOES
zPeiqduVou-ecHAbe}fhdh9B`qa(KO^1w7P3)C+`L{2>wW1;bIl2yFIiQRzXAh?YoG
zNDGJtyQi?OH3%6*z#k5XK*aBD6oD2U`VELAf_@OX=8uHDLDA3})w~)VHR>%Q@JOUd
z^NVQI=M4o!c1Y+d+=7uda8UNB^$_;EheX65@;3YF)~}%l-y<M_8+_rA774?<AK8GV
zztO9CA=?y<A_8xOO`%3PF9q0axc&;TS#jMIU{m0H7GOi+x+=g1un+5Z6gHAqiBTl`
ziLv>;L5$7wO=4`M2Z*sTzDJA=sGArwf0!7X=27CQSQEt9h>jC0xOWg^V?9ZXjqWrt
zHoG&#*o@B-V>2^}M+(tLj19V<7#q@gVifxTF*e&FVr=MU0?a`nta&e>#VXy4U)G^j
z$`Pp~d(T+7N;xu>vfks8=Ll8a7J9oS&ylL!?t9;mJV&f5<o8ORBUj7FCne7esN4#B
z+a=FTsPoCUNS+x{7m<HZ^3067oP3SsnIW}?{36LSQ|dbMvn0=qsSlD@B+tyL98hnu
z<e5RWg}jhFGpV+c@Bb1FrOc?>PX3JKnOU`y{Bg-M!)lUzx8#{=br1PBB+rbid&%#W
zJTtGpN<Jxh&Vc#``F8N%i2qmojB$1#{!!k?_&aWNJ3POwudk2)x~BHt1MHT&sQ7Vv
zV(B#J%dN0=y;Hy<tTDfZXpO@T^BCNy+*i!inU?F&Vs1q>)R+&TX?@pLaR7S>yrez{
zUHk5{@MBc)S7>9CiG1t0amZoZA@uX>55?1mlF1|js7-7rvUJS#A-F#Kg=HNnc<}FF
z5&v2pP-4T-G3Y{1eFJ@4^R~mAHIE|oJqB|S7RL@jZk|L8(u<m=;Cm2c6qV<}KM!8r
zLh30}I;j{bgVZ-k^^kfPlyO*53%>)Vk<E3a?kDw4QZ=N$PpX>KFG(!~wWUnG_OC$C
zVrxCA8$r?4(`2ruN}f3zNt5HbZ*6TtFG_4ENwiHeD%Nqx`eY_Tph~vnS@UYpWWEfm
zmmmClBw{T2{IOJwkMn%oBOfPH*TvI`k-Hru78YvGn5DTEj@8F3>B;9bq^^jkm%K#V
zn+s@FesKGVya}WdD~sdf6B8&ZmkoMhk5pj|c)GLEjD73^W6=uataka&uiw~k>=5US
zv9}c^^y0(>2d1sdF|mT0JFY?eTk_Ue^NMjlF>gogJq1*deovKu);0xokr+#<ZJGD)
zyB&9QItnYxKimGBym``DPCt+JO~EkHn<w2<z;Nm4qRWdxcXbU7A+KE~el2}USF9gI
zO;_x^jRuGio7uta$NIn~q|7*6Qo#qa9fh9m-uIC;#OJZfdt6-`!6aU!zr4@lX``)7
zXcH38(UI$eqN`rw#+-0;b~>&y+HU!M5%+Lgl!#G(w_}uJ$n`<DF)-1!>$ezyH7!>3
zgu~efIClxC;7{hX?a!ev)%_}-evP(bq1_hmfBy5fV$Al8pT@h+A{0+|`O&sV6VJ(E
zox@m<j8K+TRxc`#QM&Wf)JC@Dk51JA8*L>*n`n=ref#{pLVfg+{KCrWWvTf|qiu@N
zi;Xr#=r^aPFh7%oR&peNY$a8UBO_8J(3vLmvBNp&%!g_D`<xNiQ~NOw#`~Nks2J~a
zLWHa1Hngs_-m)jL$b1I%<4GHbi-r}ZLc!9DxH?!WnL7LD3zlV<=qo4TNLDH0xAzvO
zr5D4*d=yIY{8+c<l&Y!xq^DbMF0ALr`ka_<R`muas#-mW1zXz{8$x$A=9}m<{vpDM
z9n-I@Re!|AyyACqG5g^(+4UlK_;}iSi~6P)BJ7v3ZddGSPPS}SEs(Y5JSi(e6pzM#
zF{^v%2QakGz5Y3-X8^YC?~VNus8F9A|HY-UBOOu(Cwt)}{$XNbqN*rfluS&FKS$do
z@rmg5vG+;;1{Lj!1>sx$6{G#`fQ<GX7$Ps3IJc2|r4Q;dVRBE(?8RmUyEvH0kC((6
zx%cFEEzgUOf&U7+*2mj!m)UL~gtE-(#l70-Tf|g$Rdv_YV$Tafk<&O}>4mlG?+{XI
zZaf`GR2@wpUZlGNvF`0?zxoBVqn1kBF&7p5(KB;3E?KKqKx+Q$=d9txhW9e}1f%a3
zxs5tiFT{!ZB5St!J%rO!HGq7Jo~k|~5BM`Ada6ttowd<v8=bJxNh0Ggq8_SIH^U#w
zX03TY1{^<R94?NX+U~TM{gge%pz7*i7dvMggFaWsha|5w2ERZJBW`2RtLeQ<CDo{{
zHU<N(j*;McJ@`o)gHbKIbAmA#)LM<fW>?3zVck0sBCMl9&DFsdAY)K>#YUj5r|K+z
zv!SPo<7te-Zpn<|48#~?FNbmI2+vRxvIA0fnq2RGNuRWR$g%f6kEUc#mCQg-)d{H<
zW7|L2TDfUUg;7Ih0#lmuC%1?#g<FKB51IF*ImgBEs=iqFjsjz#Y{xQ{Pqk`0CoYJI
zLm|uqN_JHZ)Tk^gn(f4bMQNla$J4g@GgPmz)kgxw(_NJ#jDbAYu11uq(bgyQnMT`L
zp-(s3OrcLT+Rh05nwX_yBR-ANG}=xIeT>m|Lg)qNui?OG8$ffs|K@^rJUYa>cNUmG
zLGw%G%KO`H=-Mz4PuH?`=00vo9rK(F%9&Bw{wsM)HuwB5ZpFL_+iaXH?_?+$qk`>1
z!>ZRy)O{SnO%P+ml}HQobqBiiq|5aI*OPo-e3#?rTAXA4Sa!z!qT^?fs7GL}{s2E+
zRp)EW+XrQSq~Bxo`|)|{HwE{wSNqXs&FQM@uQ7|DYRyqUqt<?CseI`(M?lfiPgwd%
zOFw;|rJu2M)6&mcdY`4AxAcDVIk`9&p@*AP=Zmmtfh`5=q~&?D23Q7UrXj%`r#wl@
z=V#=zi07F9MzcA#;%n@F8lBxBO(x;FubP8@Y7CUR{73C43HkhIFJL}SOpsIZGuM;<
zjXW3?9ei%o=O-NBewic_#8>t9`7^bWo&qTadjM5o^?n43d(>Dqx3}ia)W*L=a`z-l
zYIdB`b8T>Av3mcK&IT7~pSnIcgolG-^Bu&Bt@)R*U!YgmwIIE;&lmbtb~PN?aWLW7
zB?HP)NUSW0=Ut2`b;Gb(v8{Dc2Gt%eDuG^86EC(eiOb<1Kx9ae{iv1MlUL#?xXAVP
z;yk1KJ!8P*+O-u9@DNe=tgN9G&pDjkfX)nFm%(f!Je$Ke=FnL=am!b<=jwbFJtbqi
zJ%h{sh_AVq$X?Cxi-4_%9qP@fnbcO?OF_FyZ?S0)>5Vo$m-HH&zMXWnP2WL!flc2<
z+HKR7q_4N>WuzzC^gW~tZF&{xTJy$pyzQlm;^`l9iV}+*@kz0dwL&>5DX!N8telJY
zxySmrnaT<->50`rM!T2Rz*{`_09endAL9NY$~P46DDxbPr*}KXb#~lDN&EJ3c~iB~
zOODv=0^`G?$|ca-c{<Y~x?<~~hlg0Iqd@tVWd0*|i}*n-LgRv^&BHzC0`56S(S>p0
zOU;vd2r(KLmTSd3M;jOJ(nhE5$35kOs@EQXoz=S!ib**dx#io>ZLW?^G+S>md|BjJ
zi`Lv-crCGh&b@8m3vG*C#g-gmuMdjo$8(Cqn&>$O+V!?$T={WrG)KWfeA4Au|KXVt
z?b}D@P1UbREFJ0S5ll_*blcW?i(|{ft~D7MwR>^J3ehGr-1W+GkQbjzkYPNPw>ft#
z!z+{L6yAC2i`utOrf*A|>~y_7vPNCY>AVuLa4XL?2GD5!^(S%<HI5V+hl-ZL&Cc%Z
z3d6IX(dXm@wiS8Oc&n-!LX^0n;akApViM~I%zI%i7cCp!<sekf@_p)ZJm;JL0%^P_
zQ9sarm(U(g?jE&J(Qe!6TsT^rm0A@~FT7q~9!qQ2p^8e3wjrVC9~mXMTg-jF(vwb&
zLVxtwel9O{W9(!7dgxx8tC5K(H5%iJrS%c<FB4UhmX{xD8@UV}>PhHdk!dNsXvc6J
zyr-k9;`r6^lU@Ekd&jMPw-dXfQNdqp_?>*nxC1wX>^r$x*>73+W;4e<OWflPDYIuQ
zp7Qc?Q5sd0wf;!7DI8Kj&*YC%8E)AYY1*u6N?GL$>djWZjt^V-yr(SjheCc$D=ZZC
zQSWB|0%@c-YHHA@te+WJ$PZ_CZcx?-nu7jlS#-t*Xu_oy@rI&7d_)9^PiKl0D}hM3
zSqX>yN+29*_G*e2R=lCGrurj_*XIjI8k<6!*|^mkX$tGnLV@pf2sG-3)73Vqcq9G=
zg+ftg>WY2MMEIet{)lu}zv}LF8SieTa?PzPs;5V3qTo{=b^ML=&sOQ9@p3+vuC5(+
zae4cUW9h<sITtIvKK7IAsdCNbBFXjCJnX4fi!`+$d|1eoAwx2QvO~<5yk;uZO+kGA
zR4TPdaOTpiZc7*srastbk}hq6!#3Gmac+I8H{$id1tux1$gj3OZ`3a>e1C?8{H{w2
zrOfBW^mv2O8PZs5ZOw$3?GE3XYuO0|(H5`IA9X7$y{%2ndb83LRZ1JBS*Ds$lxy&<
zS7B*Im2e<aJh0A`jm!xvO0mmN8mq$rFKvpp1ijl7)gNq8kP5#)q?BnY`mq_rh%dMG
zA@3%5fLDHxR<bE(fftIpa9C;fhPEk9A$)MQ1DJ{>@cTB?OQX{fZ1ka~mKIcQp;#5x
z6t5ETZ`Om}h_q5Jqoc^L)2w)Z6ypp1p-vrFkI?HImwFeg%bQn5YqbS+3jzzO7X(-M
zD#hKQt=?c0D%rb9i8ejz$2a9{lf7Wjz)<|5u)bMUn*Gh;$Tl|`8ydJS8yeiLt*zpb
zO`_5p!tzs)BCJ#eAKbHpRorgHyD1#e<gg-}M73P7WbJ6(P{83pi0d1<3Wg!Lm<e~G
zXv8uHDs2>{t)et6N_9~h1QP@o1RDe&00OKC2zB{g0!z9yTXmcR$uIOqHs7hpIpI!-
zZ|3+a$jz1)?k;>IAI9=*lMT4W;jHCafE#cpU=?5^AOzR}coOhk!0Uhy06zizC*Xeo
zUjoMAZ01^kn`bnDRe+6v5P<z>VHxNm0MG95DPEr0;K)gsIHTpc<Gv1u6CYQ_w8tGz
zeEJtb81gKz7{D`AUVOONgS~tNFyHa;DIRA$_F3wD_$6Ho%yXqO0M9j@fZ=OdW#s~;
zY}u;%8Om(;?e5v`IYRtFo9EALn=|a2W1Qu2&w}Out4+A0+nQ0Vz&N&%Sj|%M1gAx~
zRWA;d+>P5pP_?lZ5$=dT=*D4-O|%3x;g*M0Zb`~B8Mi#Qa!11QXvS^-`m}HaMvXSw
z9EKe{dz+hl!gl8iH#hr3Xh!+_htv3{2%cp#C!8mFP7j<tV+JW@#5Vvq_taw@n7|8R
z$a&_)`XI~zuokGt`j`fy9Y7iTA!eO0|FoqZ>uDbZtfTCeCCkyk^K|O5UW!q8tQXp{
zhUkxVvjmXUV|~qs9_x;JlxOw64w}AMzpU?m5R_*x>hZc4kkuQ2-T?I4vq3>dJ;K@?
zJ^rsmE1ccJ0cNhOzX!l){qd|~-=xd;yD6i`@p50-5514FPBJneu_Z%ud^{E5|4HO@
zD`TTxOO76&tvaE1x$!=dqnCtU@+<Uq<mhpI?}46*w(OP7i-88_nDNOy42SYbklCRS
zGma-Rn0ovykc3`Gb`wEcc1+&_os)h+y&AM-udIw`_&BbV7v*QZLXWj0W3yGoESy2^
K&Co<yfBy%l#Cq`n
literal 0
HcmV?d00001
diff --git a/board/MAI/bios_emulator/scitech/bin/bc31-d16.bat b/board/MAI/bios_emulator/scitech/bin/bc31-d16.bat
new file mode 100644
index 00000000000..776d13820f0
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/bin/bc31-d16.bat
@@ -0,0 +1,28 @@
+@echo off
+REM Setup for compiling with Borland C++ 3.1.
+
+if .%CHECKED%==.1 goto checked_build
+SET LIB=%SCITECH_LIB%\LIB\RELEASE\DOS16\BC3;%BC3_PATH%\LIB;.
+echo Release build enabled.
+goto setvars
+
+:checked_build
+SET LIB=%SCITECH_LIB%\LIB\DEBUG\DOS16\BC3;%BC3_PATH%\LIB;.
+echo Checked debug build enabled.
+goto setvars
+
+:setvars
+SET INCLUDE=INCLUDE;%SCITECH%\INCLUDE;%PRIVATE%\INCLUDE;%BC3_PATH%\INCLUDE;
+SET MAKESTARTUP=%SCITECH%\MAKEDEFS\BC3.MK
+SET USE_DPMI16=
+SET USE_WIN16=
+SET USE_WIN32=
+SET USE_SNAP=
+PATH %SCITECH_BIN%;%BC3_PATH%\BIN;%DEFPATH%
+
+REM: Create Borland compile/link configuration scripts
+echo -I%INCLUDE% > %BC3_PATH%\BIN\turboc.cfg
+echo -L%LIB% >> %BC3_PATH%\BIN\turboc.cfg
+echo -L%LIB% > %BC3_PATH%\BIN\tlink.cfg
+
+echo Borland C++ 3.1 DOS compilation configuration set up.
diff --git a/board/MAI/bios_emulator/scitech/bin/bc45-c32.bat b/board/MAI/bios_emulator/scitech/bin/bc45-c32.bat
new file mode 100644
index 00000000000..d2939f458a6
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/bin/bc45-c32.bat
@@ -0,0 +1,37 @@
+@echo off
+REM Setup for compiling with Borland C++ 4.5 in 32 bit Windows mode.
+
+if .%CHECKED%==.1 goto checked_build
+SET LIB=%SCITECH_LIB%\LIB\RELEASE\WIN32\BC4;%BC4_PATH%\LIB;.
+echo Release build enabled.
+goto setvars
+
+:checked_build
+SET LIB=%SCITECH_LIB%\LIB\DEBUG\WIN32\BC4;%BC4_PATH%\LIB;.
+echo Checked debug build enabled.
+goto setvars
+
+:setvars
+SET INCLUDE=INCLUDE;%SCITECH%\INCLUDE;%PRIVATE%\INCLUDE;%BC4_PATH%\INCLUDE;
+SET MAKESTARTUP=%SCITECH%\MAKEDEFS\BC32.MK
+SET USE_WIN16=
+SET USE_WIN32=1
+SET USE_VXD=
+SET USE_TNT=
+SET USE_BC5=
+SET WIN32_GUI=
+SET USE_SNAP=
+SET BC_LIBBASE=BC4
+PATH %SCITECH_BIN%;%BC4_PATH%\BIN;%DEFPATH%%BC_CD_PATH%
+
+REM: Enable Win32 SDK if desired (sdk on command line)
+if NOT .%1%==.sdk goto createfiles
+call win32sdk.bat borland
+
+:createfiles
+REM: Create Borland compile/link configuration scripts
+echo -I%INCLUDE% > %BC4_PATH%\BIN\bcc32.cfg
+echo -L%LIB% >> %BC4_PATH%\BIN\bcc32.cfg
+echo -L%LIB% > %BC4_PATH%\BIN\tlink32.cfg
+
+echo Borland C++ 4.5 32 bit Windows compilation configuration set up.
diff --git a/board/MAI/bios_emulator/scitech/bin/bc45-d16.bat b/board/MAI/bios_emulator/scitech/bin/bc45-d16.bat
new file mode 100644
index 00000000000..246517d1034
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/bin/bc45-d16.bat
@@ -0,0 +1,32 @@
+@echo off
+REM Setup for compiling with Borland C++ 4.5 in 16 bit mode.
+
+if .%CHECKED%==.1 goto checked_build
+SET LIB=%SCITECH_LIB%\LIB\RELEASE\DOS16\BC4;%BC4_PATH%\LIB;.
+echo Release build enabled.
+goto setvars
+
+:checked_build
+SET LIB=%SCITECH_LIB%\LIB\DEBUG\DOS16\BC4;%BC4_PATH%\LIB;.
+echo Checked debug build enabled.
+goto setvars
+
+:setvars
+SET INCLUDE=INCLUDE;%SCITECH%\INCLUDE;%PRIVATE%\INCLUDE;%BC4_PATH%\INCLUDE
+SET MAKESTARTUP=%SCITECH%\MAKEDEFS\BC16.MK
+SET USE_DPMI16=
+SET USE_WIN16=
+SET USE_WIN32=
+SET USE_VXD=
+SET USE_BC5=
+SET WIN32_GUI=
+SET USE_SNAP=
+SET BC_LIBBASE=BC4
+PATH %SCITECH_BIN%;%BC4_PATH%\BIN;%DEFPATH%%BC_CD_PATH%
+
+REM: Create Borland compile/link configuration scripts
+echo -I%INCLUDE% > %BC4_PATH%\BIN\turboc.cfg
+echo -L%LIB% >> %BC4_PATH%\BIN\turboc.cfg
+echo -L%LIB% > %BC4_PATH%\BIN\tlink.cfg
+
+echo Borland C++ 4.5 16 bit DOS compilation configuration set up.
diff --git a/board/MAI/bios_emulator/scitech/bin/bc45-d32.bat b/board/MAI/bios_emulator/scitech/bin/bc45-d32.bat
new file mode 100644
index 00000000000..cbb2c795101
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/bin/bc45-d32.bat
@@ -0,0 +1,33 @@
+@echo off
+REM Setup for compiling with Borland C++ 4.5 in 32 bit mode.
+
+if .%CHECKED%==.1 goto checked_build
+SET LIB=%SCITECH_LIB%\LIB\RELEASE\DOS32\BC4;%BC4_PATH%\LIB;.
+echo Release build enabled.
+goto setvars
+
+:checked_build
+SET LIB=%SCITECH_LIB%\LIB\DEBUG\DOS32\BC4;%BC4_PATH%\LIB;.
+echo Checked debug build enabled.
+goto setvars
+
+:setvars
+SET INCLUDE=INCLUDE;%SCITECH%\INCLUDE;%PRIVATE%\INCLUDE;%BC4_PATH%\INCLUDE;
+SET MAKESTARTUP=%SCITECH%\MAKEDEFS\BC32.MK
+SET USE_DPMI16=
+SET USE_WIN16=
+SET USE_WIN32=
+SET USE_VXD=
+SET USE_TNT=
+SET USE_BC5=
+SET WIN32_GUI=
+SET USE_SNAP=
+SET BC_LIBBASE=BC4
+PATH %SCITECH_BIN%;%BC4_PATH%\BIN;%DEFPATH%%BC_CD_PATH%
+
+REM: Create Borland compile/link configuration scripts
+echo -I%INCLUDE% > %BC4_PATH%\BIN\bcc32.cfg
+echo -L%LIB% >> %BC4_PATH%\BIN\bcc32.cfg
+echo -L%LIB% > %BC4_PATH%\BIN\tlink32.cfg
+
+echo Borland C++ 4.5 32 bit DOS compilation configuration set up (DPMI32).
diff --git a/board/MAI/bios_emulator/scitech/bin/bc45-snp.bat b/board/MAI/bios_emulator/scitech/bin/bc45-snp.bat
new file mode 100644
index 00000000000..14d7c05b141
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/bin/bc45-snp.bat
@@ -0,0 +1,32 @@
+@echo off
+REM Setup for compiling with Borland C++ 4.5 in 32 bit Windows mode.
+
+if .%CHECKED%==.1 goto checked_build
+SET LIB=%SCITECH_LIB%\LIB\RELEASE\SNAP\BC4;%BC4_PATH%\LIB;.
+echo Release build enabled.
+goto setvars
+
+:checked_build
+SET LIB=%SCITECH_LIB%\LIB\DEBUG\SNAP\BC4;%BC4_PATH%\LIB;.
+echo Checked debug build enabled.
+goto setvars
+
+:setvars
+SET INCLUDE=INCLUDE;%SCITECH%\INCLUDE;%PRIVATE%\INCLUDE
+SET MAKESTARTUP=%SCITECH%\MAKEDEFS\BC32.MK
+SET USE_WIN16=
+SET USE_WIN32=
+SET USE_VXD=
+SET USE_TNT=
+SET USE_BC5=
+SET WIN32_GUI=
+SET USE_SNAP=1
+SET BC_LIBBASE=BC4
+PATH %SCITECH_BIN%;%BC4_PATH%\BIN;%DEFPATH%%BC_CD_PATH%
+
+REM: Create Borland compile/link configuration scripts
+echo -I%INCLUDE% > %BC4_PATH%\BIN\bcc32.cfg
+echo -L%LIB% >> %BC4_PATH%\BIN\bcc32.cfg
+echo -L%LIB% > %BC4_PATH%\BIN\tlink32.cfg
+
+echo Borland C++ 4.5 Snap compilation configuration set up.
diff --git a/board/MAI/bios_emulator/scitech/bin/bc45-tnt.bat b/board/MAI/bios_emulator/scitech/bin/bc45-tnt.bat
new file mode 100644
index 00000000000..50bd3cb5d83
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/bin/bc45-tnt.bat
@@ -0,0 +1,46 @@
+@echo off
+REM Setup for compiling with Borland C++ 4.5 in 32 bit mode with Phar Lap TNT
+
+if .%CHECKED%==.1 goto checked_build
+SET LIB=%SCITECH_LIB%\LIB\RELEASE\DOS32\BC4;%BC4_PATH%\LIB;%TNT_PATH%\LIB;.
+echo Release build enabled.
+goto setvars
+
+:checked_build
+SET LIB=%SCITECH_LIB%\LIB\DEBUG\DOS32\BC4;%BC4_PATH%\LIB;%TNT_PATH%\LIB;.
+echo Checked debug build enabled.
+goto setvars
+
+:setvars
+SET INCLUDE=INCLUDE;%SCITECH%\INCLUDE;%PRIVATE%\INCLUDE;%BC4_PATH%\INCLUDE;%TNT_PATH%\INCLUDE;
+SET MAKESTARTUP=%SCITECH%\MAKEDEFS\BC32.MK
+SET USE_DPMI16=
+SET USE_WIN16=
+SET USE_WIN32=
+SET USE_VXD=
+SET USE_TNT=1
+SET USE_BC5=
+SET WIN32_GUI=
+SET USE_SNAP=
+SET BC_LIBBASE=BC4
+PATH %SCITECH_BIN%;%BC4_PATH%\BIN;%TNT_PATH%\BIN;%DEFPATH%%BC_CD_PATH%
+
+REM If you set the following to a 1, a TNT DosStyle app will be created.
+REM Otherwise a TNT NtStyle app will be created. NtStyle apps will *only*
+REM run under real DOS when using our libraries, since we require access
+REM to functions that the Win32 API does not support (such as direct access
+REM to video memory, calling Int 10h BIOS functions etc). DosStyle apps
+REM will however run fine in both DOS and a Win95 DOS box (NT DOS boxes don't
+REM work too well).
+REM
+REM If you are using the RealTime DOS extender, your apps *must* be NtStyle,
+REM and hence will never be able to run under Win95 or WinNT, only DOS.
+
+SET DOSSTYLE=
+
+REM: Create Borland compile/link configuration scripts
+echo -I%INCLUDE% > %BC4_PATH%\BIN\bcc32.cfg
+echo -L%LIB% >> %BC4_PATH%\BIN\bcc32.cfg
+echo -L%LIB% > %BC4_PATH%\BIN\tlink32.cfg
+
+echo Borland C++ 4.5 32 bit DOS compilation configuration set up (TNT).
diff --git a/board/MAI/bios_emulator/scitech/bin/bc45-vxd.bat b/board/MAI/bios_emulator/scitech/bin/bc45-vxd.bat
new file mode 100644
index 00000000000..4b59fa422e0
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/bin/bc45-vxd.bat
@@ -0,0 +1,32 @@
+@echo off
+REM Setup for compiling with Borland C++ 4.5 in 32 bit Windows VxD mode.
+
+if .%CHECKED%==.1 goto checked_build
+SET LIB=%SCITECH_LIB%\LIB\RELEASE\VXD\BC4;%BC4_PATH%\LIB;.
+echo Release build enabled.
+goto setvars
+
+:checked_build
+SET LIB=%SCITECH_LIB%\LIB\DEBUG\VXD\BC4;%BC4_PATH%\LIB;.
+echo Checked debug build enabled.
+goto setvars
+
+:setvars
+SET INCLUDE=INCLUDE;%SCITECH%\INCLUDE;%PRIVATE%\INCLUDE;%BC4_PATH%\INCLUDE;
+SET MAKESTARTUP=%SCITECH%\MAKEDEFS\BC32.MK
+SET USE_WIN16=
+SET USE_WIN32=
+SET USE_VXD=1
+SET USE_TNT=
+SET USE_BC5=
+SET WIN32_GUI=
+SET USE_SNAP=
+SET BC_LIBBASE=BC4
+PATH %SCITECH_BIN%;%BC4_PATH%\BIN;%DEFPATH%%BC_CD_PATH%
+
+REM: Create Borland compile/link configuration scripts
+echo -I%INCLUDE% > %BC4_PATH%\BIN\bcc32.cfg
+echo -L%LIB% >> %BC4_PATH%\BIN\bcc32.cfg
+echo -L%LIB% > %BC4_PATH%\BIN\tlink32.cfg
+
+echo Borland C++ 4.5 32-bit VxD compilation configuration set up.
diff --git a/board/MAI/bios_emulator/scitech/bin/bc45-w16.bat b/board/MAI/bios_emulator/scitech/bin/bc45-w16.bat
new file mode 100644
index 00000000000..4d799b47b63
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/bin/bc45-w16.bat
@@ -0,0 +1,32 @@
+@echo off
+REM Setup for compiling with Borland C++ 4.5 in 16 bit Windows mode.
+
+if .%CHECKED%==.1 goto checked_build
+SET LIB=%SCITECH_LIB%\LIB\RELEASE\WIN16\BC4;%BC4_PATH%\LIB;.
+echo Release build enabled.
+goto setvars
+
+:checked_build
+SET LIB=%SCITECH_LIB%\LIB\DEBUG\WIN16\BC4;%BC4_PATH%\LIB;.
+echo Checked debug build enabled.
+goto setvars
+
+:setvars
+SET INCLUDE=INCLUDE;%SCITECH%\INCLUDE;%PRIVATE%\INCLUDE;%BC4_PATH%\INCLUDE;
+SET MAKESTARTUP=%SCITECH%\MAKEDEFS\BC16.MK
+SET USE_DPMI16=
+SET USE_WIN16=1
+SET USE_WIN32=
+SET USE_VXD=
+SET USE_BC5=
+SET WIN32_GUI=
+SET USE_SNAP=
+SET BC_LIBBASE=BC4
+PATH %SCITECH_BIN%;%BC4_PATH%\BIN;%DEFPATH%%BC_CD_PATH%
+
+REM: Create Borland compile/link configuration scripts
+echo -I%INCLUDE% > %BC4_PATH%\BIN\turboc.cfg
+echo -L%LIB% >> %BC4_PATH%\BIN\turboc.cfg
+echo -L%LIB% > %BC4_PATH%\BIN\tlink.cfg
+
+echo Borland C++ 4.5 16 bit Windows compilation configuration set up.
diff --git a/board/MAI/bios_emulator/scitech/bin/bc45-w32.bat b/board/MAI/bios_emulator/scitech/bin/bc45-w32.bat
new file mode 100644
index 00000000000..a6c199fe9ae
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/bin/bc45-w32.bat
@@ -0,0 +1,37 @@
+@echo off
+REM Setup for compiling with Borland C++ 4.5 in 32 bit Windows mode.
+
+if .%CHECKED%==.1 goto checked_build
+SET LIB=%SCITECH_LIB%\LIB\RELEASE\WIN32\BC4;%BC4_PATH%\LIB;.
+echo Release build enabled.
+goto setvars
+
+:checked_build
+SET LIB=%SCITECH_LIB%\LIB\DEBUG\WIN32\BC4;%BC4_PATH%\LIB;.
+echo Checked debug build enabled.
+goto setvars
+
+:setvars
+SET INCLUDE=INCLUDE;%SCITECH%\INCLUDE;%PRIVATE%\INCLUDE;%BC4_PATH%\INCLUDE;
+SET MAKESTARTUP=%SCITECH%\MAKEDEFS\BC32.MK
+SET USE_WIN16=
+SET USE_WIN32=1
+SET USE_VXD=
+SET USE_TNT=
+SET USE_BC5=
+SET WIN32_GUI=1
+SET USE_SNAP=
+SET BC_LIBBASE=BC4
+PATH %SCITECH_BIN%;%BC4_PATH%\BIN;%DEFPATH%%BC_CD_PATH%
+
+REM: Enable Win32 SDK if desired (sdk on command line)
+if NOT .%1%==.sdk goto createfiles
+call win32sdk.bat borland
+
+:createfiles
+REM: Create Borland compile/link configuration scripts
+echo -I%INCLUDE% > %BC4_PATH%\BIN\bcc32.cfg
+echo -L%LIB% >> %BC4_PATH%\BIN\bcc32.cfg
+echo -L%LIB% > %BC4_PATH%\BIN\tlink32.cfg
+
+echo Borland C++ 4.5 32 bit Windows compilation configuration set up.
diff --git a/board/MAI/bios_emulator/scitech/bin/bc50-c32.bat b/board/MAI/bios_emulator/scitech/bin/bc50-c32.bat
new file mode 100644
index 00000000000..6a0fde2c9e5
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/bin/bc50-c32.bat
@@ -0,0 +1,40 @@
+@echo off
+REM Setup for compiling with Borland C++ 5.0 in 32 bit Windows mode.
+
+if .%CHECKED%==.1 goto checked_build
+SET LIB=%SCITECH_LIB%\LIB\RELEASE\WIN32\BC5;%BC5_PATH%\LIB;.
+echo Release build enabled.
+goto setvars
+
+:checked_build
+SET LIB=%SCITECH_LIB%\LIB\DEBUG\WIN32\BC5;%BC5_PATH%\LIB;.
+echo Checked debug build enabled.
+goto setvars
+
+:setvars
+SET C_INCLUDE=%BC5_PATH%\INCLUDE
+SET INCLUDE=INCLUDE;%SCITECH%\INCLUDE;%PRIVATE%\INCLUDE;%C_INCLUDE%
+SET MAKESTARTUP=%SCITECH%\MAKEDEFS\BC32.MK
+SET USE_WIN16=
+SET USE_WIN32=1
+SET USE_VXD=
+SET USE_TNT=
+SET USE_SMX32=
+SET USE_SMX16=
+SET USE_BC5=1
+SET WIN32_GUI=
+SET USE_SNAP=
+SET BC_LIBBASE=BC5
+PATH %SCITECH_BIN%;%BC5_PATH%\BIN;%DEFPATH%%BC5_CD_PATH%
+
+REM: Enable Win32 SDK if desired (sdk on command line)
+if NOT .%1%==.sdk goto createfiles
+call win32sdk.bat borland
+
+:createfiles
+REM: Create Borland compile/link configuration scripts
+echo -I%INCLUDE% > %BC5_PATH%\BIN\bcc32.cfg
+echo -L%LIB% >> %BC5_PATH%\BIN\bcc32.cfg
+echo -L%LIB% > %BC5_PATH%\BIN\tlink32.cfg
+
+echo Borland C++ 5.0 32 bit Windows compilation configuration set up.
diff --git a/board/MAI/bios_emulator/scitech/bin/bc50-d16.bat b/board/MAI/bios_emulator/scitech/bin/bc50-d16.bat
new file mode 100644
index 00000000000..23b50389de5
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/bin/bc50-d16.bat
@@ -0,0 +1,34 @@
+@echo off
+REM Setup for compiling with Borland C++ 5.0 in 16 bit mode.
+
+if .%CHECKED%==.1 goto checked_build
+SET LIB=%SCITECH_LIB%\LIB\RELEASE\DOS16\BC5;%BC5_PATH%\LIB;.
+echo Release build enabled.
+goto setvars
+
+:checked_build
+SET LIB=%SCITECH_LIB%\LIB\DEBUG\DOS16\BC5;%BC5_PATH%\LIB;.
+echo Checked debug build enabled.
+goto setvars
+
+:setvars
+SET INCLUDE=INCLUDE;%SCITECH%\INCLUDE;%PRIVATE%\INCLUDE;%BC5_PATH%\INCLUDE;
+SET MAKESTARTUP=%SCITECH%\MAKEDEFS\BC16.MK
+SET USE_DPMI16=
+SET USE_WIN16=
+SET USE_WIN32=
+SET USE_VXD=
+SET USE_SMX32=
+SET USE_SMX16=
+SET USE_BC5=1
+SET WIN32_GUI=
+SET USE_SNAP=
+SET BC_LIBBASE=BC5
+PATH %SCITECH_BIN%;%BC5_PATH%\BIN;%DEFPATH%%BC5_CD_PATH%
+
+REM: Create Borland compile/link configuration scripts
+echo -I%INCLUDE% > %BC5_PATH%\BIN\turboc.cfg
+echo -L%LIB% >> %BC5_PATH%\BIN\turboc.cfg
+echo -L%LIB% > %BC5_PATH%\BIN\tlink.cfg
+
+echo Borland C++ 5.0 16 bit DOS compilation configuration set up.
diff --git a/board/MAI/bios_emulator/scitech/bin/bc50-d32.bat b/board/MAI/bios_emulator/scitech/bin/bc50-d32.bat
new file mode 100644
index 00000000000..0521f93cec9
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/bin/bc50-d32.bat
@@ -0,0 +1,35 @@
+@echo off
+REM Setup for compiling with Borland C++ 5.0 in 32 bit mode.
+
+if .%CHECKED%==.1 goto checked_build
+SET LIB=%SCITECH_LIB%\LIB\RELEASE\DOS32\BC5;%BC5_PATH%\LIB;.
+echo Release build enabled.
+goto setvars
+
+:checked_build
+SET LIB=%SCITECH_LIB%\LIB\DEBUG\DOS32\BC5;%BC5_PATH%\LIB;.
+echo Checked debug build enabled.
+goto setvars
+
+:setvars
+SET INCLUDE=INCLUDE;%SCITECH%\INCLUDE;%PRIVATE%\INCLUDE;%BC5_PATH%\INCLUDE;
+SET MAKESTARTUP=%SCITECH%\MAKEDEFS\BC32.MK
+SET USE_DPMI16=
+SET USE_WIN16=
+SET USE_WIN32=
+SET USE_VXD=
+SET USE_TNT=
+SET USE_SMX32=
+SET USE_SMX16=
+SET USE_BC5=1
+SET WIN32_GUI=
+SET USE_SNAP=
+SET BC_LIBBASE=BC5
+PATH %SCITECH_BIN%;%BC5_PATH%\BIN;%DEFPATH%%BC5_CD_PATH%
+
+REM: Create Borland compile/link configuration scripts
+echo -I%INCLUDE% > %BC5_PATH%\BIN\bcc32.cfg
+echo -L%LIB% >> %BC5_PATH%\BIN\bcc32.cfg
+echo -L%LIB% > %BC5_PATH%\BIN\tlink32.cfg
+
+echo Borland C++ 5.0 32 bit DOS compilation configuration set up (DPMI32).
diff --git a/board/MAI/bios_emulator/scitech/bin/bc50-smx.bat b/board/MAI/bios_emulator/scitech/bin/bc50-smx.bat
new file mode 100644
index 00000000000..e3241ffae39
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/bin/bc50-smx.bat
@@ -0,0 +1,35 @@
+@echo off
+REM Setup for compiling with Borland C++ 5.0 in 32 bit mode.
+
+if .%CHECKED%==.1 goto checked_build
+SET LIB=%SCITECH_LIB%\LIB\RELEASE\SMX32\BC5;%BC5_PATH%\LIB;.
+echo Release build enabled.
+goto setvars
+
+:checked_build
+SET LIB=%SCITECH_LIB%\LIB\DEBUG\SMX32\BC5;%BC5_PATH%\LIB;.
+echo Checked debug build enabled.
+goto setvars
+
+:setvars
+SET INCLUDE=INCLUDE;%SCITECH%\INCLUDE;%PRIVATE%\INCLUDE;%BC5_PATH%\INCLUDE;
+SET MAKESTARTUP=%SCITECH%\MAKEDEFS\BC32.MK
+SET USE_DPMI16=
+SET USE_WIN16=
+SET USE_WIN32=
+SET USE_VXD=
+SET USE_TNT=
+SET USE_SMX32=1
+SET USE_SMX16=
+SET USE_BC5=1
+SET WIN32_GUI=
+SET USE_SNAP=
+SET BC_LIBBASE=BC5
+PATH %SCITECH_BIN%;%BC5_PATH%\BIN;%DEFPATH%%BC5_CD_PATH%
+
+REM: Create Borland compile/link configuration scripts
+echo -I%INCLUDE% > %BC5_PATH%\BIN\bcc32.cfg
+echo -L%LIB% >> %BC5_PATH%\BIN\bcc32.cfg
+echo -L%LIB% > %BC5_PATH%\BIN\tlink32.cfg
+
+echo Borland C++ 5.0 32 bit SMX compilation configuration set up (SMX32).
diff --git a/board/MAI/bios_emulator/scitech/bin/bc50-snp.bat b/board/MAI/bios_emulator/scitech/bin/bc50-snp.bat
new file mode 100644
index 00000000000..ab3acd23c4d
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/bin/bc50-snp.bat
@@ -0,0 +1,34 @@
+@echo off
+REM Setup for compiling with Borland C++ 5.0 in 32 bit Windows mode.
+
+if .%CHECKED%==.1 goto checked_build
+SET LIB=%SCITECH_LIB%\LIB\RELEASE\SNAP\BC5;%BC5_PATH%\LIB;.
+echo Release build enabled.
+goto setvars
+
+:checked_build
+SET LIB=%SCITECH_LIB%\LIB\DEBUG\SNAP\BC5;%BC5_PATH%\LIB;.
+echo Checked debug build enabled.
+goto setvars
+
+:setvars
+SET INCLUDE=INCLUDE;%SCITECH%\INCLUDE;%PRIVATE%\INCLUDE
+SET MAKESTARTUP=%SCITECH%\MAKEDEFS\BC32.MK
+SET USE_WIN16=
+SET USE_WIN32=
+SET USE_VXD=
+SET USE_TNT=
+SET USE_SMX32=
+SET USE_SMX16=
+SET USE_BC5=1
+SET WIN32_GUI=
+SET USE_SNAP=1
+SET BC_LIBBASE=BC5
+PATH %SCITECH_BIN%;%BC5_PATH%\BIN;%DEFPATH%%BC5_CD_PATH%
+
+REM: Create Borland compile/link configuration scripts
+echo -I%INCLUDE% > %BC5_PATH%\BIN\bcc32.cfg
+echo -L%LIB% >> %BC5_PATH%\BIN\bcc32.cfg
+echo -L%LIB% > %BC5_PATH%\BIN\tlink32.cfg
+
+echo Borland C++ 5.0 Snap compilation configuration set up.
diff --git a/board/MAI/bios_emulator/scitech/bin/bc50-tnt.bat b/board/MAI/bios_emulator/scitech/bin/bc50-tnt.bat
new file mode 100644
index 00000000000..4dcc3723be8
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/bin/bc50-tnt.bat
@@ -0,0 +1,48 @@
+@echo off
+REM Setup for compiling with Borland C++ 5.0 in 32 bit mode with Phar Lap TNT
+
+if .%CHECKED%==.1 goto checked_build
+SET LIB=%SCITECH_LIB%\LIB\RELEASE\DOS32\BC5;%BC5_PATH%\LIB;%TNT_PATH%\LIB;.
+echo Release build enabled.
+goto setvars
+
+:checked_build
+SET LIB=%SCITECH_LIB%\LIB\DEBUG\DOS32\BC5;%BC5_PATH%\LIB;%TNT_PATH%\LIB;.
+echo Checked debug build enabled.
+goto setvars
+
+:setvars
+SET INCLUDE=INCLUDE;%SCITECH%\INCLUDE;%PRIVATE%\INCLUDE;%BC5_PATH%\INCLUDE;%TNT_PATH%\INCLUDE;
+SET MAKESTARTUP=%SCITECH%\MAKEDEFS\BC32.MK
+SET USE_DPMI16=
+SET USE_WIN16=
+SET USE_WIN32=
+SET USE_VXD=
+SET USE_TNT=1
+SET USE_SMX32=
+SET USE_SMX16=
+SET USE_BC5=1
+SET WIN32_GUI=
+SET USE_SNAP=
+SET BC_LIBBASE=BC5
+PATH %SCITECH_BIN%;%BC5_PATH%\BIN;%TNT_PATH%\BIN;%DEFPATH%%BC_CD_PATH%
+
+REM If you set the following to a 1, a TNT DosStyle app will be created.
+REM Otherwise a TNT NtStyle app will be created. NtStyle apps will *only*
+REM run under real DOS when using our libraries, since we require access
+REM to functions that the Win32 API does not support (such as direct access
+REM to video memory, calling Int 10h BIOS functions etc). DosStyle apps
+REM will however run fine in both DOS and a Win95 DOS box (NT DOS boxes don't
+REM work too well).
+REM
+REM If you are using the RealTime DOS extender, your apps *must* be NtStyle,
+REM and hence will never be able to run under Win95 or WinNT, only DOS.
+
+SET DOSSTYLE=
+
+REM: Create Borland compile/link configuration scripts
+echo -I%INCLUDE% > %BC5_PATH%\BIN\bcc32.cfg
+echo -L%LIB% >> %BC5_PATH%\BIN\bcc32.cfg
+echo -L%LIB% > %BC5_PATH%\BIN\tlink32.cfg
+
+echo Borland C++ 5.0 32 bit DOS compilation configuration set up (TNT).
diff --git a/board/MAI/bios_emulator/scitech/bin/bc50-vxd.bat b/board/MAI/bios_emulator/scitech/bin/bc50-vxd.bat
new file mode 100644
index 00000000000..2356911aba9
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/bin/bc50-vxd.bat
@@ -0,0 +1,34 @@
+@echo off
+REM Setup for compiling with Borland C++ 5.0 in 32 bit Windows mode.
+
+if .%CHECKED%==.1 goto checked_build
+SET LIB=%SCITECH_LIB%\LIB\RELEASE\VXD\BC5;%BC5_PATH%\LIB;.
+echo Release build enabled.
+goto setvars
+
+:checked_build
+SET LIB=%SCITECH_LIB%\LIB\DEBUG\VXD\BC5;%BC5_PATH%\LIB;.
+echo Checked debug build enabled.
+goto setvars
+
+:setvars
+SET INCLUDE=INCLUDE;%SCITECH%\INCLUDE;%PRIVATE%\INCLUDE;%BC5_PATH%\INCLUDE;
+SET MAKESTARTUP=%SCITECH%\MAKEDEFS\BC32.MK
+SET USE_WIN16=
+SET USE_WIN32=
+SET USE_VXD=1
+SET USE_TNT=
+SET USE_SMX32=
+SET USE_SMX16=
+SET USE_BC5=1
+SET WIN32_GUI=
+SET USE_SNAP=
+SET BC_LIBBASE=BC5
+PATH %SCITECH_BIN%;%BC5_PATH%\BIN;%DEFPATH%%BC5_CD_PATH%
+
+REM: Create Borland compile/link configuration scripts
+echo -I%INCLUDE% > %BC5_PATH%\BIN\bcc32.cfg
+echo -L%LIB% >> %BC5_PATH%\BIN\bcc32.cfg
+echo -L%LIB% > %BC5_PATH%\BIN\tlink32.cfg
+
+echo Borland C++ 5.0 32 bit Windows (VxD) compilation configuration set up.
diff --git a/board/MAI/bios_emulator/scitech/bin/bc50-w16.bat b/board/MAI/bios_emulator/scitech/bin/bc50-w16.bat
new file mode 100644
index 00000000000..cd79d86b8f2
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/bin/bc50-w16.bat
@@ -0,0 +1,34 @@
+ @echo off
+REM Setup for compiling with Borland C++ 5.0 in 16 bit Windows mode.
+
+if .%CHECKED%==.1 goto checked_build
+SET LIB=%SCITECH_LIB%\LIB\RELEASE\WIN16\BC5;%BC5_PATH%\LIB;.
+echo Release build enabled.
+goto setvars
+
+:checked_build
+SET LIB=%SCITECH_LIB%\LIB\DEBUG\WIN16\BC5;%BC5_PATH%\LIB;.
+echo Checked debug build enabled.
+goto setvars
+
+:setvars
+SET INCLUDE=INCLUDE;%SCITECH%\INCLUDE;%PRIVATE%\INCLUDE;%BC5_PATH%\INCLUDE;
+SET MAKESTARTUP=%SCITECH%\MAKEDEFS\BC16.MK
+SET USE_DPMI16=
+SET USE_WIN16=1
+SET USE_WIN32=
+SET USE_VXD=
+SET USE_BC5=1
+SET USE_SMX32=
+SET USE_SMX16=
+SET WIN32_GUI=
+SET USE_SNAP=
+SET BC_LIBBASE=BC5
+PATH %SCITECH_BIN%;%BC5_PATH%\BIN;%DEFPATH%%BC5_CD_PATH%
+
+REM: Create Borland compile/link configuration scripts
+echo -I%INCLUDE% > %BC5_PATH%\BIN\turboc.cfg
+echo -L%LIB% >> %BC5_PATH%\BIN\turboc.cfg
+echo -L%LIB% > %BC5_PATH%\BIN\tlink.cfg
+
+echo Borland C++ 5.0 16 bit Windows compilation configuration set up.
diff --git a/board/MAI/bios_emulator/scitech/bin/bc50-w32.bat b/board/MAI/bios_emulator/scitech/bin/bc50-w32.bat
new file mode 100644
index 00000000000..8b8cec94363
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/bin/bc50-w32.bat
@@ -0,0 +1,40 @@
+@echo off
+REM Setup for compiling with Borland C++ 5.0 in 32 bit Windows mode.
+
+if .%CHECKED%==.1 goto checked_build
+SET LIB=%SCITECH_LIB%\LIB\RELEASE\WIN32\BC5;%BC5_PATH%\LIB;.
+echo Release build enabled.
+goto setvars
+
+:checked_build
+SET LIB=%SCITECH_LIB%\LIB\DEBUG\WIN32\BC5;%BC5_PATH%\LIB;.
+echo Checked debug build enabled.
+goto setvars
+
+:setvars
+SET C_INCLUDE=%BC5_PATH%\INCLUDE
+SET INCLUDE=INCLUDE;%SCITECH%\INCLUDE;%PRIVATE%\INCLUDE;%C_INCLUDE%
+SET MAKESTARTUP=%SCITECH%\MAKEDEFS\BC32.MK
+SET USE_WIN16=
+SET USE_WIN32=1
+SET USE_VXD=
+SET USE_TNT=
+SET USE_SMX32=
+SET USE_SMX16=
+SET USE_BC5=1
+SET WIN32_GUI=1
+SET USE_SNAP=
+SET BC_LIBBASE=BC5
+PATH %SCITECH_BIN%;%BC5_PATH%\BIN;%DEFPATH%%BC5_CD_PATH%
+
+REM: Enable Win32 SDK if desired (sdk on command line)
+if NOT .%1%==.sdk goto createfiles
+call win32sdk.bat borland
+
+:createfiles
+REM: Create Borland compile/link configuration scripts
+echo -I%INCLUDE% > %BC5_PATH%\BIN\bcc32.cfg
+echo -L%LIB% >> %BC5_PATH%\BIN\bcc32.cfg
+echo -L%LIB% > %BC5_PATH%\BIN\tlink32.cfg
+
+echo Borland C++ 5.0 32 bit Windows compilation configuration set up.
diff --git a/board/MAI/bios_emulator/scitech/bin/bc50-x11.bat b/board/MAI/bios_emulator/scitech/bin/bc50-x11.bat
new file mode 100644
index 00000000000..ebfeb2eb640
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/bin/bc50-x11.bat
@@ -0,0 +1,34 @@
+@echo off
+REM Setup for compiling with Borland C++ 5.0 in 32 bit Windows mode.
+
+if .%CHECKED%==.1 goto checked_build
+SET LIB=%SCITECH_LIB%\LIB\RELEASE\WIN32\BC5;%BC5_PATH%\LIB;.
+echo Release build enabled.
+goto setvars
+
+:checked_build
+SET LIB=%SCITECH_LIB%\LIB\DEBUG\WIN32\BC5;%BC5_PATH%\LIB;.
+echo Checked debug build enabled.
+goto setvars
+
+:setvars
+SET INCLUDE=INCLUDE;%SCITECH%\INCLUDE;%PRIVATE%\INCLUDE;%BC5_PATH%\INCLUDE;
+SET MAKESTARTUP=%SCITECH%\MAKEDEFS\BC32.MK
+SET USE_WIN16=
+SET USE_WIN32=1
+SET USE_VXD=
+SET USE_TNT=
+SET USE_SMX32=
+SET USE_SMX16=
+SET USE_BC5=1
+SET WIN32_GUI=1
+SET USE_SNAP=
+SET BC_LIBBASE=BC5
+PATH %SCITECH_BIN%;%BC5_PATH%\BIN;%DEFPATH%%BC5_CD_PATH%
+
+REM: Create Borland compile/link configuration scripts
+echo -I%INCLUDE% > %BC5_PATH%\BIN\bcc32.cfg
+echo -L%LIB% >> %BC5_PATH%\BIN\bcc32.cfg
+echo -L%LIB% > %BC5_PATH%\BIN\tlink32.cfg
+
+echo Borland C++ 5.0 32 bit Windows compilation configuration set up.
diff --git a/board/MAI/bios_emulator/scitech/bin/bcb5-c32.bat b/board/MAI/bios_emulator/scitech/bin/bcb5-c32.bat
new file mode 100644
index 00000000000..6e094288167
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/bin/bcb5-c32.bat
@@ -0,0 +1,40 @@
+@echo off
+REM Setup for compiling with Borland C++ Builder 5.0 in 32 bit Windows mode.
+
+if .%CHECKED%==.1 goto checked_build
+SET LIB=%SCITECH_LIB%\LIB\RELEASE\WIN32\BCB5;%BCB5_PATH%\LIB;.
+echo Release build enabled.
+goto setvars
+
+:checked_build
+SET LIB=%SCITECH_LIB%\LIB\DEBUG\WIN32\BCB5;%BCB5_PATH%\LIB;.
+echo Checked debug build enabled.
+goto setvars
+
+:setvars
+SET C_INCLUDE=%BCB5_PATH%\INCLUDE
+SET INCLUDE=INCLUDE;%SCITECH%\INCLUDE;%PRIVATE%\INCLUDE;%C_INCLUDE%
+SET MAKESTARTUP=%SCITECH%\MAKEDEFS\BC32.MK
+SET USE_WIN16=
+SET USE_WIN32=1
+SET USE_VXD=
+SET USE_TNT=
+SET USE_SMX32=
+SET USE_SMX16=
+SET USE_BC5=1
+SET WIN32_GUI=
+SET USE_SNAP=
+SET BC_LIBBASE=BC5
+PATH %SCITECH_BIN%;%BCB5_PATH%\BIN;%DEFPATH%%BC5_CD_PATH%
+
+REM: Enable Win32 SDK if desired (sdk on command line)
+if NOT .%1%==.sdk goto createfiles
+call win32sdk.bat borland
+
+:createfiles
+REM: Create Borland compile/link configuration scripts
+echo -I%INCLUDE% > %BCB5_PATH%\BIN\bcc32.cfg
+echo -L%LIB% >> %BCB5_PATH%\BIN\bcc32.cfg
+echo -L%LIB% > %BCB5_PATH%\BIN\tlink32.cfg
+
+echo Borland C++ Builder 5.0 32 bit Windows compilation configuration set up.
diff --git a/board/MAI/bios_emulator/scitech/bin/bcb5-d16.bat b/board/MAI/bios_emulator/scitech/bin/bcb5-d16.bat
new file mode 100644
index 00000000000..aa13e7dd20c
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/bin/bcb5-d16.bat
@@ -0,0 +1,34 @@
+@echo off
+REM Setup for compiling with Borland C++ Builder 5.0 in 16 bit mode.
+
+if .%CHECKED%==.1 goto checked_build
+SET LIB=%SCITECH_LIB%\LIB\RELEASE\DOS16\BCB5;%BCB5_PATH%\LIB;.
+echo Release build enabled.
+goto setvars
+
+:checked_build
+SET LIB=%SCITECH_LIB%\LIB\DEBUG\DOS16\BCB5;%BCB5_PATH%\LIB;.
+echo Checked debug build enabled.
+goto setvars
+
+:setvars
+SET INCLUDE=INCLUDE;%SCITECH%\INCLUDE;%PRIVATE%\INCLUDE;%BCB5_PATH%\INCLUDE;
+SET MAKESTARTUP=%SCITECH%\MAKEDEFS\BC16.MK
+SET USE_DPMI16=
+SET USE_WIN16=
+SET USE_WIN32=
+SET USE_VXD=
+SET USE_SMX32=
+SET USE_SMX16=
+SET USE_BC5=1
+SET WIN32_GUI=
+SET USE_SNAP=
+SET BC_LIBBASE=BC5
+PATH %SCITECH_BIN%;%BCB5_PATH%\BIN;%DEFPATH%%BC5_CD_PATH%
+
+REM: Create Borland compile/link configuration scripts
+echo -I%INCLUDE% > %BCB5_PATH%\BIN\turboc.cfg
+echo -L%LIB% >> %BCB5_PATH%\BIN\turboc.cfg
+echo -L%LIB% > %BCB5_PATH%\BIN\tlink.cfg
+
+echo Borland C++ Builder 5.0 16 bit DOS compilation configuration set up.
diff --git a/board/MAI/bios_emulator/scitech/bin/bcb5-d32.bat b/board/MAI/bios_emulator/scitech/bin/bcb5-d32.bat
new file mode 100644
index 00000000000..d0017d4ccbb
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/bin/bcb5-d32.bat
@@ -0,0 +1,35 @@
+@echo off
+REM Setup for compiling with Borland C++ Builder 5.0 in 32 bit mode.
+
+if .%CHECKED%==.1 goto checked_build
+SET LIB=%SCITECH_LIB%\LIB\RELEASE\DOS32\BCB5;%BCB5_PATH%\LIB;.
+echo Release build enabled.
+goto setvars
+
+:checked_build
+SET LIB=%SCITECH_LIB%\LIB\DEBUG\DOS32\BCB5;%BCB5_PATH%\LIB;.
+echo Checked debug build enabled.
+goto setvars
+
+:setvars
+SET INCLUDE=INCLUDE;%SCITECH%\INCLUDE;%PRIVATE%\INCLUDE;%BCB5_PATH%\INCLUDE;
+SET MAKESTARTUP=%SCITECH%\MAKEDEFS\BC32.MK
+SET USE_DPMI16=
+SET USE_WIN16=
+SET USE_WIN32=
+SET USE_VXD=
+SET USE_TNT=
+SET USE_SMX32=
+SET USE_SMX16=
+SET USE_BC5=1
+SET WIN32_GUI=
+SET USE_SNAP=
+SET BC_LIBBASE=BC5
+PATH %SCITECH_BIN%;%BCB5_PATH%\BIN;%DEFPATH%%BC5_CD_PATH%
+
+REM: Create Borland compile/link configuration scripts
+echo -I%INCLUDE% > %BCB5_PATH%\BIN\bcc32.cfg
+echo -L%LIB% >> %BCB5_PATH%\BIN\bcc32.cfg
+echo -L%LIB% > %BCB5_PATH%\BIN\tlink32.cfg
+
+echo Borland C++ Builder 5.0 32 bit DOS compilation configuration set up (DPMI32).
diff --git a/board/MAI/bios_emulator/scitech/bin/bcb5-smx.bat b/board/MAI/bios_emulator/scitech/bin/bcb5-smx.bat
new file mode 100644
index 00000000000..2b969a93bad
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/bin/bcb5-smx.bat
@@ -0,0 +1,35 @@
+@echo off
+REM Setup for compiling with Borland C++ Builder 5.0 in 32 bit mode.
+
+if .%CHECKED%==.1 goto checked_build
+SET LIB=%SCITECH_LIB%\LIB\RELEASE\SMX32\BCB5;%BCB5_PATH%\LIB;.
+echo Release build enabled.
+goto setvars
+
+:checked_build
+SET LIB=%SCITECH_LIB%\LIB\DEBUG\SMX32\BCB5;%BCB5_PATH%\LIB;.
+echo Checked debug build enabled.
+goto setvars
+
+:setvars
+SET INCLUDE=INCLUDE;%SCITECH%\INCLUDE;%PRIVATE%\INCLUDE;%BCB5_PATH%\INCLUDE;
+SET MAKESTARTUP=%SCITECH%\MAKEDEFS\BC32.MK
+SET USE_DPMI16=
+SET USE_WIN16=
+SET USE_WIN32=
+SET USE_VXD=
+SET USE_TNT=
+SET USE_SMX32=1
+SET USE_SMX16=
+SET USE_BC5=1
+SET WIN32_GUI=
+SET USE_SNAP=
+SET BC_LIBBASE=BC5
+PATH %SCITECH_BIN%;%BCB5_PATH%\BIN;%DEFPATH%%BC5_CD_PATH%
+
+REM: Create Borland compile/link configuration scripts
+echo -I%INCLUDE% > %BCB5_PATH%\BIN\bcc32.cfg
+echo -L%LIB% >> %BCB5_PATH%\BIN\bcc32.cfg
+echo -L%LIB% > %BCB5_PATH%\BIN\tlink32.cfg
+
+echo Borland C++ Builder 5.0 32 bit SMX compilation configuration set up (SMX32).
diff --git a/board/MAI/bios_emulator/scitech/bin/bcb5-snp.bat b/board/MAI/bios_emulator/scitech/bin/bcb5-snp.bat
new file mode 100644
index 00000000000..d7b8ff20a86
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/bin/bcb5-snp.bat
@@ -0,0 +1,34 @@
+@echo off
+REM Setup for compiling with Borland C++ Builder 5.0 in 32 bit Windows mode.
+
+if .%CHECKED%==.1 goto checked_build
+SET LIB=%SCITECH_LIB%\LIB\RELEASE\SNAP\BCB5;%BCB5_PATH%\LIB;.
+echo Release build enabled.
+goto setvars
+
+:checked_build
+SET LIB=%SCITECH_LIB%\LIB\DEBUG\SNAP\BCB5;%BCB5_PATH%\LIB;.
+echo Checked debug build enabled.
+goto setvars
+
+:setvars
+SET INCLUDE=INCLUDE;%SCITECH%\INCLUDE;%PRIVATE%\INCLUDE
+SET MAKESTARTUP=%SCITECH%\MAKEDEFS\BC32.MK
+SET USE_WIN16=
+SET USE_WIN32=
+SET USE_VXD=
+SET USE_TNT=
+SET USE_SMX32=
+SET USE_SMX16=
+SET USE_BC5=1
+SET WIN32_GUI=
+SET USE_SNAP=1
+SET BC_LIBBASE=BC5
+PATH %SCITECH_BIN%;%BCB5_PATH%\BIN;%DEFPATH%%BC5_CD_PATH%
+
+REM: Create Borland compile/link configuration scripts
+echo -I%INCLUDE% > %BCB5_PATH%\BIN\bcc32.cfg
+echo -L%LIB% >> %BCB5_PATH%\BIN\bcc32.cfg
+echo -L%LIB% > %BCB5_PATH%\BIN\tlink32.cfg
+
+echo Borland C++ Builder 5.0 Snap compilation configuration set up.
diff --git a/board/MAI/bios_emulator/scitech/bin/bcb5-tnt.bat b/board/MAI/bios_emulator/scitech/bin/bcb5-tnt.bat
new file mode 100644
index 00000000000..1de3601a595
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/bin/bcb5-tnt.bat
@@ -0,0 +1,48 @@
+@echo off
+REM Setup for compiling with Borland C++ Builder 5.0 in 32 bit mode with Phar Lap TNT
+
+if .%CHECKED%==.1 goto checked_build
+SET LIB=%SCITECH_LIB%\LIB\RELEASE\DOS32\BCB5;%BCB5_PATH%\LIB;%TNT_PATH%\LIB;.
+echo Release build enabled.
+goto setvars
+
+:checked_build
+SET LIB=%SCITECH_LIB%\LIB\DEBUG\DOS32\BCB5;%BCB5_PATH%\LIB;%TNT_PATH%\LIB;.
+echo Checked debug build enabled.
+goto setvars
+
+:setvars
+SET INCLUDE=INCLUDE;%SCITECH%\INCLUDE;%PRIVATE%\INCLUDE;%BCB5_PATH%\INCLUDE;%TNT_PATH%\INCLUDE;
+SET MAKESTARTUP=%SCITECH%\MAKEDEFS\BC32.MK
+SET USE_DPMI16=
+SET USE_WIN16=
+SET USE_WIN32=
+SET USE_VXD=
+SET USE_TNT=1
+SET USE_SMX32=
+SET USE_SMX16=
+SET USE_BC5=1
+SET WIN32_GUI=
+SET USE_SNAP=
+SET BC_LIBBASE=BC5
+PATH %SCITECH_BIN%;%BCB5_PATH%\BIN;%TNT_PATH%\BIN;%DEFPATH%%BC_CD_PATH%
+
+REM If you set the following to a 1, a TNT DosStyle app will be created.
+REM Otherwise a TNT NtStyle app will be created. NtStyle apps will *only*
+REM run under real DOS when using our libraries, since we require access
+REM to functions that the Win32 API does not support (such as direct access
+REM to video memory, calling Int 10h BIOS functions etc). DosStyle apps
+REM will however run fine in both DOS and a Win95 DOS box (NT DOS boxes don't
+REM work too well).
+REM
+REM If you are using the RealTime DOS extender, your apps *must* be NtStyle,
+REM and hence will never be able to run under Win95 or WinNT, only DOS.
+
+SET DOSSTYLE=
+
+REM: Create Borland compile/link configuration scripts
+echo -I%INCLUDE% > %BCB5_PATH%\BIN\bcc32.cfg
+echo -L%LIB% >> %BCB5_PATH%\BIN\bcc32.cfg
+echo -L%LIB% > %BCB5_PATH%\BIN\tlink32.cfg
+
+echo Borland C++ Builder 5.0 32 bit DOS compilation configuration set up (TNT).
diff --git a/board/MAI/bios_emulator/scitech/bin/bcb5-vxd.bat b/board/MAI/bios_emulator/scitech/bin/bcb5-vxd.bat
new file mode 100644
index 00000000000..28de58c3f07
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/bin/bcb5-vxd.bat
@@ -0,0 +1,34 @@
+@echo off
+REM Setup for compiling with Borland C++ Builder 5.0 in 32 bit Windows mode.
+
+if .%CHECKED%==.1 goto checked_build
+SET LIB=%SCITECH_LIB%\LIB\RELEASE\VXD\BCB5;%BCB5_PATH%\LIB;.
+echo Release build enabled.
+goto setvars
+
+:checked_build
+SET LIB=%SCITECH_LIB%\LIB\DEBUG\VXD\BCB5;%BCB5_PATH%\LIB;.
+echo Checked debug build enabled.
+goto setvars
+
+:setvars
+SET INCLUDE=INCLUDE;%SCITECH%\INCLUDE;%PRIVATE%\INCLUDE;%BCB5_PATH%\INCLUDE;
+SET MAKESTARTUP=%SCITECH%\MAKEDEFS\BC32.MK
+SET USE_WIN16=
+SET USE_WIN32=
+SET USE_VXD=1
+SET USE_TNT=
+SET USE_SMX32=
+SET USE_SMX16=
+SET USE_BC5=1
+SET WIN32_GUI=
+SET USE_SNAP=
+SET BC_LIBBASE=BC5
+PATH %SCITECH_BIN%;%BCB5_PATH%\BIN;%DEFPATH%%BC5_CD_PATH%
+
+REM: Create Borland compile/link configuration scripts
+echo -I%INCLUDE% > %BCB5_PATH%\BIN\bcc32.cfg
+echo -L%LIB% >> %BCB5_PATH%\BIN\bcc32.cfg
+echo -L%LIB% > %BCB5_PATH%\BIN\tlink32.cfg
+
+echo Borland C++ Builder 5.0 32 bit Windows (VxD) compilation configuration set up.
diff --git a/board/MAI/bios_emulator/scitech/bin/bcb5-w16.bat b/board/MAI/bios_emulator/scitech/bin/bcb5-w16.bat
new file mode 100644
index 00000000000..c30d0040810
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/bin/bcb5-w16.bat
@@ -0,0 +1,34 @@
+ @echo off
+REM Setup for compiling with Borland C++ Builder 5.0 in 16 bit Windows mode.
+
+if .%CHECKED%==.1 goto checked_build
+SET LIB=%SCITECH_LIB%\LIB\RELEASE\WIN16\BCB5;%BCB5_PATH%\LIB;.
+echo Release build enabled.
+goto setvars
+
+:checked_build
+SET LIB=%SCITECH_LIB%\LIB\DEBUG\WIN16\BCB5;%BCB5_PATH%\LIB;.
+echo Checked debug build enabled.
+goto setvars
+
+:setvars
+SET INCLUDE=INCLUDE;%SCITECH%\INCLUDE;%PRIVATE%\INCLUDE;%BCB5_PATH%\INCLUDE;
+SET MAKESTARTUP=%SCITECH%\MAKEDEFS\BC16.MK
+SET USE_DPMI16=
+SET USE_WIN16=1
+SET USE_WIN32=
+SET USE_VXD=
+SET USE_BC5=1
+SET USE_SMX32=
+SET USE_SMX16=
+SET WIN32_GUI=
+SET USE_SNAP=
+SET BC_LIBBASE=BC5
+PATH %SCITECH_BIN%;%BCB5_PATH%\BIN;%DEFPATH%%BC5_CD_PATH%
+
+REM: Create Borland compile/link configuration scripts
+echo -I%INCLUDE% > %BCB5_PATH%\BIN\turboc.cfg
+echo -L%LIB% >> %BCB5_PATH%\BIN\turboc.cfg
+echo -L%LIB% > %BCB5_PATH%\BIN\tlink.cfg
+
+echo Borland C++ Builder 5.0 16 bit Windows compilation configuration set up.
diff --git a/board/MAI/bios_emulator/scitech/bin/bcb5-w32.bat b/board/MAI/bios_emulator/scitech/bin/bcb5-w32.bat
new file mode 100644
index 00000000000..18760e1128d
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/bin/bcb5-w32.bat
@@ -0,0 +1,40 @@
+@echo off
+REM Setup for compiling with Borland C++ Builder 5.0 in 32 bit Windows mode.
+
+if .%CHECKED%==.1 goto checked_build
+SET LIB=%SCITECH_LIB%\LIB\RELEASE\WIN32\BCB5;%BCB5_PATH%\LIB;.
+echo Release build enabled.
+goto setvars
+
+:checked_build
+SET LIB=%SCITECH_LIB%\LIB\DEBUG\WIN32\BCB5;%BCB5_PATH%\LIB;.
+echo Checked debug build enabled.
+goto setvars
+
+:setvars
+SET C_INCLUDE=%BCB5_PATH%\INCLUDE
+SET INCLUDE=INCLUDE;%SCITECH%\INCLUDE;%PRIVATE%\INCLUDE;%C_INCLUDE%
+SET MAKESTARTUP=%SCITECH%\MAKEDEFS\BC32.MK
+SET USE_WIN16=
+SET USE_WIN32=1
+SET USE_VXD=
+SET USE_TNT=
+SET USE_SMX32=
+SET USE_SMX16=
+SET USE_BC5=1
+SET WIN32_GUI=1
+SET USE_SNAP=
+SET BC_LIBBASE=BC5
+PATH %SCITECH_BIN%;%BCB5_PATH%\BIN;%DEFPATH%%BC5_CD_PATH%
+
+REM: Enable Win32 SDK if desired (sdk on command line)
+if NOT .%1%==.sdk goto createfiles
+call win32sdk.bat borland
+
+:createfiles
+REM: Create Borland compile/link configuration scripts
+echo -I%INCLUDE% > %BCB5_PATH%\BIN\bcc32.cfg
+echo -L%LIB% >> %BCB5_PATH%\BIN\bcc32.cfg
+echo -L%LIB% > %BCB5_PATH%\BIN\tlink32.cfg
+
+echo Borland C++ Builder 5.0 32 bit Windows compilation configuration set up.
diff --git a/board/MAI/bios_emulator/scitech/bin/bcb5-x11.bat b/board/MAI/bios_emulator/scitech/bin/bcb5-x11.bat
new file mode 100644
index 00000000000..198c1a24256
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/bin/bcb5-x11.bat
@@ -0,0 +1,34 @@
+@echo off
+REM Setup for compiling with Borland C++ Builder 5.0 in 32 bit Windows mode.
+
+if .%CHECKED%==.1 goto checked_build
+SET LIB=%SCITECH_LIB%\LIB\RELEASE\WIN32\BCB5;%BCB5_PATH%\LIB;.
+echo Release build enabled.
+goto setvars
+
+:checked_build
+SET LIB=%SCITECH_LIB%\LIB\DEBUG\WIN32\BCB5;%BCB5_PATH%\LIB;.
+echo Checked debug build enabled.
+goto setvars
+
+:setvars
+SET INCLUDE=INCLUDE;%SCITECH%\INCLUDE;%PRIVATE%\INCLUDE;%BCB5_PATH%\INCLUDE;
+SET MAKESTARTUP=%SCITECH%\MAKEDEFS\BC32.MK
+SET USE_WIN16=
+SET USE_WIN32=1
+SET USE_VXD=
+SET USE_TNT=
+SET USE_SMX32=
+SET USE_SMX16=
+SET USE_BC5=1
+SET WIN32_GUI=1
+SET USE_SNAP=
+SET BC_LIBBASE=BC5
+PATH %SCITECH_BIN%;%BCB5_PATH%\BIN;%DEFPATH%%BC5_CD_PATH%
+
+REM: Create Borland compile/link configuration scripts
+echo -I%INCLUDE% > %BCB5_PATH%\BIN\bcc32.cfg
+echo -L%LIB% >> %BCB5_PATH%\BIN\bcc32.cfg
+echo -L%LIB% > %BCB5_PATH%\BIN\tlink32.cfg
+
+echo Borland C++ Builder 5.0 32 bit Windows compilation configuration set up.
diff --git a/board/MAI/bios_emulator/scitech/bin/build b/board/MAI/bios_emulator/scitech/bin/build
new file mode 100644
index 00000000000..ff1973dc815
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/bin/build
@@ -0,0 +1,22 @@
+#! /bin/sh
+
+if [ $# -lt 1 ] || ( [ "$1" != gcc-linux ] && [ "$1" != qnx4 ] ) ; then
+ echo Usage: $0 compiler_name [DMAKE commands]
+ echo
+ echo Current compilers:
+ echo " gcc-linux - GNU C/C++ 2.7 or higher, 32 bit"
+ echo " qnx4 - Watcom C/C++ 10.6 or higher, 32 bit"
+ exit 1
+fi
+
+unset DBG OPT OPT_SIZE BUILD_DLL IMPORT_DLL FPU CHECKS BETA
+. ${1}.sh
+
+shift
+dmake $* && exit 0
+
+echo *************************************************
+echo * An error occurred while building the library. *
+echo *************************************************
+exit 1
+
diff --git a/board/MAI/bios_emulator/scitech/bin/build.bat b/board/MAI/bios_emulator/scitech/bin/build.bat
new file mode 100644
index 00000000000..ee29093631e
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/bin/build.bat
@@ -0,0 +1,4 @@
+@echo off
+rem Disable checked build and build release code
+set CHECKED=
+call build_it.bat %1 %2 %3 %4 %5 %6 %7 %8 %9
diff --git a/board/MAI/bios_emulator/scitech/bin/build_db.bat b/board/MAI/bios_emulator/scitech/bin/build_db.bat
new file mode 100644
index 00000000000..2b325293abf
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/bin/build_db.bat
@@ -0,0 +1,4 @@
+@echo off
+rem Enable checked build and build debug code
+set CHECKED=1
+call build_it.bat %1 %2 %3 %4 %5 %6 %7 %8 %9
diff --git a/board/MAI/bios_emulator/scitech/bin/build_it.bat b/board/MAI/bios_emulator/scitech/bin/build_it.bat
new file mode 100644
index 00000000000..5a619b4459e
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/bin/build_it.bat
@@ -0,0 +1,432 @@
+@echo off
+rem Generic batch file to build a version of the library. This batch file
+rem assumes that the correct batch files exist to setup the appropriate
+rem compilation environments, and that the DMAKE.EXE program is available
+rem somewhere on the path.
+rem
+rem Builds as release or debug depending on the value of the CHECKED
+rem environment variable.
+
+rem Unset all environment variables that change the compile process
+set DBG=
+set OPT=
+set OPT_SIZE=
+set BUILD_DLL=
+set IMPORT_DLL=
+set FPU=
+set CHECKS=
+set BETA=
+
+if %1==bc31-d16 goto bc31-d16
+if %1==bc45-d16 goto bc45-d16
+if %1==bc45-d32 goto bc45-d32
+if %1==bc45-tnt goto bc45-tnt
+if %1==bc45-w16 goto bc45-w16
+if %1==bc45-w32 goto bc45-w32
+if %1==bc45-c32 goto bc45-c32
+if %1==bc45-vxd goto bc45-vxd
+if %1==bc45-snp goto bc45-snp
+if %1==bc50-d16 goto bc50-d16
+if %1==bc50-d32 goto bc50-d32
+if %1==bc50-tnt goto bc50-tnt
+if %1==bc50-w16 goto bc50-w16
+if %1==bc50-w32 goto bc50-w32
+if %1==bc50-c32 goto bc50-c32
+if %1==bc50-vxd goto bc50-vxd
+if %1==bc50-snp goto bc50-snp
+if %1==gcc2-d32 goto gcc2-d32
+if %1==gcc2-w32 goto gcc2-w32
+if %1==gcc2-c32 goto gcc2-c32
+if %1==gcc2-linux goto gcc2-linux
+if %1==vc40-d16 goto vc40-d16
+if %1==vc40-tnt goto vc40-tnt
+if %1==vc40-w16 goto vc40-w16
+if %1==vc40-w32 goto vc40-w32
+if %1==vc40-c32 goto vc40-c32
+if %1==vc40-drv9x goto vc40-drv9x
+if %1==vc40-drvnt goto vc40-drvnt
+if %1==vc40-rtt goto vc40-rtt
+if %1==vc40-snp goto vc40-snp
+if %1==vc50-d16 goto vc50-d16
+if %1==vc50-tnt goto vc50-tnt
+if %1==vc50-w16 goto vc50-w16
+if %1==vc50-w32 goto vc50-w32
+if %1==vc50-c32 goto vc50-c32
+if %1==vc50-drv9x goto vc50-drv9x
+if %1==vc50-drvnt goto vc50-drvnt
+if %1==vc50-rtt goto vc50-rtt
+if %1==vc50-snp goto vc50-snp
+if %1==vc60-d16 goto vc60-d16
+if %1==vc60-tnt goto vc60-tnt
+if %1==vc60-w16 goto vc60-w16
+if %1==vc60-w32 goto vc60-w32
+if %1==vc60-c32 goto vc60-c32
+if %1==vc60-drv9x goto vc60-drv9x
+if %1==vc60-drvnt goto vc60-drvnt
+if %1==vc60-drvw2k goto vc60-drvw2k
+if %1==vc60-rtt goto vc60-rtt
+if %1==vc60-snp goto vc60-snp
+if %1==wc10ad16 goto wc10ad16
+if %1==wc10ad32 goto wc10ad32
+if %1==wc10atnt goto wc10atnt
+if %1==wc10aw16 goto wc10aw16
+if %1==wc10aw32 goto wc10aw32
+if %1==wc10ac32 goto wc10ac32
+if %1==wc10ao32 goto wc10ao32
+if %1==wc10ap32 goto wc10ap32
+if %1==wc10asnp goto wc10asnp
+if %1==wc10-d16 goto wc10-d16
+if %1==wc10-d32 goto wc10-d32
+if %1==wc10-tnt goto wc10-tnt
+if %1==wc10-w16 goto wc10-w16
+if %1==wc10-w32 goto wc10-w32
+if %1==wc10-c32 goto wc10-c32
+if %1==wc10-o32 goto wc10-o32
+if %1==wc10-p32 goto wc10-p32
+if %1==wc10-snp goto wc10-snp
+if %1==wc11-d16 goto wc11-d16
+if %1==wc11-d32 goto wc11-d32
+if %1==wc11-tnt goto wc11-tnt
+if %1==wc11-w16 goto wc11-w16
+if %1==wc11-w32 goto wc11-w32
+if %1==wc11-c32 goto wc11-c32
+if %1==wc11-o32 goto wc11-o32
+if %1==wc11-p32 goto wc11-p32
+if %1==wc11-snp goto wc11-snp
+
+echo Usage: BUILD 'compiler_name' [DMAKE commands]
+echo.
+echo Where 'compiler_name' is of the form comp-os, where
+echo 'comp' defines the compiler and 'os' defines the OS environment.
+echo For instance 'bc50-w32' is for Borland C++ 5.0 for Win32.
+echo The value of 'comp' can be any of the following:
+echo.
+echo bc45 - Borland C++ 4.5x
+echo bc50 - Borland C++ 5.x
+echo vc40 - Visual C++ 4.x
+echo vc50 - Visual C++ 5.x
+echo vc60 - Visual C++ 6.x
+echo wc10 - Watcom C++ 10.6
+echo wc11 - Watcom C++ 11.0
+echo gcc2 - GNU C/C++ 2.9x
+echo.
+echo The value of 'os' can be one of the following:
+echo.
+echo d16 - 16-bit DOS
+echo d32 - 32-bit DOS
+echo w16 - 16-bit Windows GUI mode
+echo c32 - 32-bit Windows console mode
+echo w32 - 32-bit Windows GUI mode
+echo o16 - 16-bit OS/2 console mode
+echo o32 - 32-bit OS/2 console mode
+echo p32 - 32-bit OS/2 Presentation Manager
+echo snp - 32-bit SciTech Snap application
+echo linux - 32-bit Linux application
+goto end
+
+rem -------------------------------------------------------------------------
+rem Setup for the specified compiler
+
+:bc31-d16
+call bc31-d16.bat
+goto compileit
+
+:bc45-d16
+call bc45-d16.bat
+goto compileit
+
+:bc45-d32
+call bc45-d32.bat
+goto compileit
+
+:bc45-tnt
+call bc45-tnt.bat
+goto compileit
+
+:bc45-w16
+call bc45-w16.bat
+goto compileit
+
+:bc45-w32
+call bc45-w32.bat
+goto compileit
+
+:bc45-c32
+call bc45-c32.bat
+goto compileit
+
+:bc45-vxd
+call bc45-vxd.bat
+goto compileit
+
+:bc50-d16
+call bc50-d16.bat
+goto compileit
+
+:bc50-d32
+call bc50-d32.bat
+goto compileit
+
+:bc50-tnt
+call bc50-tnt.bat
+goto compileit
+
+:bc50-w16
+call bc50-w16.bat
+goto compileit
+
+:bc50-w32
+call bc50-w32.bat
+goto compileit
+
+:bc50-c32
+call bc50-c32.bat
+goto compileit
+
+:bc50-vxd
+call bc50-vxd.bat
+goto compileit
+
+:gcc2-d32
+call gcc2-d32.bat
+goto compileit
+
+:gcc2-w32
+call gcc2-w32.bat
+goto compileit
+
+:gcc2-c32
+call gcc2-c32.bat
+goto compileit
+
+:gcc2-linux
+call gcc2-linux.bat
+goto compileit
+
+:sc70-d16
+call sc70-d16.bat
+goto compileit
+
+:sc70-w16
+call sc70-w16.bat
+goto compileit
+
+:sc70-tnt
+call sc70-tnt.bat
+goto compileit
+
+:sc70-w32
+call sc70-w32.bat
+goto compileit
+
+:sc70-c32
+call sc70-c32.bat
+goto compileit
+
+:vc40-d16
+call vc40-d16.bat
+goto compileit
+
+:vc40-tnt
+call vc40-tnt.bat
+goto compileit
+
+:vc40-w16
+call vc40-w16.bat
+goto compileit
+
+:vc40-w32
+call vc40-w32.bat
+goto compileit
+
+:vc40-c32
+call vc40-c32.bat
+goto compileit
+
+:vc40-drv9x
+call vc40-drv9x.bat
+goto compileit
+
+:vc40-drvnt
+call vc40-drvnt.bat
+goto compileit
+
+:vc40-rtt
+call vc40-rtt.bat
+goto compileit
+
+:vc50-d16
+call vc50-d16.bat
+goto compileit
+
+:vc50-tnt
+call vc50-tnt.bat
+goto compileit
+
+:vc50-w16
+call vc50-w16.bat
+goto compileit
+
+:vc50-w32
+call vc50-w32.bat
+goto compileit
+
+:vc50-c32
+call vc50-c32.bat
+goto compileit
+
+:vc50-drv9x
+call vc50-drv9x.bat
+goto compileit
+
+:vc50-drvnt
+call vc50-drvnt.bat
+goto compileit
+
+:vc50-rtt
+call vc50-rtt.bat
+goto compileit
+
+:vc60-d16
+call vc60-d16.bat
+goto compileit
+
+:vc60-tnt
+call vc60-tnt.bat
+goto compileit
+
+:vc60-w16
+call vc60-w16.bat
+goto compileit
+
+:vc60-w32
+call vc60-w32.bat
+goto compileit
+
+:vc60-c32
+call vc60-c32.bat
+goto compileit
+
+:vc60-drv9x
+call vc60-drv9x.bat
+goto compileit
+
+:vc60-drvnt
+call vc60-drvnt.bat
+goto compileit
+
+:vc60-drvw2k
+call vc60-drvw2k.bat
+goto compileit
+
+:vc60-rtt
+call vc60-rtt.bat
+goto compileit
+
+:wc10ad16
+call wc10ad16.bat
+goto compileit
+
+:wc10ad32
+call wc10ad32.bat
+goto compileit
+
+:wc10atnt
+call wc10atnt.bat
+goto compileit
+
+:wc10aw16
+call wc10aw16.bat
+goto compileit
+
+:wc10aw32
+call wc10aw32.bat
+goto compileit
+
+:wc10ac32
+call wc10ac32.bat
+goto compileit
+
+:wc10ao32
+call wc10ao32.bat
+goto compileit
+
+:wc10ap32
+call wc10ap32.bat
+goto compileit
+
+:wc10-d16
+call wc10-d16.bat
+goto compileit
+
+:wc10-d32
+call wc10-d32.bat
+goto compileit
+
+:wc10-tnt
+call wc10-tnt.bat
+goto compileit
+
+:wc10-w16
+call wc10-w16.bat
+goto compileit
+
+:wc10-w32
+call wc10-w32.bat
+goto compileit
+
+:wc10-c32
+call wc10-c32.bat
+goto compileit
+
+:wc10-o32
+call wc10-o32.bat
+goto compileit
+
+:wc10-p32
+call wc10-p32.bat
+goto compileit
+
+:wc11-d16
+call wc11-d16.bat
+goto compileit
+
+:wc11-d32
+call wc11-d32.bat
+goto compileit
+
+:wc11-tnt
+call wc11-tnt.bat
+goto compileit
+
+:wc11-w16
+call wc11-w16.bat
+goto compileit
+
+:wc11-w32
+call wc11-w32.bat
+goto compileit
+
+:wc11-c32
+call wc11-c32.bat
+goto compileit
+
+:wc11-o32
+call wc11-o32.bat
+goto compileit
+
+:wc11-p32
+call wc11-p32.bat
+goto compileit
+
+:compileit
+k_rm -f *.lib *.a
+dmake %2 %3 %4 %5 %6 %7 %8 %9
+if errorlevel 1 goto errorend
+goto end
+
+:errorend
+echo *************************************************
+echo * An error occurred while building the library. *
+echo *************************************************
+:end
diff --git a/board/MAI/bios_emulator/scitech/bin/cddrv.bat b/board/MAI/bios_emulator/scitech/bin/cddrv.bat
new file mode 100644
index 00000000000..b64f4d7463f
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/bin/cddrv.bat
@@ -0,0 +1,6 @@
+@echo off
+%1
+cd %3
+%4 %5 %6 %7 %8 %9
+%2
+
diff --git a/board/MAI/bios_emulator/scitech/bin/cdit b/board/MAI/bios_emulator/scitech/bin/cdit
new file mode 100644
index 00000000000..b22023d54cc
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/bin/cdit
@@ -0,0 +1,10 @@
+#! /bin/sh
+
+cd $1
+PROG=$2
+shift 2
+rm -f *.lib *.a
+$PROG $*
+RET=$?
+cd ..
+exit $RET
diff --git a/board/MAI/bios_emulator/scitech/bin/cdit.bat b/board/MAI/bios_emulator/scitech/bin/cdit.bat
new file mode 100644
index 00000000000..950b6480711
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/bin/cdit.bat
@@ -0,0 +1,5 @@
+@echo off
+cd %1
+k_rm -f *.lib *.a
+shift 1
+%1 %2 %3 %4 %5 %6 %7 %8 %9
diff --git a/board/MAI/bios_emulator/scitech/bin/djgpp.env b/board/MAI/bios_emulator/scitech/bin/djgpp.env
new file mode 100644
index 00000000000..5a2c3d816aa
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/bin/djgpp.env
@@ -0,0 +1,46 @@
+#= Don't edit this line unless you move djgpp.env outside
+#= of the djgpp installation directory. If you do move
+#= it, set DJDIR to the directory you installed DJGPP in.
+#=
+DJDIR=%:/>DJGPP%
+
++USER=dosuser
++TMPDIR=%DJDIR%/tmp
++EMU387=%DJDIR%/bin/emu387.dxe
++LFN=y
+
+[bison]
+BISON_HAIRY=%DJDIR%/lib/bison.hai
+BISON_SIMPLE=%DJDIR%/lib/bison.sim
+
+[cpp]
+CPLUS_INCLUDE_PATH=%/>;CPLUS_INCLUDE_PATH%include;%SCITECH%/include;%PRIVATE%/include;.;%DJDIR%/lang/cxx;%DJDIR%/include;%DJDIR%/contrib/grx20/include
+C_INCLUDE_PATH=%/>;C_INCLUDE_PATH%include;%SCITECH%/include;%PRIVATE%/include;.;%DJDIR%/include;%DJDIR%/contrib/grx20/include
+OBJCPLUS_INCLUDE_PATH=%/>;OBJCPLUS_INCLUDE_PATH%%DJDIR%/include;%DJDIR%/lang/objc
+OBJC_INCLUDE_PATH=%/>;OBJC_INCLUDE_PATH%%DJDIR%/include;%DJDIR%/lang/objc
+
+[gcc]
+COMPILER_PATH=%/>;COMPILER_PATH%%DJDIR%/bin
+LIBRARY_PATH=%/>;LIBRARY_PATH%%DJDIR%/lib;%DJDIR%/contrib/grx20/lib;%SCITECH%/lib/release/dos32/dj2
+
+[info]
+INFOPATH=%/>;INFOPATH%%DJDIR%/info;%DJDIR%/gnu/emacs/info
+INFO_COLORS=0x1f.0x31
+
+[emacs]
+INFOPATH=%/>;INFOPATH%%DJDIR%/info;%DJDIR%/gnu/emacs/info
+
+[less]
+LESSBINFMT=*k<%X>
+LESSCHARDEF=8bcccbcc12bc5b95.b127.b
+LESS=%LESS% -h5$y5$Dd2.0$Du14.0$Ds4.7$Dk9.0$
+
+[locate]
++LOCATE_PATH=%DJDIR%/lib/locatedb.dat
+
+[ls]
++LS_COLORS=no=00:fi=00:di=36:lb=37;07:cd=40;33;01:ex=32:*.cmd=32:*.tar=01;31:*.tgz=01;31:*.arj=01;31:*.taz=01;31:*.lzh=01;31:*.zip=01;31:*.z=01;31:*.Z=01;31:*.gz=01;31:*.deb=01;31:*.jpg=01;34:*.gif=01;34:*.bmp=01;34:*.ppm=01;34:*.tga=01;34:*.xbm=01;34:*.xpm=01;34:*.tif=01;34:*.mpg=01;37:*.avi=01;37:*.gl=01;37:*.dl=01;37:*~=08:*.bak=08:
+[dir]
++LS_COLORS=no=00:fi=00:di=36:lb=37;07:cd=40;33;01:ex=32:*.cmd=32:*.tar=01;31:*.tgz=01;31:*.arj=01;31:*.taz=01;31:*.lzh=01;31:*.zip=01;31:*.z=01;31:*.Z=01;31:*.gz=01;31:*.deb=01;31:*.jpg=01;34:*.gif=01;34:*.bmp=01;34:*.ppm=01;34:*.tga=01;34:*.xbm=01;34:*.xpm=01;34:*.tif=01;34:*.mpg=01;37:*.avi=01;37:*.gl=01;37:*.dl=01;37:*~=08:*.bak=08:
+[vdir]
++LS_COLORS=no=00:fi=00:di=36:lb=37;07:cd=40;33;01:ex=32:*.cmd=32:*.tar=01;31:*.tgz=01;31:*.arj=01;31:*.taz=01;31:*.lzh=01;31:*.zip=01;31:*.z=01;31:*.Z=01;31:*.gz=01;31:*.deb=01;31:*.jpg=01;34:*.gif=01;34:*.bmp=01;34:*.ppm=01;34:*.tga=01;34:*.xbm=01;34:*.xpm=01;34:*.tif=01;34:*.mpg=01;37:*.avi=01;37:*.gl=01;37:*.dl=01;37:*~=08:*.bak=08:
diff --git a/board/MAI/bios_emulator/scitech/bin/djgpp_db.env b/board/MAI/bios_emulator/scitech/bin/djgpp_db.env
new file mode 100644
index 00000000000..9b792c93e42
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/bin/djgpp_db.env
@@ -0,0 +1,46 @@
+#= Don't edit this line unless you move djgpp.env outside
+#= of the djgpp installation directory. If you do move
+#= it, set DJDIR to the directory you installed DJGPP in.
+#=
+DJDIR=%:/>DJGPP%
+
++USER=dosuser
++TMPDIR=%DJDIR%/tmp
++EMU387=%DJDIR%/bin/emu387.dxe
++LFN=y
+
+[bison]
+BISON_HAIRY=%DJDIR%/lib/bison.hai
+BISON_SIMPLE=%DJDIR%/lib/bison.sim
+
+[cpp]
+CPLUS_INCLUDE_PATH=%/>;CPLUS_INCLUDE_PATH%include;%SCITECH%/include;%PRIVATE%/include;.;%DJDIR%/lang/cxx;%DJDIR%/include;%DJDIR%/contrib/grx20/include
+C_INCLUDE_PATH=%/>;C_INCLUDE_PATH%include;%SCITECH%/include;%PRIVATE%/include;.;%DJDIR%/include;%DJDIR%/contrib/grx20/include
+OBJCPLUS_INCLUDE_PATH=%/>;OBJCPLUS_INCLUDE_PATH%%DJDIR%/include;%DJDIR%/lang/objc
+OBJC_INCLUDE_PATH=%/>;OBJC_INCLUDE_PATH%%DJDIR%/include;%DJDIR%/lang/objc
+
+[gcc]
+COMPILER_PATH=%/>;COMPILER_PATH%%DJDIR%/bin
+LIBRARY_PATH=%/>;LIBRARY_PATH%%DJDIR%/lib;%DJDIR%/contrib/grx20/lib;%SCITECH%/lib/debug/dos32/dj2
+
+[info]
+INFOPATH=%/>;INFOPATH%%DJDIR%/info;%DJDIR%/gnu/emacs/info
+INFO_COLORS=0x1f.0x31
+
+[emacs]
+INFOPATH=%/>;INFOPATH%%DJDIR%/info;%DJDIR%/gnu/emacs/info
+
+[less]
+LESSBINFMT=*k<%X>
+LESSCHARDEF=8bcccbcc12bc5b95.b127.b
+LESS=%LESS% -h5$y5$Dd2.0$Du14.0$Ds4.7$Dk9.0$
+
+[locate]
++LOCATE_PATH=%DJDIR%/lib/locatedb.dat
+
+[ls]
++LS_COLORS=no=00:fi=00:di=36:lb=37;07:cd=40;33;01:ex=32:*.cmd=32:*.tar=01;31:*.tgz=01;31:*.arj=01;31:*.taz=01;31:*.lzh=01;31:*.zip=01;31:*.z=01;31:*.Z=01;31:*.gz=01;31:*.deb=01;31:*.jpg=01;34:*.gif=01;34:*.bmp=01;34:*.ppm=01;34:*.tga=01;34:*.xbm=01;34:*.xpm=01;34:*.tif=01;34:*.mpg=01;37:*.avi=01;37:*.gl=01;37:*.dl=01;37:*~=08:*.bak=08:
+[dir]
++LS_COLORS=no=00:fi=00:di=36:lb=37;07:cd=40;33;01:ex=32:*.cmd=32:*.tar=01;31:*.tgz=01;31:*.arj=01;31:*.taz=01;31:*.lzh=01;31:*.zip=01;31:*.z=01;31:*.Z=01;31:*.gz=01;31:*.deb=01;31:*.jpg=01;34:*.gif=01;34:*.bmp=01;34:*.ppm=01;34:*.tga=01;34:*.xbm=01;34:*.xpm=01;34:*.tif=01;34:*.mpg=01;37:*.avi=01;37:*.gl=01;37:*.dl=01;37:*~=08:*.bak=08:
+[vdir]
++LS_COLORS=no=00:fi=00:di=36:lb=37;07:cd=40;33;01:ex=32:*.cmd=32:*.tar=01;31:*.tgz=01;31:*.arj=01;31:*.taz=01;31:*.lzh=01;31:*.zip=01;31:*.z=01;31:*.Z=01;31:*.gz=01;31:*.deb=01;31:*.jpg=01;34:*.gif=01;34:*.bmp=01;34:*.ppm=01;34:*.tga=01;34:*.xbm=01;34:*.xpm=01;34:*.tif=01;34:*.mpg=01;37:*.avi=01;37:*.gl=01;37:*.dl=01;37:*~=08:*.bak=08:
diff --git a/board/MAI/bios_emulator/scitech/bin/findint3.bat b/board/MAI/bios_emulator/scitech/bin/findint3.bat
new file mode 100644
index 00000000000..2e1506c2ce6
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/bin/findint3.bat
@@ -0,0 +1 @@
+perl c:\scitech\src\perl\findint3.per
diff --git a/board/MAI/bios_emulator/scitech/bin/gcc-beos.sh b/board/MAI/bios_emulator/scitech/bin/gcc-beos.sh
new file mode 100644
index 00000000000..61ffd935070
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/bin/gcc-beos.sh
@@ -0,0 +1,16 @@
+#! /bin/sh
+
+# Setup for compiling with GCC/G++ for BeOS
+
+if [ "$CHECKED" = "1" ]; then
+ echo Checked debug build enabled.
+else
+ echo Release build enabled.
+fi
+
+export MAKESTARTUP=$SCITECH/makedefs/gcc_beos.mk
+export INCLUDE="-Iinclude -I$SCITECH/include -I$PRIVATE/include"
+export USE_X11=0
+export USE_BEOS=1
+
+echo GCC BeOS console compilation environment set up
diff --git a/board/MAI/bios_emulator/scitech/bin/gcc-freebsd.sh b/board/MAI/bios_emulator/scitech/bin/gcc-freebsd.sh
new file mode 100644
index 00000000000..3816a5dca76
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/bin/gcc-freebsd.sh
@@ -0,0 +1,16 @@
+#! /bin/sh
+
+# Setup for compiling with GCC/G++ for FreeBSD
+
+if [ "$CHECKED" = "1" ]; then
+ echo Checked debug build enabled.
+else
+ echo Release build enabled.
+fi
+
+export MAKESTARTUP=$SCITECH/makedefs/gcc_freebsd.mk
+export INCLUDE="-Iinclude -I$SCITECH/include -I$PRIVATE/include"
+export USE_X11=1
+export USE_FREEBSD=1
+
+echo GCC FreeBSD console compilation environment set up
diff --git a/board/MAI/bios_emulator/scitech/bin/gcc-linux.sh b/board/MAI/bios_emulator/scitech/bin/gcc-linux.sh
new file mode 100644
index 00000000000..27a4c490652
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/bin/gcc-linux.sh
@@ -0,0 +1,19 @@
+#! /bin/sh
+
+# Setup for compiling with GCC/G++ for Linux
+
+if [ "$CHECKED" = "1" ]; then
+ echo Checked debug build enabled.
+else
+ echo Release build enabled.
+fi
+
+export MAKESTARTUP=$SCITECH/makedefs/gcc_linux.mk
+export INCLUDE="include;$SCITECH/include;$PRIVATE/include"
+export USE_LINUX=1
+
+if [ "x$LIBC" = x ]; then
+ echo "GCC Linux console compilation environment set up (glib)"
+else
+ echo "GCC Linux console compilation environment set up (libc5)"
+fi
diff --git a/board/MAI/bios_emulator/scitech/bin/gcc2-c32.bat b/board/MAI/bios_emulator/scitech/bin/gcc2-c32.bat
new file mode 100644
index 00000000000..13c47836999
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/bin/gcc2-c32.bat
@@ -0,0 +1,26 @@
+@echo off
+REM Setup for compiling with GNU C compiler
+
+if .%CHECKED%==.1 goto checked_build
+set LIB=%SCITECH_LIB%\LIB\release\win32\gcc2
+echo Release build enabled.
+goto setvars
+
+:checked_build
+set LIB=%SCITECH_LIB%\LIB\debug\win32\gcc2
+echo Checked debug build enabled.
+goto setvars
+
+:setvars
+set INCLUDE=include;%SCITECH%\include;%PRIVATE%\include
+set MAKESTARTUP=%SCITECH%\makedefs\gcc_win32.mk
+set MAKE_MODE=
+set USE_WIN16=
+set USE_WIN32=1
+set WIN32_GUI=
+set USE_SNAP=
+set GCC_LIBBASE=gcc2
+PATH %SCITECH_BIN%;%GCC2_PATH%\NATIVE\BIN;%DEFPATH%
+
+echo GCC 2.9.x 32-bit Win32 console compilation environment set up
+
diff --git a/board/MAI/bios_emulator/scitech/bin/gcc2-dos.bat b/board/MAI/bios_emulator/scitech/bin/gcc2-dos.bat
new file mode 100644
index 00000000000..97cb8bda133
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/bin/gcc2-dos.bat
@@ -0,0 +1,28 @@
+@echo off
+REM Setup for compiling with DJGPP 2.02
+
+if .%CHECKED%==.1 goto checked_build
+set LIB=%SCITECH_LIB%\LIB\release\dos32\dj2
+%SCITECH%\bin-dos\k_cp %SCITECH%\BIN\DJGPP.ENV %DJ_PATH%\DJGPP.ENV
+echo Release build enabled.
+goto setvars
+
+:checked_build
+set LIB=%SCITECH_LIB%\LIB\debug\dos32\dj2
+%SCITECH%\bin-dos\k_cp %SCITECH%\BIN\DJGPP_DB.ENV %DJ_PATH%\DJGPP.ENV
+echo Checked debug build enabled.
+goto setvars
+
+:setvars
+set DJGPP=%DJ_PATH%\DJGPP.ENV
+set INCLUDE=INCLUDE;%SCITECH%\INCLUDE;%PRIVATE%\INCLUDE;%DJ_PATH%\INCLUDE;
+set MAKESTARTUP=%SCITECH%\MAKEDEFS\DJ32.MK
+set USE_WIN16=
+set USE_WIN32=
+set WIN32_GUI=
+set USE_SNAP=
+set DJ_LIBBASE=dj2
+PATH %SCITECH_BIN%;%DJ_PATH%\BIN;%DEFPATH%
+
+echo DJGPP 2.02 32-bit DOS compilation environment set up (DPMI).
+
diff --git a/board/MAI/bios_emulator/scitech/bin/gcc2-linux.bat b/board/MAI/bios_emulator/scitech/bin/gcc2-linux.bat
new file mode 100644
index 00000000000..ceb2ab84e91
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/bin/gcc2-linux.bat
@@ -0,0 +1,26 @@
+@echo off
+REM Setup for compiling with GNU C cross-compiler
+
+if .%CHECKED%==.1 goto checked_build
+set LIB=%SCITECH_LIB%\LIB\release\win32\gcc2
+echo Release build enabled.
+goto setvars
+
+:checked_build
+set LIB=%SCITECH_LIB%\LIB\debug\win32\gcc2
+echo Checked debug build enabled.
+goto setvars
+
+:setvars
+set INCLUDE=include;%SCITECH%\include;%PRIVATE%\include
+set MAKESTARTUP=%SCITECH%\MAKEDEFS\gcc_linux.mk
+set MAKE_MODE=UNIX
+set USE_WIN16=
+set USE_WIN32=
+set WIN32_GUI=
+set USE_SNAP=
+set GCC_LIBBASE=gcc2
+PATH %SCITECH_BIN%;%GCC2_PATH%\cross-linux\i386-redhat-linux\BIN;%DEFPATH%
+
+echo GCC 2.9.x 32-bit Linux console cross compilation environment set up
+
diff --git a/board/MAI/bios_emulator/scitech/bin/gcc2-w32.bat b/board/MAI/bios_emulator/scitech/bin/gcc2-w32.bat
new file mode 100644
index 00000000000..bdb31aaf5d9
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/bin/gcc2-w32.bat
@@ -0,0 +1,26 @@
+@echo off
+REM Setup for compiling with GNU C compiler
+
+if .%CHECKED%==.1 goto checked_build
+set LIB=%SCITECH_LIB%\LIB\release\win32\gcc2
+echo Release build enabled.
+goto setvars
+
+:checked_build
+set LIB=%SCITECH_LIB%\LIB\debug\win32\gcc2
+echo Checked debug build enabled.
+goto setvars
+
+:setvars
+set INCLUDE=include;%SCITECH%\include;%PRIVATE%\include
+set MAKESTARTUP=%SCITECH%\makedefs\gcc_win32.mk
+set MAKE_MODE=
+set USE_WIN16=
+set USE_WIN32=1
+set WIN32_GUI=1
+set USE_SNAP=
+set GCC_LIBBASE=gcc2
+PATH %SCITECH_BIN%;%GCC2_PATH%\NATIVE\BIN;%DEFPATH%
+
+echo GCC 2.9.x 32-bit Win32 GUI compilation environment set up
+
diff --git a/board/MAI/bios_emulator/scitech/bin/makelib.bat b/board/MAI/bios_emulator/scitech/bin/makelib.bat
new file mode 100644
index 00000000000..631673483c1
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/bin/makelib.bat
@@ -0,0 +1,97 @@
+call wc11-d32.bat
+
+cd c:\private\src\license
+dmake clean
+dmake depend
+dmake -u install
+cd c:\scitech\src\pm
+dmake clean
+dmake depend
+dmake -u install
+cd c:\scitech\src\console
+dmake clean
+dmake depend
+dmake -u install
+cd c:\scitech\src\nucleus
+dmake clean
+dmake depend
+dmake -u install
+cd c:\scitech\src\zlib
+dmake clean
+dmake depend
+dmake -u install
+
+cd c:\private\src\graphics\ref2d
+dmake clean
+dmake depend
+dmake -u install
+cd c:\private\src\drvlib
+dmake clean
+dmake depend
+dmake -u install
+
+call wc11-w32.bat
+
+cd c:\private\src\license
+dmake clean
+dmake depend
+dmake -u install
+cd c:\scitech\src\pm
+dmake clean
+dmake depend
+dmake -u install
+cd c:\scitech\src\console
+dmake clean
+dmake depend
+dmake -u install
+cd c:\scitech\src\nucleus
+dmake clean
+dmake depend
+dmake -u install
+cd c:\scitech\src\zlib
+dmake clean
+dmake depend
+dmake -u install
+
+cd c:\private\src\graphics\ref2d
+dmake clean
+dmake depend
+dmake -u install
+cd c:\private\src\drvlib
+dmake clean
+dmake depend
+dmake -u install
+
+call wc10-d32.bat
+
+cd c:\private\src\license
+dmake clean
+dmake depend
+dmake -u install
+cd c:\scitech\src\pm
+dmake clean
+dmake depend
+dmake -u install
+cd c:\scitech\src\console
+dmake clean
+dmake depend
+dmake -u install
+cd c:\scitech\src\nucleus
+dmake clean
+dmake depend
+dmake -u install
+cd c:\scitech\src\zlib
+dmake clean
+dmake depend
+dmake -u install
+
+cd c:\private\src\graphics\ref2d
+dmake clean
+dmake depend
+dmake -u install
+cd c:\private\src\drvlib
+dmake clean
+dmake depend
+dmake -u install
+
+cd \private\src\graphics\drivers
diff --git a/board/MAI/bios_emulator/scitech/bin/meltobjs.sh b/board/MAI/bios_emulator/scitech/bin/meltobjs.sh
new file mode 100644
index 00000000000..fd1804b70f5
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/bin/meltobjs.sh
@@ -0,0 +1,23 @@
+#! /bin/sh
+#
+# This script generates a single object file from a set of libraries (*.a files)
+# Usage: meltobjs.sh target.o library1.a library2.a ...
+#
+# (C) SciTech Software, Inc. 1998
+#
+
+TMPDIR=/tmp/melt$$
+TARGET=$1
+TARGETDIR=$PWD
+shift
+mkdir $TMPDIR
+
+cd $TMPDIR
+
+for a in $*
+do
+ ar x $a
+done
+ld -r -o $TARGETDIR/$TARGET *.o
+
+rm -fr $TMPDIR
\ No newline at end of file
diff --git a/board/MAI/bios_emulator/scitech/bin/ntddk.bat b/board/MAI/bios_emulator/scitech/bin/ntddk.bat
new file mode 100644
index 00000000000..07c0d78505f
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/bin/ntddk.bat
@@ -0,0 +1,42 @@
+@echo off
+REM: Set up environment variables for Microsoft Windows NT DDK development.
+REM: Note that we have hard coded this for Windows NT i386 development.
+
+SET USE_NTDRV=1
+SET USE_W2KDRV=
+SET BASEDIR=%NT_DDKROOT%
+SET PATH=%BASEDIR%\bin;%PATH%
+SET NTMAKEENV=%BASEDIR%\inc
+SET BUILD_MAKE_PROGRAM=nmake.exe
+SET BUILD_DEFAULT=-ei -nmake -i
+SET BUILD_DEFAULT_TARGETS=-386
+SET _OBJ_DIR=obj
+SET NEW_CRTS=1
+SET _NTROOT=%BASEDIR%
+SET INCLUDE=%BASEDIR%\inc;%INCLUDE%
+
+if .%CHECKED%==.1 goto checked
+
+REM: set up an NT free build environment
+SET DDKBUILDENV=free
+SET C_DEFINES=-D_IDWBUILD
+SET NTDBGFILES=1
+SET NTDEBUG=
+SET NTDEBUGTYPE=
+SET MSC_OPTIMIZATION=
+set LIB=%BASEDIR%\lib\i386\free;%SCITECH_LIB%\LIB\RELEASE\NTDRV\VC6;%MSVCDir%\LIB;.
+
+goto done
+
+:checked
+
+REM: set up an NT checked build environment
+SET DDKBUILDENV=checked
+SET C_DEFINES=-D_IDWBUILD -DRDRDBG -DSRVDBG
+SET NTDBGFILES=
+SET NTDEBUG=ntsd
+SET NTDEBUGTYPE=both
+SET MSC_OPTIMIZATION=/Od /Oi
+set LIB=%BASEDIR%\lib\i386\free;%SCITECH_LIB%\LIB\DEBUG\NTDRV\VC6;%MSVCDir%\LIB;.
+
+:done
diff --git a/board/MAI/bios_emulator/scitech/bin/qnx4.sh b/board/MAI/bios_emulator/scitech/bin/qnx4.sh
new file mode 100644
index 00000000000..843c4d9fb31
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/bin/qnx4.sh
@@ -0,0 +1,18 @@
+#! /bin/sh
+
+# Setup for compiling with Watcom C/C++ for QNX4
+
+if [ "$CHECKED" = "1" ]; then
+ echo Checked debug build enabled.
+else
+ echo Release build enabled.
+fi
+
+export MAKESTARTUP=$SCITECH/makedefs/qnx4.mk
+export INCLUDE="-I$SCITECH/include -I$PRIVATE/include -I/usr/include"
+export USE_QNX=1
+export USE_QNX4=1
+export WC_LIBBASE=wc10
+
+echo Qnx 4 console compilation environment set up
+
diff --git a/board/MAI/bios_emulator/scitech/bin/qnxnto.sh b/board/MAI/bios_emulator/scitech/bin/qnxnto.sh
new file mode 100644
index 00000000000..c114f9e3372
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/bin/qnxnto.sh
@@ -0,0 +1,21 @@
+#! /bin/sh
+
+# Setup for compiling with Watcom C/C++ for QNX Neutrino
+
+if [ "$CHECKED" = "1" ]; then
+ echo Checked debug build enabled.
+else
+ echo Release build enabled.
+fi
+
+if [ X$GCC_PATH = "X" ]; then
+ export GCC_PATH=/usr/gcc/bin
+fi
+
+export MAKESTARTUP=$SCITECH/makedefs/qnxnto.mk
+export INCLUDE="-I$SCITECH/include -I$PRIVATE/include -I/usr/nto/include"
+export USE_BIOS=1 # VBIOS lib is tiny under Neutrino, always include it
+export USE_QNX=1
+export USE_QNXNTO=1
+
+echo Qnx Neutrino console compilation environment set up
diff --git a/board/MAI/bios_emulator/scitech/bin/set-vars-beos.sh b/board/MAI/bios_emulator/scitech/bin/set-vars-beos.sh
new file mode 100644
index 00000000000..0a272d6a462
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/bin/set-vars-beos.sh
@@ -0,0 +1,42 @@
+#! /bin/sh
+
+# BeOS VERSION
+# Set the place where SciTech Software is installed, and where each
+# of the supported compilers is installed. These environment variables
+# are used by the batch files in the SCITECH\BIN directory.
+#
+# Modify the as appropriate for your compiler configuration (you should
+# only need to change things in this batch file).
+#
+# This version is for a normal BeOS installation.
+
+# The SCITECH variable points to where batch files, makefile startups,
+# include files and source files will be found when compiling.
+
+export SCITECH=$MGL_ROOT
+
+# The SCITECH_LIB variable points to where the SciTech libraries live
+# for installation and linking. This allows you to have the source and
+# include files on local machines for compiling and have the libraries
+# located on a common network machine (for network builds).
+
+export SCITECH_LIB=$SCITECH
+
+# The PRIVATE variable points to where private source files reside that
+# do not live in the public source tree
+
+export PRIVATE=$HOME/private
+
+# The following define the locations of all the compilers that you may
+# be using. Change them to reflect where you have installed your
+# compilers.
+
+export GCC_PATH=/boot/develop/tools/gnupro/bin
+
+# Add the Scitech bin path to the current PATH
+export PATH=$SCITECH/bin:$SCITECH/bin-beos:$PATH
+#if [ "x$LIBC" = x ]; then
+# export PATH=$PATH:$SCITECH/bin-beos/glibc
+#else
+# export PATH=$PATH:$SCITECH/bin-beos/libc
+#fi
diff --git a/board/MAI/bios_emulator/scitech/bin/set-vars-freebsd.sh b/board/MAI/bios_emulator/scitech/bin/set-vars-freebsd.sh
new file mode 100644
index 00000000000..c920748a7fe
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/bin/set-vars-freebsd.sh
@@ -0,0 +1,37 @@
+#! /bin/sh
+
+# LINUX VERSION
+# Set the place where SciTech Software is installed, and where each
+# of the supported compilers is installed. These environment variables
+# are used by the batch files in the SCITECH\BIN directory.
+#
+# Modify the as appropriate for your compiler configuration (you should
+# only need to change things in this batch file).
+#
+# This version is for a normal Linux installation.
+
+# The SCITECH variable points to where batch files, makefile startups,
+# include files and source files will be found when compiling.
+
+export SCITECH=$MGL_ROOT
+
+# The SCITECH_LIB variable points to where the SciTech libraries live
+# for installation and linking. This allows you to have the source and
+# include files on local machines for compiling and have the libraries
+# located on a common network machine (for network builds).
+
+export SCITECH_LIB=$SCITECH
+
+# The PRIVATE variable points to where private source files reside that
+# do not live in the public source tree
+
+export PRIVATE=$HOME/private
+
+# The following define the locations of all the compilers that you may
+# be using. Change them to reflect where you have installed your
+# compilers.
+
+export GCC_PATH=/usr/bin
+
+# Add the Scitech bin path to the current PATH
+export PATH=$SCITECH/bin:$SCITECH/bin-freebsd:$PATH
diff --git a/board/MAI/bios_emulator/scitech/bin/set-vars-linux.sh b/board/MAI/bios_emulator/scitech/bin/set-vars-linux.sh
new file mode 100644
index 00000000000..35cbf1dc160
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/bin/set-vars-linux.sh
@@ -0,0 +1,43 @@
+#! /bin/sh
+
+# LINUX VERSION
+# Set the place where SciTech Software is installed, and where each
+# of the supported compilers is installed. These environment variables
+# are used by the batch files in the SCITECH\BIN directory.
+#
+# Modify the as appropriate for your compiler configuration (you should
+# only need to change things in this batch file).
+#
+# This version is for a normal Linux installation.
+
+# The SCITECH variable points to where batch files, makefile startups,
+# include files and source files will be found when compiling.
+
+export SCITECH=$MGL_ROOT
+
+# The SCITECH_LIB variable points to where the SciTech libraries live
+# for installation and linking. This allows you to have the source and
+# include files on local machines for compiling and have the libraries
+# located on a common network machine (for network builds).
+
+export SCITECH_LIB=$SCITECH
+
+# The PRIVATE variable points to where private source files reside that
+# do not live in the public source tree
+
+export PRIVATE=$HOME/private
+
+# The following define the locations of all the compilers that you may
+# be using. Change them to reflect where you have installed your
+# compilers.
+
+export GCC_PATH=/usr/bin
+export TEMP=/tmp TMP=/tmp
+
+# Add the Scitech bin path to the current PATH
+export PATH=$SCITECH/bin:$SCITECH/bin-linux:$PATH
+if [ "x$LIBC" = x ]; then
+ export PATH=$SCITECH/bin-linux/glibc:$PATH
+else
+ export PATH=$SCITECH/bin-linux/libc:$PATH
+fi
diff --git a/board/MAI/bios_emulator/scitech/bin/set-vars-qnx.sh b/board/MAI/bios_emulator/scitech/bin/set-vars-qnx.sh
new file mode 100644
index 00000000000..1d73109ea4f
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/bin/set-vars-qnx.sh
@@ -0,0 +1,37 @@
+#! /bin/sh
+
+# QNX 4 VERSION
+# Set the place where SciTech Software is installed, and where each
+# of the supported compilers is installed. These environment variables
+# are used by the batch files in the SCITECH\BIN directory.
+#
+# Modify the as appropriate for your compiler configuration (you should
+# only need to change things in this batch file).
+#
+# This version is for a normal Linux installation.
+
+# The SCITECH variable points to where batch files, makefile startups,
+# include files and source files will be found when compiling.
+
+export SCITECH=$MGL_ROOT
+
+# The SCITECH_LIB variable points to where the SciTech libraries live
+# for installation and linking. This allows you to have the source and
+# include files on local machines for compiling and have the libraries
+# located on a common network machine (for network builds).
+
+export SCITECH_LIB=$SCITECH
+
+# The PRIVATE variable points to where private source files reside that
+# do not live in the public source tree
+
+export PRIVATE=$HOME/private
+
+# The following define the locations of all the compilers that you may
+# be using. Change them to reflect where you have installed your
+# compilers.
+
+export WC10_PATH=/usr/watcom/10.6/usr
+
+# Add the Scitech bin path to the current PATH
+export PATH=$SCITECH/bin:$SCITECH/bin-qnx:$PATH
diff --git a/board/MAI/bios_emulator/scitech/bin/set-vars.bat b/board/MAI/bios_emulator/scitech/bin/set-vars.bat
new file mode 100644
index 00000000000..2a2101d4b41
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/bin/set-vars.bat
@@ -0,0 +1,110 @@
+@echo off
+REM:=========================================================================
+REM: Master batch file to set up all necessary environment variables for
+REM: the SciTech makefile utilities. This batch file should be executed
+REM: *first* before any other batch files when you start a command shell.
+REM: You should not need to modify any batch files except this one to
+REM: configure the makefile utilities.
+REM:=========================================================================
+
+REM: Set the place where SciTech Software is installed, and where each
+REM: of the supported compilers is installed. These environment variables
+REM: are used by the batch files in the SCITECH\BIN directory.
+REM:
+REM: Modify the as appropriate for your compiler configuration (you should
+REM: only need to change things in this batch file).
+REM:
+REM: This version is for a normal MSDOS installation.
+
+REM: The SCITECH variable points to where batch files, makefile startups,
+REM: include files and source files will be found when compiling.
+
+SET SCITECH=c:\scitech
+
+REM: The SCITECH_LIB variable points to where the SciTech libraries live
+REM: for installation and linking. This allows you to have the source and
+REM: include files on local machines for compiling and have the libraries
+REM: located on a common network machine (for network builds).
+
+SET SCITECH_LIB=%SCITECH%
+
+REM: The PRIVATE variable points to where private source files reside that
+REM: do not live in the public source tree
+
+SET PRIVATE=c:\private
+
+REM: The following sets up the path to the SciTech command line utilities
+REM: for the development operating system. We select either DOS hosted
+REM: tools or Win32 hosted tools depending on whether you are running
+REM: on NT or not. Windows 9x users can use the Win32 hosted tools but
+REM: they run slower, but you will have long filenames if you do this.
+
+IF .%OS%==.Windows_NT goto Win32_path
+IF NOT .%WINDIR%==. goto Win32_path
+SET SCITECH_BIN=%SCITECH%\bin;%SCITECH%\bin-dos
+goto path_set
+
+REM: The following sets up the path to the SciTech command line utilities
+REM: for the development operating system. This version uses the Win32
+REM: hosted tools by default, so you can use long filenames.
+
+:Win32_path
+SET SCITECH_BIN=%SCITECH%\bin;%SCITECH%\bin-win32
+
+:path_set
+
+REM: Set the TMP variable for dmake if this is not already set
+
+SET TMP=%SCITECH%
+
+REM: Set the following environment variable to use the Netwide Assembler
+REM: (NASM) provided with the MGL tools to build all assembler modules.
+REM: If you have Turbo Assembler 4.0 or later and you wish to use it,
+REM: you can use it by removing the following line.
+
+SET USE_NASM=1
+
+REM: The following is used to set up DDK directories for device driver
+REM: development. They can safely be ignored unless you are using the
+REM: SciTech makefile utilities to build device drivers.
+
+SET DDKDRIVE=c:
+SET MSSDK=c:\c\win32sdk
+SET W95_DDKROOT=c:\c\95ddk
+SET W98_DDKROOT=c:\c\98ddk
+SET NT_DDKROOT=c:\c\ntddk
+SET W2K_DDKROOT=c:\c\2000ddk
+SET MASM_ROOT=c:\c\masm611
+SET VTOOLSD=c:\c\vtd95
+SET SOFTICE_PATH=c:\c\sint
+
+REM: The following define the locations of all the compilers that you may
+REM: be using. Change them to reflect where you have installed your
+REM: compilers.
+
+SET BC3_PATH=c:\c\bc3
+SET BC4_PATH=c:\c\bc45
+SET BC5_PATH=c:\c\bc50
+SET BCB5_PATH=c:\c\bcb50
+SET VC_PATH=c:\c\msvc
+SET VC4_PATH=c:\c\vc42
+SET VC5_PATH=c:\c\vc50
+SET VC6_PATH=c:\c\vc60
+SET SC70_PATH=c:\c\sc75
+SET WC10A_PATH=c:\c\wc10a
+SET WC10_PATH=c:\c\wc10
+SET WC11_PATH=c:\c\wc11
+SET TNT_PATH=c:\c\tnt
+SET DJ_PATH=c:\c\djgpp
+SET GCC2_PATH=c:\unix\usr
+
+REM: The following define the locations of the IDE and compiler path
+REM: tools for Visual C++. If you do a standard installation, you wont
+REM: need to change this. If however you did a custom install and changed
+REM: the paths to these directory, you will need to modify this to suit.
+
+SET VC5_MSDevDir=%VC5_PATH%\sharedide
+SET VC5_MSVCDir=%VC5_PATH%\vc
+SET VC6_MSDevDir=%VC6_PATH%\common\msdev98
+SET VC6_MSVCDir=%VC6_PATH%\vc98
+
diff --git a/board/MAI/bios_emulator/scitech/bin/vc40-c32.bat b/board/MAI/bios_emulator/scitech/bin/vc40-c32.bat
new file mode 100644
index 00000000000..71f7d8e10dc
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/bin/vc40-c32.bat
@@ -0,0 +1,36 @@
+@echo off
+REM Setup environment variables for Visual C++ 4.2 32 bit edition
+
+if .%CHECKED%==.1 goto checked_build
+set LIB=%SCITECH_LIB%\LIB\RELEASE\WIN32\VC4;%VC4_PATH%\LIB;%TNT_PATH%\LIB;.
+echo Release build enabled.
+goto setvars
+
+:checked_build
+set LIB=%SCITECH_LIB%\LIB\DEBUG\WIN32\VC4;%VC4_PATH%\LIB;%TNT_PATH%\LIB;.
+echo Checked debug build enabled.
+goto setvars
+
+:setvars
+set TOOLROOTDIR=%VC4_PATH%
+set C_INCLUDE=%VC4_PATH%\INCLUDE;%TNT_PATH%\INCLUDE;
+set INCLUDE=.;INCLUDE;%SCITECH%\INCLUDE;%PRIVATE%\INCLUDE;%C_INCLUDE%
+set INIT=%VC4_PATH%
+SET MAKESTARTUP=%SCITECH%\MAKEDEFS\VC32.MK
+SET USE_TNT=
+SET USE_WIN16=
+SET USE_WIN32=1
+SET WIN32_GUI=
+SET USE_VXD=
+SET USE_NTDRV=
+SET USE_RTTARGET=
+SET USE_SNAP=
+SET VC_LIBBASE=VC4
+PATH %SCITECH_BIN%;%VC4_PATH%\BIN;%TNT_PATH%\BIN;%DEFPATH%%VC32_CD_PATH%
+
+REM: Enable Win32 SDK if desired (sdk on command line)
+if NOT .%1%==.sdk goto done
+call win32sdk.bat
+
+:done
+echo Visual C++ 4.2 32 bit Windows compilation environment set up
diff --git a/board/MAI/bios_emulator/scitech/bin/vc40-d16.bat b/board/MAI/bios_emulator/scitech/bin/vc40-d16.bat
new file mode 100644
index 00000000000..9817493e370
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/bin/vc40-d16.bat
@@ -0,0 +1,27 @@
+@echo off
+REM Setup environment variables for Visual C++ 1.52c 16 bit edition
+
+if .%CHECKED%==.1 goto checked_build
+set LIB=%SCITECH_LIB%\LIB\RELEASE\DOS16\VC4;%VC_PATH%\LIB;.
+echo Release build enabled.
+goto setvars
+
+:checked_build
+set LIB=%SCITECH_LIB%\LIB\DEBUG\DOS16\VC4;%VC_PATH%\LIB;.
+echo Checked debug build enabled.
+goto setvars
+
+:setvars
+set TOOLROOTDIR=%VC_PATH%
+set INCLUDE=.;INCLUDE;%SCITECH%\INCLUDE;%PRIVATE%\INCLUDE;%VC_PATH%\INCLUDE;
+set INIT=%VC_PATH%
+SET MAKESTARTUP=%SCITECH%\MAKEDEFS\VC16.MK
+SET USE_WIN16=
+SET USE_WIN32=
+SET USE_RTTARGET=
+SET USE_SNAP=
+SET VC_LIBBASE=VC4
+PATH %SCITECH_BIN%;%VC_PATH%\BIN;%DEFPATH%%VC_CD_PATH%
+
+echo Visual C++ 1.52c 16 DOS bit compilation environment set up.
+
diff --git a/board/MAI/bios_emulator/scitech/bin/vc40-drv9x.bat b/board/MAI/bios_emulator/scitech/bin/vc40-drv9x.bat
new file mode 100644
index 00000000000..62e35214e93
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/bin/vc40-drv9x.bat
@@ -0,0 +1,21 @@
+@echo off
+REM Setup environment variables for Visual C++ 4.2 32 bit edition
+
+REM: First setup for Win32 console development
+call vc40-c32.bat > NUL
+
+REM: Extra stuff to set up for Windows 9x DDK development
+set MASTER_MAKE=1
+set DDKROOT=%W95_DDKROOT%
+set SDKROOT=%MSSDK%
+set C16_ROOT=%VC_PATH%
+set C32_ROOT=%VC4_PATH%
+
+if .%CHECKED%==.1 goto checked_build
+echo Release build enabled.
+goto done
+:checked_build
+echo Checked debug build enabled.
+goto done
+:done
+echo Visual C++ 4.2 Windows 9x driver compilation environment set up
diff --git a/board/MAI/bios_emulator/scitech/bin/vc40-drvnt.bat b/board/MAI/bios_emulator/scitech/bin/vc40-drvnt.bat
new file mode 100644
index 00000000000..83b67802dfa
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/bin/vc40-drvnt.bat
@@ -0,0 +1,18 @@
+@echo off
+REM Setup environment variables for Visual C++ 4.2 32 bit edition
+
+REM: First setup for Win32 console development (with Platform SDK)
+call vc40-c32.bat sdk > NUL
+
+REM: Extra stuff to set up for Windows NT DDK development
+SET BASEDIR=%NT_DDKROOT%
+SET PATH=%NT_DDKROOT%\bin;%PATH%
+
+if .%CHECKED%==.1 goto checked_build
+echo Release build enabled.
+goto done
+:checked_build
+echo Checked debug build enabled.
+goto done
+:done
+echo Visual C++ 4.2 Windows NT driver compilation environment set up
diff --git a/board/MAI/bios_emulator/scitech/bin/vc40-snp.bat b/board/MAI/bios_emulator/scitech/bin/vc40-snp.bat
new file mode 100644
index 00000000000..7997044f82d
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/bin/vc40-snp.bat
@@ -0,0 +1,31 @@
+@echo off
+REM Setup environment variables for Visual C++ 4.2 32 bit edition
+
+if .%CHECKED%==.1 goto checked_build
+set LIB=%SCITECH_LIB%\LIB\RELEASE\SNAP\VC4;%VC4_PATH%\LIB;%TNT_PATH%\LIB;.
+echo Release build enabled.
+goto setvars
+
+:checked_build
+set LIB=%SCITECH_LIB%\LIB\DEBUG\SNAP\VC4;%VC4_PATH%\LIB;%TNT_PATH%\LIB;.
+echo Checked debug build enabled.
+goto setvars
+
+:setvars
+set TOOLROOTDIR=%VC4_PATH%
+set INCLUDE=.;INCLUDE;%SCITECH%\INCLUDE;%PRIVATE%\INCLUDE
+set INIT=%VC4_PATH%
+SET MAKESTARTUP=%SCITECH%\MAKEDEFS\VC32.MK
+SET USE_TNT=
+SET USE_WIN16=
+SET USE_WIN32=
+SET WIN32_GUI=
+SET USE_VXD=
+SET USE_NTDRV=
+SET USE_RTTARGET=
+SET USE_SNAP=1
+SET VC_LIBBASE=VC4
+PATH %SCITECH_BIN%;%VC4_PATH%\BIN;%TNT_PATH%\BIN;%DEFPATH%%VC32_CD_PATH%
+
+echo Visual C++ 4.2 Snap compilation environment set up
+
diff --git a/board/MAI/bios_emulator/scitech/bin/vc40-tnt.bat b/board/MAI/bios_emulator/scitech/bin/vc40-tnt.bat
new file mode 100644
index 00000000000..b0fc93675b4
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/bin/vc40-tnt.bat
@@ -0,0 +1,42 @@
+@echo off
+REM Setup environment variables for Visual C++ 4.2 32 bit edition
+
+if .%CHECKED%==.1 goto checked_build
+set LIB=%SCITECH_LIB%\LIB\RELEASE\DOS32\VC4;%VC4_PATH%\LIB;%TNT_PATH%\COFFLIB;.
+echo Release build enabled.
+goto setvars
+
+:checked_build
+set LIB=%SCITECH_LIB%\LIB\DEBUG\DOS32\VC4;%VC4_PATH%\LIB;%TNT_PATH%\COFFLIB;.
+echo Checked debug build enabled.
+goto setvars
+
+:setvars
+set TOOLROOTDIR=%VC4_PATH%
+set INCLUDE=.;INCLUDE;%SCITECH%\INCLUDE;%PRIVATE%\INCLUDE;%VC4_PATH%\INCLUDE;%TNT_PATH%\INCLUDE;
+set INIT=%VC4_PATH%
+SET MAKESTARTUP=%SCITECH%\MAKEDEFS\VC32.MK
+SET USE_WIN16=
+SET USE_WIN32=
+SET USE_TNT=
+SET USE_VXD=
+SET USE_NTDRV=
+SET USE_RTTARGET=
+SET USE_SNAP=
+SET VC_LIBBASE=VC4
+PATH %SCITECH_BIN%;%VC4_PATH%\BIN;%TNT_PATH%\BIN;%DEFPATH%%VC32_CD_PATH%
+
+REM If you set the following to a 1, a TNT DosStyle app will be created.
+REM Otherwise a TNT NtStyle app will be created. NtStyle apps will *only*
+REM run under real DOS when using our libraries, since we require access
+REM to functions that the Win32 API does not support (such as direct access
+REM to video memory, calling Int 10h BIOS functions etc). DosStyle apps
+REM will however run fine in both DOS and a Win95 DOS box (NT DOS boxes don't
+REM work too well).
+REM
+REM If you are using the RealTime DOS extender, your apps *must* be NtStyle,
+REM and hence will never be able to run under Win95 or WinNT, only DOS.
+
+SET DOSSTYLE=
+
+echo Visual C++ 4.2 32-bit DOS compilation environment set up (TNT).
diff --git a/board/MAI/bios_emulator/scitech/bin/vc40-w16.bat b/board/MAI/bios_emulator/scitech/bin/vc40-w16.bat
new file mode 100644
index 00000000000..2849a20e756
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/bin/vc40-w16.bat
@@ -0,0 +1,26 @@
+@echo off
+REM Setup environment variables for Visual C++ 1.52c 16 bit edition
+
+if .%CHECKED%==.1 goto checked_build
+set LIB=%SCITECH_LIB%\LIB\RELEASE\WIN16\VC4;%VC_PATH%\LIB;.
+echo Release build enabled.
+goto setvars
+
+:checked_build
+set LIB=%SCITECH_LIB%\LIB\DEBUG\WIN16\VC4;%VC_PATH%\LIB;.
+echo Checked debug build enabled.
+goto setvars
+
+:setvars
+set TOOLROOTDIR=%VC_PATH%
+set INCLUDE=.;INCLUDE;%SCITECH%\INCLUDE;%PRIVATE%\INCLUDE;%VC_PATH%\INCLUDE;
+set INIT=%VC_PATH%
+SET MAKESTARTUP=%SCITECH%\MAKEDEFS\VC16.MK
+SET USE_WIN16=1
+SET USE_WIN32=
+SET VC_LIBBASE=VC4
+SET USE_RTTARGET=
+SET USE_SNAP=
+PATH %SCITECH_BIN%;%VC_PATH%\BIN;%DEFPATH%%VC_CD_PATH%
+
+echo Visual C++ 1.52c 16 bit Windows compilation environment set up.
diff --git a/board/MAI/bios_emulator/scitech/bin/vc40-w32.bat b/board/MAI/bios_emulator/scitech/bin/vc40-w32.bat
new file mode 100644
index 00000000000..d93a6246e35
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/bin/vc40-w32.bat
@@ -0,0 +1,37 @@
+@echo off
+REM Setup environment variables for Visual C++ 4.2 32 bit edition
+
+if .%CHECKED%==.1 goto checked_build
+set LIB=%SCITECH_LIB%\LIB\RELEASE\WIN32\VC4;%VC4_PATH%\LIB;%TNT_PATH%\LIB;.
+echo Release build enabled.
+goto setvars
+
+:checked_build
+set LIB=%SCITECH_LIB%\LIB\DEBUG\WIN32\VC4;%VC4_PATH%\LIB;%TNT_PATH%\LIB;.
+echo Checked debug build enabled.
+goto setvars
+
+:setvars
+set TOOLROOTDIR=%VC4_PATH%
+set C_INCLUDE=%VC4_PATH%\INCLUDE;%TNT_PATH%\INCLUDE;
+set INCLUDE=.;INCLUDE;%SCITECH%\INCLUDE;%PRIVATE%\INCLUDE;%C_INCLUDE%
+set INIT=%VC4_PATH%
+SET MAKESTARTUP=%SCITECH%\MAKEDEFS\VC32.MK
+SET USE_TNT=
+SET USE_WIN16=
+SET USE_WIN32=1
+SET WIN32_GUI=1
+SET USE_VXD=
+SET USE_NTDRV=
+SET USE_RTTARGET=
+SET USE_SNAP=
+SET VC_LIBBASE=VC4
+PATH %SCITECH_BIN%;%VC4_PATH%\BIN;%TNT_PATH%\BIN;%DEFPATH%%VC32_CD_PATH%
+
+REM: Enable Win32 SDK if desired (sdk on command line)
+if NOT .%1%==.sdk goto done
+call win32sdk.bat
+
+:done
+echo Visual C++ 4.2 32 bit Windows compilation environment set up
+
diff --git a/board/MAI/bios_emulator/scitech/bin/vc40-x11.bat b/board/MAI/bios_emulator/scitech/bin/vc40-x11.bat
new file mode 100644
index 00000000000..a420a54eabc
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/bin/vc40-x11.bat
@@ -0,0 +1,20 @@
+@echo off
+REM Setup environment variables for Visual C++ 4.2 32 bit edition
+
+SET LIB=%VC4_PATH%\LIB;.
+SET TOOLROOTDIR=%VC4_PATH%
+SET INCLUDE=\xc\include;%VC4_PATH%\INCLUDE
+SET INIT=%VC4_PATH%
+SET MAKESTARTUP=%SCITECH%\MAKEDEFS\VC32.MK
+SET USE_TNT=
+SET USE_WIN16=
+SET USE_WIN32=1
+SET WIN32_GUI=1
+SET USE_VXD=
+SET USE_NTDRV=
+SET USE_RTTARGET=
+SET USE_SNAP=
+SET VC_LIBBASE=VC4
+PATH %SCITECH_BIN%;%VC4_PATH%\BIN;%DEFPATH%
+
+echo Visual C++ 4.2 X11 compilation environment set up
diff --git a/board/MAI/bios_emulator/scitech/bin/vc50-c32.bat b/board/MAI/bios_emulator/scitech/bin/vc50-c32.bat
new file mode 100644
index 00000000000..62d27b9bc7f
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/bin/vc50-c32.bat
@@ -0,0 +1,39 @@
+@echo off
+REM Setup environment variables for Visual C++ 5.0 32 bit edition
+
+SET MSDevDir=%VC5_MSDevDir%
+SET MSVCDir=%VC5_MSVCDir%
+
+if .%CHECKED%==.1 goto checked_build
+set LIB=%SCITECH_LIB%\LIB\RELEASE\WIN32\VC5;%MSVCDir%\LIB;%TNT_PATH%\LIB;.
+echo Release build enabled.
+goto setvars
+
+:checked_build
+set LIB=%SCITECH_LIB%\LIB\DEBUG\WIN32\VC5;%MSVCDir%\LIB;%TNT_PATH%\LIB;.
+echo Checked debug build enabled.
+goto setvars
+
+:setvars
+set TOOLROOTDIR=%MSVCDir%
+set C_INCLUDE=%MSVCDir%\INCLUDE;%TNT_PATH%\INCLUDE;
+set INCLUDE=.;INCLUDE;%SCITECH%\INCLUDE;%PRIVATE%\INCLUDE;%C_INCLUDE%
+set INIT=%MSVCDir%
+SET MAKESTARTUP=%SCITECH%\MAKEDEFS\VC32.MK
+SET USE_TNT=
+SET USE_WIN16=
+SET USE_WIN32=1
+SET WIN32_GUI=
+SET USE_VXD=
+SET USE_NTDRV=
+SET USE_RTTARGET=
+SET USE_SNAP=
+SET VC_LIBBASE=vc5
+PATH %SCITECH_BIN%;%MSVCDir%\BIN;%MSDevDir%\BIN;%TNT_PATH%\BIN;%DEFPATH%%VC32_CD_PATH%
+
+REM: Enable Win32 SDK if desired (sdk on command line)
+if NOT .%1%==.sdk goto done
+call win32sdk.bat
+
+:done
+echo Visual C++ 5.0 32-bit Windows console compilation environment set up
diff --git a/board/MAI/bios_emulator/scitech/bin/vc50-d16.bat b/board/MAI/bios_emulator/scitech/bin/vc50-d16.bat
new file mode 100644
index 00000000000..c789c5037d1
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/bin/vc50-d16.bat
@@ -0,0 +1,26 @@
+@echo off
+REM Setup environment variables for Visual C++ 1.52c 16 bit edition
+
+if .%CHECKED%==.1 goto checked_build
+set LIB=%SCITECH_LIB%\LIB\RELEASE\DOS16\VC5;%VC_PATH%\LIB;.
+echo Release build enabled.
+goto setvars
+
+:checked_build
+set LIB=%SCITECH_LIB%\LIB\DEBUG\DOS16\VC5;%VC_PATH%\LIB;.
+echo Checked debug build enabled.
+goto setvars
+
+:setvars
+set TOOLROOTDIR=%VC_PATH%
+set INCLUDE=.;INCLUDE;%SCITECH%\INCLUDE;%PRIVATE%\INCLUDE;%VC_PATH%\INCLUDE;
+set INIT=%VC_PATH%
+SET MAKESTARTUP=%SCITECH%\MAKEDEFS\VC16.MK
+SET USE_WIN16=
+SET USE_WIN32=
+SET USE_RTTARGET=
+SET USE_SNAP=
+SET VC_LIBBASE=vc5
+PATH %SCITECH_BIN%;%VC_PATH%\BIN;%DEFPATH%%VC_CD_PATH%
+
+echo Visual C++ 1.52c 16-bit DOS compilation environment set up.
diff --git a/board/MAI/bios_emulator/scitech/bin/vc50-drv9x.bat b/board/MAI/bios_emulator/scitech/bin/vc50-drv9x.bat
new file mode 100644
index 00000000000..27a4a1439f5
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/bin/vc50-drv9x.bat
@@ -0,0 +1,21 @@
+@echo off
+REM Setup environment variables for Visual C++ 6.0 32 bit edition
+
+REM: First setup for Win32 console development
+call vc60-c32.bat > NUL
+
+REM: Extra stuff to set up for Windows 9x DDK development
+set MASTER_MAKE=1
+set DDKROOT=%W95_DDKROOT%
+set SDKROOT=%MSSDK%
+set C16_ROOT=%VC_PATH%
+set C32_ROOT=%VC6_PATH%
+
+if .%CHECKED%==.1 goto checked_build
+echo Release build enabled.
+goto done
+:checked_build
+echo Checked debug build enabled.
+goto done
+:done
+echo Visual C++ 6.0 Windows 9x driver compilation environment set up
diff --git a/board/MAI/bios_emulator/scitech/bin/vc50-drvnt.bat b/board/MAI/bios_emulator/scitech/bin/vc50-drvnt.bat
new file mode 100644
index 00000000000..17b2f25cc7d
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/bin/vc50-drvnt.bat
@@ -0,0 +1,17 @@
+@echo off
+REM Setup environment variables for Visual C++ 6.0 32 bit edition
+
+REM: First setup for Win32 console development (with Platform SDK)
+call vc60-c32.bat sdk > NUL
+
+REM: Now setup stuff for the NT DDK build environment
+call ntddk.bat
+
+if .%CHECKED%==.1 goto checked_build
+echo Release build enabled.
+goto done
+:checked_build
+echo Checked debug build enabled.
+goto done
+:done
+echo Visual C++ 6.0 Windows NT driver compilation environment set up
diff --git a/board/MAI/bios_emulator/scitech/bin/vc50-rtt.bat b/board/MAI/bios_emulator/scitech/bin/vc50-rtt.bat
new file mode 100644
index 00000000000..afb2fb186a0
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/bin/vc50-rtt.bat
@@ -0,0 +1,30 @@
+@echo off
+REM Setup environment variables for Visual C++ 5.0 32 bit edition
+
+if .%CHECKED%==.1 goto checked_build
+set LIB=%SCITECH_LIB%\LIB\RELEASE\WIN32\VC5;%VC5_PATH%\VC\LIB;%TNT_PATH%\LIB;.
+echo Release build enabled.
+goto setvars
+
+:checked_build
+set LIB=%SCITECH_LIB%\LIB\DEBUG\WIN32\VC5;%VC5_PATH%\VC\LIB;%TNT_PATH%\LIB;.
+echo Checked debug build enabled.
+goto setvars
+
+:setvars
+set TOOLROOTDIR=%VC5_PATH%\VC
+set INCLUDE=.;INCLUDE;%SCITECH%\INCLUDE;%PRIVATE%\INCLUDE;%VC5_PATH%\VC\INCLUDE;%TNT_PATH%\INCLUDE;
+set INIT=%VC5_PATH%\VC
+SET MAKESTARTUP=%SCITECH%\MAKEDEFS\VC32.MK
+SET USE_TNT=
+SET USE_WIN16=
+SET USE_WIN32=
+SET WIN32_GUI=
+SET USE_VXD=
+SET USE_NTDRV=
+SET USE_RTTARGET=1
+SET USE_SNAP=
+SET VC_LIBBASE=vc5
+PATH %SCITECH_BIN%;%VC5_PATH%\VC\BIN;%VC5_PATH%\SHAREDIDE\BIN;%TNT_PATH%\BIN;%DEFPATH%%VC32_CD_PATH%
+
+echo Visual C++ 5.0 RTTarget-32 compilation environment set up
diff --git a/board/MAI/bios_emulator/scitech/bin/vc50-snp.bat b/board/MAI/bios_emulator/scitech/bin/vc50-snp.bat
new file mode 100644
index 00000000000..22d2e13c260
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/bin/vc50-snp.bat
@@ -0,0 +1,33 @@
+@echo off REM Setup environment variables for Visual C++ 5.0 32 bit
+edition
+
+SET MSDevDir=%VC5_MSDevDir%
+SET MSVCDir=%VC5_MSVCDir%
+
+if .%CHECKED%==.1 goto checked_build
+set LIB=%SCITECH_LIB%\LIB\RELEASE\SNAP\VC5;%MSVCDir%\LIB;%TNT_PATH%\LIB;.
+echo Release build enabled.
+goto setvars
+
+:checked_build
+set LIB=%SCITECH_LIB%\LIB\DEBUG\SNAP\VC5;%MSVCDir%\LIB;%TNT_PATH%\LIB;.
+echo Checked debug build enabled.
+goto setvars
+
+:setvars
+set TOOLROOTDIR=%MSVCDir%
+set INCLUDE=.;INCLUDE;%SCITECH%\INCLUDE;%PRIVATE%\INCLUDE
+set INIT=%MSVCDir%
+SET MAKESTARTUP=%SCITECH%\MAKEDEFS\VC32.MK
+SET USE_TNT=
+SET USE_WIN16=
+SET USE_WIN32=
+SET WIN32_GUI=
+SET USE_VXD=
+SET USE_NTDRV=
+SET USE_RTTARGET=
+SET USE_SNAP=1
+SET VC_LIBBASE=vc5
+PATH %SCITECH_BIN%;%MSVCDir%\BIN;%MSDevDir%\BIN;%TNT_PATH%\BIN;%DEFPATH%%VC32_CD_PATH%
+
+echo Visual C++ 5.0 Snap compilation environment set up
diff --git a/board/MAI/bios_emulator/scitech/bin/vc50-tnt.bat b/board/MAI/bios_emulator/scitech/bin/vc50-tnt.bat
new file mode 100644
index 00000000000..6b09199054c
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/bin/vc50-tnt.bat
@@ -0,0 +1,42 @@
+@echo off
+REM Setup environment variables for Visual C++ 5.0 32 bit edition
+
+if .%CHECKED%==.1 goto checked_build
+set LIB=%SCITECH_LIB%\LIB\RELEASE\DOS32\VC5;%VC5_PATH%\VC\LIB;%TNT_PATH%\COFFLIB;.
+echo Release build enabled.
+goto setvars
+
+:checked_build
+set LIB=%SCITECH_LIB%\LIB\RELEASE\DOS32\VC5;%VC5_PATH%\VC\LIB;%TNT_PATH%\COFFLIB;.
+echo Checked debug build enabled.
+goto setvars
+
+:setvars
+set TOOLROOTDIR=%VC5_PATH%\VC
+set INCLUDE=.;INCLUDE;%SCITECH%\INCLUDE;%PRIVATE%\INCLUDE;%VC5_PATH%\VC\INCLUDE;%TNT_PATH%\INCLUDE;
+set INIT=%VC5_PATH%\VC
+SET MAKESTARTUP=%SCITECH%\MAKEDEFS\VC32.MK
+SET USE_WIN16=
+SET USE_WIN32=
+SET USE_TNT=
+SET USE_VXD=
+SET USE_NTDRV=
+SET USE_RTTARGET=
+SET USE_SNAP=
+SET VC_LIBBASE=vc5
+PATH %SCITECH_BIN%;%VC5_PATH%\VC\BIN;%VC5_PATH%\SHAREDIDE\BIN;%TNT_PATH%\BIN;%DEFPATH%%VC32_CD_PATH%
+
+REM If you set the following to a 1, a TNT DosStyle app will be created.
+REM Otherwise a TNT NtStyle app will be created. NtStyle apps will *only*
+REM run under real DOS when using our libraries, since we require access
+REM to functions that the Win32 API does not support (such as direct access
+REM to video memory, calling Int 10h BIOS functions etc). DosStyle apps
+REM will however run fine in both DOS and a Win95 DOS box (NT DOS boxes don't
+REM work too well).
+REM
+REM If you are using the RealTime DOS extender, your apps *must* be NtStyle,
+REM and hence will never be able to run under Win95 or WinNT, only DOS.
+
+SET DOSSTYLE=
+
+echo Visual C++ 5.0 32-bit compilation environment set up (with TNT).
diff --git a/board/MAI/bios_emulator/scitech/bin/vc50-w16.bat b/board/MAI/bios_emulator/scitech/bin/vc50-w16.bat
new file mode 100644
index 00000000000..52ab495a3b1
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/bin/vc50-w16.bat
@@ -0,0 +1,27 @@
+@echo off
+REM Setup environment variables for Visual C++ 1.52c 16 bit edition
+
+if .%CHECKED%==.1 goto checked_build
+set LIB=%SCITECH_LIB%\LIB\RELEASE\WIN16\VC5;%VC_PATH%\LIB;.
+echo Release build enabled.
+goto setvars
+
+:checked_build
+set LIB=%SCITECH_LIB%\LIB\DEBUG\WIN16\VC5;%VC_PATH%\LIB;.
+echo Checked debug build enabled.
+goto setvars
+
+:setvars
+set TOOLROOTDIR=%VC_PATH%
+set INCLUDE=.;INCLUDE;%SCITECH%\INCLUDE;%PRIVATE%\INCLUDE;%VC_PATH%\INCLUDE;
+set INIT=%VC_PATH%
+SET MAKESTARTUP=%SCITECH%\MAKEDEFS\VC16.MK
+SET USE_WIN16=1
+SET USE_WIN32=
+SET USE_RTTARGET=
+SET USE_SNAP=
+SET VC_LIBBASE=vc5
+PATH %SCITECH_BIN%;%VC_PATH%\BIN;%DEFPATH%%VC_CD_PATH%
+
+echo Visual C++ 1.52c 16-bit Windows compilation environment set up.
+
diff --git a/board/MAI/bios_emulator/scitech/bin/vc50-w32.bat b/board/MAI/bios_emulator/scitech/bin/vc50-w32.bat
new file mode 100644
index 00000000000..07bc5e51df9
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/bin/vc50-w32.bat
@@ -0,0 +1,39 @@
+@echo off
+REM Setup environment variables for Visual C++ 5.0 32 bit edition
+
+SET MSDevDir=%VC5_MSDevDir%
+SET MSVCDir=%VC5_MSVCDir%
+
+if .%CHECKED%==.1 goto checked_build
+set LIB=%SCITECH_LIB%\LIB\RELEASE\WIN32\VC5;%MSVCDir%\LIB;%TNT_PATH%\LIB;.
+echo Release build enabled.
+goto setvars
+
+:checked_build
+set LIB=%SCITECH_LIB%\LIB\DEBUG\WIN32\VC5;%MSVCDir%\LIB;%TNT_PATH%\LIB;.
+echo Checked debug build enabled.
+goto setvars
+
+:setvars
+set TOOLROOTDIR=%MSVCDir%
+set C_INCLUDE=%MSVCDir%\INCLUDE;%TNT_PATH%\INCLUDE;
+set INCLUDE=.;INCLUDE;%SCITECH%\INCLUDE;%PRIVATE%\INCLUDE;%C_INCLUDE%
+set INIT=%MSVCDir%
+SET MAKESTARTUP=%SCITECH%\MAKEDEFS\VC32.MK
+SET USE_TNT=
+SET USE_WIN16=
+SET USE_WIN32=1
+SET WIN32_GUI=1
+SET USE_VXD=
+SET USE_NTDRV=
+SET USE_RTTARGET=
+SET USE_SNAP=
+SET VC_LIBBASE=vc5
+PATH %SCITECH_BIN%;%MSVCDir%\BIN;%MSDevDir%\BIN;%TNT_PATH%\BIN;%DEFPATH%%VC32_CD_PATH%
+
+REM: Enable Win32 SDK if desired (sdk on command line)
+if NOT .%1%==.sdk goto done
+call win32sdk.bat
+
+:done
+echo Visual C++ 5.0 32-bit Windows console compilation environment set up
diff --git a/board/MAI/bios_emulator/scitech/bin/vc50-x11.bat b/board/MAI/bios_emulator/scitech/bin/vc50-x11.bat
new file mode 100644
index 00000000000..fe286bd95d8
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/bin/vc50-x11.bat
@@ -0,0 +1,20 @@
+@echo off
+REM Setup environment variables for Visual C++ 5.0 32 bit edition
+
+SET LIB=%VC5_PATH%\VC\LIB;.
+SET TOOLROOTDIR=%VC5_PATH%\VC
+SET INCLUDE=\xc\include;%VC5_PATH%\VC\INCLUDE
+SET INIT=%VC5_PATH%\VC
+SET MAKESTARTUP=%SCITECH%\MAKEDEFS\VC32.MK
+SET USE_TNT=
+SET USE_WIN16=
+SET USE_WIN32=1
+SET WIN32_GUI=1
+SET USE_VXD=
+SET USE_NTDRV=
+SET USE_RTTARGET=
+SET USE_SNAP=
+SET VC_LIBBASE=vc5
+PATH %SCITECH_BIN%;%VC5_PATH%\VC\BIN;%VC5_PATH%\SHAREDIDE\BIN;%DEFPATH%
+
+echo Visual C++ 5.0 X11 compilation environment set up
diff --git a/board/MAI/bios_emulator/scitech/bin/vc60-c32.bat b/board/MAI/bios_emulator/scitech/bin/vc60-c32.bat
new file mode 100644
index 00000000000..e98417d6135
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/bin/vc60-c32.bat
@@ -0,0 +1,39 @@
+@echo off
+REM Setup environment variables for Visual C++ 6.0 32 bit edition
+
+SET MSDevDir=%VC6_MSDevDir%
+SET MSVCDir=%VC6_MSVCDir%
+
+if .%CHECKED%==.1 goto checked_build
+set LIB=%SCITECH_LIB%\LIB\RELEASE\WIN32\VC6;%MSVCDir%\LIB;%TNT_PATH%\LIB;.
+echo Release build enabled.
+goto setvars
+
+:checked_build
+set LIB=%SCITECH_LIB%\LIB\DEBUG\WIN32\VC6;%MSVCDir%\LIB;%TNT_PATH%\LIB;.
+echo Checked debug build enabled.
+goto setvars
+
+:setvars
+set TOOLROOTDIR=%MSVCDir%
+set C_INCLUDE=%MSVCDir%\INCLUDE;%TNT_PATH%\INCLUDE
+set INCLUDE=.;INCLUDE;%SCITECH%\INCLUDE;%PRIVATE%\INCLUDE;%C_INCLUDE%
+set INIT=%MSVCDir%
+SET MAKESTARTUP=%SCITECH%\MAKEDEFS\VC32.MK
+SET USE_TNT=
+SET USE_WIN16=
+SET USE_WIN32=1
+SET WIN32_GUI=
+SET USE_VXD=
+SET USE_NTDRV=
+SET USE_RTTARGET=
+SET USE_SNAP=
+SET VC_LIBBASE=vc6
+PATH %SCITECH_BIN%;%MSVCDir%\BIN;%MSDevDir%\BIN;%TNT_PATH%\BIN;%DEFPATH%%VC32_CD_PATH%
+
+REM: Enable Win32 SDK if desired (sdk on command line)
+if NOT .%1%==.sdk goto done
+call win32sdk.bat
+
+:done
+echo Visual C++ 6.0 32-bit Windows console compilation environment set up
diff --git a/board/MAI/bios_emulator/scitech/bin/vc60-d16.bat b/board/MAI/bios_emulator/scitech/bin/vc60-d16.bat
new file mode 100644
index 00000000000..10855e06cb9
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/bin/vc60-d16.bat
@@ -0,0 +1,26 @@
+@echo off
+REM Setup environment variables for Visual C++ 1.52c 16 bit edition
+
+if .%CHECKED%==.1 goto checked_build
+set LIB=%SCITECH_LIB%\LIB\RELEASE\DOS16\VC6;%VC_PATH%\LIB;.
+echo Release build enabled.
+goto setvars
+
+:checked_build
+set LIB=%SCITECH_LIB%\LIB\DEBUG\DOS16\VC6;%VC_PATH%\LIB;.
+echo Checked debug build enabled.
+goto setvars
+
+:setvars
+set TOOLROOTDIR=%VC_PATH%
+set INCLUDE=.;INCLUDE;%SCITECH%\INCLUDE;%PRIVATE%\INCLUDE;%VC_PATH%\INCLUDE;
+set INIT=%VC_PATH%
+SET MAKESTARTUP=%SCITECH%\MAKEDEFS\VC16.MK
+SET USE_WIN16=
+SET USE_WIN32=
+SET USE_RTTARGET=
+SET USE_SNAP=
+SET VC_LIBBASE=vc6
+PATH %SCITECH_BIN%;%VC_PATH%\BIN;%DEFPATH%%VC_CD_PATH%
+
+echo Visual C++ 1.52c 16-bit DOS compilation environment set up.
diff --git a/board/MAI/bios_emulator/scitech/bin/vc60-drv9x.bat b/board/MAI/bios_emulator/scitech/bin/vc60-drv9x.bat
new file mode 100644
index 00000000000..27a4a1439f5
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/bin/vc60-drv9x.bat
@@ -0,0 +1,21 @@
+@echo off
+REM Setup environment variables for Visual C++ 6.0 32 bit edition
+
+REM: First setup for Win32 console development
+call vc60-c32.bat > NUL
+
+REM: Extra stuff to set up for Windows 9x DDK development
+set MASTER_MAKE=1
+set DDKROOT=%W95_DDKROOT%
+set SDKROOT=%MSSDK%
+set C16_ROOT=%VC_PATH%
+set C32_ROOT=%VC6_PATH%
+
+if .%CHECKED%==.1 goto checked_build
+echo Release build enabled.
+goto done
+:checked_build
+echo Checked debug build enabled.
+goto done
+:done
+echo Visual C++ 6.0 Windows 9x driver compilation environment set up
diff --git a/board/MAI/bios_emulator/scitech/bin/vc60-drvnt.bat b/board/MAI/bios_emulator/scitech/bin/vc60-drvnt.bat
new file mode 100644
index 00000000000..17b2f25cc7d
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/bin/vc60-drvnt.bat
@@ -0,0 +1,17 @@
+@echo off
+REM Setup environment variables for Visual C++ 6.0 32 bit edition
+
+REM: First setup for Win32 console development (with Platform SDK)
+call vc60-c32.bat sdk > NUL
+
+REM: Now setup stuff for the NT DDK build environment
+call ntddk.bat
+
+if .%CHECKED%==.1 goto checked_build
+echo Release build enabled.
+goto done
+:checked_build
+echo Checked debug build enabled.
+goto done
+:done
+echo Visual C++ 6.0 Windows NT driver compilation environment set up
diff --git a/board/MAI/bios_emulator/scitech/bin/vc60-drvw2k.bat b/board/MAI/bios_emulator/scitech/bin/vc60-drvw2k.bat
new file mode 100644
index 00000000000..f3042932707
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/bin/vc60-drvw2k.bat
@@ -0,0 +1,17 @@
+@echo off
+REM Setup environment variables for Visual C++ 6.0 32 bit edition
+
+REM: First setup for Win32 console development (with Platform SDK)
+call vc60-c32.bat sdk > NUL
+
+REM: Now setup stuff for the NT DDK build environment
+call w2kddk.bat
+
+if .%CHECKED%==.1 goto checked_build
+echo Release build enabled.
+goto done
+:checked_build
+echo Checked debug build enabled.
+goto done
+:done
+echo Visual C++ 6.0 Windows Windows 2000 driver compilation environment set up
diff --git a/board/MAI/bios_emulator/scitech/bin/vc60-snp.bat b/board/MAI/bios_emulator/scitech/bin/vc60-snp.bat
new file mode 100644
index 00000000000..5348ef95216
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/bin/vc60-snp.bat
@@ -0,0 +1,33 @@
+@echo off
+REM Setup environment variables for Visual C++ 6.0 32 bit edition
+
+SET MSDevDir=%VC6_MSDevDir%
+SET MSVCDir=%VC6_MSVCDir%
+
+if .%CHECKED%==.1 goto checked_build
+set LIB=%SCITECH_LIB%\LIB\RELEASE\SNAP\VC6;%MSVCDir%\LIB;%TNT_PATH%\LIB;.
+echo Release build enabled.
+goto setvars
+
+:checked_build
+set LIB=%SCITECH_LIB%\LIB\DEBUG\SNAP\VC6;%MSVCDir%\LIB;%TNT_PATH%\LIB;.
+echo Checked debug build enabled.
+goto setvars
+
+:setvars
+set TOOLROOTDIR=%MSVCDir%
+set INCLUDE=.;INCLUDE;%SCITECH%\INCLUDE;%PRIVATE%\INCLUDE
+set INIT=%MSVCDir%
+SET MAKESTARTUP=%SCITECH%\MAKEDEFS\VC32.MK
+SET USE_TNT=
+SET USE_WIN16=
+SET USE_WIN32=
+SET WIN32_GUI=
+SET USE_VXD=
+SET USE_NTDRV=
+SET USE_RTTARGET=
+SET USE_SNAP=1
+SET VC_LIBBASE=vc6
+PATH %SCITECH_BIN%;%MSVCDir%\BIN;%MSDevDir%\BIN;%TNT_PATH%\BIN;%DEFPATH%%VC32_CD_PATH%
+
+echo Visual C++ 6.0 Snap compilation environment set up
diff --git a/board/MAI/bios_emulator/scitech/bin/vc60-tnt.bat b/board/MAI/bios_emulator/scitech/bin/vc60-tnt.bat
new file mode 100644
index 00000000000..1d8b5e30384
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/bin/vc60-tnt.bat
@@ -0,0 +1,42 @@
+@echo off
+REM Setup environment variables for Visual C++ 6.0 32 bit edition
+
+if .%CHECKED%==.1 goto checked_build
+set LIB=%SCITECH_LIB%\LIB\RELEASE\DOS32\VC6;%VC6_PATH%\VC98\LIB;%TNT_PATH%\COFFLIB;.
+echo Release build enabled.
+goto setvars
+
+:checked_build
+set LIB=%SCITECH_LIB%\LIB\RELEASE\DOS32\VC6;%VC6_PATH%\VC98\LIB;%TNT_PATH%\COFFLIB;.
+echo Checked debug build enabled.
+goto setvars
+
+:setvars
+set TOOLROOTDIR=%VC6_PATH%\VC98
+set INCLUDE=.;INCLUDE;%SCITECH%\INCLUDE;%PRIVATE%\INCLUDE;%VC6_PATH%\VC98\INCLUDE;%TNT_PATH%\INCLUDE;
+set INIT=%VC6_PATH%\VC98
+SET MAKESTARTUP=%SCITECH%\MAKEDEFS\VC32.MK
+SET USE_WIN16=
+SET USE_WIN32=
+SET USE_TNT=
+SET USE_VXD=
+SET USE_NTDRV=
+SET USE_RTTARGET=
+SET USE_SNAP=
+SET VC_LIBBASE=vc6 PATH
+%SCITECH_BIN%;%VC6_PATH%\VC98\BIN;%VC6_PATH%\COMMON\MSDEV98\BIN;%TNT_PATH%\BIN;%DEFPATH%%VC32_CD_PATH%
+
+REM If you set the following to a 1, a TNT DosStyle app will be created.
+REM Otherwise a TNT NtStyle app will be created. NtStyle apps will *only*
+REM run under real DOS when using our libraries, since we require access
+REM to functions that the Win32 API does not support (such as direct access
+REM to video memory, calling Int 10h BIOS functions etc). DosStyle apps
+REM will however run fine in both DOS and a Win95 DOS box (NT DOS boxes don't
+REM work too well).
+REM
+REM If you are using the RealTime DOS extender, your apps *must* be NtStyle,
+REM and hence will never be able to run under Win95 or WinNT, only DOS.
+
+SET DOSSTYLE=
+
+echo Visual C++ 6.0 32-bit compilation environment set up (with TNT).
diff --git a/board/MAI/bios_emulator/scitech/bin/vc60-w16.bat b/board/MAI/bios_emulator/scitech/bin/vc60-w16.bat
new file mode 100644
index 00000000000..70175c37abd
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/bin/vc60-w16.bat
@@ -0,0 +1,27 @@
+@echo off
+REM Setup environment variables for Visual C++ 1.52c 16 bit edition
+
+if .%CHECKED%==.1 goto checked_build
+set LIB=%SCITECH_LIB%\LIB\RELEASE\WIN16\VC6;%VC_PATH%\LIB;.
+echo Release build enabled.
+goto setvars
+
+:checked_build
+set LIB=%SCITECH_LIB%\LIB\DEBUG\WIN16\VC6;%VC_PATH%\LIB;.
+echo Checked debug build enabled.
+goto setvars
+
+:setvars
+set TOOLROOTDIR=%VC_PATH%
+set INCLUDE=.;INCLUDE;%SCITECH%\INCLUDE;%PRIVATE%\INCLUDE;%VC_PATH%\INCLUDE;
+set INIT=%VC_PATH%
+SET MAKESTARTUP=%SCITECH%\MAKEDEFS\VC16.MK
+SET USE_WIN16=1
+SET USE_WIN32=
+SET USE_RTTARGET=
+SET USE_SNAP=
+SET VC_LIBBASE=vc6
+PATH %SCITECH_BIN%;%VC_PATH%\BIN;%DEFPATH%%VC_CD_PATH%
+
+echo Visual C++ 1.52c 16-bit Windows compilation environment set up.
+
diff --git a/board/MAI/bios_emulator/scitech/bin/vc60-w32.bat b/board/MAI/bios_emulator/scitech/bin/vc60-w32.bat
new file mode 100644
index 00000000000..2f8e7ab9b8a
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/bin/vc60-w32.bat
@@ -0,0 +1,39 @@
+@echo off
+REM Setup environment variables for Visual C++ 6.0 32 bit edition
+
+SET MSDevDir=%VC6_MSDevDir%
+SET MSVCDir=%VC6_MSVCDir%
+
+if .%CHECKED%==.1 goto checked_build
+set LIB=%SCITECH_LIB%\LIB\RELEASE\WIN32\VC6;%MSVCDir%\LIB;%TNT_PATH%\LIB;.
+echo Release build enabled.
+goto setvars
+
+:checked_build
+set LIB=%SCITECH_LIB%\LIB\DEBUG\WIN32\VC6;%MSVCDir%\LIB;%TNT_PATH%\LIB;.
+echo Checked debug build enabled.
+goto setvars
+
+:setvars
+set TOOLROOTDIR=%MSVCDir%
+set C_INCLUDE=%MSVCDir%\INCLUDE;%TNT_PATH%\INCLUDE
+set INCLUDE=.;INCLUDE;%SCITECH%\INCLUDE;%PRIVATE%\INCLUDE;%C_INCLUDE%
+set INIT=%MSVCDir%
+SET MAKESTARTUP=%SCITECH%\MAKEDEFS\VC32.MK
+SET USE_TNT=
+SET USE_WIN16=
+SET USE_WIN32=1
+SET WIN32_GUI=1
+SET USE_VXD=
+SET USE_NTDRV=
+SET USE_RTTARGET=
+SET USE_SNAP=
+SET VC_LIBBASE=vc6
+PATH %SCITECH_BIN%;%MSVCDir%\BIN;%MSDevDir%\BIN;%TNT_PATH%\BIN;%DEFPATH%%VC32_CD_PATH%
+
+REM: Enable Win32 SDK if desired (sdk on command line)
+if NOT .%1%==.sdk goto done
+call win32sdk.bat
+
+:done
+echo Visual C++ 6.0 32-bit Windows compilation environment set up
diff --git a/board/MAI/bios_emulator/scitech/bin/vc60-x11.bat b/board/MAI/bios_emulator/scitech/bin/vc60-x11.bat
new file mode 100644
index 00000000000..57b23d2048b
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/bin/vc60-x11.bat
@@ -0,0 +1,20 @@
+@echo off
+REM Setup environment variables for Visual C++ 6.0 32 bit edition
+
+SET LIB=%VC6_PATH%\VC98\LIB;.
+SET TOOLROOTDIR=%VC6_PATH%\VC98
+SET INCLUDE=\xc\include;%VC6_PATH%\VC98\INCLUDE;
+SET INIT=%VC6_PATH%\VC98
+SET MAKESTARTUP=%SCITECH%\MAKEDEFS\VC32.MK
+SET USE_TNT=
+SET USE_WIN16=
+SET USE_WIN32=1
+SET WIN32_GUI=1
+SET USE_VXD=
+SET USE_NTDRV=
+SET USE_RTTARGET=
+SET USE_SNAP=
+SET VC_LIBBASE=vc6
+PATH %SCITECH_BIN%;%VC6_PATH%\VC98\BIN;%VC6_PATH%\COMMON\MSDEV98\BIN;%DEFPATH%
+
+echo Visual C++ 6.0 X11 compilation environment set up
diff --git a/board/MAI/bios_emulator/scitech/bin/w2kddk.bat b/board/MAI/bios_emulator/scitech/bin/w2kddk.bat
new file mode 100644
index 00000000000..92858d162eb
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/bin/w2kddk.bat
@@ -0,0 +1,42 @@
+@echo off
+REM: Set up environment variables for Microsoft Windows NT DDK development.
+REM: Note that we have hard coded this for Windows NT i386 development.
+
+SET USE_NTDRV=1
+SET USE_W2KDRV=1
+SET BASEDIR=%W2K_DDKROOT%
+SET PATH=%BASEDIR%\bin;%PATH%
+SET NTMAKEENV=%BASEDIR%\inc
+SET BUILD_MAKE_PROGRAM=nmake.exe
+SET BUILD_DEFAULT=-ei -nmake -i
+SET BUILD_DEFAULT_TARGETS=-386
+SET _OBJ_DIR=obj
+SET NEW_CRTS=1
+SET _NTROOT=%BASEDIR%
+SET INCLUDE=%BASEDIR%\inc;%BASEDIR%\inc\ddk;%INCLUDE%
+
+if .%CHECKED%==.1 goto checked
+
+REM: set up an NT free build environment
+SET DDKBUILDENV=free
+SET C_DEFINES=-D_IDWBUILD
+SET NTDBGFILES=1
+SET NTDEBUG=
+SET NTDEBUGTYPE=
+SET MSC_OPTIMIZATION=
+set LIB=%BASEDIR%\libfre\i386;%SCITECH_LIB%\LIB\RELEASE\W2KDRV\VC6;%MSVCDir%\LIB;.
+
+goto done
+
+:checked
+
+REM: set up an NT checked build environment
+SET DDKBUILDENV=checked
+SET C_DEFINES=-D_IDWBUILD -DRDRDBG -DSRVDBG
+SET NTDBGFILES=
+SET NTDEBUG=ntsd
+SET NTDEBUGTYPE=both
+SET MSC_OPTIMIZATION=/Od /Oi
+set LIB=%BASEDIR%\libchk\i386;%SCITECH_LIB%\LIB\DEBUG\W2KDRV\VC6;%MSVCDir%\LIB;.
+
+:done
diff --git a/board/MAI/bios_emulator/scitech/bin/wc10-c32.bat b/board/MAI/bios_emulator/scitech/bin/wc10-c32.bat
new file mode 100644
index 00000000000..2d738f376f1
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/bin/wc10-c32.bat
@@ -0,0 +1,34 @@
+@echo off
+REM Setup for compiling with Watcom C/C++ 10.6 in 32 bit mode
+
+if .%CHECKED%==.1 goto checked_build
+SET LIB=%SCITECH_LIB%\LIB\RELEASE\WIN32\WC10;%WC10_PATH%\LIB386;%WC10_PATH%\LIB386\NT;.
+echo Release build enabled.
+goto setvars
+
+:checked_build
+SET LIB=%SCITECH_LIB%\LIB\DEBUG\WIN32\WC10;%WC10_PATH%\LIB386;%WC10_PATH%\LIB386\NT;.
+echo Checked debug build enabled.
+goto setvars
+
+:setvars
+SET EDPATH=%WC10_PATH%\EDDAT
+SET INCLUDE=INCLUDE;%SCITECH%\INCLUDE;%PRIVATE%\INCLUDE;%WC10_PATH%\H;%WC10_PATH%\H\NT;
+SET WATCOM=%WC10_PATH%
+SET MAKESTARTUP=%SCITECH%\MAKEDEFS\WC32.MK
+SET USE_TNT=
+SET USE_X32=
+SET USE_X32VM=
+SET USE_WIN16=
+SET USE_WIN32=1
+SET USE_WIN386=
+SET WIN32_GUI=
+SET USE_OS216=
+SET USE_OS232=
+SET USE_OS2GUI=
+SET USE_SNAP=
+SET USE_QNX4=
+SET WC_LIBBASE=WC10
+PATH %SCITECH_BIN%;%WC10_PATH%\BINNT;%WC10_PATH%\BINW;%DEFPATH%%WC_CD_PATH%
+
+echo Watcom C/C++ 10.6 Win32 console compilation environment set up
diff --git a/board/MAI/bios_emulator/scitech/bin/wc10-d16.bat b/board/MAI/bios_emulator/scitech/bin/wc10-d16.bat
new file mode 100644
index 00000000000..5c53a90a174
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/bin/wc10-d16.bat
@@ -0,0 +1,30 @@
+@echo off
+REM Setup for compiling with Watcom C/C++ 10.6 in 32 bit mode (DOS4GW)
+
+if .%CHECKED%==.1 goto checked_build
+SET LIB=%SCITECH_LIB%\LIB\RELEASE\DOS16\WC10;.
+echo Release build enabled.
+goto setvars
+
+:checked_build
+SET LIB=%SCITECH_LIB%\LIB\DEBUG\DOS16\WC10;.
+echo Checked debug build enabled.
+goto setvars
+
+:setvars
+SET EDPATH=%WC10_PATH%\EDDAT
+SET INCLUDE=INCLUDE;%SCITECH%\INCLUDE;%PRIVATE%\INCLUDE;%WC10_PATH%\H;%WC10_PATH%\H\WIN;
+SET WATCOM=%WC10_PATH%
+SET MAKESTARTUP=%SCITECH%\MAKEDEFS\WC16.MK
+SET USE_WIN16=
+SET USE_WIN32=
+SET USE_OS216=
+SET USE_OS232=
+SET USE_OS2GUI=
+SET USE_SNAP=
+SET USE_QNX4=
+SET WC_LIBBASE=WC10
+SET EDPATH=%WC10_PATH%\EDDAT
+PATH %SCITECH_BIN%;%WC10_PATH%\BINNT;%WC10_PATH%\BINW;%DEFPATH%%WC_CD_PATH%
+
+echo Watcom C/C++ 10.6 16-bit DOS compilation environment set up.
diff --git a/board/MAI/bios_emulator/scitech/bin/wc10-d32.bat b/board/MAI/bios_emulator/scitech/bin/wc10-d32.bat
new file mode 100644
index 00000000000..a5c72105265
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/bin/wc10-d32.bat
@@ -0,0 +1,34 @@
+@echo off
+REM Setup for compiling with Watcom C/C++ 10.6 in 32 bit mode (DOS4GW)
+
+if .%CHECKED%==.1 goto checked_build
+SET LIB=%SCITECH_LIB%\LIB\RELEASE\DOS32\WC10;%WC10_PATH%\LIB386;%WC10_PATH%\LIB386\DOS;.
+echo Release build enabled.
+goto setvars
+
+:checked_build
+SET LIB=%SCITECH_LIB%\LIB\DEBUG\DOS32\WC10;%WC10_PATH%\LIB386;%WC10_PATH%\LIB386\DOS;.
+echo Checked debug build enabled.
+goto setvars
+
+:setvars
+SET EDPATH=%WC10_PATH%\EDDAT
+SET INCLUDE=INCLUDE;%SCITECH%\INCLUDE;%PRIVATE%\INCLUDE;%WC10_PATH%\H;
+SET WATCOM=%WC10_PATH%
+SET MAKESTARTUP=%SCITECH%\MAKEDEFS\WC32.MK
+SET USE_TNT=
+SET USE_X32=
+SET USE_X32VM=
+SET USE_WIN16=
+SET USE_WIN32=
+SET USE_WIN386=
+SET USE_OS216=
+SET USE_OS232=
+SET USE_OS2GUI=
+SET USE_SNAP=
+SET USE_QNX4=
+SET WC_LIBBASE=WC10
+PATH %SCITECH_BIN%;%WC10_PATH%\BINNT;%WC10_PATH%\BINW;%DJ_PATH%\BIN;%DEFPATH%%WC_CD_PATH%
+
+echo Watcom C/C++ 10.6 32-bit DOS compilation environment set up (DOS4GW)
+
diff --git a/board/MAI/bios_emulator/scitech/bin/wc10-o16.bat b/board/MAI/bios_emulator/scitech/bin/wc10-o16.bat
new file mode 100644
index 00000000000..579dece3b0a
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/bin/wc10-o16.bat
@@ -0,0 +1,31 @@
+@echo off
+REM Setup for compiling with Watcom C/C++ 10.6 in 16-bit OS/2 mode
+
+if .%CHECKED%==.1 goto checked_build
+SET LIB=%SCITECH_LIB%\lib\release\os216\wc10;.
+echo Release build enabled.
+goto setvars
+
+:checked_build
+SET LIB=%SCITECH_LIB%\lib\debug\os216\wc10;.
+echo Checked debug build enabled.
+goto setvars
+
+:setvars
+SET EDPATH=%WC10_PATH%\eddat
+SET INCLUDE=include;%SCITECH%\include;%PRIVATE%\include;%WC10_PATH%\h\os2;%WC10_PATH%\h
+SET WATCOM=%WC10_PATH%
+SET MAKESTARTUP=%SCITECH%\makedefs\wc16.mk
+SET USE_WIN16=
+SET USE_WIN32=
+SET USE_WIN386=
+SET USE_OS216=1
+SET USE_OS232=
+SET USE_OS2GUI=
+SET USE_SNAP=
+SET USE_QNX4=
+SET WC_LIBBASE=wc10
+SET EDPATH=%WC10_PATH%\EDDAT
+PATH %SCITECH_BIN%;%WC10_PATH%\BINNT;%WC10_PATH%\BINW;%DEFPATH%%WC_CD_PATH%
+
+echo Watcom C/C++ 10.6 16-bit OS/2 compilation environment set up.
diff --git a/board/MAI/bios_emulator/scitech/bin/wc10-o32.bat b/board/MAI/bios_emulator/scitech/bin/wc10-o32.bat
new file mode 100644
index 00000000000..3404b42a01b
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/bin/wc10-o32.bat
@@ -0,0 +1,31 @@
+@echo off
+REM Setup for compiling with Watcom C/C++ 10.6 in 32-bit OS/2 mode
+
+if .%CHECKED%==.1 goto checked_build
+SET LIB=%SCITECH_LIB%\lib\release\os232\wc10;.
+echo Release build enabled.
+goto setvars
+
+:checked_build
+SET LIB=%SCITECH_LIB%\lib\debug\os232\wc10;.
+echo Checked debug build enabled.
+goto setvars
+
+:setvars
+SET EDPATH=%WC10_PATH%\eddat
+SET INCLUDE=include;%SCITECH%\include;%PRIVATE%\include;%WC10_PATH%\h\os2;%WC10_PATH%\h
+SET WATCOM=%WC10_PATH%
+SET MAKESTARTUP=%SCITECH%\makedefs\wc32.mk
+SET USE_WIN16=
+SET USE_WIN32=
+SET USE_WIN386=
+SET USE_OS216=
+SET USE_OS232=1
+SET USE_OS2GUI=
+SET USE_SNAP=
+SET USE_QNX4=
+SET WC_LIBBASE=wc10
+SET EDPATH=%WC10_PATH%\EDDAT
+PATH %SCITECH_BIN%;%WC10_PATH%\BINNT;%WC10_PATH%\BINW;%DEFPATH%%WC_CD_PATH%
+
+echo Watcom C/C++ 10.6 32-bit OS/2 console compilation environment set up.
diff --git a/board/MAI/bios_emulator/scitech/bin/wc10-p32.bat b/board/MAI/bios_emulator/scitech/bin/wc10-p32.bat
new file mode 100644
index 00000000000..57057de361d
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/bin/wc10-p32.bat
@@ -0,0 +1,31 @@
+@echo off
+REM Setup for compiling with Watcom C/C++ 10.6 in 32-bit OS/2 mode
+
+if .%CHECKED%==.1 goto checked_build
+SET LIB=%SCITECH_LIB%\lib\release\os232\wc10;.
+echo Release build enabled.
+goto setvars
+
+:checked_build
+SET LIB=%SCITECH_LIB%\lib\debug\os232\wc10;.
+echo Checked debug build enabled.
+goto setvars
+
+:setvars
+SET EDPATH=%WC10_PATH%\eddat
+SET INCLUDE=include;%SCITECH%\include;%PRIVATE%\include;%WC10_PATH%\h\os2;%WC10_PATH%\h
+SET WATCOM=%WC10_PATH%
+SET MAKESTARTUP=%SCITECH%\makedefs\wc32.mk
+SET USE_WIN16=
+SET USE_WIN32=
+SET USE_WIN386=
+SET USE_OS216=
+SET USE_OS232=1
+SET USE_OS2GUI=1
+SET USE_SNAP=
+SET USE_QNX4=
+SET WC_LIBBASE=wc10
+SET EDPATH=%WC10_PATH%\EDDAT
+PATH %SCITECH_BIN%;%WC10_PATH%\BINNT;%WC10_PATH%\BINW;%DEFPATH%%WC_CD_PATH%
+
+echo Watcom C/C++ 10.6 32-bit OS/2 GUI compilation environment set up.
diff --git a/board/MAI/bios_emulator/scitech/bin/wc10-qnx.bat b/board/MAI/bios_emulator/scitech/bin/wc10-qnx.bat
new file mode 100644
index 00000000000..46f8659ce67
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/bin/wc10-qnx.bat
@@ -0,0 +1,34 @@
+@echo off
+REM Setup for compiling with Watcom C/C++ 10.6 in 32 bit mode (QNX 4)
+
+if .%CHECKED%==.1 goto checked_build
+SET LIB=%SCITECH_LIB%\LIB\RELEASE\QNX4\WC10;%WC10_PATH%\LIB386;%WC10_PATH%\LIB386\QNX;.
+echo Release build enabled.
+goto setvars
+
+:checked_build
+SET LIB=%SCITECH_LIB%\LIB\DEBUG\QNX4\WC10;%WC10_PATH%\LIB386;%WC10_PATH%\LIB386\QNX;.
+echo Checked debug build enabled.
+goto setvars
+
+:setvars
+SET EDPATH=%WC10_PATH%\EDDAT
+SET INCLUDE=INCLUDE;%SCITECH%\INCLUDE;%PRIVATE%\INCLUDE;%WC10_PATH%\QH;
+SET WATCOM=%WC10_PATH%
+SET MAKESTARTUP=%SCITECH%\MAKEDEFS\WC32.MK
+SET USE_TNT=
+SET USE_X32=
+SET USE_X32VM=
+SET USE_WIN16=
+SET USE_WIN32=
+SET USE_WIN386=
+SET USE_OS216=
+SET USE_OS232=
+SET USE_OS2GUI=
+SET USE_SNAP=
+SET USE_QNX4=1
+SET WC_LIBBASE=WC10
+PATH %SCITECH_BIN%;%WC10_PATH%\BINNT;%WC10_PATH%\BINW;%DJ_PATH%\BIN;%DEFPATH%%WC_CD_PATH%
+
+echo Watcom C/C++ 10.6 32-bit QNX compilation environment set up
+
diff --git a/board/MAI/bios_emulator/scitech/bin/wc10-snp.bat b/board/MAI/bios_emulator/scitech/bin/wc10-snp.bat
new file mode 100644
index 00000000000..1fde624f1f6
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/bin/wc10-snp.bat
@@ -0,0 +1,34 @@
+@echo off
+REM Setup for compiling with Watcom C/C++ 10.6 in 32 bit mode
+
+if .%CHECKED%==.1 goto checked_build
+SET LIB=%SCITECH_LIB%\LIB\RELEASE\SNAP\WC10;%WC10_PATH%\LIB386;%WC10_PATH%\LIB386\NT;.
+echo Release build enabled.
+goto setvars
+
+:checked_build
+SET LIB=%SCITECH_LIB%\LIB\DEBUG\SNAP\WC10;%WC10_PATH%\LIB386;%WC10_PATH%\LIB386\NT;.
+echo Checked debug build enabled.
+goto setvars
+
+:setvars
+SET EDPATH=%WC10_PATH%\EDDAT
+SET INCLUDE=INCLUDE;%SCITECH%\INCLUDE;%PRIVATE%\INCLUDE;%WC10_PATH%\H
+SET WATCOM=%WC10_PATH%
+SET MAKESTARTUP=%SCITECH%\MAKEDEFS\WC32.MK
+SET USE_TNT=
+SET USE_X32=
+SET USE_X32VM=
+SET USE_WIN16=
+SET USE_WIN32=
+SET USE_WIN386=
+SET WIN32_GUI=
+SET USE_OS216=
+SET USE_OS232=
+SET USE_OS2GUI=
+SET USE_SNAP=1
+SET USE_QNX4=
+SET WC_LIBBASE=WC10
+PATH %SCITECH_BIN%;%WC10_PATH%\BINNT;%WC10_PATH%\BINW;%DEFPATH%%WC_CD_PATH%
+
+echo Watcom C/C++ 10.6 Snap compilation environment set up
diff --git a/board/MAI/bios_emulator/scitech/bin/wc10-tnt.bat b/board/MAI/bios_emulator/scitech/bin/wc10-tnt.bat
new file mode 100644
index 00000000000..d12f042fa15
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/bin/wc10-tnt.bat
@@ -0,0 +1,46 @@
+@echo off
+REM Setup for compiling with Watcom C/C++ 10.6 in 32 bit mode with Phar Lap TNT
+
+if .%CHECKED%==.1 goto checked_build
+SET LIB=%SCITECH_LIB%\LIB\RELEASE\DOS32\WC10;%WC10_PATH%\LIB386;%WC10_PATH%\LIB386\DOS;%TNT_PATH%\LIB;.
+echo Release build enabled.
+goto setvars
+
+:checked_build
+SET LIB=%SCITECH_LIB%\LIB\DEBUG\DOS32\WC10;%WC10_PATH%\LIB386;%WC10_PATH%\LIB386\DOS;%TNT_PATH%\LIB;.
+echo Checked debug build enabled.
+goto setvars
+
+:setvars
+SET EDPATH=%WC10_PATH%\EDDAT
+SET INCLUDE=INCLUDE;%SCITECH%\INCLUDE;%PRIVATE%\INCLUDE;%WC10_PATH%\H;%WC10_PATH%\H\NT;%TNT_PATH%\INCLUDE
+SET WATCOM=%WC10_PATH%
+SET MAKESTARTUP=%SCITECH%\MAKEDEFS\WC32.MK
+SET USE_TNT=1
+SET USE_X32=
+SET USE_X32VM=
+SET USE_WIN16=
+SET USE_WIN32=
+SET USE_WIN386=
+SET USE_OS216=
+SET USE_OS232=
+SET USE_OS2GUI=
+SET USE_SNAP=
+SET USE_QNX4=
+SET WC_LIBBASE=WC10
+PATH %SCITECH_BIN%;%WC10_PATH%\BINNT;%WC10_PATH%\BINW;%DEFPATH%%WC_CD_PATH%
+
+REM If you set the following to a 1, a TNT DosStyle app will be created.
+REM Otherwise a TNT NtStyle app will be created. NtStyle apps will *only*
+REM run under real DOS when using our libraries, since we require access
+REM to functions that the Win32 API does not support (such as direct access
+REM to video memory, calling Int 10h BIOS functions etc). DosStyle apps
+REM will however run fine in both DOS and a Win95 DOS box (NT DOS boxes don't
+REM work too well).
+REM
+REM If you are using the RealTime DOS extender, your apps *must* be NtStyle,
+REM and hence will never be able to run under Win95 or WinNT, only DOS.
+
+SET DOSSTYLE=1
+
+echo Watcom C/C++ 10.6 32-bit DOS compilation environment set up (TNT).
diff --git a/board/MAI/bios_emulator/scitech/bin/wc10-w16.bat b/board/MAI/bios_emulator/scitech/bin/wc10-w16.bat
new file mode 100644
index 00000000000..e8ba871bb93
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/bin/wc10-w16.bat
@@ -0,0 +1,32 @@
+@echo off
+REM Setup for compiling with Watcom C/C++ 10.6 in 16 bit Windows mode
+
+if .%CHECKED%==.1 goto checked_build
+SET LIB=%SCITECH_LIB%\LIB\RELEASE\WIN16\WC10;.
+echo Release build enabled.
+goto setvars
+
+:checked_build
+SET LIB=%SCITECH_LIB%\LIB\DEBUG\WIN16\WC10;.
+echo Checked debug build enabled.
+goto setvars
+
+:setvars
+SET EDPATH=%WC10_PATH%\EDDAT
+SET INCLUDE=INCLUDE;%SCITECH%\INCLUDE;%PRIVATE%\INCLUDE;%WC10_PATH%\H;%WC10_PATH%\H\WIN;
+SET WATCOM=%WC10_PATH%
+SET MAKESTARTUP=%SCITECH%\MAKEDEFS\WC16.MK
+SET USE_WIN16=1
+SET USE_WIN32=
+SET USE_WIN386=
+SET USE_OS216=
+SET USE_OS232=
+SET USE_OS2GUI=
+SET USE_SNAP=
+SET USE_QNX4=
+SET WC_LIBBASE=WC10
+SET EDPATH=%WC10_PATH%\EDDAT
+PATH %SCITECH_BIN%;%WC10_PATH%\BINNT;%WC10_PATH%\BINW;%DEFPATH%%WC_CD_PATH%
+
+echo Watcom C/C++ 10.6 16-bit Windows compilation environment set up.
+
diff --git a/board/MAI/bios_emulator/scitech/bin/wc10-w32.bat b/board/MAI/bios_emulator/scitech/bin/wc10-w32.bat
new file mode 100644
index 00000000000..839bdde9c00
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/bin/wc10-w32.bat
@@ -0,0 +1,34 @@
+@echo off
+REM Setup for compiling with Watcom C/C++ 10.6 in 32 bit mode
+
+if .%CHECKED%==.1 goto checked_build
+SET LIB=%SCITECH_LIB%\LIB\RELEASE\WIN32\WC10;%WC10_PATH%\LIB386;%WC10_PATH%\LIB386\NT;.
+echo Release build enabled.
+goto setvars
+
+:checked_build
+SET LIB=%SCITECH_LIB%\LIB\DEBUG\WIN32\WC10;%WC10_PATH%\LIB386;%WC10_PATH%\LIB386\NT;.
+echo Checked debug build enabled.
+goto setvars
+
+:setvars
+SET EDPATH=%WC10_PATH%\EDDAT
+SET INCLUDE=INCLUDE;%SCITECH%\INCLUDE;%PRIVATE%\INCLUDE;%WC10_PATH%\H;%WC10_PATH%\H\NT;
+SET WATCOM=%WC10_PATH%
+SET MAKESTARTUP=%SCITECH%\MAKEDEFS\WC32.MK
+SET USE_TNT=
+SET USE_X32=
+SET USE_X32VM=
+SET USE_WIN16=
+SET USE_WIN32=1
+SET USE_WIN386=
+SET WIN32_GUI=1
+SET USE_OS216=
+SET USE_OS232=
+SET USE_OS2GUI=
+SET USE_SNAP=
+SET USE_QNX4=
+SET WC_LIBBASE=WC10
+PATH %SCITECH_BIN%;%WC10_PATH%\BINNT;%WC10_PATH%\BINW;%DEFPATH%%WC_CD_PATH%
+
+echo Watcom C/C++ 10.6 Win32 GUI compilation environment set up
diff --git a/board/MAI/bios_emulator/scitech/bin/wc10-x11.bat b/board/MAI/bios_emulator/scitech/bin/wc10-x11.bat
new file mode 100644
index 00000000000..fc783d81437
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/bin/wc10-x11.bat
@@ -0,0 +1,24 @@
+@echo off
+REM Setup for compiling with Watcom C/C++ 10.6 in 32 bit mode
+
+SET LIB=%WC10_PATH%\LIB386;%WC10_PATH%\LIB386\NT;.
+SET EDPATH=%WC10_PATH%\EDDAT
+SET INCLUDE=%WC10_PATH%\H;%WC10_PATH%\H\NT;
+SET WATCOM=%WC10_PATH%
+SET MAKESTARTUP=%SCITECH%\MAKEDEFS\WC32.MK
+SET USE_TNT=
+SET USE_X32=
+SET USE_X32VM=
+SET USE_WIN16=
+SET USE_WIN32=1
+SET USE_WIN386=
+SET WIN32_GUI=1
+SET USE_OS216=
+SET USE_OS232=
+SET USE_OS2GUI=
+SET USE_SNAP=
+SET USE_QNX4=
+SET WC_LIBBASE=WC10
+PATH %SCITECH_BIN%;%WC10_PATH%\BINNT;%WC10_PATH%\BINW;%DEFPATH%%WC_CD_PATH%
+
+echo Watcom C/C++ 10.6 X11 compilation environment set up
diff --git a/board/MAI/bios_emulator/scitech/bin/wc10ac32.bat b/board/MAI/bios_emulator/scitech/bin/wc10ac32.bat
new file mode 100644
index 00000000000..6e0c24d5e7b
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/bin/wc10ac32.bat
@@ -0,0 +1,33 @@
+@echo off
+REM Setup for compiling with Watcom C/C++ 10.0a in 32 bit mode
+
+if .%CHECKED%==.1 goto checked_build
+SET LIB=%SCITECH_LIB%\LIB\RELEASE\WIN32\WC10A;%WC10A_PATH%\LIB386;%WC10A_PATH%\LIB386\NT;.
+echo Release build enabled.
+goto setvars
+
+:checked_build
+SET LIB=%SCITECH_LIB%\LIB\DEBUG\WIN32\WC10A;%WC10A_PATH%\LIB386;%WC10A_PATH%\LIB386\NT;.
+echo Checked debug build enabled.
+goto setvars
+
+:setvars
+SET EDPATH=%WC10A_PATH%\EDDAT
+SET INCLUDE=INCLUDE;%SCITECH%\INCLUDE;%PRIVATE%\INCLUDE;%WC10A_PATH%\H;%WC10A_PATH%\H\NT;
+SET WATCOM=%WC10A_PATH%
+SET MAKESTARTUP=%SCITECH%\MAKEDEFS\WC32.MK
+SET USE_TNT=
+SET USE_X32=
+SET USE_X32VM=
+SET USE_WIN16=
+SET USE_WIN32=1
+SET USE_WIN386=
+SET WIN32_GUI=
+SET USE_OS216=
+SET USE_OS232=
+SET USE_OS2GUI=
+SET USE_SNAP=
+SET WC_LIBBASE=WC10A
+PATH %SCITECH_BIN%;%WC10A_PATH%\BINNT;%WC10A_PATH%\BINB;%DEFPATH%%WC_CD_PATH%
+
+echo Watcom C/C++ 10.0a Win32 console compilation environment set up
diff --git a/board/MAI/bios_emulator/scitech/bin/wc10ad16.bat b/board/MAI/bios_emulator/scitech/bin/wc10ad16.bat
new file mode 100644
index 00000000000..f9ecb672734
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/bin/wc10ad16.bat
@@ -0,0 +1,29 @@
+@echo off
+REM Setup for compiling with Watcom C/C++ 10.0a in 32 bit mode (DOS4GW)
+
+if .%CHECKED%==.1 goto checked_build
+SET LIB=%SCITECH_LIB%\LIB\RELEASE\DOS16\WC10A;.
+echo Release build enabled.
+goto setvars
+
+:checked_build
+SET LIB=%SCITECH_LIB%\LIB\DEBUG\DOS16\WC10A;.
+echo Checked debug build enabled.
+goto setvars
+
+:setvars
+SET EDPATH=%WC10A_PATH%\EDDAT
+SET INCLUDE=INCLUDE;%SCITECH%\INCLUDE;%PRIVATE%\INCLUDE;%WC10A_PATH%\H;%WC10A_PATH%\H\WIN;
+SET WATCOM=%WC10A_PATH%
+SET MAKESTARTUP=%SCITECH%\MAKEDEFS\WC16.MK
+SET USE_WIN16=
+SET USE_WIN32=
+SET USE_OS216=
+SET USE_OS232=
+SET USE_OS2GUI=
+SET USE_SNAP=
+SET WC_LIBBASE=WC10A
+SET EDPATH=%WC10A_PATH%\EDDAT
+PATH %SCITECH_BIN%;%WC10A_PATH%\BINNT;%WC10A_PATH%\BINB;%DEFPATH%%WC_CD_PATH%
+
+echo Watcom C/C++ 10.0a 16-bit DOS compilation environment set up.
diff --git a/board/MAI/bios_emulator/scitech/bin/wc10ad32.bat b/board/MAI/bios_emulator/scitech/bin/wc10ad32.bat
new file mode 100644
index 00000000000..d52b79a82c0
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/bin/wc10ad32.bat
@@ -0,0 +1,32 @@
+@echo off
+REM Setup for compiling with Watcom C/C++ 10.0a in 32 bit mode (DOS4GW)
+
+if .%CHECKED%==.1 goto checked_build
+SET LIB=%SCITECH_LIB%\LIB\RELEASE\DOS32\WC10A;%WC10A_PATH%\LIB386;%WC10A_PATH%\LIB386\DOS;.
+echo Release build enabled.
+goto setvars
+
+:checked_build
+SET LIB=%SCITECH_LIB%\LIB\DEBUG\DOS32\WC10A;%WC10A_PATH%\LIB386;%WC10A_PATH%\LIB386\DOS;.
+echo Checked debug build enabled.
+goto setvars
+
+:setvars
+SET EDPATH=%WC10A_PATH%\EDDAT
+SET INCLUDE=INCLUDE;%SCITECH%\INCLUDE;%PRIVATE%\INCLUDE;%WC10A_PATH%\H;
+SET WATCOM=%WC10A_PATH%
+SET MAKESTARTUP=%SCITECH%\MAKEDEFS\WC32.MK
+SET USE_TNT=
+SET USE_X32=
+SET USE_X32VM=
+SET USE_WIN16=
+SET USE_WIN32=
+SET USE_WIN386=
+SET USE_OS216=
+SET USE_OS232=
+SET USE_OS2GUI=
+SET USE_SNAP=
+SET WC_LIBBASE=WC10A
+PATH %SCITECH_BIN%;%WC10A_PATH%\BINNT;%WC10A_PATH%\BINB;%DEFPATH%%WC_CD_PATH%
+
+echo Watcom C/C++ 10.0a 32-bit DOS compilation environment set up (DOS4GW)
diff --git a/board/MAI/bios_emulator/scitech/bin/wc10ao16.bat b/board/MAI/bios_emulator/scitech/bin/wc10ao16.bat
new file mode 100644
index 00000000000..ba7351d0d86
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/bin/wc10ao16.bat
@@ -0,0 +1,30 @@
+@echo off
+REM Setup for compiling with Watcom C/C++ 10.0a in 16-bit OS/2 mode
+
+if .%CHECKED%==.1 goto checked_build
+SET LIB=%SCITECH_LIB%\lib\release\os216\wc10;.
+echo Release build enabled.
+goto setvars
+
+:checked_build
+SET LIB=%SCITECH_LIB%\lib\debug\os216\wc10;.
+echo Checked debug build enabled.
+goto setvars
+
+:setvars
+SET EDPATH=%WC10A_PATH%\eddat
+SET INCLUDE=include;%SCITECH%\include;%PRIVATE%\include;%WC10A_PATH%\h\os2;%WC10A_PATH%\h
+SET WATCOM=%WC10A_PATH%
+SET MAKESTARTUP=%SCITECH%\makedefs\wc16.mk
+SET USE_WIN16=
+SET USE_WIN32=
+SET USE_WIN386=
+SET USE_OS216=1
+SET USE_OS232=
+SET USE_OS2GUI=
+SET USE_SNAP=
+SET WC_LIBBASE=wc10
+SET EDPATH=%WC10A_PATH%\EDDAT
+PATH %SCITECH_BIN%;%WC10A_PATH%\BINNT;%WC10A_PATH%\BINB;%DEFPATH%%WC_CD_PATH%
+
+echo Watcom C/C++ 10.0a 16-bit OS/2 compilation environment set up.
diff --git a/board/MAI/bios_emulator/scitech/bin/wc10ao32.bat b/board/MAI/bios_emulator/scitech/bin/wc10ao32.bat
new file mode 100644
index 00000000000..f3caa595917
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/bin/wc10ao32.bat
@@ -0,0 +1,30 @@
+@echo off
+REM Setup for compiling with Watcom C/C++ 10.0a in 32-bit OS/2 mode
+
+if .%CHECKED%==.1 goto checked_build
+SET LIB=%SCITECH_LIB%\lib\release\os232\wc10;.
+echo Release build enabled.
+goto setvars
+
+:checked_build
+SET LIB=%SCITECH_LIB%\lib\debug\os232\wc10;.
+echo Checked debug build enabled.
+goto setvars
+
+:setvars
+SET EDPATH=%WC10AA_PATH%\eddat
+SET INCLUDE=include;%SCITECH%\include;%PRIVATE%\include;%WC10AA_PATH%\h\os2;%WC10AA_PATH%\h
+SET WATCOM=%WC10AA_PATH%
+SET MAKESTARTUP=%SCITECH%\makedefs\wc32.mk
+SET USE_WIN16=
+SET USE_WIN32=
+SET USE_WIN386=
+SET USE_OS216=
+SET USE_OS232=1
+SET USE_OS2GUI=
+SET USE_SNAP=
+SET WC_LIBBASE=WC10A
+SET EDPATH=%WC10AA_PATH%\EDDAT
+PATH %SCITECH_BIN%;%WC10AA_PATH%\BINNT;%WC10AA6_PATH%\BINB;%DEFPATH%%WC_CD_PATH%
+
+echo Watcom C/C++ 10.0a 32-bit OS/2 console compilation environment set up.
diff --git a/board/MAI/bios_emulator/scitech/bin/wc10ap32.bat b/board/MAI/bios_emulator/scitech/bin/wc10ap32.bat
new file mode 100644
index 00000000000..8d21c62eac0
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/bin/wc10ap32.bat
@@ -0,0 +1,30 @@
+@echo off
+REM Setup for compiling with Watcom C/C++ 10.0a in 32-bit OS/2 mode
+
+if .%CHECKED%==.1 goto checked_build
+SET LIB=%SCITECH_LIB%\lib\release\os232\wc10;.
+echo Release build enabled.
+goto setvars
+
+:checked_build
+SET LIB=%SCITECH_LIB%\lib\debug\os232\wc10;.
+echo Checked debug build enabled.
+goto setvars
+
+:setvars
+SET EDPATH=%WC10_PATH%\eddat
+SET INCLUDE=include;%SCITECH%\include;%PRIVATE%\include;%WC10_PATH%\h\os2;%WC10_PATH%\h
+SET WATCOM=%WC10_PATH%
+SET MAKESTARTUP=%SCITECH%\makedefs\wc32.mk
+SET USE_WIN16=
+SET USE_WIN32=
+SET USE_WIN386=
+SET USE_OS216=
+SET USE_OS232=1
+SET USE_OS2GUI=1
+SET USE_SNAP=
+SET WC_LIBBASE=WC10A
+SET EDPATH=%WC10_PATH%\EDDAT
+PATH %SCITECH_BIN%;%WC10_PATH%\BINNT;%WC10_PATH%\BINB;%DEFPATH%%WC_CD_PATH%
+
+echo Watcom C/C++ 10.0a 32-bit OS/2 GUI compilation environment set up.
diff --git a/board/MAI/bios_emulator/scitech/bin/wc10asnp.bat b/board/MAI/bios_emulator/scitech/bin/wc10asnp.bat
new file mode 100644
index 00000000000..28f857c80dc
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/bin/wc10asnp.bat
@@ -0,0 +1,33 @@
+@echo off
+REM Setup for compiling with Watcom C/C++ 10.0a in 32 bit mode
+
+if .%CHECKED%==.1 goto checked_build
+SET LIB=%SCITECH_LIB%\LIB\RELEASE\SNAP\WC10A;%WC10A_PATH%\LIB386;%WC10A_PATH%\LIB386\NT;.
+echo Release build enabled.
+goto setvars
+
+:checked_build
+SET LIB=%SCITECH_LIB%\LIB\DEBUG\SNAP\WC10A;%WC10A_PATH%\LIB386;%WC10A_PATH%\LIB386\NT;.
+echo Checked debug build enabled.
+goto setvars
+
+:setvars
+SET EDPATH=%WC10A_PATH%\EDDAT
+SET INCLUDE=INCLUDE;%SCITECH%\INCLUDE;%PRIVATE%\INCLUDE
+SET WATCOM=%WC10A_PATH%
+SET MAKESTARTUP=%SCITECH%\MAKEDEFS\WC32.MK
+SET USE_TNT=
+SET USE_X32=
+SET USE_X32VM=
+SET USE_WIN16=
+SET USE_WIN32=1
+SET USE_WIN386=
+SET WIN32_GUI=
+SET USE_OS216=
+SET USE_OS232=
+SET USE_OS2GUI=
+SET USE_SNAP=1
+SET WC_LIBBASE=WC10A
+PATH %SCITECH_BIN%;%WC10A_PATH%\BINNT;%WC10A_PATH%\BINB;%DEFPATH%%WC_CD_PATH%
+
+echo Watcom C/C++ 10.0a Snap compilation environment set up
diff --git a/board/MAI/bios_emulator/scitech/bin/wc10atnt.bat b/board/MAI/bios_emulator/scitech/bin/wc10atnt.bat
new file mode 100644
index 00000000000..a2b32193e49
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/bin/wc10atnt.bat
@@ -0,0 +1,45 @@
+@echo off
+REM Setup for compiling with Watcom C/C++ 10.0a in 32 bit mode with Phar Lap TNT
+
+if .%CHECKED%==.1 goto checked_build
+SET LIB=%SCITECH_LIB%\LIB\RELEASE\DOS32\WC10A;%WC10A_PATH%\LIB386;%WC10A_PATH%\LIB386\DOS;%TNT_PATH%\LIB;.
+echo Release build enabled.
+goto setvars
+
+:checked_build
+SET LIB=%SCITECH_LIB%\LIB\DEBUG\DOS32\WC10A;%WC10A_PATH%\LIB386;%WC10A_PATH%\LIB386\DOS;%TNT_PATH%\LIB;.
+echo Checked debug build enabled.
+goto setvars
+
+:setvars
+SET EDPATH=%WC10A_PATH%\EDDAT
+SET INCLUDE=INCLUDE;%SCITECH%\INCLUDE;%PRIVATE%\INCLUDE;%WC10A_PATH%\H;%WC10A_PATH%\H\NT;%TNT_PATH%\INCLUDE
+SET WATCOM=%WC10A_PATH%
+SET MAKESTARTUP=%SCITECH%\MAKEDEFS\WC32.MK
+SET USE_TNT=1
+SET USE_X32=
+SET USE_X32VM=
+SET USE_WIN16=
+SET USE_WIN32=
+SET USE_WIN386=
+SET USE_OS216=
+SET USE_OS232=
+SET USE_OS2GUI=
+SET USE_SNAP=
+SET WC_LIBBASE=WC10A
+PATH %SCITECH_BIN%;%WC10A_PATH%\BINNT;%WC10A_PATH%\BINB;%DEFPATH%%WC_CD_PATH%
+
+REM If you set the following to a 1, a TNT DosStyle app will be created.
+REM Otherwise a TNT NtStyle app will be created. NtStyle apps will *only*
+REM run under real DOS when using our libraries, since we require access
+REM to functions that the Win32 API does not support (such as direct access
+REM to video memory, calling Int 10h BIOS functions etc). DosStyle apps
+REM will however run fine in both DOS and a Win95 DOS box (NT DOS boxes don't
+REM work too well).
+REM
+REM If you are using the RealTime DOS extender, your apps *must* be NtStyle,
+REM and hence will never be able to run under Win95 or WinNT, only DOS.
+
+SET DOSSTYLE=1
+
+echo Watcom C/C++ 10.0a 32-bit DOS compilation environment set up (TNT).
diff --git a/board/MAI/bios_emulator/scitech/bin/wc10aw16.bat b/board/MAI/bios_emulator/scitech/bin/wc10aw16.bat
new file mode 100644
index 00000000000..94011cc337c
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/bin/wc10aw16.bat
@@ -0,0 +1,31 @@
+@echo off
+REM Setup for compiling with Watcom C/C++ 10.0a in 16 bit Windows mode
+
+if .%CHECKED%==.1 goto checked_build
+SET LIB=%SCITECH_LIB%\LIB\RELEASE\WIN16\WC10A;.
+echo Release build enabled.
+goto setvars
+
+:checked_build
+SET LIB=%SCITECH_LIB%\LIB\DEBUG\WIN16\WC10A;.
+echo Checked debug build enabled.
+goto setvars
+
+:setvars
+SET EDPATH=%WC10A_PATH%\EDDAT
+SET INCLUDE=INCLUDE;%SCITECH%\INCLUDE;%PRIVATE%\INCLUDE;%WC10A_PATH%\H;%WC10A_PATH%\H\WIN;
+SET WATCOM=%WC10A_PATH%
+SET MAKESTARTUP=%SCITECH%\MAKEDEFS\WC16.MK
+SET USE_WIN16=1
+SET USE_WIN32=
+SET USE_WIN386=
+SET USE_OS216=
+SET USE_OS232=
+SET USE_OS2GUI=
+SET USE_SNAP=
+SET WC_LIBBASE=WC10A
+SET EDPATH=%WC10A_PATH%\EDDAT
+PATH %SCITECH_BIN%;%WC10A_PATH%\BINNT;%WC10A_PATH%\BINB;%DEFPATH%%WC_CD_PATH%
+
+echo Watcom C/C++ 10.0a 16-bit Windows compilation environment set up.
+
diff --git a/board/MAI/bios_emulator/scitech/bin/wc10aw32.bat b/board/MAI/bios_emulator/scitech/bin/wc10aw32.bat
new file mode 100644
index 00000000000..1e14dbc9f24
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/bin/wc10aw32.bat
@@ -0,0 +1,33 @@
+@echo off
+REM Setup for compiling with Watcom C/C++ 10.0a in 32 bit mode
+
+if .%CHECKED%==.1 goto checked_build
+SET LIB=%SCITECH_LIB%\LIB\RELEASE\WIN32\WC10A;%WC10A_PATH%\LIB386;%WC10A_PATH%\LIB386\NT;.
+echo Release build enabled.
+goto setvars
+
+:checked_build
+SET LIB=%SCITECH_LIB%\LIB\DEBUG\WIN32\WC10A;%WC10A_PATH%\LIB386;%WC10A_PATH%\LIB386\NT;.
+echo Checked debug build enabled.
+goto setvars
+
+:setvars
+SET EDPATH=%WC10A_PATH%\EDDAT
+SET INCLUDE=INCLUDE;%SCITECH%\INCLUDE;%PRIVATE%\INCLUDE;%WC10A_PATH%\H;%WC10A_PATH%\H\NT;
+SET WATCOM=%WC10A_PATH%
+SET MAKESTARTUP=%SCITECH%\MAKEDEFS\WC32.MK
+SET USE_TNT=
+SET USE_X32=
+SET USE_X32VM=
+SET USE_WIN16=
+SET USE_WIN32=1
+SET USE_WIN386=
+SET WIN32_GUI=1
+SET USE_OS216=
+SET USE_OS232=
+SET USE_OS2GUI=
+SET USE_SNAP=
+SET WC_LIBBASE=WC10A
+PATH %SCITECH_BIN%;%WC10A_PATH%\BINNT;%WC10A_PATH%\BINB;%DEFPATH%%WC_CD_PATH%
+
+echo Watcom C/C++ 10.0a Win32 GUI compilation environment set up
diff --git a/board/MAI/bios_emulator/scitech/bin/wc11-c32.bat b/board/MAI/bios_emulator/scitech/bin/wc11-c32.bat
new file mode 100644
index 00000000000..e75312927c8
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/bin/wc11-c32.bat
@@ -0,0 +1,40 @@
+@echo off
+REM Setup for compiling with Watcom C/C++ 11.0 in 32 bit mode
+
+if .%CHECKED%==.1 goto checked_build
+SET LIB=%SCITECH_LIB%\LIB\RELEASE\WIN32\WC11;%WC11_PATH%\LIB386;%WC11_PATH%\LIB386\NT;.
+echo Release build enabled.
+goto setvars
+
+:checked_build
+SET LIB=%SCITECH_LIB%\LIB\DEBUG\WIN32\WC11;%WC11_PATH%\LIB386;%WC11_PATH%\LIB386\NT;.
+echo Checked debug build enabled.
+goto setvars
+
+:setvars
+SET EDPATH=%WC11_PATH%\EDDAT
+SET C_INCLUDE=%WC11_PATH%\H;%WC11_PATH%\H\NT
+SET INCLUDE=INCLUDE;%SCITECH%\INCLUDE;%PRIVATE%\INCLUDE;%C_INCLUDE%
+SET WATCOM=%WC11_PATH%
+SET MAKESTARTUP=%SCITECH%\MAKEDEFS\WC32.MK
+SET USE_TNT=
+SET USE_X32=
+SET USE_X32VM=
+SET USE_WIN16=
+SET USE_WIN32=1
+SET USE_WIN386=
+SET WIN32_GUI=
+SET USE_OS216=
+SET USE_OS232=
+SET USE_OS2GUI=
+SET USE_SNAP=
+SET USE_QNX4=
+SET WC_LIBBASE=WC11
+PATH %SCITECH_BIN%;%WC11_PATH%\BINNT;%WC11_PATH%\BINW;%DEFPATH%%WC_CD_PATH%
+
+REM: Enable Win32 SDK if desired (sdk on command line)
+if NOT .%1%==.sdk goto done
+call win32sdk.bat
+
+:done
+echo Watcom C/C++ 11.0 Win32 console compilation environment set up.
diff --git a/board/MAI/bios_emulator/scitech/bin/wc11-d16.bat b/board/MAI/bios_emulator/scitech/bin/wc11-d16.bat
new file mode 100644
index 00000000000..4338adaef9e
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/bin/wc11-d16.bat
@@ -0,0 +1,30 @@
+@echo off
+REM SETup for compiling with Watcom C/C++ 11.0 in 16 bit mode
+
+if .%CHECKED%==.1 goto checked_build
+SET LIB=%SCITECH_LIB%\LIB\RELEASE\DOS16\WC11;.
+echo Release build enabled.
+goto setvars
+
+:checked_build
+SET LIB=%SCITECH_LIB%\LIB\DEBUG\DOS16\WC11;.
+echo Checked debug build enabled.
+goto setvars
+
+:setvars
+SET EDPATH=%WC11_PATH%\EDDAT
+SET INCLUDE=INCLUDE;%SCITECH%\INCLUDE;%PRIVATE%\INCLUDE;%WC11_PATH%\H;%WC11_PATH%\H\WIN;
+SET WATCOM=%WC11_PATH%
+SET MAKESTARTUP=%SCITECH%\MAKEDEFS\WC16.MK
+SET USE_WIN16=
+SET USE_WIN32=
+SET USE_OS216=
+SET USE_OS232=
+SET USE_OS2GUI=
+SET USE_SNAP=
+SET USE_QNX4=
+SET WC_LIBBASE=WC11
+SET EDPATH=%WC11_PATH%\EDDAT
+PATH %SCITECH_BIN%;%WC11_PATH%\BINNT;%WC11_PATH%\BINW;%DEFPATH%%WC_CD_PATH%
+
+echo Watcom C/C++ 11.0 16-bit DOS compilation environment set up.
diff --git a/board/MAI/bios_emulator/scitech/bin/wc11-d32.bat b/board/MAI/bios_emulator/scitech/bin/wc11-d32.bat
new file mode 100644
index 00000000000..e5a54d4bb4b
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/bin/wc11-d32.bat
@@ -0,0 +1,33 @@
+@echo off
+REM Setup for compiling with Watcom C/C++ 11.0 in 32 bit mode (DOS4GW)
+
+if .%CHECKED%==.1 goto checked_build
+SET LIB=%SCITECH_LIB%\LIB\RELEASE\DOS32\WC11;%WC11_PATH%\LIB386;%WC11_PATH%\LIB386\DOS;.
+echo Release build enabled.
+goto setvars
+
+:checked_build
+SET LIB=%SCITECH_LIB%\LIB\DEBUG\DOS32\WC11;%WC11_PATH%\LIB386;%WC11_PATH%\LIB386\DOS;.
+echo Checked debug build enabled.
+goto setvars
+
+:setvars
+SET EDPATH=%WC11_PATH%\EDDAT
+SET INCLUDE=INCLUDE;%SCITECH%\INCLUDE;%PRIVATE%\INCLUDE;%WC11_PATH%\H;
+SET WATCOM=%WC11_PATH%
+SET MAKESTARTUP=%SCITECH%\MAKEDEFS\WC32.MK
+SET USE_TNT=
+SET USE_X32=
+SET USE_X32VM=
+SET USE_WIN16=
+SET USE_WIN32=
+SET USE_WIN386=
+SET USE_OS216=
+SET USE_OS232=
+SET USE_OS2GUI=
+SET USE_SNAP=
+SET USE_QNX4=
+SET WC_LIBBASE=WC11
+PATH %SCITECH_BIN%;%WC11_PATH%\BINNT;%WC11_PATH%\BINW;%DJ_PATH%\BIN;%DEFPATH%%WC_CD_PATH%
+
+echo Watcom C/C++ 11.0 32-bit DOS compilation environment set up (DOS4GW).
diff --git a/board/MAI/bios_emulator/scitech/bin/wc11-o16.bat b/board/MAI/bios_emulator/scitech/bin/wc11-o16.bat
new file mode 100644
index 00000000000..d46754a3c0c
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/bin/wc11-o16.bat
@@ -0,0 +1,31 @@
+@echo off
+REM Setup for compiling with Watcom C/C++ 11.0 in 16-bit OS/2 mode
+
+if .%CHECKED%==.1 goto checked_build
+SET LIB=%SCITECH_LIB%\lib\release\os216\wc11;.
+echo Release build enabled.
+goto setvars
+
+:checked_build
+SET LIB=%SCITECH_LIB%\lib\debug\os216\wc11;.
+echo Checked debug build enabled.
+goto setvars
+
+:setvars
+SET EDPATH=%WC11_PATH%\eddat
+SET INCLUDE=include;%SCITECH%\include;%PRIVATE%\include;%WC11_PATH%\h\os2;%WC11_PATH%\h
+SET WATCOM=%WC11_PATH%
+SET MAKESTARTUP=%SCITECH%\makedefs\wc16.mk
+SET USE_WIN16=
+SET USE_WIN32=
+SET USE_WIN386=
+SET USE_OS216=1
+SET USE_OS232=
+SET USE_OS2GUI=
+SET USE_SNAP=
+SET USE_QNX4=
+SET WC_LIBBASE=wc11
+SET EDPATH=%WC11_PATH%\EDDAT
+PATH %SCITECH_BIN%;%WC11_PATH%\BINNT;%WC11_PATH%\BINW;%DEFPATH%%WC_CD_PATH%
+
+echo Watcom C/C++ 11.0 16-bit OS/2 compilation environment set up.
diff --git a/board/MAI/bios_emulator/scitech/bin/wc11-o32.bat b/board/MAI/bios_emulator/scitech/bin/wc11-o32.bat
new file mode 100644
index 00000000000..37f5dc7617f
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/bin/wc11-o32.bat
@@ -0,0 +1,31 @@
+@echo off
+REM Setup for compiling with Watcom C/C++ 11.0 in 32-bit OS/2 mode
+
+if .%CHECKED%==.1 goto checked_build
+SET LIB=%SCITECH_LIB%\lib\release\os232\wc11;.
+echo Release build enabled.
+goto setvars
+
+:checked_build
+SET LIB=%SCITECH_LIB%\lib\debug\os232\wc11;.
+echo Checked debug build enabled.
+goto setvars
+
+:setvars
+SET EDPATH=%WC11_PATH%\eddat
+SET INCLUDE=include;%SCITECH%\include;%PRIVATE%\include;%WC11_PATH%\h\os2;%WC11_PATH%\h
+SET WATCOM=%WC11_PATH%
+SET MAKESTARTUP=%SCITECH%\makedefs\wc32.mk
+SET USE_WIN16=
+SET USE_WIN32=
+SET USE_WIN386=
+SET USE_OS216=
+SET USE_OS232=1
+SET USE_OS2GUI=
+SET USE_SNAP=
+SET USE_QNX4=
+SET WC_LIBBASE=wc11
+SET EDPATH=%WC11_PATH%\EDDAT
+PATH %SCITECH_BIN%;%WC11_PATH%\BINNT;%WC11_PATH%\BINW;%DEFPATH%%WC_CD_PATH%
+
+echo Watcom C/C++ 11.0 32-bit OS/2 console compilation environment set up.
diff --git a/board/MAI/bios_emulator/scitech/bin/wc11-p32.bat b/board/MAI/bios_emulator/scitech/bin/wc11-p32.bat
new file mode 100644
index 00000000000..348cbbda81d
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/bin/wc11-p32.bat
@@ -0,0 +1,31 @@
+@echo off
+REM Setup for compiling with Watcom C/C++ 11.0 in 32-bit OS/2 mode
+
+if .%CHECKED%==.1 goto checked_build
+SET LIB=%SCITECH_LIB%\lib\release\os232\wc11;.
+echo Release build enabled.
+goto setvars
+
+:checked_build
+SET LIB=%SCITECH_LIB%\lib\debug\os232\wc11;.
+echo Checked debug build enabled.
+goto setvars
+
+:setvars
+SET EDPATH=%WC11_PATH%\eddat
+SET INCLUDE=include;%SCITECH%\include;%PRIVATE%\include;%WC11_PATH%\h\os2;%WC11_PATH%\h
+SET WATCOM=%WC11_PATH%
+SET MAKESTARTUP=%SCITECH%\makedefs\wc32.mk
+SET USE_WIN16=
+SET USE_WIN32=
+SET USE_WIN386=
+SET USE_OS216=
+SET USE_OS232=1
+SET USE_OS2GUI=1
+SET USE_SNAP=
+SET USE_QNX4=
+SET WC_LIBBASE=wc11
+SET EDPATH=%WC11_PATH%\EDDAT
+PATH %SCITECH_BIN%;%WC11_PATH%\BINNT;%WC11_PATH%\BINW;%DEFPATH%%WC_CD_PATH%
+
+echo Watcom C/C++ 11.0 32-bit OS/2 GUI compilation environment set up.
diff --git a/board/MAI/bios_emulator/scitech/bin/wc11-qnx.bat b/board/MAI/bios_emulator/scitech/bin/wc11-qnx.bat
new file mode 100644
index 00000000000..1fd60feea81
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/bin/wc11-qnx.bat
@@ -0,0 +1,34 @@
+@echo off
+REM Setup for compiling with Watcom C/C++ 11.0 in 32 bit mode (QNX 4)
+
+if .%CHECKED%==.1 goto checked_build
+SET LIB=%SCITECH_LIB%\LIB\RELEASE\QNX4\WC11;%WC11_PATH%\LIB386;%WC11_PATH%\LIB386\QNX;.
+echo Release build enabled.
+goto setvars
+
+:checked_build
+SET LIB=%SCITECH_LIB%\LIB\DEBUG\QNX4\WC11;%WC11_PATH%\LIB386;%WC11_PATH%\LIB386\QNX;.
+echo Checked debug build enabled.
+goto setvars
+
+:setvars
+SET EDPATH=%WC11_PATH%\EDDAT
+SET INCLUDE=INCLUDE;%SCITECH%\INCLUDE;%PRIVATE%\INCLUDE;%WC11_PATH%\QH;
+SET WATCOM=%WC11_PATH%
+SET MAKESTARTUP=%SCITECH%\MAKEDEFS\WC32.MK
+SET USE_TNT=
+SET USE_X32=
+SET USE_X32VM=
+SET USE_WIN16=
+SET USE_WIN32=
+SET USE_WIN386=
+SET USE_OS216=
+SET USE_OS232=
+SET USE_OS2GUI=
+SET USE_SNAP=
+SET USE_QNX4=1
+SET WC_LIBBASE=WC11
+PATH %SCITECH_BIN%;%WC11_PATH%\BINNT;%WC11_PATH%\BINW;%DJ_PATH%\BIN;%DEFPATH%%WC_CD_PATH%
+
+echo Watcom C/C++ 11.0 32-bit QNX compilation environment set up
+
diff --git a/board/MAI/bios_emulator/scitech/bin/wc11-snp.bat b/board/MAI/bios_emulator/scitech/bin/wc11-snp.bat
new file mode 100644
index 00000000000..6d2ac5783dd
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/bin/wc11-snp.bat
@@ -0,0 +1,34 @@
+@echo off
+REM Setup for compiling with Watcom C/C++ 11.0 in 32 bit mode
+
+if .%CHECKED%==.1 goto checked_build
+SET LIB=%SCITECH_LIB%\LIB\RELEASE\SNAP\WC11;%WC11_PATH%\LIB386;%WC11_PATH%\LIB386\NT;.
+echo Release build enabled.
+goto setvars
+
+:checked_build
+SET LIB=%SCITECH_LIB%\LIB\DEBUG\SNAP\WC11;%WC11_PATH%\LIB386;%WC11_PATH%\LIB386\NT;.
+echo Checked debug build enabled.
+goto setvars
+
+:setvars
+SET EDPATH=%WC11_PATH%\EDDAT
+SET INCLUDE=INCLUDE;%SCITECH%\INCLUDE;%PRIVATE%\INCLUDE;%WC11_PATH%\H
+SET WATCOM=%WC11_PATH%
+SET MAKESTARTUP=%SCITECH%\MAKEDEFS\WC32.MK
+SET USE_TNT=
+SET USE_X32=
+SET USE_X32VM=
+SET USE_WIN16=
+SET USE_WIN32=
+SET USE_WIN386=
+SET WIN32_GUI=
+SET USE_OS216=
+SET USE_OS232=
+SET USE_OS2GUI=
+SET USE_SNAP=1
+SET USE_QNX4=
+SET WC_LIBBASE=WC11
+PATH %SCITECH_BIN%;%WC11_PATH%\BINNT;%WC11_PATH%\BINW;%DEFPATH%%WC_CD_PATH%
+
+echo Watcom C/C++ 11.0 Snap compilation environment set up.
diff --git a/board/MAI/bios_emulator/scitech/bin/wc11-tnt.bat b/board/MAI/bios_emulator/scitech/bin/wc11-tnt.bat
new file mode 100644
index 00000000000..44dbf24847e
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/bin/wc11-tnt.bat
@@ -0,0 +1,46 @@
+@echo off
+REM Setup for compiling with Watcom C/C++ 11.0 in 32 bit mode with Phar Lap TNT
+
+if .%CHECKED%==.1 goto checked_build
+SET LIB=%SCITECH_LIB%\LIB\RELEASE\DOS32\WC11;%WC11_PATH%\LIB386;%WC11_PATH%\LIB386\DOS;%TNT_PATH%\LIB;.
+echo Release build enabled.
+goto setvars
+
+:checked_build
+SET LIB=%SCITECH_LIB%\LIB\DEBUG\DOS32\WC11;%WC11_PATH%\LIB386;%WC11_PATH%\LIB386\DOS;%TNT_PATH%\LIB;.
+echo Checked debug build enabled.
+goto setvars
+
+:setvars
+SET EDPATH=%WC11_PATH%\EDDAT
+SET INCLUDE=INCLUDE;%SCITECH%\INCLUDE;%PRIVATE%\INCLUDE;%WC11_PATH%\H;%WC11_PATH%\H\NT;%TNT_PATH%\INCLUDE
+SET WATCOM=%WC11_PATH%
+SET MAKESTARTUP=%SCITECH%\MAKEDEFS\WC32.MK
+SET USE_TNT=1
+SET USE_X32=
+SET USE_X32VM=
+SET USE_WIN16=
+SET USE_WIN32=
+SET USE_WIN386=
+SET USE_OS216=
+SET USE_OS232=
+SET USE_OS2GUI=
+SET USE_SNAP=
+SET USE_QNX4=
+SET WC_LIBBASE=WC11
+PATH %SCITECH_BIN%;%WC11_PATH%\BINNT;%WC11_PATH%\BINW;%DEFPATH%%WC_CD_PATH%
+
+REM If you set the following to a 1, a TNT DosStyle app will be created.
+REM Otherwise a TNT NtStyle app will be created. NtStyle apps will *only*
+REM run under real DOS when using our libraries, since we require access
+REM to functions that the Win32 API does not support (such as direct access
+REM to video memory, calling Int 10h BIOS functions etc). DosStyle apps
+REM will however run fine in both DOS and a Win95 DOS box (NT DOS boxes don't
+REM work too well).
+REM
+REM If you are using the RealTime DOS extender, your apps *must* be NtStyle,
+REM and hence will never be able to run under Win95 or WinNT, only DOS.
+
+SET DOSSTYLE=1
+
+echo Watcom C/C++ 11.0 32-bit DOS compilation environment set up (TNT).
diff --git a/board/MAI/bios_emulator/scitech/bin/wc11-w16.bat b/board/MAI/bios_emulator/scitech/bin/wc11-w16.bat
new file mode 100644
index 00000000000..e65c70e1782
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/bin/wc11-w16.bat
@@ -0,0 +1,31 @@
+@echo off
+REM Setup for compiling with Watcom C/C++ 11.0 in 16 bit Windows mode
+
+if .%CHECKED%==.1 goto checked_build
+SET LIB=%SCITECH_LIB%\LIB\RELEASE\WIN16\WC11;.
+echo Release build enabled.
+goto setvars
+
+:checked_build
+SET LIB=%SCITECH_LIB%\LIB\DEBUG\WIN16\WC11;.
+echo Checked debug build enabled.
+goto setvars
+
+:setvars
+SET EDPATH=%WC11_PATH%\EDDAT
+SET INCLUDE=INCLUDE;%SCITECH%\INCLUDE;%PRIVATE%\INCLUDE;%WC11_PATH%\H;%WC11_PATH%\H\WIN;
+SET WATCOM=%WC11_PATH%
+SET MAKESTARTUP=%SCITECH%\MAKEDEFS\WC16.MK
+SET USE_WIN16=1
+SET USE_WIN32=
+SET USE_WIN386=
+SET USE_OS216=
+SET USE_OS232=
+SET USE_OS2GUI=
+SET USE_SNAP=
+SET USE_QNX4=
+SET WC_LIBBASE=WC11
+SET EDPATH=%WC11_PATH%\EDDAT
+PATH %SCITECH_BIN%;%WC11_PATH%\BINNT;%WC11_PATH%\BINW;%DEFPATH%%WC_CD_PATH%
+
+echo Watcom C/C++ 11.0 16-bit Windows compilation environment set up.
diff --git a/board/MAI/bios_emulator/scitech/bin/wc11-w32.bat b/board/MAI/bios_emulator/scitech/bin/wc11-w32.bat
new file mode 100644
index 00000000000..764cdbd111d
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/bin/wc11-w32.bat
@@ -0,0 +1,40 @@
+@echo off
+REM Setup for compiling with Watcom C/C++ 11.0 in 32 bit mode
+
+if .%CHECKED%==.1 goto checked_build
+SET LIB=%SCITECH_LIB%\LIB\RELEASE\WIN32\WC11;%WC11_PATH%\LIB386;%WC11_PATH%\LIB386\NT;.
+echo Release build enabled.
+goto setvars
+
+:checked_build
+SET LIB=%SCITECH_LIB%\LIB\DEBUG\WIN32\WC11;%WC11_PATH%\LIB386;%WC11_PATH%\LIB386\NT;.
+echo Checked debug build enabled.
+goto setvars
+
+:setvars
+SET EDPATH=%WC11_PATH%\EDDAT
+SET C_INCLUDE=%WC11_PATH%\H;%WC11_PATH%\H\NT
+SET INCLUDE=INCLUDE;%SCITECH%\INCLUDE;%PRIVATE%\INCLUDE;%C_INCLUDE%
+SET WATCOM=%WC11_PATH%
+SET MAKESTARTUP=%SCITECH%\MAKEDEFS\WC32.MK
+SET USE_TNT=
+SET USE_X32=
+SET USE_X32VM=
+SET USE_WIN16=
+SET USE_WIN32=1
+SET USE_WIN386=
+SET WIN32_GUI=1
+SET USE_OS216=
+SET USE_OS232=
+SET USE_OS2GUI=
+SET USE_SNAP=
+SET USE_QNX4=
+SET WC_LIBBASE=WC11
+PATH %SCITECH_BIN%;%WC11_PATH%\BINNT;%WC11_PATH%\BINW;%DEFPATH%%WC_CD_PATH%
+
+REM: Enable Win32 SDK if desired (sdk on command line)
+if NOT .%1%==.sdk goto done
+call win32sdk.bat
+
+:done
+echo Watcom C/C++ 11.0 Win32 GUI compilation environment set up.
diff --git a/board/MAI/bios_emulator/scitech/bin/wc11-x11.bat b/board/MAI/bios_emulator/scitech/bin/wc11-x11.bat
new file mode 100644
index 00000000000..c2569a3eb9c
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/bin/wc11-x11.bat
@@ -0,0 +1,34 @@
+@echo off
+REM Setup for compiling with Watcom C/C++ 11.0 in 32 bit mode
+
+if .%CHECKED%==.1 goto checked_build
+SET LIB=%SCITECH_LIB%\LIB\RELEASE\WIN32\WC11;%WC11_PATH%\LIB386;%WC11_PATH%\LIB386\NT;.
+echo Release build enabled.
+goto setvars
+
+:checked_build
+SET LIB=%SCITECH_LIB%\LIB\DEBUG\WIN32\WC11;%WC11_PATH%\LIB386;%WC11_PATH%\LIB386\NT;.
+echo Checked debug build enabled.
+goto setvars
+
+:setvars
+SET EDPATH=%WC11_PATH%\EDDAT
+SET INCLUDE=INCLUDE;%SCITECH%\INCLUDE;%PRIVATE%\INCLUDE;%WC11_PATH%\H;%WC11_PATH%\H\NT;
+SET WATCOM=%WC11_PATH%
+SET MAKESTARTUP=%SCITECH%\MAKEDEFS\WC32.MK
+SET USE_TNT=
+SET USE_X32=
+SET USE_X32VM=
+SET USE_WIN16=
+SET USE_WIN32=1
+SET USE_WIN386=
+SET WIN32_GUI=1
+SET USE_OS216=
+SET USE_OS232=
+SET USE_OS2GUI=
+SET USE_SNAP=
+SET USE_QNX4=
+SET WC_LIBBASE=WC11
+PATH %SCITECH_BIN%;%WC11_PATH%\BINNT;%WC11_PATH%\BINW;%DEFPATH%%WC_CD_PATH%
+
+echo Watcom C/C++ 11.0 Win32 GUI compilation environment set up.
diff --git a/board/MAI/bios_emulator/scitech/bin/win32sdk.bat b/board/MAI/bios_emulator/scitech/bin/win32sdk.bat
new file mode 100644
index 00000000000..3c7f017cb53
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/bin/win32sdk.bat
@@ -0,0 +1,20 @@
+@echo off
+REM: Set up environment variables for Microsoft Platform SDK development
+REM: Note that we have hard coded this for Windows NT i386 development.
+
+SET MSTOOLS=%MSSDK%
+SET DXSDKROOT=%MSTOOLS%
+SET INETSDK=%MSTOOLS%
+SET BKOFFICE=%MSTOOLS%
+SET BASEMAKE=%BKOFFICE%\INCLUDE\BKOffice.Mak
+SET INCLUDE=.;INCLUDE;%SCITECH%\INCLUDE;%PRIVATE%\INCLUDE;%MSTOOLS%\INCLUDE;%C_INCLUDE%
+if .%1%==.borland goto borland
+SET LIB=%MSTOOLS%\LIB;%LIB%
+goto notborland
+:borland
+SET LIB=%MSTOOLS%\LIB\BORLAND;%LIB%
+:notborland
+SET PATH=%MSTOOLS%\Bin\;%MSTOOLS%\Bin\WinNT;%PATH%
+SET CPU=i386
+
+echo Microsoft Platform SDK support enbabled.
diff --git a/board/MAI/bios_emulator/scitech/include/biosemu.h b/board/MAI/bios_emulator/scitech/include/biosemu.h
new file mode 100644
index 00000000000..e38ff3157f0
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/include/biosemu.h
@@ -0,0 +1,155 @@
+/****************************************************************************
+*
+* BIOS emulator and interface
+* to Realmode X86 Emulator Library
+*
+* Copyright (C) 1996-1999 SciTech Software, Inc.
+*
+* ========================================================================
+*
+* Permission to use, copy, modify, distribute, and sell this software and
+* its documentation for any purpose is hereby granted without fee,
+* provided that the above copyright notice appear in all copies and that
+* both that copyright notice and this permission notice appear in
+* supporting documentation, and that the name of the authors not be used
+* in advertising or publicity pertaining to distribution of the software
+* without specific, written prior permission. The authors makes no
+* representations about the suitability of this software for any purpose.
+* It is provided "as is" without express or implied warranty.
+*
+* THE AUTHORS DISCLAIMS ALL WARRANTIES WITH REGARD TO THIS SOFTWARE,
+* INCLUDING ALL IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS, IN NO
+* EVENT SHALL THE AUTHORS BE LIABLE FOR ANY SPECIAL, INDIRECT OR
+* CONSEQUENTIAL DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF
+* USE, DATA OR PROFITS, WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE OR
+* OTHER TORTIOUS ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE OR
+* PERFORMANCE OF THIS SOFTWARE.
+*
+* ========================================================================
+*
+* Language: ANSI C
+* Environment: Any
+* Developer: Kendall Bennett
+*
+* Description: Header file for the real mode x86 BIOS emulator, which is
+* used to warmboot any number of VGA compatible PCI/AGP
+* controllers under any OS, on any processor family that
+* supports PCI. We also allow the user application to call
+* real mode BIOS functions and Int 10h functions (including
+* the VESA BIOS).
+*
+****************************************************************************/
+
+#ifndef __BIOSEMU_H
+#define __BIOSEMU_H
+
+#include "x86emu.h"
+#include "pmapi.h"
+#include "pcilib.h"
+
+/*---------------------- Macros and type definitions ----------------------*/
+
+#pragma pack(1)
+
+/****************************************************************************
+REMARKS:
+Data structure used to describe the details specific to a particular VGA
+controller. This information is used to allow the VGA controller to be
+swapped on the fly within the BIOS emulator.
+
+HEADER:
+biosemu.h
+
+MEMBERS:
+pciInfo - PCI device information block for the controller
+BIOSImage - Pointer to a read/write copy of the BIOS image
+BIOSImageLen - Length of the BIOS image
+LowMem - Copy of key low memory areas
+****************************************************************************/
+typedef struct {
+ PCIDeviceInfo *pciInfo;
+ void *BIOSImage;
+ ulong BIOSImageLen;
+ uchar LowMem[1536];
+ } BE_VGAInfo;
+
+/****************************************************************************
+REMARKS:
+Data structure used to describe the details for the BIOS emulator system
+environment as used by the X86 emulator library.
+
+HEADER:
+biosemu.h
+
+MEMBERS:
+vgaInfo - VGA BIOS information structure
+biosmem_base - Base of the BIOS image
+biosmem_limit - Limit of the BIOS image
+busmem_base - Base of the VGA bus memory
+****************************************************************************/
+typedef struct {
+ BE_VGAInfo vgaInfo;
+ ulong biosmem_base;
+ ulong biosmem_limit;
+ ulong busmem_base;
+ } BE_sysEnv;
+
+/****************************************************************************
+REMARKS:
+Structure defining all the BIOS Emulator API functions as exported from
+the Binary Portable DLL.
+{secret}
+****************************************************************************/
+typedef struct {
+ ulong dwSize;
+ ibool (PMAPIP BE_init)(u32 debugFlags,int memSize,BE_VGAInfo *info);
+ void (PMAPIP BE_setVGA)(BE_VGAInfo *info);
+ void (PMAPIP BE_getVGA)(BE_VGAInfo *info);
+ void * (PMAPIP BE_mapRealPointer)(uint r_seg,uint r_off);
+ void * (PMAPIP BE_getVESABuf)(uint *len,uint *rseg,uint *roff);
+ void (PMAPIP BE_callRealMode)(uint seg,uint off,RMREGS *regs,RMSREGS *sregs);
+ int (PMAPIP BE_int86)(int intno,RMREGS *in,RMREGS *out);
+ int (PMAPIP BE_int86x)(int intno,RMREGS *in,RMREGS *out,RMSREGS *sregs);
+ void * reserved1;
+ void (PMAPIP BE_exit)(void);
+ } BE_exports;
+
+/****************************************************************************
+REMARKS:
+Function pointer type for the Binary Portable DLL initialisation entry point.
+{secret}
+****************************************************************************/
+typedef BE_exports * (PMAPIP BE_initLibrary_t)(PM_imports *PMImp);
+
+#pragma pack()
+
+/*---------------------------- Global variables ---------------------------*/
+
+#ifdef __cplusplus
+extern "C" { /* Use "C" linkage when in C++ mode */
+#endif
+
+/* {secret} Global BIOS emulator system environment */
+extern BE_sysEnv _BE_env;
+
+/*-------------------------- Function Prototypes --------------------------*/
+
+/* BIOS emulator library entry points */
+
+ibool PMAPI BE_init(u32 debugFlags,int memSize,BE_VGAInfo *info);
+void PMAPI BE_setVGA(BE_VGAInfo *info);
+void PMAPI BE_getVGA(BE_VGAInfo *info);
+void PMAPI BE_setDebugFlags(u32 debugFlags);
+void * PMAPI BE_mapRealPointer(uint r_seg,uint r_off);
+void * PMAPI BE_getVESABuf(uint *len,uint *rseg,uint *roff);
+void PMAPI BE_callRealMode(uint seg,uint off,RMREGS *regs,RMSREGS *sregs);
+int PMAPI BE_int86(int intno,RMREGS *in,RMREGS *out);
+int PMAPI BE_int86x(int intno,RMREGS *in,RMREGS *out,RMSREGS *sregs);
+void PMAPI BE_exit(void);
+
+#ifdef __cplusplus
+} /* End of "C" linkage for C++ */
+#endif
+
+#endif /* __BIOSEMU_H */
+
diff --git a/board/MAI/bios_emulator/scitech/include/event.h b/board/MAI/bios_emulator/scitech/include/event.h
new file mode 100644
index 00000000000..0de45172d6e
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/include/event.h
@@ -0,0 +1,696 @@
+/****************************************************************************
+*
+* SciTech OS Portability Manager Library
+*
+* ========================================================================
+*
+* The contents of this file are subject to the SciTech MGL Public
+* License Version 1.0 (the "License"); you may not use this file
+* except in compliance with the License. You may obtain a copy of
+* the License at http://www.scitechsoft.com/mgl-license.txt
+*
+* Software distributed under the License is distributed on an
+* "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+* implied. See the License for the specific language governing
+* rights and limitations under the License.
+*
+* The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+*
+* The Initial Developer of the Original Code is SciTech Software, Inc.
+* All Rights Reserved.
+*
+* ========================================================================
+*
+* Language: ANSI C
+* Environment: Any
+*
+* Description: Header file for the SciTech cross platform event library
+*
+****************************************************************************/
+
+#ifndef __EVENT_H
+#define __EVENT_H
+
+#include "scitech.h"
+
+/*---------------------- Macros and type definitions ----------------------*/
+
+#pragma pack(1)
+
+/* 'C' calling conventions always */
+
+#define EVTAPI _ASMAPI
+#define EVTAPIP _ASMAPIP
+
+/* Event message masks for keyDown events */
+
+#define EVT_ASCIIMASK 0x00FF /* ASCII code of key pressed */
+#define EVT_SCANMASK 0xFF00 /* Scan code of key pressed */
+#define EVT_COUNTMASK 0x7FFF0000L /* Count for KEYREPEAT's */
+
+/* Macros to extract values from the message fields */
+
+#define EVT_asciiCode(m) ( (uchar) (m & EVT_ASCIIMASK) )
+#define EVT_scanCode(m) ( (uchar) ( (m & EVT_SCANMASK) >> 8 ) )
+#define EVT_repeatCount(m) ( (short) ( (m & EVT_COUNTMASK) >> 16 ) )
+
+/****************************************************************************
+REMARKS:
+Defines the set of ASCII codes reported by the event library functions
+in the message field. Use the EVT_asciiCode macro to extract the code
+from the event structure.
+
+HEADER:
+event.h
+****************************************************************************/
+typedef enum {
+ ASCII_ctrlA = 0x01,
+ ASCII_ctrlB = 0x02,
+ ASCII_ctrlC = 0x03,
+ ASCII_ctrlD = 0x04,
+ ASCII_ctrlE = 0x05,
+ ASCII_ctrlF = 0x06,
+ ASCII_ctrlG = 0x07,
+ ASCII_backspace = 0x08,
+ ASCII_ctrlH = 0x08,
+ ASCII_tab = 0x09,
+ ASCII_ctrlI = 0x09,
+ ASCII_ctrlJ = 0x0A,
+ ASCII_ctrlK = 0x0B,
+ ASCII_ctrlL = 0x0C,
+ ASCII_enter = 0x0D,
+ ASCII_ctrlM = 0x0D,
+ ASCII_ctrlN = 0x0E,
+ ASCII_ctrlO = 0x0F,
+ ASCII_ctrlP = 0x10,
+ ASCII_ctrlQ = 0x11,
+ ASCII_ctrlR = 0x12,
+ ASCII_ctrlS = 0x13,
+ ASCII_ctrlT = 0x14,
+ ASCII_ctrlU = 0x15,
+ ASCII_ctrlV = 0x16,
+ ASCII_ctrlW = 0x17,
+ ASCII_ctrlX = 0x18,
+ ASCII_ctrlY = 0x19,
+ ASCII_ctrlZ = 0x1A,
+ ASCII_esc = 0x1B,
+ ASCII_space = 0x20,
+ ASCII_exclamation = 0x21, /* ! */
+ ASCII_quote = 0x22, /* " */
+ ASCII_pound = 0x23, /* # */
+ ASCII_dollar = 0x24, /* $ */
+ ASCII_percent = 0x25, /* % */
+ ASCII_ampersand = 0x26, /* & */
+ ASCII_apostrophe = 0x27, /* ' */
+ ASCII_leftBrace = 0x28, /* ( */
+ ASCII_rightBrace = 0x29, /* ) */
+ ASCII_times = 0x2A, /* * */
+ ASCII_plus = 0x2B, /* + */
+ ASCII_comma = 0x2C, /* , */
+ ASCII_minus = 0x2D, /* - */
+ ASCII_period = 0x2E, /* . */
+ ASCII_divide = 0x2F, /* / */
+ ASCII_0 = 0x30,
+ ASCII_1 = 0x31,
+ ASCII_2 = 0x32,
+ ASCII_3 = 0x33,
+ ASCII_4 = 0x34,
+ ASCII_5 = 0x35,
+ ASCII_6 = 0x36,
+ ASCII_7 = 0x37,
+ ASCII_8 = 0x38,
+ ASCII_9 = 0x39,
+ ASCII_colon = 0x3A, /* : */
+ ASCII_semicolon = 0x3B, /* ; */
+ ASCII_lessThan = 0x3C, /* < */
+ ASCII_equals = 0x3D, /* = */
+ ASCII_greaterThan = 0x3E, /* > */
+ ASCII_question = 0x3F, /* ? */
+ ASCII_at = 0x40, /* @ */
+ ASCII_A = 0x41,
+ ASCII_B = 0x42,
+ ASCII_C = 0x43,
+ ASCII_D = 0x44,
+ ASCII_E = 0x45,
+ ASCII_F = 0x46,
+ ASCII_G = 0x47,
+ ASCII_H = 0x48,
+ ASCII_I = 0x49,
+ ASCII_J = 0x4A,
+ ASCII_K = 0x4B,
+ ASCII_L = 0x4C,
+ ASCII_M = 0x4D,
+ ASCII_N = 0x4E,
+ ASCII_O = 0x4F,
+ ASCII_P = 0x50,
+ ASCII_Q = 0x51,
+ ASCII_R = 0x52,
+ ASCII_S = 0x53,
+ ASCII_T = 0x54,
+ ASCII_U = 0x55,
+ ASCII_V = 0x56,
+ ASCII_W = 0x57,
+ ASCII_X = 0x58,
+ ASCII_Y = 0x59,
+ ASCII_Z = 0x5A,
+ ASCII_leftSquareBrace = 0x5B, /* [ */
+ ASCII_backSlash = 0x5C, /* \ */
+ ASCII_rightSquareBrace = 0x5D, /* ] */
+ ASCII_caret = 0x5E, /* ^ */
+ ASCII_underscore = 0x5F, /* _ */
+ ASCII_leftApostrophe = 0x60, /* ` */
+ ASCII_a = 0x61,
+ ASCII_b = 0x62,
+ ASCII_c = 0x63,
+ ASCII_d = 0x64,
+ ASCII_e = 0x65,
+ ASCII_f = 0x66,
+ ASCII_g = 0x67,
+ ASCII_h = 0x68,
+ ASCII_i = 0x69,
+ ASCII_j = 0x6A,
+ ASCII_k = 0x6B,
+ ASCII_l = 0x6C,
+ ASCII_m = 0x6D,
+ ASCII_n = 0x6E,
+ ASCII_o = 0x6F,
+ ASCII_p = 0x70,
+ ASCII_q = 0x71,
+ ASCII_r = 0x72,
+ ASCII_s = 0x73,
+ ASCII_t = 0x74,
+ ASCII_u = 0x75,
+ ASCII_v = 0x76,
+ ASCII_w = 0x77,
+ ASCII_x = 0x78,
+ ASCII_y = 0x79,
+ ASCII_z = 0x7A,
+ ASCII_leftCurlyBrace = 0x7B, /* { */
+ ASCII_verticalBar = 0x7C, /* | */
+ ASCII_rightCurlyBrace = 0x7D, /* } */
+ ASCII_tilde = 0x7E /* ~ */
+ } EVT_asciiCodesType;
+
+/****************************************************************************
+REMARKS:
+Defines the set of scan codes reported by the event library functions
+in the message field. Use the EVT_scanCode macro to extract the code
+from the event structure. Note that the scan codes reported will be the
+same across all keyboards (assuming the placement of keys on a 101 key US
+keyboard), but the translated ASCII values may be different depending on
+the country code pages in use.
+
+NOTE: Scan codes in the event library are not really hardware scan codes,
+ but rather virtual scan codes as generated by a low level keyboard
+ interface driver. All virtual codes begin with scan code 0x60 and
+ range up from there.
+
+HEADER:
+event.h
+****************************************************************************/
+typedef enum {
+ KB_padEnter = 0x60, /* Keypad keys */
+ KB_padMinus = 0x4A,
+ KB_padPlus = 0x4E,
+ KB_padTimes = 0x37,
+ KB_padDivide = 0x61,
+ KB_padLeft = 0x62,
+ KB_padRight = 0x63,
+ KB_padUp = 0x64,
+ KB_padDown = 0x65,
+ KB_padInsert = 0x66,
+ KB_padDelete = 0x67,
+ KB_padHome = 0x68,
+ KB_padEnd = 0x69,
+ KB_padPageUp = 0x6A,
+ KB_padPageDown = 0x6B,
+ KB_padCenter = 0x4C,
+ KB_F1 = 0x3B, /* Function keys */
+ KB_F2 = 0x3C,
+ KB_F3 = 0x3D,
+ KB_F4 = 0x3E,
+ KB_F5 = 0x3F,
+ KB_F6 = 0x40,
+ KB_F7 = 0x41,
+ KB_F8 = 0x42,
+ KB_F9 = 0x43,
+ KB_F10 = 0x44,
+ KB_F11 = 0x57,
+ KB_F12 = 0x58,
+ KB_left = 0x4B, /* Cursor control keys */
+ KB_right = 0x4D,
+ KB_up = 0x48,
+ KB_down = 0x50,
+ KB_insert = 0x52,
+ KB_delete = 0x53,
+ KB_home = 0x47,
+ KB_end = 0x4F,
+ KB_pageUp = 0x49,
+ KB_pageDown = 0x51,
+ KB_capsLock = 0x3A,
+ KB_numLock = 0x45,
+ KB_scrollLock = 0x46,
+ KB_leftShift = 0x2A,
+ KB_rightShift = 0x36,
+ KB_leftCtrl = 0x1D,
+ KB_rightCtrl = 0x6C,
+ KB_leftAlt = 0x38,
+ KB_rightAlt = 0x6D,
+ KB_leftWindows = 0x5B,
+ KB_rightWindows = 0x5C,
+ KB_menu = 0x5D,
+ KB_sysReq = 0x54,
+ KB_esc = 0x01, /* Normal keyboard keys */
+ KB_1 = 0x02,
+ KB_2 = 0x03,
+ KB_3 = 0x04,
+ KB_4 = 0x05,
+ KB_5 = 0x06,
+ KB_6 = 0x07,
+ KB_7 = 0x08,
+ KB_8 = 0x09,
+ KB_9 = 0x0A,
+ KB_0 = 0x0B,
+ KB_minus = 0x0C,
+ KB_equals = 0x0D,
+ KB_backSlash = 0x2B,
+ KB_backspace = 0x0E,
+ KB_tab = 0x0F,
+ KB_Q = 0x10,
+ KB_W = 0x11,
+ KB_E = 0x12,
+ KB_R = 0x13,
+ KB_T = 0x14,
+ KB_Y = 0x15,
+ KB_U = 0x16,
+ KB_I = 0x17,
+ KB_O = 0x18,
+ KB_P = 0x19,
+ KB_leftSquareBrace = 0x1A,
+ KB_rightSquareBrace = 0x1B,
+ KB_enter = 0x1C,
+ KB_A = 0x1E,
+ KB_S = 0x1F,
+ KB_D = 0x20,
+ KB_F = 0x21,
+ KB_G = 0x22,
+ KB_H = 0x23,
+ KB_J = 0x24,
+ KB_K = 0x25,
+ KB_L = 0x26,
+ KB_semicolon = 0x27,
+ KB_apostrophe = 0x28,
+ KB_Z = 0x2C,
+ KB_X = 0x2D,
+ KB_C = 0x2E,
+ KB_V = 0x2F,
+ KB_B = 0x30,
+ KB_N = 0x31,
+ KB_M = 0x32,
+ KB_comma = 0x33,
+ KB_period = 0x34,
+ KB_divide = 0x35,
+ KB_space = 0x39,
+ KB_tilde = 0x29
+ } EVT_scanCodesType;
+
+/****************************************************************************
+REMARKS:
+Defines the mask for the joystick axes that are present
+
+HEADER:
+event.h
+
+MEMBERS:
+EVT_JOY_AXIS_X1 - Joystick 1, X axis is present
+EVT_JOY_AXIS_Y1 - Joystick 1, Y axis is present
+EVT_JOY_AXIS_X2 - Joystick 2, X axis is present
+EVT_JOY_AXIS_Y2 - Joystick 2, Y axis is present
+EVT_JOY_AXIS_ALL - Mask for all axes
+****************************************************************************/
+typedef enum {
+ EVT_JOY_AXIS_X1 = 0x00000001,
+ EVT_JOY_AXIS_Y1 = 0x00000002,
+ EVT_JOY_AXIS_X2 = 0x00000004,
+ EVT_JOY_AXIS_Y2 = 0x00000008,
+ EVT_JOY_AXIS_ALL = 0x0000000F
+ } EVT_eventJoyAxisType;
+
+/****************************************************************************
+REMARKS:
+Defines the event message masks for joystick events
+
+HEADER:
+event.h
+
+MEMBERS:
+EVT_JOY1_BUTTONA - Joystick 1, button A is down
+EVT_JOY1_BUTTONB - Joystick 1, button B is down
+EVT_JOY2_BUTTONA - Joystick 2, button A is down
+EVT_JOY2_BUTTONB - Joystick 2, button B is down
+****************************************************************************/
+typedef enum {
+ EVT_JOY1_BUTTONA = 0x00000001,
+ EVT_JOY1_BUTTONB = 0x00000002,
+ EVT_JOY2_BUTTONA = 0x00000004,
+ EVT_JOY2_BUTTONB = 0x00000008
+ } EVT_eventJoyMaskType;
+
+/****************************************************************************
+REMARKS:
+Defines the event message masks for mouse events
+
+HEADER:
+event.h
+
+MEMBERS:
+EVT_LEFTBMASK - Left button is held down
+EVT_RIGHTBMASK - Right button is held down
+EVT_MIDDLEBMASK - Middle button is held down
+EVT_BOTHBMASK - Both left and right held down together
+EVT_ALLBMASK - All buttons pressed
+EVT_DBLCLICK - Set if mouse down event was a double click
+****************************************************************************/
+typedef enum {
+ EVT_LEFTBMASK = 0x00000001,
+ EVT_RIGHTBMASK = 0x00000002,
+ EVT_MIDDLEBMASK = 0x00000004,
+ EVT_BOTHBMASK = 0x00000007,
+ EVT_ALLBMASK = 0x00000007,
+ EVT_DBLCLICK = 0x00010000
+ } EVT_eventMouseMaskType;
+
+/****************************************************************************
+REMARKS:
+Defines the event modifier masks. These are the masks used to extract
+the modifier information from the modifiers field of the event_t structure.
+Note that the values in the modifiers field represent the values of these
+modifier keys at the time the event occurred, not the time you decided
+to process the event.
+
+HEADER:
+event.h
+
+MEMBERS:
+EVT_LEFTBUT - Set if left mouse button was down
+EVT_RIGHTBUT - Set if right mouse button was down
+EVT_MIDDLEBUT - Set if the middle button was down
+EVT_RIGHTSHIFT - Set if right shift was down
+EVT_LEFTSHIFT - Set if left shift was down
+EVT_RIGHTCTRL - Set if right ctrl key was down
+EVT_RIGHTALT - Set if right alt key was down
+EVT_LEFTCTRL - Set if left ctrl key was down
+EVT_LEFTALT - Set if left alt key was down
+EVT_SHIFTKEY - Mask for any shift key down
+EVT_CTRLSTATE - Set if ctrl key was down
+EVT_ALTSTATE - Set if alt key was down
+EVT_CAPSLOCK - Caps lock is active
+EVT_NUMLOCK - Num lock is active
+EVT_SCROLLLOCK - Scroll lock is active
+****************************************************************************/
+typedef enum {
+ EVT_LEFTBUT = 0x00000001,
+ EVT_RIGHTBUT = 0x00000002,
+ EVT_MIDDLEBUT = 0x00000004,
+ EVT_RIGHTSHIFT = 0x00000008,
+ EVT_LEFTSHIFT = 0x00000010,
+ EVT_RIGHTCTRL = 0x00000020,
+ EVT_RIGHTALT = 0x00000040,
+ EVT_LEFTCTRL = 0x00000080,
+ EVT_LEFTALT = 0x00000100,
+ EVT_SHIFTKEY = 0x00000018,
+ EVT_CTRLSTATE = 0x000000A0,
+ EVT_ALTSTATE = 0x00000140,
+ EVT_SCROLLLOCK = 0x00000200,
+ EVT_NUMLOCK = 0x00000400,
+ EVT_CAPSLOCK = 0x00000800
+ } EVT_eventModMaskType;
+
+/****************************************************************************
+REMARKS:
+Defines the event codes returned in the event_t structures what field. Note
+that these are defined as a set of mutually exlusive bit fields, so you
+can test for multiple event types using the combined event masks defined
+in the EVT_eventMaskType enumeration.
+
+HEADER:
+event.h
+
+MEMBERS:
+EVT_NULLEVT - A null event
+EVT_KEYDOWN - Key down event
+EVT_KEYREPEAT - Key repeat event
+EVT_KEYUP - Key up event
+EVT_MOUSEDOWN - Mouse down event
+EVT_MOUSEAUTO - Mouse down autorepeat event
+EVT_MOUSEUP - Mouse up event
+EVT_MOUSEMOVE - Mouse movement event
+EVT_JOYCLICK - Joystick button state change event
+EVT_JOYMOVE - Joystick movement event
+EVT_USEREVT - First user event
+****************************************************************************/
+typedef enum {
+ EVT_NULLEVT = 0x00000000,
+ EVT_KEYDOWN = 0x00000001,
+ EVT_KEYREPEAT = 0x00000002,
+ EVT_KEYUP = 0x00000004,
+ EVT_MOUSEDOWN = 0x00000008,
+ EVT_MOUSEAUTO = 0x00000010,
+ EVT_MOUSEUP = 0x00000020,
+ EVT_MOUSEMOVE = 0x00000040,
+ EVT_JOYCLICK = 0x00000080,
+ EVT_JOYMOVE = 0x00000100,
+ EVT_USEREVT = 0x00000200
+ } EVT_eventType;
+
+/****************************************************************************
+REMARKS:
+Defines the event code masks you can use to test for multiple types of
+events, since the event codes are mutually exlusive bit fields.
+
+HEADER:
+event.h
+
+MEMBERS:
+EVT_KEYEVT - Mask for any key event
+EVT_MOUSEEVT - Mask for any mouse event
+EVT_MOUSECLICK - Mask for any mouse click event
+EVT_JOYEVT - Mask for any joystick event
+EVT_EVERYEVT - Mask for any event
+****************************************************************************/
+typedef enum {
+ EVT_KEYEVT = (EVT_KEYDOWN | EVT_KEYREPEAT | EVT_KEYUP),
+ EVT_MOUSEEVT = (EVT_MOUSEDOWN | EVT_MOUSEAUTO | EVT_MOUSEUP | EVT_MOUSEMOVE),
+ EVT_MOUSECLICK = (EVT_MOUSEDOWN | EVT_MOUSEUP),
+ EVT_JOYEVT = (EVT_JOYCLICK | EVT_JOYMOVE),
+ EVT_EVERYEVT = 0x7FFFFFFF
+ } EVT_eventMaskType;
+
+/****************************************************************************
+REMARKS:
+Structure describing the information contained in an event extracted from
+the event queue.
+
+HEADER:
+event.h
+
+MEMBERS:
+which - Window identifier for message for use by high level window manager
+ code (i.e. MegaVision GUI or Windows API).
+what - Type of event that occurred. Will be one of the values defined by
+ the EVT_eventType enumeration.
+when - Time that the event occurred in milliseconds since startup
+where_x - X coordinate of the mouse cursor location at the time of the event
+ (in screen coordinates). For joystick events this represents
+ the position of the first joystick X axis.
+where_y - Y coordinate of the mouse cursor location at the time of the event
+ (in screen coordinates). For joystick events this represents
+ the position of the first joystick Y axis.
+relative_x - Relative movement of the mouse cursor in the X direction (in
+ units of mickeys, or 1/200th of an inch). For joystick events
+ this represents the position of the second joystick X axis.
+relative_y - Relative movement of the mouse cursor in the Y direction (in
+ units of mickeys, or 1/200th of an inch). For joystick events
+ this represents the position of the second joystick Y axis.
+message - Event specific message for the event. For use events this can be
+ any user specific information. For keyboard events this contains
+ the ASCII code in bits 0-7, the keyboard scan code in bits 8-15 and
+ the character repeat count in bits 16-30. You can use the
+ EVT_asciiCode, EVT_scanCode and EVT_repeatCount macros to extract
+ this information from the message field. For mouse events this
+ contains information about which button was pressed, and will be a
+ combination of the flags defined by the EVT_eventMouseMaskType
+ enumeration. For joystick events, this conatins information
+ about which buttons were pressed, and will be a combination of
+ the flags defined by the EVT_eventJoyMaskType enumeration.
+modifiers - Contains additional information about the state of the keyboard
+ shift modifiers (Ctrl, Alt and Shift keys) when the event
+ occurred. For mouse events it will also contain the state of
+ the mouse buttons. Will be a combination of the values defined
+ by the EVT_eventModMaskType enumeration.
+next - Internal use; do not use.
+prev - Internal use; do not use.
+****************************************************************************/
+typedef struct {
+ ulong which;
+ ulong what;
+ ulong when;
+ int where_x;
+ int where_y;
+ int relative_x;
+ int relative_y;
+ ulong message;
+ ulong modifiers;
+ int next;
+ int prev;
+ } event_t;
+
+/****************************************************************************
+REMARKS:
+Structure describing an entry in the code page table. A table of translation
+codes for scan codes to ASCII codes is provided in this table to be used
+by the keyboard event libraries. On some OS'es the keyboard translation is
+handled by the OS, but for DOS and embedded systems you must register a
+different code page translation table if you want to support keyboards
+other than the US English keyboard (the default).
+
+NOTE: Entries in code page tables *must* be in ascending order for the
+ scan codes as we do a binary search on the tables for the ASCII
+ code equivalents.
+
+HEADER:
+event.h
+
+MEMBERS:
+scanCode - Scan code to translate (really the virtual scan code).
+asciiCode - ASCII code for this scan code.
+****************************************************************************/
+typedef struct {
+ uchar scanCode;
+ uchar asciiCode;
+ } codepage_entry_t;
+
+/****************************************************************************
+REMARKS:
+Structure describing a complete code page translation table. The table
+contains translation tables for normal keys, shifted keys and ctrl keys.
+The Ctrl key always has precedence over the shift table, and the shift
+table is used when the shift key is down or the CAPSLOCK key is down.
+
+HEADER:
+event.h
+
+MEMBERS:
+name - Name of the code page table (ie: "US English")
+normal - Code page for translating normal keys
+normalLen - Length of normal translation table
+caps - Code page for translating keys when CAPSLOCK is down
+capsLen - Length of CAPSLOCK translation table
+shift - Code page for shifted keys (ie: shift key is held down)
+shiftLen - Length of shifted translation table
+shiftCaps - Code page for shifted keys when CAPSLOCK is down
+shiftCapsLen - Length of shifted CAPSLOCK translation table
+ctrl - Code page for ctrl'ed keys (ie: ctrl key is held down)
+ctrlLen - Length of ctrl'ed translation table
+numPad - Code page for NUMLOCK'ed keypad keys
+numPadLen - Length of NUMLOCK'ed translation table
+****************************************************************************/
+typedef struct {
+ char name[20];
+ codepage_entry_t *normal;
+ int normalLen;
+ codepage_entry_t *caps;
+ int capsLen;
+ codepage_entry_t *shift;
+ int shiftLen;
+ codepage_entry_t *shiftCaps;
+ int shiftCapsLen;
+ codepage_entry_t *ctrl;
+ int ctrlLen;
+ codepage_entry_t *numPad;
+ int numPadLen;
+ } codepage_t;
+
+/* {secret} */
+typedef ibool (EVTAPIP _EVT_userEventFilter)(event_t *evt);
+/* {secret} */
+typedef void (EVTAPIP _EVT_mouseMoveHandler)(int x,int y);
+/* {secret} */
+typedef void (EVTAPIP _EVT_heartBeatCallback)(void *params);
+
+/* Macro to find the size of a static array */
+
+#define EVT_ARR_SIZE(a) (sizeof(a)/sizeof((a)[0]))
+
+#pragma pack()
+
+/*--------------------------- Global variables ----------------------------*/
+
+#ifdef __cplusplus
+extern "C" { /* Use "C" linkage when in C++ mode */
+#endif
+
+/* Standard code page tables */
+
+extern codepage_t _CP_US_English;
+
+/*------------------------- Function Prototypes ---------------------------*/
+
+/* Public API functions for user applications */
+
+ibool EVTAPI EVT_getNext(event_t *evt,ulong mask);
+ibool EVTAPI EVT_peekNext(event_t *evt,ulong mask);
+ibool EVTAPI EVT_post(ulong which,ulong what,ulong message,ulong modifiers);
+void EVTAPI EVT_flush(ulong mask);
+void EVTAPI EVT_halt(event_t *evt,ulong mask);
+ibool EVTAPI EVT_isKeyDown(uchar scanCode);
+void EVTAPI EVT_setMousePos(int x,int y);
+void EVTAPI EVT_getMousePos(int *x,int *y);
+
+/* Function to enable/disable updating of keyboard LED status indicators */
+
+void EVTAPI EVT_allowLEDS(ibool enable);
+
+/* Function to install a custom keyboard code page. Default is US English */
+
+codepage_t *EVTAPI EVT_getCodePage(void);
+void EVTAPI EVT_setCodePage(codepage_t *page);
+
+/* Functions for fine grained joystick calibration */
+
+void EVTAPI EVT_pollJoystick(void);
+int EVTAPI EVT_joyIsPresent(void);
+void EVTAPI EVT_joySetUpperLeft(void);
+void EVTAPI EVT_joySetLowerRight(void);
+void EVTAPI EVT_joySetCenter(void);
+
+/* Install user supplied event filter callback */
+
+void EVTAPI EVT_setUserEventFilter(_EVT_userEventFilter filter);
+
+/* Install user supplied event heartbeat callback function */
+
+void EVTAPI EVT_setHeartBeatCallback(_EVT_heartBeatCallback callback,void *params);
+void EVTAPI EVT_getHeartBeatCallback(_EVT_heartBeatCallback *callback,void **params);
+
+/* Internal functions to initialise and kill the event manager. MGL
+ * applications should never call these functions directly as the MGL
+ * libraries do it for you.
+ */
+
+/* {secret} */
+void EVTAPI EVT_init(_EVT_mouseMoveHandler mouseMove);
+/* {secret} */
+void EVTAPI EVT_setMouseRange(int xRes,int yRes);
+/* {secret} */
+void EVTAPI EVT_suspend(void);
+/* {secret} */
+void EVTAPI EVT_resume(void);
+/* {secret} */
+void EVTAPI EVT_exit(void);
+
+#ifdef __cplusplus
+} /* End of "C" linkage for C++ */
+#endif /* __cplusplus */
+
+#endif /* __EVENT_H */
diff --git a/board/MAI/bios_emulator/scitech/include/mtrr.h b/board/MAI/bios_emulator/scitech/include/mtrr.h
new file mode 100644
index 00000000000..b29812c928c
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/include/mtrr.h
@@ -0,0 +1,72 @@
+/****************************************************************************
+*
+* SciTech OS Portability Manager Library
+*
+* ========================================================================
+*
+* The contents of this file are subject to the SciTech MGL Public
+* License Version 1.0 (the "License"); you may not use this file
+* except in compliance with the License. You may obtain a copy of
+* the License at http://www.scitechsoft.com/mgl-license.txt
+*
+* Software distributed under the License is distributed on an
+* "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+* implied. See the License for the specific language governing
+* rights and limitations under the License.
+*
+* The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+*
+* The Initial Developer of the Original Code is SciTech Software, Inc.
+* All Rights Reserved.
+*
+* ========================================================================
+*
+* Language: ANSI C
+* Environment: Any
+*
+* Description: Include file defining the external ring 0 helper functions
+* needed by the MTRR module. These functions may be included
+* directly for native ring 0 device drivers, or they may
+* be calls down to a ring 0 helper device driver where
+* appropriate (or the entire MTRR module may be located in
+* the device driver if the device driver is 32-bit).
+*
+****************************************************************************/
+
+#ifndef __MTRR_H
+#define __MTRR_H
+
+#include "scitech.h"
+
+/*--------------------------- Function Prototypes -------------------------*/
+
+#ifdef __cplusplus
+extern "C" { /* Use "C" linkage when in C++ mode */
+#endif
+
+/* Internal functions (requires ring 0 access or helper functions!) */
+
+void MTRR_init(void);
+int MTRR_enableWriteCombine(ulong base,ulong size,uint type);
+
+/* External assembler helper functions */
+
+ibool _ASMAPI _MTRR_isRing0(void);
+ulong _ASMAPI _MTRR_disableInt(void);
+void _ASMAPI _MTRR_restoreInt(ulong flags);
+ulong _ASMAPI _MTRR_saveCR4(void);
+void _ASMAPI _MTRR_restoreCR4(ulong cr4Val);
+uchar _ASMAPI _MTRR_getCx86(uchar reg);
+void _ASMAPI _MTRR_setCx86(uchar reg,uchar data);
+#ifdef __16BIT__
+void _ASMAPI _MTRR_readMSR(ulong reg, ulong far *eax, ulong far *edx);
+#else
+void _ASMAPI _MTRR_readMSR(ulong reg, ulong *eax, ulong *edx);
+#endif
+void _ASMAPI _MTRR_writeMSR(ulong reg, ulong eax, ulong edx);
+
+#ifdef __cplusplus
+} /* End of "C" linkage for C++ */
+#endif
+
+#endif /* __MTRR_H */
diff --git a/board/MAI/bios_emulator/scitech/include/pcilib.h b/board/MAI/bios_emulator/scitech/include/pcilib.h
new file mode 100644
index 00000000000..e2d58b0848e
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/include/pcilib.h
@@ -0,0 +1,414 @@
+/****************************************************************************
+*
+* SciTech OS Portability Manager Library
+*
+* ========================================================================
+*
+* The contents of this file are subject to the SciTech MGL Public
+* License Version 1.0 (the "License"); you may not use this file
+* except in compliance with the License. You may obtain a copy of
+* the License at http://www.scitechsoft.com/mgl-license.txt
+*
+* Software distributed under the License is distributed on an
+* "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+* implied. See the License for the specific language governing
+* rights and limitations under the License.
+*
+* The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+*
+* The Initial Developer of the Original Code is SciTech Software, Inc.
+* All Rights Reserved.
+*
+* ========================================================================
+*
+* Language: ANSI C
+* Environment: Any
+*
+* Description: Header file for interface routines to the PCI bus.
+*
+****************************************************************************/
+
+#ifndef __PCILIB_H
+#define __PCILIB_H
+
+#include "scitech.h"
+
+/*---------------------- Macros and type definitions ----------------------*/
+
+#pragma pack(1)
+
+/* Defines for PCIDeviceInfo.HeaderType */
+
+typedef enum {
+ PCI_deviceType = 0x00,
+ PCI_bridgeType = 0x01,
+ PCI_cardBusBridgeType = 0x02,
+ PCI_multiFunctionType = 0x80
+ } PCIHeaderTypeFlags;
+
+/* Defines for PCIDeviceInfo.Command */
+
+typedef enum {
+ PCI_enableIOSpace = 0x0001,
+ PCI_enableMemorySpace = 0x0002,
+ PCI_enableBusMaster = 0x0004,
+ PCI_enableSpecialCylces = 0x0008,
+ PCI_enableWriteAndInvalidate = 0x0010,
+ PCI_enableVGACompatiblePalette = 0x0020,
+ PCI_enableParity = 0x0040,
+ PCI_enableWaitCycle = 0x0080,
+ PCI_enableSerr = 0x0100,
+ PCI_enableFastBackToBack = 0x0200
+ } PCICommandFlags;
+
+/* Defines for PCIDeviceInfo.Status */
+
+typedef enum {
+ PCI_statusCapabilitiesList = 0x0010,
+ PCI_status66MhzCapable = 0x0020,
+ PCI_statusUDFSupported = 0x0040,
+ PCI_statusFastBackToBack = 0x0080,
+ PCI_statusDataParityDetected = 0x0100,
+ PCI_statusDevSel = 0x0600,
+ PCI_statusSignaledTargetAbort = 0x0800,
+ PCI_statusRecievedTargetAbort = 0x1000,
+ PCI_statusRecievedMasterAbort = 0x2000,
+ PCI_statusSignaledSystemError = 0x4000,
+ PCI_statusDetectedParityError = 0x8000
+ } PCIStatusFlags;
+
+/* PCI capability IDs */
+
+typedef enum {
+ PCI_capsPowerManagement = 0x01,
+ PCI_capsAGP = 0x02,
+ PCI_capsMSI = 0x05
+ } PCICapsType;
+
+/* PCI AGP rate definitions */
+
+typedef enum {
+ PCI_AGPRate1X = 0x1,
+ PCI_AGPRate2X = 0x2,
+ PCI_AGPRate4X = 0x4
+ } PCIAGPRateType;
+
+/* NOTE: We define all bitfield's as uint's, specifically so that the IBM
+ * Visual Age C++ compiler does not complain. We need them to be
+ * 32-bits wide, and this is the width of an unsigned integer, but
+ * we can't use a ulong to make this explicit or we get errors.
+ */
+
+/* Structure defining a PCI slot identifier */
+
+typedef union {
+ struct {
+ uint Zero:2;
+ uint Register:6;
+ uint Function:3;
+ uint Device:5;
+ uint Bus:8;
+ uint Reserved:7;
+ uint Enable:1;
+ } p;
+ ulong i;
+ } PCIslot;
+
+/* Structure defining the regular (type 0) PCI configuration register
+ * layout. We use this in a union below so we can describe all types of
+ * PCI configuration spaces with a single structure.
+ */
+
+typedef struct {
+ ulong BaseAddress10;
+ ulong BaseAddress14;
+ ulong BaseAddress18;
+ ulong BaseAddress1C;
+ ulong BaseAddress20;
+ ulong BaseAddress24;
+ ulong CardbusCISPointer;
+ ushort SubSystemVendorID;
+ ushort SubSystemID;
+ ulong ROMBaseAddress;
+ uchar CapabilitiesPointer;
+ uchar reserved1;
+ uchar reserved2;
+ uchar reserved3;
+ ulong reserved4;
+ uchar InterruptLine;
+ uchar InterruptPin;
+ uchar MinimumGrant;
+ uchar MaximumLatency;
+
+ /* These are not in the actual config space, but we enumerate them */
+ ulong BaseAddress10Len;
+ ulong BaseAddress14Len;
+ ulong BaseAddress18Len;
+ ulong BaseAddress1CLen;
+ ulong BaseAddress20Len;
+ ulong BaseAddress24Len;
+ ulong ROMBaseAddressLen;
+ } PCIType0Info;
+
+/* Structure defining PCI to PCI bridge (type 1) PCI configuration register
+ * layout. We use this in a union below so we can describe all types of
+ * PCI configuration spaces with a single structure.
+ */
+
+typedef struct {
+ ulong BaseAddress10;
+ ulong BaseAddress14;
+ uchar PrimaryBusNumber;
+ uchar SecondayBusNumber;
+ uchar SubordinateBusNumber;
+ uchar SecondaryLatencyTimer;
+ uchar IOBase;
+ uchar IOLimit;
+ ushort SecondaryStatus;
+ ushort MemoryBase;
+ ushort MemoryLimit;
+ ushort PrefetchableMemoryBase;
+ ushort PrefetchableMemoryLimit;
+ ulong PrefetchableBaseHi;
+ ulong PrefetchableLimitHi;
+ ushort IOBaseHi;
+ ushort IOLimitHi;
+ uchar CapabilitiesPointer;
+ uchar reserved1;
+ uchar reserved2;
+ uchar reserved3;
+ ulong ROMBaseAddress;
+ uchar InterruptLine;
+ uchar InterruptPin;
+ ushort BridgeControl;
+ } PCIType1Info;
+
+/* PCI to CardBus bridge (type 2) configuration information */
+typedef struct {
+ ulong SocketRegistersBaseAddress;
+ uchar CapabilitiesPointer;
+ uchar reserved1;
+ ushort SecondaryStatus;
+ uchar PrimaryBus;
+ uchar SecondaryBus;
+ uchar SubordinateBus;
+ uchar SecondaryLatency;
+ struct {
+ ulong Base;
+ ulong Limit;
+ } Range[4];
+ uchar InterruptLine;
+ uchar InterruptPin;
+ ushort BridgeControl;
+ } PCIType2Info;
+
+/* Structure defining the PCI configuration space information for a
+ * single PCI device on the PCI bus. We enumerate all this information
+ * for all PCI devices on the bus.
+ */
+
+typedef struct {
+ ulong dwSize;
+ PCIslot slot;
+ ulong mech1;
+ ushort VendorID;
+ ushort DeviceID;
+ ushort Command;
+ ushort Status;
+ uchar RevID;
+ uchar Interface;
+ uchar SubClass;
+ uchar BaseClass;
+ uchar CacheLineSize;
+ uchar LatencyTimer;
+ uchar HeaderType;
+ uchar BIST;
+ union {
+ PCIType0Info type0;
+ PCIType1Info type1;
+ PCIType2Info type2;
+ } u;
+ } PCIDeviceInfo;
+
+/* PCI Capability header structure. All PCI capabilities have the
+ * following header.
+ *
+ * capsID is used to identify the type of the structure as define above.
+ *
+ * next is the offset in PCI configuration space (0x40-0xFC) of the
+ * next capability structure in the list, or 0x00 if there are no more
+ * entries.
+ */
+
+typedef struct {
+ uchar capsID;
+ uchar next;
+ } PCICapsHeader;
+
+/* Structure defining the PCI AGP status register contents */
+
+typedef struct {
+ uint rate:3;
+ uint rsvd1:1;
+ uint fastWrite:1;
+ uint fourGB:1;
+ uint rsvd2:3;
+ uint sideBandAddressing:1;
+ uint rsvd3:14;
+ uint requestQueueDepthMaximum:8;
+ } PCIAGPStatus;
+
+/* Structure defining the PCI AGP command register contents */
+
+typedef struct {
+ uint rate:3;
+ uint rsvd1:1;
+ uint fastWriteEnable:1;
+ uint fourGBEnable:1;
+ uint rsvd2:2;
+ uint AGPEnable:1;
+ uint SBAEnable:1;
+ uint rsvd3:14;
+ uint requestQueueDepth:8;
+ } PCIAGPCommand;
+
+/* AGP Capability structure */
+
+typedef struct {
+ PCICapsHeader h;
+ ushort majMin;
+ PCIAGPStatus AGPStatus;
+ PCIAGPCommand AGPCommand;
+ } PCIAGPCapability;
+
+/* Structure for obtaining the PCI IRQ routing information */
+
+typedef struct {
+ uchar bus;
+ uchar device;
+ uchar linkA;
+ ushort mapA;
+ uchar linkB;
+ ushort mapB;
+ uchar linkC;
+ ushort mapC;
+ uchar linkD;
+ ushort mapD;
+ uchar slot;
+ uchar reserved;
+ } PCIRouteInfo;
+
+typedef struct {
+ ushort BufferSize;
+ PCIRouteInfo *DataBuffer;
+ } PCIRoutingOptionsBuffer;
+
+#define NUM_PCI_REG (sizeof(PCIDeviceInfo) / 4) - 10
+#define PCI_BRIDGE_CLASS 0x06
+#define PCI_HOST_BRIDGE_SUBCLASS 0x00
+#define PCI_EARLY_VGA_CLASS 0x00
+#define PCI_EARLY_VGA_SUBCLASS 0x01
+#define PCI_DISPLAY_CLASS 0x03
+#define PCI_DISPLAY_VGA_SUBCLASS 0x00
+#define PCI_DISPLAY_XGA_SUBCLASS 0x01
+#define PCI_DISPLAY_OTHER_SUBCLASS 0x80
+#define PCI_MM_CLASS 0x04
+#define PCI_AUDIO_SUBCLASS 0x01
+
+/* Macros to detect specific classes of devices */
+
+#define PCI_IS_3DLABS_NONVGA_CLASS(pci) \
+ (((pci)->BaseClass == PCI_DISPLAY_CLASS && (pci)->SubClass == PCI_DISPLAY_OTHER_SUBCLASS) \
+ && ((pci)->VendorID == 0x3D3D || (pci)->VendorID == 0x104C))
+
+#define PCI_IS_DISPLAY_CLASS(pci) \
+ (((pci)->BaseClass == PCI_DISPLAY_CLASS && (pci)->SubClass == PCI_DISPLAY_VGA_SUBCLASS) \
+ || ((pci)->BaseClass == PCI_DISPLAY_CLASS && (pci)->SubClass == PCI_DISPLAY_XGA_SUBCLASS) \
+ || ((pci)->BaseClass == PCI_EARLY_VGA_CLASS && (pci)->SubClass == PCI_EARLY_VGA_SUBCLASS) \
+ || PCI_IS_3DLABS_NONVGA_CLASS(pci))
+
+/* Function codes to pass to PCI_accessReg */
+
+#define PCI_READ_BYTE 0
+#define PCI_READ_WORD 1
+#define PCI_READ_DWORD 2
+#define PCI_WRITE_BYTE 3
+#define PCI_WRITE_WORD 4
+#define PCI_WRITE_DWORD 5
+
+/* Macros to read/write PCI registers. These assume a global PCI array
+ * of device information.
+ */
+
+#define PCI_readPCIRegB(index,device) \
+ PCI_accessReg(index,0,0,&PCI[DeviceIndex[device]])
+
+#define PCI_readPCIRegW(index,device) \
+ PCI_accessReg(index,0,1,&PCI[DeviceIndex[device]])
+
+#define PCI_readPCIRegL(index,device) \
+ PCI_accessReg(index,0,2,&PCI[DeviceIndex[device]])
+
+#define PCI_writePCIRegB(index,value,device) \
+ PCI_accessReg(index,value,3,&PCI[DeviceIndex[device]])
+
+#define PCI_writePCIRegW(index,value,device) \
+ PCI_accessReg(index,value,4,&PCI[DeviceIndex[device]])
+
+#define PCI_writePCIRegL(index,value,device) \
+ PCI_accessReg(index,value,5,&PCI[DeviceIndex[device]])
+
+#pragma pack()
+
+/*-------------------------- Function Prototypes --------------------------*/
+
+#ifdef __cplusplus
+extern "C" { /* Use "C" linkage when in C++ mode */
+#endif
+
+/* Function to determine the number of PCI devices in the system */
+
+int _ASMAPI PCI_getNumDevices(void);
+
+/* Function to enumerate all device on the PCI bus */
+
+int _ASMAPI PCI_enumerate(PCIDeviceInfo info[]);
+
+/* Function to access PCI configuration registers */
+
+ulong _ASMAPI PCI_accessReg(int index,ulong value,int func,PCIDeviceInfo *info);
+
+/* Function to get PCI IRQ routing options for a card */
+
+int _ASMAPI PCI_getIRQRoutingOptions(int numDevices,PCIRouteInfo *buffer);
+
+/* Function to re-route the PCI IRQ setting for a device */
+
+ibool _ASMAPI PCI_setHardwareIRQ(PCIDeviceInfo *info,uint intPin,uint IRQ);
+
+/* Function to generate a special cyle on the specified PCI bus */
+
+void _ASMAPI PCI_generateSpecialCyle(uint bus,ulong specialCycleData);
+
+/* Function to determine the size of a PCI base address register */
+
+ulong _ASMAPI PCI_findBARSize(int bar,PCIDeviceInfo *pci);
+
+/* Function to read a block of PCI configuration space registers */
+
+void _ASMAPI PCI_readRegBlock(PCIDeviceInfo *info,int index,void *dst,int count);
+
+/* Function to write a block of PCI configuration space registers */
+
+void _ASMAPI PCI_writeRegBlock(PCIDeviceInfo *info,int index,void *src,int count);
+
+/* Function to return the 32-bit PCI BIOS entry point */
+
+ulong _ASMAPI PCIBIOS_getEntry(void);
+
+#ifdef __cplusplus
+} /* End of "C" linkage for C++ */
+#endif
+
+#endif /* __PCILIB_H */
+
diff --git a/board/MAI/bios_emulator/scitech/include/pm_help.h b/board/MAI/bios_emulator/scitech/include/pm_help.h
new file mode 100644
index 00000000000..60a7c254570
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/include/pm_help.h
@@ -0,0 +1,167 @@
+/****************************************************************************
+*
+* SciTech OS Portability Manager Library
+*
+* ========================================================================
+*
+* The contents of this file are subject to the SciTech MGL Public
+* License Version 1.0 (the "License"); you may not use this file
+* except in compliance with the License. You may obtain a copy of
+* the License at http://www.scitechsoft.com/mgl-license.txt
+*
+* Software distributed under the License is distributed on an
+* "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+* implied. See the License for the specific language governing
+* rights and limitations under the License.
+*
+* The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+*
+* The Initial Developer of the Original Code is SciTech Software, Inc.
+* All Rights Reserved.
+*
+* ========================================================================
+*
+* Language: ANSI C
+* Environment: Win32, OS/2
+*
+* Description: Include file for the SciTech Portability Manager 32-bit
+* helper VxD for Windows 9x for and the 16-bit ring 0
+* helper device driver for OS/2.
+*
+* This file documents all the public services used by the
+* SciTech Portability Manager library and SciTech Nucleus
+* loader library.
+*
+****************************************************************************/
+
+#ifndef __PMHELP_H
+#define __PMHELP_H
+
+/* Include version information */
+
+#include "sdd/sddver.h"
+#define PMHELP_Major SDD_RELEASE_MAJOR
+#define PMHELP_Minor SDD_RELEASE_MINOR
+#define PMHELP_VERSION ((PMHELP_Major << 8) | PMHELP_Minor)
+
+#ifdef __OS2__
+
+/****************************************************************************
+* Public OS/2 Support functions
+****************************************************************************/
+
+#include "scitech.h"
+#include "nucleus/graphics.h"
+
+/* Name of device driver */
+
+#define PMHELP_NAME (PSZ)"sddhelp$"
+
+/* Main IOCTL function to talk to device driver */
+
+#define PMHELP_IOCTL 0x0080
+
+/* Macro definition for defining IOCTL function control codes for the SDDHELP
+ * device driver for OS/2. Similar to that used for the DOS/Win32 version.
+ */
+
+#define PMHELP_CTL_CODE(name,value) \
+ PMHELP_##name = value
+
+typedef enum {
+ /* Version function used by all drivers */
+ PMHELP_CTL_CODE(GETVER ,0x0001),
+ PMHELP_CTL_CODE(MAPPHYS ,0x0002),
+ PMHELP_CTL_CODE(ALLOCLOCKED ,0x0003),
+ PMHELP_CTL_CODE(FREELOCKED ,0x0004),
+ PMHELP_CTL_CODE(GETGDT32 ,0x0005),
+ PMHELP_CTL_CODE(MALLOCSHARED ,0x0007),
+ PMHELP_CTL_CODE(FREESHARED ,0x0008),
+ PMHELP_CTL_CODE(MAPTOPROCESS ,0x0009),
+ PMHELP_CTL_CODE(FREEPHYS ,0x000A),
+ PMHELP_CTL_CODE(FLUSHTLB ,0x000B),
+ PMHELP_CTL_CODE(SAVECR4 ,0x000C),
+ PMHELP_CTL_CODE(RESTORECR4 ,0x000D),
+ PMHELP_CTL_CODE(READMSR ,0x000E),
+ PMHELP_CTL_CODE(WRITEMSR ,0x000F),
+ PMHELP_CTL_CODE(GETPHYSICALADDR ,0x0010),
+ PMHELP_CTL_CODE(GETPHYSICALADDRRANGE ,0x0011),
+ PMHELP_CTL_CODE(LOCKPAGES ,0x0012),
+ PMHELP_CTL_CODE(UNLOCKPAGES ,0x0013),
+ PMHELP_CTL_CODE(GETSHAREDEXP ,0x0042),
+ PMHELP_CTL_CODE(SETSHAREDEXP ,0x0043),
+ PMHELP_CTL_CODE(GETSTACKSWITCHRTN ,0x0044),
+ PMHELP_CTL_CODE(GETBUILDNO ,0x0050),
+ } PMHELP_ctlCodes;
+
+#else
+
+/****************************************************************************
+* Public DOS/Windows Support functions
+****************************************************************************/
+
+#ifdef DEVICE_MAIN
+#include <vtoolsc.h>
+#define PMHELP_Init_Order (VDD_INIT_ORDER-1)
+#define RETURN_LONGS(n) *p->dioc_bytesret = (n) * sizeof(ulong)
+#endif /* DEVICE_MAIN */
+#include "scitech.h"
+#include "nucleus/graphics.h"
+
+/* We connect to the SDDHELP.VXD module if it is staticly loaded (as part
+ * of SciTech Display Doctor), otherwise we dynamically load the PMHELP.VXD
+ * public helper VxD.
+ */
+
+#define PMHELP_DeviceID 0x0000
+#define SDDHELP_DeviceID 0x3DF8
+#define VXDLDR_DeviceID 0x0027
+#define SDDHELP_MODULE "SDDHELP"
+#define SDDHELP_NAME "SDDHELP.VXD"
+#define PMHELP_MODULE "PMHELP"
+#define PMHELP_NAME "PMHELP.VXD"
+#define PMHELP_DDBNAME "pmhelp "
+#define SDDHELP_MODULE_PATH "\\\\.\\" SDDHELP_MODULE
+#define PMHELP_MODULE_PATH "\\\\.\\" PMHELP_MODULE
+#define PMHELP_VXD_PATH "\\\\.\\" PMHELP_NAME
+
+/* Macro definition for defining IOCTL function control codes for the PMHELP
+ * device drivers for Windows 9x and NT. This macro is basically derived from
+ * the CTL_CODE macro in the Windows 2000 DDK, but we hard code it here to
+ * avoid having to #include any of the Windows 2000 DDK header files. We also
+ * define both a 16-bit and 32-bit version of the control code within the same
+ * macro to simplify future additions.
+ *
+ * Essentially the Win32 macro would normally expand to the following:
+ *
+ * CTL_CODE(FILE_DEVICE_VIDEO,0x800+value,METHOD_BUFFERED,FILE_ANY_ACCESS)
+ */
+
+#define PMHELP_CTL_CODE(name,value) \
+ PMHELP_##name = value, \
+ PMHELP_##name##32 = ((0x23 << 16) | (0 << 14) | ((0x800+value) << 2) | (0))
+
+typedef enum {
+ /* Include all the control codes. We keep them in a separate header
+ * file so we can include them in multiple places to make this
+ * more versatile.
+ */
+ #include "pm_wctl.h"
+ } PMHELP_ctlCodes;
+
+/* For real mode VxD calls, we put the function number into the high
+ * order word of EAX, and a value of 0x4FFF in AX. This allows our
+ * VxD handler which is set up to handle Int 10's to recognise a native
+ * PMHELP API call from a real mode DOS program.
+ */
+
+#ifdef REALMODE
+#define API_NUM(num) (((ulong)(num) << 16) | 0x4FFF)
+#else
+#define API_NUM(num) (num)
+#endif
+
+#endif /* !__OS2__ */
+
+#endif /* __PMHELP_H */
+
diff --git a/board/MAI/bios_emulator/scitech/include/pm_wctl.h b/board/MAI/bios_emulator/scitech/include/pm_wctl.h
new file mode 100644
index 00000000000..088c19e5317
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/include/pm_wctl.h
@@ -0,0 +1,76 @@
+/****************************************************************************
+*
+* SciTech OS Portability Manager Library
+*
+* ========================================================================
+*
+* The contents of this file are subject to the SciTech MGL Public
+* License Version 1.0 (the "License"); you may not use this file
+* except in compliance with the License. You may obtain a copy of
+* the License at http://www.scitechsoft.com/mgl-license.txt
+*
+* Software distributed under the License is distributed on an
+* "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+* implied. See the License for the specific language governing
+* rights and limitations under the License.
+*
+* The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+*
+* The Initial Developer of the Original Code is SciTech Software, Inc.
+* All Rights Reserved.
+*
+* ========================================================================
+*
+* Language: ANSI C
+* Environment: Win32, OS/2
+*
+* Description: Header file to define all the control codes for the DOS
+* and Win32 device driver API's for calling from ring 3
+* into the ring 0 device drivers.
+*
+****************************************************************************/
+
+/* Version function used by all drivers */
+PMHELP_CTL_CODE(GETVER ,0x0000),
+
+/* Functions used by obsolete 16-bit DOS TSR */
+PMHELP_CTL_CODE(RDREGB ,0x0003),
+PMHELP_CTL_CODE(WRREGB ,0x0004),
+PMHELP_CTL_CODE(RDREGW ,0x0005),
+PMHELP_CTL_CODE(WRREGW ,0x0006),
+PMHELP_CTL_CODE(RDREGL ,0x0008),
+PMHELP_CTL_CODE(WRREGL ,0x0009),
+
+/* Functions used by obsolete WinDirect */
+PMHELP_CTL_CODE(MAPPHYS ,0x000F),
+PMHELP_CTL_CODE(GETVESABUF ,0x0013),
+
+/* Functions used by PM library */
+PMHELP_CTL_CODE(DPMIINT86 ,0x0014),
+PMHELP_CTL_CODE(INT86 ,0x0015),
+PMHELP_CTL_CODE(INT86X ,0x0016),
+PMHELP_CTL_CODE(CALLREALMODE ,0x0017),
+PMHELP_CTL_CODE(ALLOCLOCKED ,0x0018),
+PMHELP_CTL_CODE(FREELOCKED ,0x0019),
+PMHELP_CTL_CODE(ENABLELFBCOMB ,0x001A),
+PMHELP_CTL_CODE(GETPHYSICALADDR ,0x001B),
+PMHELP_CTL_CODE(MALLOCSHARED ,0x001D),
+PMHELP_CTL_CODE(FREESHARED ,0x001F),
+PMHELP_CTL_CODE(LOCKDATAPAGES ,0x0020),
+PMHELP_CTL_CODE(UNLOCKDATAPAGES ,0x0021),
+PMHELP_CTL_CODE(LOCKCODEPAGES ,0x0022),
+PMHELP_CTL_CODE(UNLOCKCODEPAGES ,0x0023),
+PMHELP_CTL_CODE(GETCALLGATE ,0x0024),
+PMHELP_CTL_CODE(SETCNTPATH ,0x0025),
+PMHELP_CTL_CODE(GETPDB ,0x0026),
+PMHELP_CTL_CODE(FLUSHTLB ,0x0027),
+PMHELP_CTL_CODE(GETPHYSICALADDRRANGE ,0x0028),
+PMHELP_CTL_CODE(ALLOCPAGE ,0x0029),
+PMHELP_CTL_CODE(FREEPAGE ,0x002A),
+PMHELP_CTL_CODE(ENABLERING3IOPL ,0x002B),
+PMHELP_CTL_CODE(DISABLERING3IOPL ,0x002C),
+PMHELP_CTL_CODE(GASETLOCALPATH ,0x002D),
+PMHELP_CTL_CODE(GAGETEXPORTS ,0x002E),
+PMHELP_CTL_CODE(GATHUNK ,0x002F),
+PMHELP_CTL_CODE(SETNUCLEUSPATH ,0x0030),
+
diff --git a/board/MAI/bios_emulator/scitech/include/pmapi.h b/board/MAI/bios_emulator/scitech/include/pmapi.h
new file mode 100644
index 00000000000..3affe67d63e
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/include/pmapi.h
@@ -0,0 +1,1149 @@
+/****************************************************************************
+*
+* SciTech OS Portability Manager Library
+*
+* ========================================================================
+*
+* The contents of this file are subject to the SciTech MGL Public
+* License Version 1.0 (the "License"); you may not use this file
+* except in compliance with the License. You may obtain a copy of
+* the License at http://www.scitechsoft.com/mgl-license.txt
+*
+* Software distributed under the License is distributed on an
+* "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+* implied. See the License for the specific language governing
+* rights and limitations under the License.
+*
+* The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+*
+* The Initial Developer of the Original Code is SciTech Software, Inc.
+* All Rights Reserved.
+*
+* ========================================================================
+*
+* Language: ANSI C
+* Environment: Any
+*
+* Description: Header file for the OS Portability Manager Library, which
+* contains functions to implement OS specific services in a
+* generic, cross platform API. Porting the OS Portability
+* Manager library is the first step to porting any SciTech
+* products to a new platform.
+*
+****************************************************************************/
+
+#ifndef __PMAPI_H
+#define __PMAPI_H
+
+#include "scitech.h"
+#include "pcilib.h"
+#include "ztimerc.h"
+#if !defined(__WIN32_VXD__) && !defined(__OS2_VDD__) && !defined(__NT_DRIVER__)
+#include <stdio.h>
+#include <stdlib.h>
+#endif
+
+/*--------------------------- Macros and Typedefs -------------------------*/
+
+/* You will need to define one of the following before you compile this
+ * library for it to work correctly with the DOS extender that you are
+ * using when compiling for extended DOS:
+ *
+ * TNT - Phar Lap TNT DOS Extender
+ * DOS4GW - Rational DOS/4GW, DOS/4GW Pro, Causeway and PMODE/W
+ * DJGPP - DJGPP port of GNU C++
+ *
+ * If none is specified, we will automatically determine which operating
+ * system is being targetted and the following will be defined (provided by
+ * scitech.h header file):
+ *
+ * __MSDOS16__ - Default for 16 bit MSDOS mode
+ * __MSDOS32__ - Default for 32 bit MSDOS
+ * __WINDOWS16__ - Default for 16 bit Windows
+ * __WINDOWS32__ - Default for 32 bit Windows
+ *
+ * One of the following will be defined automatically for you to select
+ * which memory model is in effect:
+ *
+ * REALMODE - 16 bit real mode (large memory model)
+ * PM286 - 16 protected mode (large memory model)
+ * PM386 - 32 protected mode (flat memory model)
+ */
+
+#if defined(__UNIX__) && !defined(_MAX_PATH)
+#define _MAX_PATH 256
+#endif
+
+#if defined(TNT) || defined(DOSX) || defined(X32VM) || defined(DPMI32) \
+ || defined(DOS4GW) || defined(DJGPP) || defined(__WINDOWS32__) \
+ || defined(__MSDOS32__) || defined(__UNIX__) || defined(__WIN32_VXD__) \
+ || defined(__32BIT__) || defined(__SMX32__) || defined(__RTTARGET__)
+#define PM386
+#elif defined(DPMI16) || defined(__WINDOWS16__)
+#define PM286
+#else
+#define REALMODE
+#endif
+
+#pragma pack(1)
+
+/* Provide the typedefs for the PM_int386 functions, which issue native
+ * interrupts in real or protected mode and can pass extended registers
+ * around.
+ */
+
+struct _PMDWORDREGS {
+ ulong eax,ebx,ecx,edx,esi,edi,cflag;
+ };
+
+struct _PMWORDREGS {
+ ushort ax,ax_hi;
+ ushort bx,bx_hi;
+ ushort cx,cx_hi;
+ ushort dx,dx_hi;
+ ushort si,si_hi;
+ ushort di,di_hi;
+ ushort cflag,cflag_hi;
+ };
+
+struct _PMBYTEREGS {
+ uchar al, ah; ushort ax_hi;
+ uchar bl, bh; ushort bx_hi;
+ uchar cl, ch; ushort cx_hi;
+ uchar dl, dh; ushort dx_hi;
+ };
+
+typedef union {
+ struct _PMDWORDREGS e;
+ struct _PMWORDREGS x;
+ struct _PMBYTEREGS h;
+ } PMREGS;
+
+typedef struct {
+ ushort es;
+ ushort cs;
+ ushort ss;
+ ushort ds;
+ ushort fs;
+ ushort gs;
+ } PMSREGS;
+
+/* Provide definitions for the real mode register structures passed to
+ * the PM_int86() and PM_int86x() routines. Note that we provide our own
+ * functions to do this for 16-bit code that calls the PM_int386 functions.
+ */
+
+typedef PMREGS RMREGS;
+typedef PMSREGS RMSREGS;
+
+typedef struct {
+ long edi;
+ long esi;
+ long ebp;
+ long reserved;
+ long ebx;
+ long edx;
+ long ecx;
+ long eax;
+ short flags;
+ short es,ds,fs,gs,ip,cs,sp,ss;
+ } DPMI_regs;
+
+#ifdef __MSDOS__
+/* Register structure passed to PM_VxDCall function */
+typedef struct {
+ ulong eax;
+ ulong ebx;
+ ulong ecx;
+ ulong edx;
+ ulong esi;
+ ulong edi;
+ ushort ds,es;
+ } VXD_regs;
+#endif
+
+#define PM_MAX_DRIVE 3
+#define PM_MAX_PATH 256
+#define PM_FILE_INVALID (void*)0xFFFFFFFF
+
+/* Structure for generic directory traversal and management. Also the same
+ * values are passed to PM_setFileAttr to change the file attributes.
+ */
+
+typedef struct {
+ ulong dwSize;
+ ulong attrib;
+ ulong sizeLo;
+ ulong sizeHi;
+ char name[PM_MAX_PATH];
+ } PM_findData;
+
+/* Macro to compute the byte offset of a field in a structure of type type */
+
+#define PM_FIELD_OFFSET(type,field) ((long)&(((type*)0)->field))
+
+/* Marcto to compute the address of the base of the structure given its type,
+ * and an address of a field within the structure.
+ */
+
+#define PM_CONTAINING_RECORD(address, type, field) \
+ ((type*)( \
+ (char*)(address) - \
+ (char*)(&((type*)0)->field)))
+
+/* Flags stored in the PM_findData structure, and also values passed to
+ * PM_setFileAttr to change the file attributes.
+ */
+
+#define PM_FILE_NORMAL 0x00000000
+#define PM_FILE_READONLY 0x00000001
+#define PM_FILE_DIRECTORY 0x00000002
+#define PM_FILE_ARCHIVE 0x00000004
+#define PM_FILE_HIDDEN 0x00000008
+#define PM_FILE_SYSTEM 0x00000010
+
+/* Flags returned by the PM_splitpath function */
+
+#define PM_HAS_WILDCARDS 0x01
+#define PM_HAS_EXTENSION 0x02
+#define PM_HAS_FILENAME 0x04
+#define PM_HAS_DIRECTORY 0x08
+#define PM_HAS_DRIVE 0x10
+
+/* Structure passed to the PM_setFileTime functions */
+typedef struct {
+ short sec; /* Seconds */
+ short min; /* Minutes */
+ short hour; /* Hour (0--23) */
+ short day; /* Day of month (1--31) */
+ short mon; /* Month (0--11) */
+ short year; /* Year (calendar year minus 1900) */
+ } PM_time;
+
+/* Define a macro for creating physical base addresses from segment:offset */
+
+#define MK_PHYS(s,o) (((ulong)(s) << 4) + (ulong)(o))
+
+/* Define the different types of modes supported. This is a global variable
+ * that can be used to determine the type at runtime which will contain
+ * one of these values.
+ */
+
+typedef enum {
+ PM_realMode,
+ PM_286,
+ PM_386
+ } PM_mode_enum;
+
+/* Define types passed to PM_enableWriteCombine */
+
+#define PM_MTRR_UNCACHABLE 0
+#define PM_MTRR_WRCOMB 1
+#define PM_MTRR_WRTHROUGH 4
+#define PM_MTRR_WRPROT 5
+#define PM_MTRR_WRBACK 6
+#define PM_MTRR_MAX 6
+
+/* Error codes returned by PM_enableWriteCombine */
+
+#define PM_MTRR_ERR_OK 0
+#define PM_MTRR_NOT_SUPPORTED -1
+#define PM_MTRR_ERR_PARAMS -2
+#define PM_MTRR_ERR_NOT_4KB_ALIGNED -3
+#define PM_MTRR_ERR_BELOW_1MB -4
+#define PM_MTRR_ERR_NOT_ALIGNED -5
+#define PM_MTRR_ERR_OVERLAP -6
+#define PM_MTRR_ERR_TYPE_MISMATCH -7
+#define PM_MTRR_ERR_NONE_FREE -8
+#define PM_MTRR_ERR_NOWRCOMB -9
+#define PM_MTRR_ERR_NO_OS_SUPPORT -10
+
+/* Values passed to the PM_DMACProgram function */
+
+#define PM_DMA_READ_ONESHOT 0x44 /* One-shot DMA read */
+#define PM_DMA_WRITE_ONESHOT 0x48 /* One-shot DMA write */
+#define PM_DMA_READ_AUTOINIT 0x54 /* Auto-init DMA read */
+#define PM_DMA_WRITE_AUTOINIT 0x58 /* Auto-init DMA write */
+
+/* Flags passed to suspend application callback */
+
+#define PM_DEACTIVATE 1
+#define PM_REACTIVATE 2
+
+/* Return codes that the application can return from the suspend application
+ * callback registered with the PM library. See the MGL documentation for
+ * more details.
+ */
+#define PM_SUSPEND_APP 0
+#define PM_NO_SUSPEND_APP 1
+
+/****************************************************************************
+REMARKS:
+This enumeration defines the type values passed to the PM_agpReservePhysical
+function, to define how the physical memory mapping should be handled.
+
+The PM_agpUncached type indicates that the memory should be allocated as
+uncached memory.
+
+The PM_agpWriteCombine type indicates that write combining should be enabled
+for physical memory mapping. This is used for framebuffer write combing and
+speeds up direct framebuffer writes to the memory.
+
+The PM_agpIntelDCACHE type indicates that memory should come from the Intel
+i81x Display Cache (or DCACHE) memory pool. This flag is specific to the
+Intel i810 and i815 controllers, and should not be passed for any other
+controller type.
+
+HEADER:
+pmapi.h
+
+MEMBERS:
+PM_agpUncached - Indicates that the memory should be uncached
+PM_agpWriteCombine - Indicates that the memory should be write combined
+PM_agpIntelDCACHE - Indicates that the memory should come from DCACHE pool
+****************************************************************************/
+typedef enum {
+ PM_agpUncached,
+ PM_agpWriteCombine,
+ PM_agpIntelDCACHE
+ } PM_agpMemoryType;
+
+/* Defines the size of an system memory page */
+
+#define PM_PAGE_SIZE 4096
+
+/* Type definition for a physical memory address */
+
+typedef unsigned long PM_physAddr;
+
+/* Define a bad physical address returned by map physical functions */
+
+#define PM_BAD_PHYS_ADDRESS 0xFFFFFFFF
+
+/* Type definition for the 12-byte lock handle for locking linear memory */
+
+typedef struct {
+ ulong h[3];
+ } PM_lockHandle;
+
+/* 'C' calling conventions always */
+
+#define PMAPI _ASMAPI
+#define PMAPIP _ASMAPIP
+
+/* Internal typedef to override DPMI_int86 handler */
+
+typedef ibool (PMAPIP DPMI_handler_t)(DPMI_regs *regs);
+void PMAPI DPMI_setInt10Handler(DPMI_handler_t handler);
+
+/* Type definitions for a window handle for console modes */
+
+#if defined(__DRIVER__) || defined(__WIN32_VXD__) || defined(__NT_DRIVER__)
+typedef void *PM_HWND; /* Pointer for portable drivers */
+typedef void *PM_MODULE; /* Module handle for portable drivers */
+#elif defined(__WINDOWS__)
+#ifdef DECLARE_HANDLE
+typedef HWND PM_HWND; /* Real window handle */
+typedef HINSTANCE PM_MODULE; /* Win32 DLL handle */
+#else
+typedef void *PM_HWND; /* Place holder if windows.h not included */
+typedef void *PM_MODULE; /* Place holder if windows.h not included */
+#endif
+#elif defined(__USE_X11__)
+typedef struct {
+ Window *window;
+ Display *display;
+ } PM_HWND; /* X11 window handle */
+#elif defined(__OS2__)
+typedef void *PM_HWND;
+typedef void *PM_MODULE;
+#elif defined(__LINUX__)
+typedef int PM_HWND; /* Console id for fullscreen Linux */
+typedef void *PM_MODULE;
+#elif defined(__QNX__)
+typedef int PM_HWND; /* Console id for fullscreen QNX */
+typedef void *PM_MODULE;
+#elif defined(__RTTARGET__)
+typedef int PM_HWND; /* Placeholder for RTTarget-32 */
+typedef void *PM_MODULE;
+#elif defined(__REALDOS__)
+typedef int PM_HWND; /* Placeholder for fullscreen DOS */
+typedef void *PM_MODULE; /* Placeholder for fullscreen DOS */
+#elif defined(__SMX32__)
+typedef int PM_HWND; /* Placeholder for fullscreen SMX */
+typedef void *PM_MODULE;
+#elif defined(__SNAP__)
+typedef void *PM_HWND;
+typedef void *PM_MODULE;
+#else
+#error PM library not ported to this platform yet!
+#endif
+
+/* Type definition for code pointers */
+
+typedef void (*__codePtr)();
+
+/* Type definition for a C based interrupt handler */
+
+typedef void (PMAPIP PM_intHandler)(void);
+typedef ibool (PMAPIP PM_irqHandler)(void);
+
+/* Hardware IRQ handle used to save and restore the hardware IRQ */
+
+typedef void *PM_IRQHandle;
+
+/* Type definition for the fatal cleanup handler */
+
+typedef void (PMAPIP PM_fatalCleanupHandler)(void);
+
+/* Type defifinition for save state callback function */
+
+typedef int (PMAPIP PM_saveState_cb)(int flags);
+
+/* Type definintion for enum write combined callback function */
+
+typedef void (PMAPIP PM_enumWriteCombine_t)(ulong base,ulong length,uint type);
+
+/* Structure defining all the PM API functions as exported to
+ * the binary portable DLL's.
+ */
+
+typedef struct {
+ ulong dwSize;
+ int (PMAPIP PM_getModeType)(void);
+ void * (PMAPIP PM_getBIOSPointer)(void);
+ void * (PMAPIP PM_getA0000Pointer)(void);
+ void * (PMAPIP PM_mapPhysicalAddr)(ulong base,ulong limit,ibool isCached);
+ void * (PMAPIP PM_mallocShared)(long size);
+ void * reserved1;
+ void (PMAPIP PM_freeShared)(void *ptr);
+ void * (PMAPIP PM_mapToProcess)(void *linear,ulong limit);
+ void * (PMAPIP PM_mapRealPointer)(uint r_seg,uint r_off);
+ void * (PMAPIP PM_allocRealSeg)(uint size,uint *r_seg,uint *r_off);
+ void (PMAPIP PM_freeRealSeg)(void *mem);
+ void * (PMAPIP PM_allocLockedMem)(uint size,ulong *physAddr,ibool contiguous,ibool below16Meg);
+ void (PMAPIP PM_freeLockedMem)(void *p,uint size,ibool contiguous);
+ void (PMAPIP PM_callRealMode)(uint seg,uint off, RMREGS *regs,RMSREGS *sregs);
+ int (PMAPIP PM_int86)(int intno, RMREGS *in, RMREGS *out);
+ int (PMAPIP PM_int86x)(int intno, RMREGS *in, RMREGS *out,RMSREGS *sregs);
+ void (PMAPIP DPMI_int86)(int intno, DPMI_regs *regs);
+ void (PMAPIP PM_availableMemory)(ulong *physical,ulong *total);
+ void * (PMAPIP PM_getVESABuf)(uint *len,uint *rseg,uint *roff);
+ long (PMAPIP PM_getOSType)(void);
+ void (PMAPIP PM_fatalError)(const char *msg);
+ void (PMAPIP PM_setBankA)(int bank);
+ void (PMAPIP PM_setBankAB)(int bank);
+ void (PMAPIP PM_setCRTStart)(int x,int y,int waitVRT);
+ char * (PMAPIP PM_getCurrentPath)(char *path,int maxLen);
+ const char * (PMAPIP PM_getVBEAFPath)(void);
+ const char * (PMAPIP PM_getNucleusPath)(void);
+ const char * (PMAPIP PM_getNucleusConfigPath)(void);
+ const char * (PMAPIP PM_getUniqueID)(void);
+ const char * (PMAPIP PM_getMachineName)(void);
+ ibool (PMAPIP VF_available)(void);
+ void * (PMAPIP VF_init)(ulong baseAddr,int bankSize,int codeLen,void *bankFunc);
+ void (PMAPIP VF_exit)(void);
+ PM_HWND (PMAPIP PM_openConsole)(PM_HWND hwndUser,int device,int xRes,int yRes,int bpp,ibool fullScreen);
+ int (PMAPIP PM_getConsoleStateSize)(void);
+ void (PMAPIP PM_saveConsoleState)(void *stateBuf,PM_HWND hwndConsole);
+ void (PMAPIP PM_restoreConsoleState)(const void *stateBuf,PM_HWND hwndConsole);
+ void (PMAPIP PM_closeConsole)(PM_HWND hwndConsole);
+ void (PMAPIP PM_setOSCursorLocation)(int x,int y);
+ void (PMAPIP PM_setOSScreenWidth)(int width,int height);
+ int (PMAPIP PM_enableWriteCombine)(ulong base,ulong length,uint type);
+ void (PMAPIP PM_backslash)(char *filename);
+ int (PMAPIP PM_lockDataPages)(void *p,uint len,PM_lockHandle *lockHandle);
+ int (PMAPIP PM_unlockDataPages)(void *p,uint len,PM_lockHandle *lockHandle);
+ int (PMAPIP PM_lockCodePages)(__codePtr p,uint len,PM_lockHandle *lockHandle);
+ int (PMAPIP PM_unlockCodePages)(__codePtr p,uint len,PM_lockHandle *lockHandle);
+ ibool (PMAPIP PM_setRealTimeClockHandler)(PM_intHandler ih,int frequency);
+ void (PMAPIP PM_setRealTimeClockFrequency)(int frequency);
+ void (PMAPIP PM_restoreRealTimeClockHandler)(void);
+ ibool (PMAPIP PM_doBIOSPOST)(ushort axVal,ulong BIOSPhysAddr,void *BIOSPtr,ulong BIOSLen);
+ char (PMAPIP PM_getBootDrive)(void);
+ void (PMAPIP PM_freePhysicalAddr)(void *ptr,ulong limit);
+ uchar (PMAPIP PM_inpb)(int port);
+ ushort (PMAPIP PM_inpw)(int port);
+ ulong (PMAPIP PM_inpd)(int port);
+ void (PMAPIP PM_outpb)(int port,uchar val);
+ void (PMAPIP PM_outpw)(int port,ushort val);
+ void (PMAPIP PM_outpd)(int port,ulong val);
+ void * reserved2;
+ void (PMAPIP PM_setSuspendAppCallback)(PM_saveState_cb saveState);
+ ibool (PMAPIP PM_haveBIOSAccess)(void);
+ int (PMAPIP PM_kbhit)(void);
+ int (PMAPIP PM_getch)(void);
+ ibool (PMAPIP PM_findBPD)(const char *dllname,char *bpdpath);
+ ulong (PMAPIP PM_getPhysicalAddr)(void *p);
+ void (PMAPIP PM_sleep)(ulong milliseconds);
+ int (PMAPIP PM_getCOMPort)(int port);
+ int (PMAPIP PM_getLPTPort)(int port);
+ PM_MODULE (PMAPIP PM_loadLibrary)(const char *szDLLName);
+ void * (PMAPIP PM_getProcAddress)(PM_MODULE hModule,const char *szProcName);
+ void (PMAPIP PM_freeLibrary)(PM_MODULE hModule);
+ int (PMAPIP PCI_enumerate)(PCIDeviceInfo info[]);
+ ulong (PMAPIP PCI_accessReg)(int index,ulong value,int func,PCIDeviceInfo *info);
+ ibool (PMAPIP PCI_setHardwareIRQ)(PCIDeviceInfo *info,uint intPin,uint IRQ);
+ void (PMAPIP PCI_generateSpecialCyle)(uint bus,ulong specialCycleData);
+ void * reserved3;
+ ulong (PMAPIP PCIBIOS_getEntry)(void);
+ uint (PMAPIP CPU_getProcessorType)(void);
+ ibool (PMAPIP CPU_haveMMX)(void);
+ ibool (PMAPIP CPU_have3DNow)(void);
+ ibool (PMAPIP CPU_haveSSE)(void);
+ ibool (PMAPIP CPU_haveRDTSC)(void);
+ ulong (PMAPIP CPU_getProcessorSpeed)(ibool accurate);
+ void (PMAPIP ZTimerInit)(void);
+ void (PMAPIP LZTimerOn)(void);
+ ulong (PMAPIP LZTimerLap)(void);
+ void (PMAPIP LZTimerOff)(void);
+ ulong (PMAPIP LZTimerCount)(void);
+ void (PMAPIP LZTimerOnExt)(LZTimerObject *tm);
+ ulong (PMAPIP LZTimerLapExt)(LZTimerObject *tm);
+ void (PMAPIP LZTimerOffExt)(LZTimerObject *tm);
+ ulong (PMAPIP LZTimerCountExt)(LZTimerObject *tm);
+ void (PMAPIP ULZTimerOn)(void);
+ ulong (PMAPIP ULZTimerLap)(void);
+ void (PMAPIP ULZTimerOff)(void);
+ ulong (PMAPIP ULZTimerCount)(void);
+ ulong (PMAPIP ULZReadTime)(void);
+ ulong (PMAPIP ULZElapsedTime)(ulong start,ulong finish);
+ void (PMAPIP ULZTimerResolution)(ulong *resolution);
+ void * (PMAPIP PM_findFirstFile)(const char *filename,PM_findData *findData);
+ ibool (PMAPIP PM_findNextFile)(void *handle,PM_findData *findData);
+ void (PMAPIP PM_findClose)(void *handle);
+ void (PMAPIP PM_makepath)(char *p,const char *drive,const char *dir,const char *name,const char *ext);
+ int (PMAPIP PM_splitpath)(const char *fn,char *drive,char *dir,char *name,char *ext);
+ ibool (PMAPIP PM_driveValid)(char drive);
+ void (PMAPIP PM_getdcwd)(int drive,char *dir,int len);
+ void (PMAPIP PM_setFileAttr)(const char *filename,uint attrib);
+ ibool (PMAPIP PM_mkdir)(const char *filename);
+ ibool (PMAPIP PM_rmdir)(const char *filename);
+ uint (PMAPIP PM_getFileAttr)(const char *filename);
+ ibool (PMAPIP PM_getFileTime)(const char *filename,ibool gmtTime,PM_time *time);
+ ibool (PMAPIP PM_setFileTime)(const char *filename,ibool gmtTime,PM_time *time);
+ char * (PMAPIP CPU_getProcessorName)(void);
+ int (PMAPIP PM_getVGAStateSize)(void);
+ void (PMAPIP PM_saveVGAState)(void *stateBuf);
+ void (PMAPIP PM_restoreVGAState)(const void *stateBuf);
+ void (PMAPIP PM_vgaBlankDisplay)(void);
+ void (PMAPIP PM_vgaUnblankDisplay)(void);
+ void (PMAPIP PM_blockUntilTimeout)(ulong milliseconds);
+ void (PMAPIP _PM_add64)(u32 a_low,s32 a_high,u32 b_low,s32 b_high,__i64 *result);
+ void (PMAPIP _PM_sub64)(u32 a_low,s32 a_high,u32 b_low,s32 b_high,__i64 *result);
+ void (PMAPIP _PM_mul64)(u32 a_low,s32 a_high,u32 b_low,s32 b_high,__i64 *result);
+ void (PMAPIP _PM_div64)(u32 a_low,s32 a_high,u32 b_low,s32 b_high,__i64 *result);
+ void (PMAPIP _PM_shr64)(u32 a_low,s32 a_high,s32 shift,__i64 *result);
+ void (PMAPIP _PM_sar64)(u32 a_low,s32 a_high,s32 shift,__i64 *result);
+ void (PMAPIP _PM_shl64)(u32 a_low,s32 a_high,s32 shift,__i64 *result);
+ void (PMAPIP _PM_neg64)(u32 a_low,s32 a_high,__i64 *result);
+ ulong (PMAPIP PCI_findBARSize)(int bar,PCIDeviceInfo *pci);
+ void (PMAPIP PCI_readRegBlock)(PCIDeviceInfo *info,int index,void *dst,int count);
+ void (PMAPIP PCI_writeRegBlock)(PCIDeviceInfo *info,int index,void *src,int count);
+ void (PMAPIP PM_flushTLB)(void);
+ void (PMAPIP PM_useLocalMalloc)(void * (*malloc)(size_t size),void * (*calloc)(size_t nelem,size_t size),void * (*realloc)(void *ptr,size_t size),void (*free)(void *p));
+ void * (PMAPIP PM_malloc)(size_t size);
+ void * (PMAPIP PM_calloc)(size_t nelem,size_t size);
+ void * (PMAPIP PM_realloc)(void *ptr,size_t size);
+ void (PMAPIP PM_free)(void *p);
+ ibool (PMAPIP PM_getPhysicalAddrRange)(void *p,ulong length,ulong *physAddress);
+ void * (PMAPIP PM_allocPage)(ibool locked);
+ void (PMAPIP PM_freePage)(void *p);
+ ulong (PMAPIP PM_agpInit)(void);
+ void (PMAPIP PM_agpExit)(void);
+ ibool (PMAPIP PM_agpReservePhysical)(ulong numPages,int type,void **physContext,PM_physAddr *physAddr);
+ ibool (PMAPIP PM_agpReleasePhysical)(void *physContext);
+ ibool (PMAPIP PM_agpCommitPhysical)(void *physContext,ulong numPages,ulong startOffset,PM_physAddr *physAddr);
+ ibool (PMAPIP PM_agpFreePhysical)(void *physContext,ulong numPages,ulong startOffset);
+ int (PMAPIP PCI_getNumDevices)(void);
+ void (PMAPIP PM_setLocalBPDPath)(const char *path);
+ void * (PMAPIP PM_loadDirectDraw)(int device);
+ void (PMAPIP PM_unloadDirectDraw)(int device);
+ PM_HWND (PMAPIP PM_getDirectDrawWindow)(void);
+ void (PMAPIP PM_doSuspendApp)(void);
+ } PM_imports;
+
+#pragma pack()
+
+/*---------------------------- Global variables ---------------------------*/
+
+#ifdef __cplusplus
+extern "C" { /* Use "C" linkage when in C++ mode */
+#endif
+
+#ifdef __WIN32_VXD__
+#define VESA_BUF_SIZE 1024
+extern uchar *_PM_rmBufAddr;
+#endif
+
+/* {secret} Pointer to global exports structure.
+ * Should not be used by application programs.
+ */
+extern PM_imports _VARAPI _PM_imports;
+
+/* {secret} */
+extern void * (*__PM_malloc)(size_t size);
+/* {secret} */
+extern void * (*__PM_calloc)(size_t nelem,size_t size);
+/* {secret} */
+extern void * (*__PM_realloc)(void *ptr,size_t size);
+/* {secret} */
+extern void (*__PM_free)(void *p);
+
+/*--------------------------- Function Prototypes -------------------------*/
+
+/* Routine to initialise the host side PM library. Note used from DLL's */
+
+void PMAPI PM_init(void);
+
+/* Routine to return either PM_realMode, PM_286 or PM_386 */
+
+int PMAPI PM_getModeType(void);
+
+/* Routine to return a selector to the BIOS data area at segment 0x40 */
+
+void * PMAPI PM_getBIOSPointer(void);
+
+/* Routine to return a linear pointer to the VGA frame buffer memory */
+
+void * PMAPI PM_getA0000Pointer(void);
+
+/* Routines to map/free physical memory into the current DS segment. In
+ * some environments (32-bit DOS is one), after the mapping has been
+ * allocated, it cannot be freed. Hence you should only allocate the
+ * mapping once and cache the value for use by other parts of your
+ * application. If the mapping cannot be createed, this function will
+ * return a NULL pointer.
+ *
+ * This routine will also work for memory addresses below 1Mb, but the
+ * mapped address cannot cross the 1Mb boundary.
+ */
+
+void * PMAPI PM_mapPhysicalAddr(ulong base,ulong limit,ibool isCached);
+void PMAPI PM_freePhysicalAddr(void *ptr,ulong limit);
+
+/* Routine to determine the physical address of a linear address. It is
+ * up to the caller to ensure the entire address range for a linear
+ * block of memory is page aligned if that is required.
+ */
+
+ulong PMAPI PM_getPhysicalAddr(void *p);
+ibool PMAPI PM_getPhysicalAddrRange(void *p,ulong length,ulong *physAddress);
+
+/* Routines for memory allocation. By default these functions use the regular
+ * C runtime library malloc/free functions, but you can use the
+ * PM_useLocalMalloc function to override the default memory allocator with
+ * your own memory allocator. This will ensure that all memory allocation
+ * used by SciTech products will use your overridden memory allocator
+ * functions.
+ *
+ * Note that BPD files automatically map the C runtime library
+ * malloc/calloc/realloc/free calls from inside the BPD to the PM library
+ * versions by default.
+ */
+
+void PMAPI PM_useLocalMalloc(void * (*malloc)(size_t size),void * (*calloc)(size_t nelem,size_t size),void * (*realloc)(void *ptr,size_t size),void (*free)(void *p));
+void * PMAPI PM_malloc(size_t size);
+void * PMAPI PM_calloc(size_t nelem,size_t size);
+void * PMAPI PM_realloc(void *ptr,size_t size);
+void PMAPI PM_free(void *p);
+
+/* Routine to allocate a memory block in the global shared region that
+ * is common to all tasks and accessible from ring 0 code.
+ */
+
+void * PMAPI PM_mallocShared(long size);
+
+/* Routine to free the allocated shared memory block */
+
+void PMAPI PM_freeShared(void *ptr);
+
+/* Attach a previously allocated linear mapping to a new process */
+
+void * PMAPI PM_mapToProcess(void *linear,ulong limit);
+
+/* Macros to extract byte, word and long values from a char pointer */
+
+#define PM_getByte(p) *((volatile uchar*)(p))
+#define PM_getWord(p) *((volatile ushort*)(p))
+#define PM_getLong(p) *((volatile ulong*)(p))
+#define PM_setByte(p,v) PM_getByte(p) = (v)
+#define PM_setWord(p,v) PM_getWord(p) = (v)
+#define PM_setLong(p,v) PM_getLong(p) = (v)
+
+/* Routine for accessing a low 1Mb memory block. You dont need to free this
+ * pointer, but in 16 bit protected mode the selector allocated will be
+ * re-used the next time this routine is called.
+ */
+
+void * PMAPI PM_mapRealPointer(uint r_seg,uint r_off);
+
+/* Routine to allocate a block of conventional memory below the 1Mb
+ * limit so that it can be accessed from real mode. Ensure that you free
+ * the segment when you are done with it.
+ *
+ * This routine returns a selector and offset to the segment that has been
+ * allocated, and also returns the real mode segment and offset which can
+ * be passed to real mode routines. Will return 0 if memory could not be
+ * allocated.
+ *
+ * Please note that with some DOS extenders, memory allocated with the
+ * following function cannot be freed, hence it will be allocated for the
+ * life of your program. Thus if you need to call a bunch of different
+ * real-mode routines in your program, allocate a single large buffer at
+ * program startup that can be re-used throughout the program execution.
+ */
+
+void * PMAPI PM_allocRealSeg(uint size,uint *r_seg,uint *r_off);
+void PMAPI PM_freeRealSeg(void *mem);
+
+/* Routine to allocate a block of locked memory, and return both the
+ * linear and physical addresses of the memory. You should always
+ * allocate locked memory blocks in page sized chunks (ie: 4K on IA32).
+ * If the memory is not contiguous, you will need to use the
+ * PM_getPhysicalAddr function to get the physical address of linear
+ * pages within the memory block (the returned physical address will be
+ * for the first address in the memory block only).
+ */
+
+void * PMAPI PM_allocLockedMem(uint size,ulong *physAddr,ibool contiguous,ibool below16Meg);
+void PMAPI PM_freeLockedMem(void *p,uint size,ibool contiguous);
+
+/* Routine to allocate and free paged sized blocks of shared memory.
+ * Addressable from all processes, but not from a ring 0 context
+ * under OS/2. Note that under OS/2 PM_mapSharedPages must be called
+ * to map the memory blocks into the shared memory address space
+ * of each connecting process.
+ */
+
+void * PMAPI PM_allocPage(ibool locked);
+void PMAPI PM_freePage(void *p);
+#ifdef __OS2__
+void PMAPI PM_mapSharedPages(void);
+#endif
+
+/* Routine to return true if we have access to the BIOS on the host OS */
+
+ibool PMAPI PM_haveBIOSAccess(void);
+
+/* Routine to call a real mode assembly language procedure. Register
+ * values are passed in and out in the 'regs' and 'sregs' structures. We
+ * do not provide any method of copying data from the protected mode stack
+ * to the real mode stack, so if you need to pass data to real mode, you will
+ * need to write a real mode assembly language hook to recieve the values
+ * in registers, and to pass the data through a real mode block allocated
+ * with the PM_allocRealSeg() routine.
+ */
+
+void PMAPI PM_callRealMode(uint seg,uint off, RMREGS *regs,RMSREGS *sregs);
+
+/* Routines to generate real mode interrupts using the same interface that
+ * is used by int86() and int86x() in realmode. This routine is need to
+ * call certain BIOS and DOS functions that are not supported by some
+ * DOS extenders. No translation is done on any of the register values,
+ * so they must be correctly set up and translated by the calling program.
+ *
+ * Normally the DOS extenders will allow you to use the normal int86()
+ * function directly and will pass on unhandled calls to real mode to be
+ * handled by the real mode handler. However calls to int86x() with real
+ * mode segment values to be loaded will cause a GPF if used with the
+ * standard int86x(), so you should use these routines if you know you
+ * want to call a real mode handler.
+ */
+
+int PMAPI PM_int86(int intno, RMREGS *in, RMREGS *out);
+int PMAPI PM_int86x(int intno, RMREGS *in, RMREGS *out,RMSREGS *sregs);
+
+/* Routine to generate a real mode interrupt. This is identical to the
+ * above function, but takes a DPMI_regs structure for the registers
+ * which has a lot more information. It is only available from 32-bit
+ * protected mode.
+ */
+
+void PMAPI DPMI_int86(int intno, DPMI_regs *regs);
+
+/* Function to return the amount of available physical and total memory.
+ * The results of this function are *only* valid before you have made any
+ * calls to malloc() and free(). If you need to keep track of exactly how
+ * much memory is currently allocated, you need to call this function to
+ * get the total amount of memory available and then keep track of
+ * the available memory every time you call malloc() and free().
+ */
+
+void PMAPI PM_availableMemory(ulong *physical,ulong *total);
+
+/* Return the address of a global VESA real mode transfer buffer for use
+ * by applications.
+ */
+
+void * PMAPI PM_getVESABuf(uint *len,uint *rseg,uint *roff);
+
+/* Handle fatal error conditions */
+
+void PMAPI PM_fatalError(const char *msg);
+
+/* Function to set a cleanup error handler called when PM_fatalError
+ * is called. This allows us to the console back into a normal state
+ * if we get a failure from deep inside a BPD file. This function is
+ * not exported to BPD files, and is only used by code compiled for the
+ * OS.
+ */
+
+void PMAPI PM_setFatalErrorCleanup(PM_fatalCleanupHandler cleanup);
+
+/* Return the OS type flag as defined in <drvlib/os/os.h> */
+
+long PMAPI PM_getOSType(void);
+
+/* Functions to set a VBE bank via an Int 10h */
+
+void PMAPI PM_setBankA(int bank);
+void PMAPI PM_setBankAB(int bank);
+void PMAPI PM_setCRTStart(int x,int y,int waitVRT);
+
+/* Return the current working directory */
+
+char * PMAPI PM_getCurrentPath(char *path,int maxLen);
+
+/* Return paths to the VBE/AF and Nucleus directories */
+
+const char * PMAPI PM_getVBEAFPath(void);
+const char * PMAPI PM_getNucleusPath(void);
+const char * PMAPI PM_getNucleusConfigPath(void);
+
+/* Find the path to a binary portable DLL */
+
+void PMAPI PM_setLocalBPDPath(const char *path);
+ibool PMAPI PM_findBPD(const char *dllname,char *bpdpath);
+
+/* Returns the drive letter of the boot drive for DOS, OS/2 and Windows */
+
+char PMAPI PM_getBootDrive(void);
+
+/* Return a network unique machine identifier as a string */
+
+const char * PMAPI PM_getUniqueID(void);
+
+/* Return the network machine name as a string */
+
+const char * PMAPI PM_getMachineName(void);
+
+/* Functions to install and remove the virtual linear framebuffer
+ * emulation code. For unsupported DOS extenders and when running under
+ * a DPMI host like Windows or OS/2, this function will return a NULL.
+ */
+
+ibool PMAPI VF_available(void);
+void * PMAPI VF_init(ulong baseAddr,int bankSize,int codeLen,void *bankFunc);
+void PMAPI VF_exit(void);
+
+/* Functions to wait for a keypress and read a key for command line
+ * environments such as DOS, Win32 console and Unix.
+ */
+
+int PMAPI PM_kbhit(void);
+int PMAPI PM_getch(void);
+
+/* Functions to create either a fullscreen or windowed console on the
+ * desktop, and to allow the resolution of fullscreen consoles to be
+ * changed on the fly without closing the console. For non-windowed
+ * environments (such as a Linux or OS/2 fullscreen console), these
+ * functions enable console graphics mode and restore console text mode.
+ *
+ * The suspend application callback is used to allow the application to
+ * save the state of the fullscreen console mode to allow temporary
+ * switching to another console or back to the regular GUI desktop. It
+ * is also called to restore the fullscreen graphics state after the
+ * fullscreen console regains the focus.
+ *
+ * The device parameter allows for the console to be opened on a different
+ * display controllers (0 is always the primary controller).
+ */
+
+PM_HWND PMAPI PM_openConsole(PM_HWND hwndUser,int device,int xRes,int yRes,int bpp,ibool fullScreen);
+int PMAPI PM_getConsoleStateSize(void);
+void PMAPI PM_saveConsoleState(void *stateBuf,PM_HWND hwndConsole);
+void PMAPI PM_setSuspendAppCallback(PM_saveState_cb saveState);
+void PMAPI PM_restoreConsoleState(const void *stateBuf,PM_HWND hwndConsole);
+void PMAPI PM_closeConsole(PM_HWND hwndConsole);
+
+/* Functions to modify OS console information */
+
+void PMAPI PM_setOSCursorLocation(int x,int y);
+void PMAPI PM_setOSScreenWidth(int width,int height);
+
+/* Function to emable Intel PPro/PII write combining */
+
+int PMAPI PM_enableWriteCombine(ulong base,ulong length,uint type);
+int PMAPI PM_enumWriteCombine(PM_enumWriteCombine_t callback);
+
+/* Function to add a path separator to the end of a filename (if not present) */
+
+void PMAPI PM_backslash(char *filename);
+
+/* Routines to lock and unlock regions of memory under a virtual memory
+ * environment. These routines _must_ be used to lock all hardware
+ * and mouse interrupt handlers installed, _AND_ any global data that
+ * these handler manipulate, so that they will always be present in memory
+ * to handle the incoming interrupts.
+ *
+ * Note that it is important to call the correct routine depending on
+ * whether the area being locked is code or data, so that under 32 bit
+ * PM we will get the selector value correct.
+ */
+
+int PMAPI PM_lockDataPages(void *p,uint len,PM_lockHandle *lockHandle);
+int PMAPI PM_unlockDataPages(void *p,uint len,PM_lockHandle *lockHandle);
+int PMAPI PM_lockCodePages(__codePtr p,uint len,PM_lockHandle *lockHandle);
+int PMAPI PM_unlockCodePages(__codePtr p,uint len,PM_lockHandle *lockHandle);
+
+/* Routines to install and remove Real Time Clock interrupt handlers. The
+ * frequency of the real time clock can be changed by calling
+ * PM_setRealTimeClockFrequeny, and the value can be any power of 2 value
+ * from 2Hz to 8192Hz.
+ *
+ * Note that you _must_ lock the memory containing the interrupt
+ * handlers with the PM_lockPages() function otherwise you may encounter
+ * problems in virtual memory environments.
+ *
+ * NOTE: User space versions of the PM library should fail these functions.
+ */
+
+ibool PMAPI PM_setRealTimeClockHandler(PM_intHandler ih,int frequency);
+void PMAPI PM_setRealTimeClockFrequency(int frequency);
+void PMAPI PM_restoreRealTimeClockHandler(void);
+
+/* Routines to install and remove hardware interrupt handlers.
+ *
+ * Note that you _must_ lock the memory containing the interrupt
+ * handlers with the PM_lockPages() function otherwise you may encounter
+ * problems in virtual memory environments.
+ *
+ * NOTE: User space versions of the PM library should fail these functions.
+ */
+
+PM_IRQHandle PMAPI PM_setIRQHandler(int IRQ,PM_irqHandler ih);
+void PMAPI PM_restoreIRQHandler(PM_IRQHandle irqHandle);
+
+/* Functions to program DMA using the legacy ISA DMA controller */
+
+void PMAPI PM_DMACEnable(int channel);
+void PMAPI PM_DMACDisable(int channel);
+void PMAPI PM_DMACProgram(int channel,int mode,ulong bufferPhys,int count);
+ulong PMAPI PM_DMACPosition(int channel);
+
+/* Function to post secondary graphics controllers using the BIOS */
+
+ibool PMAPI PM_doBIOSPOST(ushort axVal,ulong BIOSPhysAddr,void *mappedBIOS,ulong BIOSLen);
+
+/* Function to init the AGP functions and return the AGP aperture size in MB */
+
+ulong PMAPI PM_agpInit(void);
+void PMAPI PM_agpExit(void);
+
+/* Functions to reserve and release physical AGP memory ranges */
+
+ibool PMAPI PM_agpReservePhysical(ulong numPages,int type,void **physContext,PM_physAddr *physAddr);
+ibool PMAPI PM_agpReleasePhysical(void *physContext);
+
+/* Functions to commit and free physical AGP memory ranges */
+
+ibool PMAPI PM_agpCommitPhysical(void *physContext,ulong numPages,ulong startOffset,PM_physAddr *physAddr);
+ibool PMAPI PM_agpFreePhysical(void *physContext,ulong numPages,ulong startOffset);
+
+/* Functions to do I/O port manipulation directly from C code. These
+ * functions are portable and will work on any processor architecture
+ * to access I/O space registers on PCI devices.
+ */
+
+uchar PMAPI PM_inpb(int port);
+ushort PMAPI PM_inpw(int port);
+ulong PMAPI PM_inpd(int port);
+void PMAPI PM_outpb(int port,uchar val);
+void PMAPI PM_outpw(int port,ushort val);
+void PMAPI PM_outpd(int port,ulong val);
+
+/* Functions to determine the I/O port locations for COM and LPT ports.
+ * The functions are zero based, so for COM1 or LPT1 pass in a value of 0,
+ * for COM2 or LPT2 pass in a value of 1 etc.
+ */
+
+int PMAPI PM_getCOMPort(int port);
+int PMAPI PM_getLPTPort(int port);
+
+/* Internal functions that need prototypes */
+
+void PMAPI _PM_getRMvect(int intno, long *realisr);
+void PMAPI _PM_setRMvect(int intno, long realisr);
+void PMAPI _PM_freeMemoryMappings(void);
+
+/* Function to override the default debug log file location */
+
+void PMAPI PM_setDebugLog(const char *logFilePath);
+
+/* Function to put the process to sleep for the specified milliseconds */
+
+void PMAPI PM_sleep(ulong milliseconds);
+
+/* Function to block until 'milliseconds' have passed since last call */
+
+void PMAPI PM_blockUntilTimeout(ulong milliseconds);
+
+/* Functions for directory traversal and management */
+
+void * PMAPI PM_findFirstFile(const char *filename,PM_findData *findData);
+ibool PMAPI PM_findNextFile(void *handle,PM_findData *findData);
+void PMAPI PM_findClose(void *handle);
+void PMAPI PM_makepath(char *p,const char *drive,const char *dir,const char *name,const char *ext);
+int PMAPI PM_splitpath(const char *fn,char *drive,char *dir,char *name,char *ext);
+ibool PMAPI PM_driveValid(char drive);
+void PMAPI PM_getdcwd(int drive,char *dir,int len);
+uint PMAPI PM_getFileAttr(const char *filename);
+void PMAPI PM_setFileAttr(const char *filename,uint attrib);
+ibool PMAPI PM_getFileTime(const char *filename,ibool gmTime,PM_time *time);
+ibool PMAPI PM_setFileTime(const char *filename,ibool gmTime,PM_time *time);
+ibool PMAPI PM_mkdir(const char *filename);
+ibool PMAPI PM_rmdir(const char *filename);
+
+/* Functions to handle loading OS specific shared libraries */
+
+PM_MODULE PMAPI PM_loadLibrary(const char *szDLLName);
+void * PMAPI PM_getProcAddress(PM_MODULE hModule,const char *szProcName);
+void PMAPI PM_freeLibrary(PM_MODULE hModule);
+
+/* Functions and macros for 64-bit arithmetic */
+
+void PMAPI _PM_add64(u32 a_low,s32 a_high,u32 b_low,s32 b_high,__i64 *result);
+void PMAPI _PM_sub64(u32 a_low,s32 a_high,u32 b_low,s32 b_high,__i64 *result);
+void PMAPI _PM_mul64(u32 a_low,s32 a_high,u32 b_low,s32 b_high,__i64 *result);
+void PMAPI _PM_div64(u32 a_low,s32 a_high,u32 b_low,s32 b_high,__i64 *result);
+void PMAPI _PM_shr64(u32 a_low,s32 a_high,s32 shift,__i64 *result);
+void PMAPI _PM_sar64(u32 a_low,s32 a_high,s32 shift,__i64 *result);
+void PMAPI _PM_shl64(u32 a_low,s32 a_high,s32 shift,__i64 *result);
+void PMAPI _PM_neg64(u32 a_low,s32 a_high,__i64 *result);
+#ifdef __NATIVE_INT64__
+#define PM_add64(r,a,b) (r) = (a) + (b)
+#define PM_add64_32(r,a,b) (r) = (a) + (b)
+#define PM_sub64(r,a,b) (r) = (a) - (b)
+#define PM_sub64_32(r,a,b) (r) = (a) - (b)
+#define PM_mul64(r,a,b) (r) = (a) * (b)
+#define PM_mul64_32(r,a,b) (r) = (a) * (b)
+#define PM_div64(r,a,b) (r) = (a) / (b)
+#define PM_div64_32(r,a,b) (r) = (a) / (b)
+#define PM_shr64(r,a,s) (r) = (a) >> (s)
+#define PM_sar64(r,a,s) (r) = ((s64)(a)) >> (s)
+#define PM_shl64(r,a,s) (r) = (u64)(a) << (s)
+#define PM_neg64(r,a,s) (r) = -(a)
+#define PM_not64(r,a,s) (r) = ~(a)
+#define PM_eq64(a,b) (a) == (b)
+#define PM_gt64(a,b) (a) > (b)
+#define PM_lt64(a,b) (a) < (b)
+#define PM_geq64(a,b) (a) >= (b)
+#define PM_leq64(a,b) (a) <= (b)
+#define PM_64to32(a) (u32)(a)
+#define PM_64tos32(a) (s32)(a)
+#define PM_set64(a,b,c) (a) = ((u64)(b) << 32) + (c)
+#define PM_set64_32(a,b) (a) = (b)
+#else
+#define PM_add64(r,a,b) _PM_add64((a).low,(a).high,(b).low,(b).high,&(r))
+#define PM_add64_32(r,a,b) _PM_add64((a).low,(a).high,b,0,&(r))
+#define PM_sub64(r,a,b) _PM_sub64((a).low,(a).high,(b).low,(b).high,&(r))
+#define PM_sub64_32(r,a,b) _PM_sub64((a).low,(a).high,b,0,&(r))
+#define PM_mul64(r,a,b) _PM_mul64((a).low,(a).high,(b).low,(b).high,&(r))
+#define PM_mul64_32(r,a,b) _PM_mul64((a).low,(a).high,b,0,&(r))
+#define PM_div64(r,a,b) _PM_div64((a).low,(a).high,(b).low,(b).high,&(r))
+#define PM_div64_32(r,a,b) _PM_div64((a).low,(a).high,b,0,&(r))
+#define PM_shr64(r,a,s) _PM_shr64((a).low,(a).high,s,&(r))
+#define PM_sar64(r,a,s) _PM_sar64((a).low,(a).high,s,&(r))
+#define PM_shl64(r,a,s) _PM_shl64((a).low,(a).high,s,&(r))
+#define PM_neg64(r,a,s) _PM_neg64((a).low,(a).high,&(r))
+#define PM_not64(r,a,s) (r).low = ~(a).low, (r).high = ~(a).high
+#define PM_eq64(a,b) ((a).low == (b).low && (a).high == (b).high)
+#define PM_gt64(a,b) (((a).high > (b).high) || ((a).high == (b).high && (a).low > (b).low))
+#define PM_lt64(a,b) (((a).high < (b).high) || ((a).high == (b).high && (a).low < (b).low))
+#define PM_geq64(a,b) (PM_eq64(a,b) || PM_gt64(a,b))
+#define PM_leq64(a,b) (PM_eq64(a,b) || PM_lt64(a,b))
+#define PM_64to32(a) (u32)(a.low)
+#define PM_64tos32(a) ((a).high < 0) ? -(a).low : (a).low)
+#define PM_set64(a,b,c) (a).high = (b), (a).low = (c)
+#define PM_set64_32(a,b) (a).high = 0, (a).low = (b)
+#endif
+
+/* Function to enable IOPL access if required */
+
+int PMAPI PM_setIOPL(int iopl);
+
+/* Function to flush the TLB and CPU caches */
+
+void PMAPI PM_flushTLB(void);
+
+/* DOS specific fucntions */
+
+#ifdef __MSDOS__
+uint PMAPI PMHELP_getVersion(void);
+void PMAPI PM_VxDCall(VXD_regs *regs);
+#endif
+
+/* Functions to save and restore the VGA hardware state */
+
+int PMAPI PM_getVGAStateSize(void);
+void PMAPI PM_saveVGAState(void *stateBuf);
+void PMAPI PM_restoreVGAState(const void *stateBuf);
+void PMAPI PM_vgaBlankDisplay(void);
+void PMAPI PM_vgaUnblankDisplay(void);
+
+/* Functions to load and unload DirectDraw libraries. Only used on
+ * Windows platforms.
+ */
+
+void * PMAPI PM_loadDirectDraw(int device);
+void PMAPI PM_unloadDirectDraw(int device);
+PM_HWND PMAPI PM_getDirectDrawWindow(void);
+void PMAPI PM_doSuspendApp(void);
+
+/* Functions to install, start, stop and remove NT services. Valid only
+ * for Win32 apps running on Windows NT.
+ */
+
+#ifdef __WINDOWS32__
+ulong PMAPI PM_installService(const char *szDriverName,const char *szServiceName,const char *szLoadGroup,ulong dwServiceType);
+ulong PMAPI PM_startService(const char *szServiceName);
+ulong PMAPI PM_stopService(const char *szServiceName);
+ulong PMAPI PM_removeService(const char *szServiceName);
+#endif
+
+/* Routines to generate native interrupts (ie: protected mode interrupts
+ * for protected mode apps) using an interface the same as that use by
+ * int86() and int86x() in realmode. These routines are required because
+ * many 32 bit compilers use different register structures and different
+ * functions causing major portability headaches. Thus we provide our
+ * own and solve it all in one fell swoop, and we also get a routine to
+ * put stuff into 32 bit registers from real mode ;-)
+ */
+
+void PMAPI PM_segread(PMSREGS *sregs);
+int PMAPI PM_int386(int intno, PMREGS *in, PMREGS *out);
+int PMAPI PM_int386x(int intno, PMREGS *in, PMREGS *out,PMSREGS *sregs);
+
+/* Call the X86 emulator or the real BIOS in our test harness */
+
+#if defined(TEST_HARNESS) && !defined(PMLIB)
+#define PM_mapRealPointer(r_seg,r_off) _PM_imports.PM_mapRealPointer(r_seg,r_off)
+#define PM_getVESABuf(len,rseg,roff) _PM_imports.PM_getVESABuf(len,rseg,roff)
+#define PM_callRealMode(seg,off,regs,sregs) _PM_imports.PM_callRealMode(seg,off,regs,sregs)
+#define PM_int86(intno,in,out) _PM_imports.PM_int86(intno,in,out)
+#define PM_int86x(intno,in,out,sregs) _PM_imports.PM_int86x(intno,in,out,sregs)
+#endif
+
+#ifdef __cplusplus
+} /* End of "C" linkage for C++ */
+#endif
+
+/* Include OS extensions for interrupt handling */
+
+#if defined(__REALDOS__) || defined(__SMX32__)
+#include "pmint.h"
+#endif
+
+#endif /* __PMAPI_H */
+
diff --git a/board/MAI/bios_emulator/scitech/include/pmimp.h b/board/MAI/bios_emulator/scitech/include/pmimp.h
new file mode 100644
index 00000000000..d6c5cdb740f
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/include/pmimp.h
@@ -0,0 +1,194 @@
+/****************************************************************************
+*
+* SciTech OS Portability Manager Library
+*
+* ========================================================================
+*
+* The contents of this file are subject to the SciTech MGL Public
+* License Version 1.0 (the "License"); you may not use this file
+* except in compliance with the License. You may obtain a copy of
+* the License at http://www.scitechsoft.com/mgl-license.txt
+*
+* Software distributed under the License is distributed on an
+* "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+* implied. See the License for the specific language governing
+* rights and limitations under the License.
+*
+* The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+*
+* The Initial Developer of the Original Code is SciTech Software, Inc.
+* All Rights Reserved.
+*
+* ========================================================================
+*
+* Language: ANSI C
+* Environment: Any
+*
+* Description: Header file declaring all the PM imports structure for the
+* current version of the PM library. Included in all code
+* that needs to pass the PM imports to BPD files.
+*
+****************************************************************************/
+
+PM_imports _VARAPI _PM_imports = {
+ sizeof(PM_imports),
+ PM_getModeType,
+ PM_getBIOSPointer,
+ PM_getA0000Pointer,
+ PM_mapPhysicalAddr,
+ PM_mallocShared,
+ NULL,
+ PM_freeShared,
+ PM_mapToProcess,
+ PM_mapRealPointer,
+ PM_allocRealSeg,
+ PM_freeRealSeg,
+ PM_allocLockedMem,
+ PM_freeLockedMem,
+ PM_callRealMode,
+ PM_int86,
+ PM_int86x,
+ DPMI_int86,
+ PM_availableMemory,
+ PM_getVESABuf,
+ PM_getOSType,
+ PM_fatalError,
+ PM_setBankA,
+ PM_setBankAB,
+ PM_setCRTStart,
+ PM_getCurrentPath,
+ PM_getVBEAFPath,
+ PM_getNucleusPath,
+ PM_getNucleusConfigPath,
+ PM_getUniqueID,
+ PM_getMachineName,
+ VF_available,
+ VF_init,
+ VF_exit,
+ PM_openConsole,
+ PM_getConsoleStateSize,
+ PM_saveConsoleState,
+ PM_restoreConsoleState,
+ PM_closeConsole,
+ PM_setOSCursorLocation,
+ PM_setOSScreenWidth,
+ PM_enableWriteCombine,
+ PM_backslash,
+ PM_lockDataPages,
+ PM_unlockDataPages,
+ PM_lockCodePages,
+ PM_unlockCodePages,
+ PM_setRealTimeClockHandler,
+ PM_setRealTimeClockFrequency,
+ PM_restoreRealTimeClockHandler,
+ PM_doBIOSPOST,
+ PM_getBootDrive,
+ PM_freePhysicalAddr,
+ PM_inpb,
+ PM_inpw,
+ PM_inpd,
+ PM_outpb,
+ PM_outpw,
+ PM_outpd,
+ NULL,
+ PM_setSuspendAppCallback,
+ PM_haveBIOSAccess,
+ PM_kbhit,
+ PM_getch,
+ PM_findBPD,
+ PM_getPhysicalAddr,
+ PM_sleep,
+ PM_getCOMPort,
+ PM_getLPTPort,
+ PM_loadLibrary,
+ PM_getProcAddress,
+ PM_freeLibrary,
+ PCI_enumerate,
+ PCI_accessReg,
+ PCI_setHardwareIRQ,
+ PCI_generateSpecialCyle,
+ NULL,
+ PCIBIOS_getEntry,
+ CPU_getProcessorType,
+ CPU_haveMMX,
+ CPU_have3DNow,
+ CPU_haveSSE,
+ CPU_haveRDTSC,
+ CPU_getProcessorSpeed,
+ ZTimerInit,
+ LZTimerOn,
+ LZTimerLap,
+ LZTimerOff,
+ LZTimerCount,
+ LZTimerOnExt,
+ LZTimerLapExt,
+ LZTimerOffExt,
+ LZTimerCountExt,
+ ULZTimerOn,
+ ULZTimerLap,
+ ULZTimerOff,
+ ULZTimerCount,
+ ULZReadTime,
+ ULZElapsedTime,
+ ULZTimerResolution,
+ PM_findFirstFile,
+ PM_findNextFile,
+ PM_findClose,
+ PM_makepath,
+ PM_splitpath,
+ PM_driveValid,
+ PM_getdcwd,
+ PM_setFileAttr,
+ PM_mkdir,
+ PM_rmdir,
+ PM_getFileAttr,
+ PM_getFileTime,
+ PM_setFileTime,
+ CPU_getProcessorName,
+ PM_getVGAStateSize,
+ PM_saveVGAState,
+ PM_restoreVGAState,
+ PM_vgaBlankDisplay,
+ PM_vgaUnblankDisplay,
+ PM_blockUntilTimeout,
+ _PM_add64,
+ _PM_sub64,
+ _PM_mul64,
+ _PM_div64,
+ _PM_shr64,
+ _PM_sar64,
+ _PM_shl64,
+ _PM_neg64,
+ PCI_findBARSize,
+ PCI_readRegBlock,
+ PCI_writeRegBlock,
+ PM_flushTLB,
+ PM_useLocalMalloc,
+ PM_malloc,
+ PM_calloc,
+ PM_realloc,
+ PM_free,
+ PM_getPhysicalAddrRange,
+ PM_allocPage,
+ PM_freePage,
+ PM_agpInit,
+ PM_agpExit,
+ PM_agpReservePhysical,
+ PM_agpReleasePhysical,
+ PM_agpCommitPhysical,
+ PM_agpFreePhysical,
+ PCI_getNumDevices,
+ PM_setLocalBPDPath,
+#ifdef __WINDOWS32__
+ PM_loadDirectDraw,
+ PM_unloadDirectDraw,
+ PM_getDirectDrawWindow,
+ PM_doSuspendApp,
+#else
+ NULL,
+ NULL,
+ NULL,
+ NULL,
+#endif
+ };
+
diff --git a/board/MAI/bios_emulator/scitech/include/pmint.h b/board/MAI/bios_emulator/scitech/include/pmint.h
new file mode 100644
index 00000000000..7d76dad50c7
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/include/pmint.h
@@ -0,0 +1,211 @@
+/****************************************************************************
+*
+* SciTech OS Portability Manager Library
+*
+* ========================================================================
+*
+* The contents of this file are subject to the SciTech MGL Public
+* License Version 1.0 (the "License"); you may not use this file
+* except in compliance with the License. You may obtain a copy of
+* the License at http://www.scitechsoft.com/mgl-license.txt
+*
+* Software distributed under the License is distributed on an
+* "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+* implied. See the License for the specific language governing
+* rights and limitations under the License.
+*
+* The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+*
+* The Initial Developer of the Original Code is SciTech Software, Inc.
+* All Rights Reserved.
+*
+* ========================================================================
+*
+* Language: ANSI C
+* Environment: Real mode and 16/32 bit Protected Mode
+*
+* Description: Header file for the interrupt handling extensions to the OS
+* Portability Manager Library. These extensions includes
+* simplified interrupt handling, allowing all common interrupt
+* handlers to be hooked and handled directly with normal C
+* functions, both in 16 bit and 32 bit modes. Note however that
+* simplified handling does not mean slow performance! All low
+* level interrupt handling is done efficiently in assembler
+* for speed (well actually necessary to insulate the
+* application from the lack of far pointers in 32 bit PM). The
+* interrupt handlers currently supported are:
+*
+* Mouse (0x33 callback)
+* Timer Tick (0x8)
+* Keyboard (0x9 and 0x15)
+* Control C/Break (0x23/0x1B)
+* Critical Error (0x24)
+*
+****************************************************************************/
+
+#ifndef __PMINT_H
+#define __PMINT_H
+
+/*--------------------------- Macros and Typedefs -------------------------*/
+
+#ifdef __SMX32__
+/* PC interrupts (Ensure consistent with pme.inc) */
+#define PM_IRQ0 0x40
+#define PM_IRQ1 (PM_IRQ0+1)
+#define PM_IRQ6 (PM_IRQ0+6)
+#define PM_IRQ14 (PM_IRQ0+14)
+#endif
+
+/* Define the different types of interrupt handlers that we support */
+
+typedef uint (PMAPIP PM_criticalHandler)(uint axValue,uint diValue);
+typedef void (PMAPIP PM_breakHandler)(uint breakHit);
+typedef short (PMAPIP PM_key15Handler)(short scanCode);
+typedef void (PMAPIP PM_mouseHandler)(uint event, uint butstate,int x,int y,int mickeyX,int mickeyY);
+
+/* Create a type for representing far pointers in both 16 and 32 bit
+ * protected mode.
+ */
+
+#ifdef PM386
+typedef struct {
+ long off;
+ short sel;
+ } PMFARPTR;
+#define PMNULL {0,0}
+#else
+typedef void *PMFARPTR;
+#define PMNULL NULL
+#endif
+
+/*--------------------------- Function Prototypes -------------------------*/
+
+#ifdef __cplusplus
+extern "C" { /* Use "C" linkage when in C++ mode */
+#endif
+
+/* Routine to load save default data segment selector value into a code
+ * segment variable, and another to load the value into the DS register.
+ */
+
+void PMAPI PM_loadDS(void);
+void PMAPI PM_saveDS(void);
+
+/* Routine to install a mouse interrupt handling routine. The
+ * mouse handler routine is a normal C function, and the PM library
+ * will take care of passing the correct parameters to the function,
+ * and switching to a local stack.
+ *
+ * Note that you _must_ lock the memory containing the mouse interrupt
+ * handler with the PM_lockPages() function otherwise you may encounter
+ * problems in virtual memory environments.
+ */
+
+int PMAPI PM_setMouseHandler(int mask,PM_mouseHandler mh);
+void PMAPI PM_restoreMouseHandler(void);
+
+/* Routine to reset the mouse driver, and re-install the current
+ * mouse interrupt handler if one was currently installed (since the
+ * mouse reset will automatically remove this handler.
+ */
+
+void PMAPI PM_resetMouseDriver(int hardReset);
+
+/* Routine to reset the mouse driver, and re-install the current
+ * mouse interrupt handler if one was currently installed (since the
+ * mouse reset will automatically remove this handler.
+ */
+
+void PMAPI PM_resetMouseDriver(int hardReset);
+
+/* Routines to install and remove timer interrupt handlers.
+ *
+ * Note that you _must_ lock the memory containing the interrupt
+ * handlers with the PM_lockPages() function otherwise you may encounter
+ * problems in virtual memory environments.
+ */
+
+void PMAPI PM_setTimerHandler(PM_intHandler ih);
+void PMAPI PM_chainPrevTimer(void);
+void PMAPI PM_restoreTimerHandler(void);
+
+/* Routines to install and keyboard interrupt handlers.
+ *
+ * Note that you _must_ lock the memory containing the interrupt
+ * handlers with the PM_lockPages() function otherwise you may encounter
+ * problems in virtual memory environments.
+ */
+
+void PMAPI PM_setKeyHandler(PM_intHandler ih);
+void PMAPI PM_chainPrevKey(void);
+void PMAPI PM_restoreKeyHandler(void);
+
+/* Routines to hook and unhook the alternate Int 15h keyboard intercept
+ * callout routine. Your event handler will need to return the following:
+ *
+ * scanCode - Let the BIOS process scan code (chains to previous handler)
+ * 0 - You have processed the scan code so flush from BIOS
+ *
+ * Note that this is not available under all DOS extenders, but does
+ * work under real mode, DOS4GW and X32-VM. It does not work under the
+ * PowerPack 32 bit DOS extenders. If you figure out how to do it let us know!
+ */
+
+void PMAPI PM_setKey15Handler(PM_key15Handler ih);
+void PMAPI PM_restoreKey15Handler(void);
+
+/* Routines to install and remove the control c/break interrupt handlers.
+ * Interrupt handling is performed by the PM/Pro library, and you can call
+ * the supplied routines to test the status of the Ctrl-C and Ctrl-Break
+ * flags. If you pass the value TRUE for 'clearFlag' to these routines,
+ * the internal flags will be reset in order to catch another Ctrl-C or
+ * Ctrl-Break interrupt.
+ */
+
+void PMAPI PM_installBreakHandler(void);
+int PMAPI PM_ctrlCHit(int clearFlag);
+int PMAPI PM_ctrlBreakHit(int clearFlag);
+void PMAPI PM_restoreBreakHandler(void);
+
+/* Routine to install an alternate break handler that will call your
+ * code directly. This is not available under all DOS extenders, but does
+ * work under real mode, DOS4GW and X32-VM. It does not work under the
+ * PowerPack 32 bit DOS extenders. If you figure out how to do it let us know!
+ *
+ * Note that you should either install one or the other, but not both!
+ */
+
+void PMAPI PM_installAltBreakHandler(PM_breakHandler bh);
+
+/* Routines to install and remove the critical error handler. The interrupt
+ * is handled by the PM/Pro library, and the operation will always be failed.
+ * You can check the status of the critical error handler with the
+ * appropriate function. If you pass the value TRUE for 'clearFlag', the
+ * internal flag will be reset ready to catch another critical error.
+ */
+
+void PMAPI PM_installCriticalHandler(void);
+int PMAPI PM_criticalError(int *axValue, int *diValue, int clearFlag);
+void PMAPI PM_restoreCriticalHandler(void);
+
+/* Routine to install an alternate critical handler that will call your
+ * code directly. This is not available under all DOS extenders, but does
+ * work under real mode, DOS4GW and X32-VM. It does not work under the
+ * PowerPack 32 bit DOS extenders. If you figure out how to do it let us know!
+ *
+ * Note that you should either install one or the other, but not both!
+ */
+
+void PMAPI PM_installAltCriticalHandler(PM_criticalHandler);
+
+/* Functions to manage protected mode only interrupt handlers */
+
+void PMAPI PM_getPMvect(int intno, PMFARPTR *isr);
+void PMAPI PM_setPMvect(int intno, PM_intHandler ih);
+void PMAPI PM_restorePMvect(int intno, PMFARPTR isr);
+
+#ifdef __cplusplus
+} /* End of "C" linkage for C++ */
+#endif
+
+#endif /* __PMINT_H */
diff --git a/board/MAI/bios_emulator/scitech/include/scitech.h b/board/MAI/bios_emulator/scitech/include/scitech.h
new file mode 100644
index 00000000000..1dbfface0dc
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/include/scitech.h
@@ -0,0 +1,712 @@
+/****************************************************************************
+*
+* SciTech Multi-platform Graphics Library
+*
+* ========================================================================
+*
+* The contents of this file are subject to the SciTech MGL Public
+* License Version 1.0 (the "License"); you may not use this file
+* except in compliance with the License. You may obtain a copy of
+* the License at http://www.scitechsoft.com/mgl-license.txt
+*
+* Software distributed under the License is distributed on an
+* "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+* implied. See the License for the specific language governing
+* rights and limitations under the License.
+*
+* The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+*
+* The Initial Developer of the Original Code is SciTech Software, Inc.
+* All Rights Reserved.
+*
+* ========================================================================
+*
+* Language: ANSI C
+* Environment: any
+*
+* Description: General header file for operating system portable code.
+*
+****************************************************************************/
+
+#ifndef __SCITECH_H
+#define __SCITECH_H
+
+/* We have the following defines to identify the compilation environment:
+ *
+ * __16BIT__ Compiling for 16 bit code (any environment)
+ * __32BIT__ Compiling for 32 bit code (any environment)
+ * __MSDOS__ Compiling for MS-DOS (includes __WINDOWS16__, __WIN386__)
+ * __REALDOS__ Compiling for MS-DOS (excludes __WINDOWS16__)
+ * __MSDOS16__ Compiling for 16 bit MS-DOS
+ * __MSDOS32__ Compiling for 32 bit MS-DOS
+ * __WINDOWS__ Compiling for Windows
+ * __WINDOWS16__ Compiling for 16 bit Windows (__MSDOS__ also defined)
+ * __WINDOWS32__ Compiling for 32 bit Windows
+ * __WIN32_VXD__ Compiling for a 32-bit C based VxD
+ * __NT_DRIVER__ Compiling for a 32-bit C based NT device driver
+ * __OS2__ Compiling for OS/2
+ * __OS2_16__ Compiling for 16 bit OS/2
+ * __OS2_32__ Compiling for 32 bit OS/2
+ * __UNIX__ Compiling for Unix
+ * __QNX__ Compiling for the QNX realtime OS (Unix compatible)
+ * __LINUX__ Compiling for the Linux OS (Unix compatible)
+ * __FREEBSD__ Compiling for the FreeBSD OS (Unix compatible)
+ * __BEOS__ Compiling for the BeOS (Unix compatible)
+ * __SMX32__ Compiling for the SMX 32-bit Real Time OS
+ * __ENEA_OSE__ Compiling for the OSE embedded OS
+ * __RTTARGET__ Compiling for the RTTarget 32-bit embedded OS
+ * __MACOS__ Compiling for the MacOS platform (PowerPC)
+ * __DRIVER__ Compiling for a 32-bit binary compatible driver
+ * __CONSOLE__ Compiling for a fullscreen OS console mode
+ * __SNAP__ Compiling as a Snap executeable or dynamic library
+ *
+ * __INTEL__ Compiling for Intel CPU's
+ * __ALPHA__ Compiling for DEC Alpha CPU's
+ * __MIPS__ Compiling for MIPS CPU's
+ * __PPC__ Compiling for PowerPC CPU's
+ * __MC68K__ Compiling for Motorola 680x0
+ *
+ * __BIG_ENDIAN__ Compiling for a big endian processor
+ *
+ */
+
+#ifdef __SC__
+#if __INTSIZE == 4
+#define __SC386__
+#endif
+#endif
+
+/* Determine some things that are compiler specific */
+
+#ifdef __GNUC__
+#ifdef __cplusplus
+// G++ currently fucks this up!
+#define __cdecl
+#define __stdcall
+#else
+#undef __cdecl
+#undef __stdcall
+#define __cdecl __attribute__ ((cdecl))
+#define __stdcall __attribute__ ((stdcall))
+#endif
+#define __FLAT__ /* GCC is always 32 bit flat model */
+#define __HAS_BOOL__ /* Latest GNU C++ has ibool type */
+#define __HAS_LONG_LONG__ /* GNU C supports long long type */
+#include <stdio.h> /* Bring in for definition of NULL */
+#endif
+
+#ifdef __BORLANDC__
+#if (__BORLANDC__ >= 0x500) || defined(CLASSLIB_DEFS_H)
+#define __HAS_BOOL__ /* Borland C++ 5.0 defines ibool type */
+#endif
+#if (__BORLANDC__ >= 0x502) && !defined(VTOOLSD) && !defined(__SMX32__)
+#define __HAS_INT64__ /* Borland C++ 5.02 supports __int64 type */
+#endif
+#endif
+
+#if defined(_MSC_VER) && !defined(__SC__) && !defined(VTOOLSD) && !defined(__SMX32__)
+#define __HAS_INT64__ /* Visual C++ supports __int64 type */
+#endif
+
+#if defined(__WATCOMC__) && (__WATCOMC__ >= 1100) && !defined(VTOOLSD) && !defined(__SMX32__)
+#define __HAS_INT64__ /* Watcom C++ 11.0 supports __int64 type */
+#endif
+
+/*---------------------------------------------------------------------------
+ * Determine the compile time environment. This must be done for each
+ * supported platform so that we can determine at compile time the target
+ * environment, hopefully without requiring #define's from the user.
+ *-------------------------------------------------------------------------*/
+
+/* 32-bit binary compatible driver. Compiled as Win32, but as OS neutral */
+#ifdef __DRIVER__
+#ifndef __32BIT__
+#define __32BIT__
+#endif
+#undef __WINDOWS__
+#undef _WIN32
+#undef __WIN32__
+#undef __NT__
+
+/* 32-bit Snap exe or dll. Compiled as Win32, but as OS neutral */
+#elif defined(__SNAP__)
+#ifndef __32BIT__
+#define __32BIT__
+#endif
+#undef __WINDOWS__
+#undef _WIN32
+#undef __WIN32__
+#undef __NT__
+
+/* 32-bit Windows VxD compile environment */
+#elif defined(__vtoolsd_h_) || defined(VTOOLSD)
+#include <vtoolsc.h>
+#define __WIN32_VXD__
+#ifndef __32BIT__
+#define __32BIT__
+#endif
+#define _MAX_PATH 256
+#undef __WINDOWS32__
+
+/* 32-bit Windows NT driver compile environment: TODO!! */
+#elif defined(__NT_DRIVER__)
+#include "ntdriver.h"
+#ifndef __32BIT__
+#define __32BIT__
+#endif
+#define _MAX_PATH 256
+#undef __WINDOWS32__
+
+/* 32-bit SMX compile environment */
+#elif defined(__SMX32__)
+#ifndef __MSDOS__
+#define __MSDOS__
+#endif
+#ifndef __32BIT__
+#define __32BIT__
+#endif
+#ifndef __CONSOLE__
+#define __CONSOLE__
+#endif
+
+/* 32-bit Enea OSE environment */
+#elif defined(__ENEA_OSE__)
+#ifndef __32BIT__
+#define __32BIT__
+#endif
+#ifndef __CONSOLE__
+#define __CONSOLE__
+#endif
+
+/* 32-bit RTTarget-32 environment */
+#elif defined(__RTTARGET__)
+#ifndef __32BIT__
+#define __32BIT__
+#endif
+#ifndef __CONSOLE__
+#define __CONSOLE__
+#endif
+
+/* 32-bit extended DOS compile environment */
+#elif defined(__MSDOS__) || defined(__MSDOS32__) || defined(__DOS__) || defined(__DPMI32__) || (defined(M_I86) && (!defined(__SC386__) && !defined(M_I386))) || defined(TNT)
+#ifndef __MSDOS__
+#define __MSDOS__
+#endif
+#if defined(__MSDOS32__) || defined(__386__) || defined(__FLAT__) || defined(__NT__) || defined(__SC386__)
+#ifndef __MSDOS32__
+#define __MSDOS32__
+#endif
+#ifndef __32BIT__
+#define __32BIT__
+#endif
+#ifndef __REALDOS__
+#define __REALDOS__
+#endif
+#ifndef __CONSOLE__
+#define __CONSOLE__
+#endif
+
+/* 16-bit Windows compile environment */
+#elif (defined(_Windows) || defined(_WINDOWS)) && !defined(__DPMI16__)
+#ifndef __16BIT__
+#define __16BIT__
+#endif
+#ifndef __WINDOWS16__
+#define __WINDOWS16__
+#endif
+#ifndef __WINDOWS__
+#define __WINDOWS__
+#endif
+#ifndef __MSDOS__
+#define __MSDOS__
+#endif
+
+/* 16-bit DOS compile environment */
+#else
+#ifndef __16BIT__
+#define __16BIT__
+#endif
+#ifndef __MSDOS16__
+#define __MSDOS16__
+#endif
+#ifndef __REALDOS__
+#define __REALDOS__
+#endif
+#ifndef __CONSOLE__
+#define __CONSOLE__
+#endif
+#endif
+
+/* 32-bit Windows compile environment */
+#elif defined(WIN32) || defined(_WIN32) || defined(__WIN32__) || defined(__NT__)
+#ifndef __32BIT__
+#define __32BIT__
+#endif
+#ifndef __WINDOWS32__
+#define __WINDOWS32__
+#endif
+#ifndef _WIN32
+#define _WIN32 /* Microsoft Win32 SDK headers use _WIN32 */
+#endif
+#ifndef WIN32
+#define WIN32 /* OpenGL headers use WIN32 */
+#endif
+#ifndef __WINDOWS__
+#define __WINDOWS__
+#endif
+
+/* 32-bit OS/2 VDD compile environment */
+/* We're assuming (for now) that CL386 must be used */
+#elif defined(MSDOS) && defined(M_I386)
+/* fixes necessary to compile with CL386 */
+#define __cdecl _cdecl
+typedef unsigned int size_t;
+
+#include <mvdm.h>
+
+/* This should probably be somewhere else... */
+/* Inline eligible functions (we have no CRT libs for CL386) */
+#pragma intrinsic (strcpy, strcmp, strlen, strcat)
+#pragma intrinsic (memcmp, memcpy, memset)
+
+#define __OS2_VDD__
+#ifndef __32BIT__
+#define __32BIT__
+#endif
+#define CCHMAXPATH 256
+#define _MAX_PATH 256
+#ifndef __OS2__
+#define __OS2__
+#endif
+#ifndef __OS2_32__
+#define __OS2_32__
+#endif
+
+/* 16-bit OS/2 compile environment */
+#elif defined(__OS2_16__)
+#ifndef __OS2__
+#define __OS2__
+#endif
+#ifndef __16BIT__
+#define __16BIT__
+#endif
+#ifndef __OS2_PM__
+#ifndef __CONSOLE__
+#define __CONSOLE__
+#endif
+#endif
+
+/* 32-bit OS/2 compile environment */
+#elif defined(__OS2__) || defined(__OS2_32__)
+#ifndef __OS2__
+#define __OS2__
+#endif
+#ifndef __OS2_32__
+#define __OS2_32__
+#endif
+#ifndef __32BIT__
+#define __32BIT__
+#endif
+#ifndef __OS2_PM__
+#ifndef __CONSOLE__
+#define __CONSOLE__
+#endif
+#endif
+
+/* 32-bit QNX compile environment */
+#elif defined(__QNX__)
+#ifndef __32BIT__
+#define __32BIT__
+#endif
+#ifndef __UNIX__
+#define __UNIX__
+#endif
+#ifdef __GNUC__
+#define stricmp strcasecmp
+#endif
+#if !defined(__PHOTON__) && !defined(__X11__)
+#ifndef __CONSOLE__
+#define __CONSOLE__
+#endif
+#endif
+
+/* 32-bit Linux compile environment */
+#elif defined(__LINUX__) || defined(linux)
+#ifndef __LINUX__
+#define __LINUX__
+#endif
+#ifndef __32BIT__
+#define __32BIT__
+#endif
+#ifndef __UNIX__
+#define __UNIX__
+#endif
+#ifdef __GNUC__
+#define stricmp strcasecmp
+#endif
+#ifndef __X11__
+#ifndef __CONSOLE__
+#define __CONSOLE__
+#endif
+#endif
+
+/* 32-bit FreeBSD compile environment */
+#elif defined(__FREEBSD__)
+#ifndef __FREEBSD__
+#define __FREEBSD__
+#endif
+#ifndef __32BIT__
+#define __32BIT__
+#endif
+#ifndef __UNIX__
+#define __UNIX__
+#endif
+#ifdef __GNUC__
+#define stricmp strcasecmp
+#endif
+#ifndef __X11__
+#ifndef __CONSOLE__
+#define __CONSOLE__
+#endif
+#endif
+
+/* 32-bit BeOS compile environment */
+#elif defined(__BEOS__)
+#ifndef __32BIT__
+#define __32BIT__
+#endif
+#ifndef __UNIX__
+#define __UNIX__
+#endif
+#ifdef __GNUC__
+#define stricmp strcasecmp
+#endif
+
+/* Unsupported OS! */
+#else
+#error This platform is not currently supported!
+#endif
+
+/* Determine the CPU type that we are compiling for */
+
+#if defined(__M_ALPHA) || defined(__ALPHA_) || defined(__ALPHA) || defined(__alpha)
+#ifndef __ALPHA__
+#define __ALPHA__
+#endif
+#elif defined(__M_PPC) || defined(__POWERC)
+#ifndef __PPC__
+#define __PPC__
+#endif
+#elif defined(__M_MRX000)
+#ifndef __MIPS__
+#define __MIPS__
+#endif
+#else
+#ifndef __INTEL__
+#define __INTEL__ /* Assume Intel if nothing found */
+#endif
+#endif
+
+/* We have the following defines to define the calling conventions for
+ * publicly accesible functions:
+ *
+ * _PUBAPI - Compiler default calling conventions for all public 'C' functions
+ * _ASMAPI - Calling conventions for all public assembler functions
+ * _VARAPI - Modifiers for variables; Watcom C++ mangles C++ globals
+ * _STDCALL - Win32 __stdcall where possible, __cdecl if not supported
+ */
+
+#if defined(_MSC_VER) && defined(_WIN32) && !defined(__SC__)
+#define __PASCAL __stdcall
+#else
+#define __PASCAL __pascal
+#endif
+
+#if defined(NO_STDCALL)
+#define _STDCALL __cdecl
+#else
+#define _STDCALL __stdcall
+#endif
+
+#ifdef __WATCOMC__
+#if (__WATCOMC__ >= 1050)
+#define _VARAPI __cdecl
+#else
+#define _VARAPI
+#endif
+#else
+#define _VARAPI
+#endif
+
+#if defined(__IBMC__) || defined(__IBMCPP__)
+#define PTR_DECL_IN_FRONT
+#endif
+
+/* Define the calling conventions for all public functions. For simplicity
+ * we define all public functions as __cdecl calling conventions, so that
+ * they are the same across all compilers and runtime DLL's.
+ */
+
+#define _PUBAPI __cdecl
+#define _ASMAPI __cdecl
+
+/* Determine the syntax for declaring a function pointer with a
+ * calling conventions override. Most compilers require the calling
+ * convention to be declared in front of the '*', but others require
+ * it to be declared after the '*'. We handle both in here depending
+ * on what the compiler requires.
+ */
+
+#ifdef PTR_DECL_IN_FRONT
+#define _PUBAPIP * _PUBAPI
+#define _ASMAPIP * _ASMAPI
+#else
+#define _PUBAPIP _PUBAPI *
+#define _ASMAPIP _ASMAPI *
+#endif
+
+/* Useful macros */
+
+#define PRIVATE static
+#define PUBLIC
+
+/* This HAS to be 0L for 16-bit real mode code to work!!! */
+
+#ifndef NULL
+# define _NULL 0L
+# define NULL _NULL
+#endif
+
+#ifndef MAX
+# define MAX(a,b) ( ((a) > (b)) ? (a) : (b))
+#endif
+#ifndef MIN
+# define MIN(a,b) ( ((a) < (b)) ? (a) : (b))
+#endif
+#ifndef ABS
+# define ABS(a) ((a) >= 0 ? (a) : -(a))
+#endif
+#ifndef SIGN
+# define SIGN(a) ((a) > 0 ? 1 : -1)
+#endif
+
+/* General typedefs */
+
+#ifndef __GENDEFS
+#define __GENDEFS
+#if defined(__BEOS__)
+#include <SupportDefs.h>
+#else
+#ifdef __LINUX__
+#include <sys/types.h>
+#ifdef __STRICT_ANSI__
+typedef unsigned short ushort;
+typedef unsigned long ulong;
+typedef unsigned int uint;
+#endif
+#ifdef __KERNEL__
+#define __GENDEFS_2
+#endif
+#else
+#if !(defined(__QNXNTO__) && defined(GENERAL_STRUCT))
+typedef unsigned short ushort;
+typedef unsigned long ulong;
+#endif
+typedef unsigned int uint;
+#endif
+typedef unsigned char uchar;
+#endif
+typedef int ibool; /* Integer boolean type */
+#ifdef USE_BOOL /* Only for older code */
+#ifndef __cplusplus
+#define bool ibool /* Standard C */
+#else
+#ifndef __HAS_BOOL__
+#define bool ibool /* Older C++ compilers */
+#endif
+#endif /* __cplusplus */
+#endif /* USE_BOOL */
+#endif /* __GENDEFS */
+
+/* More general typedefs compatible with Linux kernel code */
+
+#ifndef __GENDEFS_2
+#define __GENDEFS_2
+typedef char s8;
+typedef unsigned char u8;
+typedef short s16;
+typedef unsigned short u16;
+#ifdef __16BIT__
+typedef long s32;
+typedef unsigned long u32;
+#else
+typedef int s32;
+typedef unsigned int u32;
+#endif
+typedef struct {
+ u32 low;
+ s32 high;
+ } __i64;
+#ifdef __HAS_LONG_LONG__
+#define __NATIVE_INT64__
+typedef long long s64;
+typedef unsigned long long u64;
+#elif defined(__HAS_INT64__) && !defined(__16BIT__)
+#define __NATIVE_INT64__
+typedef __int64 s64;
+typedef unsigned __int64 u64;
+#else
+typedef __i64 s64;
+typedef __i64 u64;
+#endif
+#endif
+
+/* Boolean truth values */
+
+#undef false
+#undef true
+#undef NO
+#undef YES
+#undef FALSE
+#undef TRUE
+#define false 0
+#define true 1
+#define NO 0
+#define YES 1
+#define FALSE 0
+#define TRUE 1
+
+/* Inline debugger interrupts for Watcom C++ and Borland C++ */
+
+#ifdef __WATCOMC__
+void DebugInt(void);
+#pragma aux DebugInt = \
+ "int 3";
+void DebugVxD(void);
+#pragma aux DebugVxD = \
+ "int 1";
+#elif defined(__BORLANDC__)
+#define DebugInt() __emit__(0xCC)
+#define DebugVxD() {__emit__(0xCD); __emit__(0x01);}
+#elif defined(_MSC_VER)
+#define DebugInt() _asm int 0x3
+#define DebugVxD() _asm int 0x1
+#elif defined(__GNUC__)
+#define DebugInt() asm volatile ("int $0x3")
+#define DebugVxD() asm volatile ("int $0x1")
+#else
+void _ASMAPI DebugInt(void);
+void _ASMAPI DebugVxD(void);
+#endif
+
+/* Macros to break once and never break again */
+
+#define DebugIntOnce() \
+{ \
+ static ibool firstTime = true; \
+ if (firstTime) { \
+ firstTime = false; \
+ DebugInt(); \
+ } \
+}
+
+#define DebugVxDOnce() \
+{ \
+ static ibool firstTime = true; \
+ if (firstTime) { \
+ firstTime = false; \
+ DebugVxD(); \
+ } \
+}
+
+/* Macros for linux string compatibility functions */
+
+#ifdef __LINUX__
+#define stricmp strcasecmp
+#define strnicmp strncasecmp
+#endif
+
+/* Macros for NT driver string compatibility functions */
+
+#ifdef __NT_DRIVER__
+#define stricmp _stricmp
+#define strnicmp _strnicmp
+#endif
+
+/* Get rid of some helaciously annoying Visual C++ warnings! */
+
+#if defined(_MSC_VER) && !defined(__MWERKS__) && !defined(__SC__)
+#pragma warning(disable:4761) // integral size mismatch in argument; conversion supplied
+#pragma warning(disable:4244) // conversion from 'unsigned short ' to 'unsigned char ', possible loss of data
+#pragma warning(disable:4018) // '<' : signed/unsigned mismatch
+#pragma warning(disable:4305) // 'initializing' : truncation from 'const double' to 'float'
+#endif
+
+/*---------------------------------------------------------------------------
+ * Set of debugging macros used by the libraries. If the debug flag is
+ * set, they are turned on depending on the setting of the flag. User code
+ * can override the default functions called when a check fails, and the
+ * MGL does this so it can restore the system from graphics mode to display
+ * an error message. These functions also log information to the
+ * scitech.log file in the root directory of the hard drive when problems
+ * show up.
+ *
+ * If you set the value of CHECKED to be 2, it will also enable code to
+ * insert hard coded debugger interrupt into the source code at the line of
+ * code where the check fail. This is useful if you run the code under a
+ * debugger as it will break inside the debugger before exiting with a
+ * failure condition.
+ *
+ * Also for code compiled to run under Windows, we also call the
+ * OutputDebugString function to send the message to the system debugger
+ * such as Soft-ICE or WDEB386. Hence if you get any non-fatal warnings you
+ * will see those on the debugger terminal as well as in the log file.
+ *-------------------------------------------------------------------------*/
+
+#ifdef __cplusplus
+extern "C" { /* Use "C" linkage when in C++ mode */
+#endif
+
+extern void (*_CHK_fail)(int fatal,const char *msg,const char *cond,const char *file,int line);
+void _CHK_defaultFail(int fatal,const char *msg,const char *cond,const char *file,int line);
+
+#ifdef CHECKED
+# define CHK(x) x
+#if CHECKED > 1
+# define CHECK(p) \
+ ((p) ? (void)0 : DebugInt(), \
+ _CHK_fail(1,"Check failed: '%s', file %s, line %d\n", \
+ #p, __FILE__, __LINE__))
+# define WARN(p) \
+ ((p) ? (void)0 : DebugInt(), \
+ _CHK_fail(0,"Warning: '%s', file %s, line %d\n", \
+ #p, __FILE__, __LINE__))
+#else
+# define CHECK(p) \
+ ((p) ? (void)0 : \
+ _CHK_fail(1,"Check failed: '%s', file %s, line %d\n", \
+ #p, __FILE__, __LINE__))
+# define WARN(p) \
+ ((p) ? (void)0 : \
+ _CHK_fail(0,"Warning: '%s', file %s, line %d\n", \
+ #p, __FILE__, __LINE__))
+#endif
+# define LOGFATAL(msg) \
+ _CHK_fail(1,"Fatal error: '%s', file %s, line %d\n", \
+ msg, __FILE__, __LINE__)
+# define LOGWARN(msg) \
+ _CHK_fail(0,"Warning: '%s', file %s, line %d\n", \
+ msg, __FILE__, __LINE__)
+#else
+# define CHK(x)
+# define CHECK(p) ((void)0)
+# define WARN(p) ((void)0)
+# define LOGFATAL(msg) ((void)0)
+# define LOGWARN(msg) ((void)0)
+#endif
+
+#ifdef __cplusplus
+} /* End of "C" linkage for C++ */
+#endif
+
+#endif /* __SCITECH_H */
diff --git a/board/MAI/bios_emulator/scitech/include/scitech.mac b/board/MAI/bios_emulator/scitech/include/scitech.mac
new file mode 100644
index 00000000000..27a2fc06e89
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/include/scitech.mac
@@ -0,0 +1,1321 @@
+;****************************************************************************
+;*
+;* ========================================================================
+;*
+;* The contents of this file are subject to the SciTech MGL Public
+;* License Version 1.0 (the "License"); you may not use this file
+;* except in compliance with the License. You may obtain a copy of
+;* the License at http://www.scitechsoft.com/mgl-license.txt
+;*
+;* Software distributed under the License is distributed on an
+;* "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+;* implied. See the License for the specific language governing
+;* rights and limitations under the License.
+;*
+;* The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+;*
+;* The Initial Developer of the Original Code is SciTech Software, Inc.
+;* All Rights Reserved.
+;*
+;* ========================================================================
+;*
+;* Language: NetWide Assembler (NASM) or Turbo Assembler (TASM)
+;* Environment: Any Intel Environment
+;*
+;* Description: Macros to provide memory model independant assembly language
+;* module for C programming. Supports the large and flat memory
+;* models.
+;*
+;* The defines that you should use when assembling modules that
+;* use this macro package are:
+;*
+;* __LARGE__ Assemble for 16-bit large model
+;* __FLAT__ Assemble for 32-bit FLAT memory model
+;* __NOU__ No underscore for all external C labels
+;* __NOU_VAR__ No underscore for global variables only
+;*
+;* The default settings are for 16-bit large memory model with
+;* leading underscores for symbol names.
+;*
+;* The main intent of the macro file is to enable programmers
+;* to write _one_ set of source that can be assembled to run
+;* in either 16 bit real and protected modes or 32 bit
+;* protected mode without the need to riddle the code with
+;* 'if flatmodel' style conditional assembly (it is still there
+;* but nicely hidden by a macro layer that enhances the
+;* readability and understandability of the resulting code).
+;*
+;****************************************************************************
+
+; Include the appropriate version in here depending on the assembler. NASM
+; appears to always try and parse code, even if it is in a non-compiling
+; block of a ifdef expression, and hence crashes if we include the TASM
+; macro package in the same header file. Hence we split the macros up into
+; two separate header files.
+
+ifdef __NASM_MAJOR__
+
+;============================================================================
+; Macro package when compiling with NASM.
+;============================================================================
+
+; Turn off underscores for globals if disabled for all externals
+
+%ifdef __NOU__
+%define __NOU_VAR__
+%endif
+
+; Define the __WINDOWS__ symbol if we are compiling for any Windows
+; environment
+
+%ifdef __WINDOWS16__
+%define __WINDOWS__ 1
+%endif
+%ifdef __WINDOWS32__
+%define __WINDOWS__ 1
+%define __WINDOWS32_386__ 1
+%endif
+
+; Macros for accessing 'generic' registers
+
+%ifdef __FLAT__
+%idefine _ax eax
+%idefine _bx ebx
+%idefine _cx ecx
+%idefine _dx edx
+%idefine _si esi
+%idefine _di edi
+%idefine _bp ebp
+%idefine _sp esp
+%idefine _es
+%idefine UCHAR BYTE ; Size of a character
+%idefine USHORT WORD ; Size of a short
+%idefine UINT DWORD ; Size of an integer
+%idefine ULONG DWORD ; Size of a long
+%idefine BOOL DWORD ; Size of a boolean
+%idefine DPTR DWORD ; Size of a data pointer
+%idefine FDPTR FWORD ; Size of a far data pointer
+%idefine NDPTR DWORD ; Size of a near data pointer
+%idefine CPTR DWORD ; Size of a code pointer
+%idefine FCPTR FWORD ; Size of a far code pointer
+%idefine NCPTR DWORD ; Size of a near code pointer
+%idefine FPTR NEAR ; Distance for function pointers
+%idefine DUINT dd ; Declare a integer variable
+%idefine intsize 4
+%idefine flatmodel 1
+%else
+%idefine _ax ax
+%idefine _bx bx
+%idefine _cx cx
+%idefine _dx dx
+%idefine _si si
+%idefine _di di
+%idefine _bp bp
+%idefine _sp sp
+%idefine _es es:
+%idefine UCHAR BYTE ; Size of a character
+%idefine USHORT WORD ; Size of a short
+%idefine UINT WORD ; Size of an integer
+%idefine ULONG DWORD ; Size of a long
+%idefine BOOL WORD ; Size of a boolean
+%idefine DPTR DWORD ; Size of a data pointer
+%idefine FDPTR DWORD ; Size of a far data pointer
+%idefine NDPTR WORD ; Size of a near data pointer
+%idefine CPTR DWORD ; Size of a code pointer
+%idefine FCPTR DWORD ; Size of a far code pointer
+%idefine NCPTR WORD ; Size of a near code pointer
+%idefine FPTR FAR ; Distance for function pointers
+%idefine DUINT dw ; Declare a integer variable
+%idefine intsize 2
+%endif
+%idefine invert ~
+%idefine offset
+%idefine use_nasm
+
+; Convert all jumps to near jumps, since NASM does not so this automatically
+
+%idefine jo jo near
+%idefine jno jno near
+%idefine jz jz near
+%idefine jnz jnz near
+%idefine je je near
+%idefine jne jne near
+%idefine jb jb near
+%idefine jbe jbe near
+%idefine ja ja near
+%idefine jae jae near
+%idefine jl jl near
+%idefine jle jle near
+%idefine jg jg near
+%idefine jge jge near
+%idefine jc jc near
+%idefine jnc jnc near
+%idefine js js near
+%idefine jns jns near
+
+%ifdef DOUBLE
+%idefine REAL QWORD
+%idefine DREAL dq
+%else
+%idefine REAL DWORD
+%idefine DREAL dd
+%endif
+
+; Boolean truth values (same as those in debug.h)
+
+%idefine False 0
+%idefine True 1
+%idefine No 0
+%idefine Yes 1
+%idefine Yes 1
+
+; Macro to be invoked at the start of all modules to set up segments for
+; later use. Does nothing for NASM.
+
+%imacro header 1
+%endmacro
+
+; Macro to begin a data segment
+
+%imacro begdataseg 1
+%ifdef __GNUC__
+segment .data public class=DATA use32 flat
+%else
+%ifdef flatmodel
+segment _DATA public align=4 class=DATA use32 flat
+%else
+segment _DATA public align=4 class=DATA use16
+%endif
+%endif
+%endmacro
+
+; Macro to end a data segment
+
+%imacro enddataseg 1
+%endmacro
+
+; Macro to begin a code segment
+
+%imacro begcodeseg 1
+%ifdef __PIC__
+%ifdef __LINUX__
+ extern _GLOBAL_OFFSET_TABLE_
+%else
+ extern __GLOBAL_OFFSET_TABLE_
+%endif
+%endif
+%ifdef __GNUC__
+segment .text public class=CODE use32 flat
+%else
+%ifdef flatmodel
+segment _TEXT public align=16 class=CODE use32 flat
+%else
+segment %1_TEXT public align=16 class=CODE use16
+%endif
+%endif
+%endmacro
+
+; Macro to begin a near code segment
+
+%imacro begcodeseg_near 0
+%ifdef __GNUC__
+segment .text public class=CODE use32 flat
+%else
+%ifdef flatmodel
+segment _TEXT public align=16 class=CODE use32 flat
+%else
+segment _TEXT public align=16 class=CODE use16
+%endif
+%endif
+%endmacro
+
+; Macro to end a code segment
+
+%imacro endcodeseg 1
+%endmacro
+
+; Macro to end a near code segment
+
+%imacro endcodeseg_near 0
+%endmacro
+
+; Macro for an extern C symbol. If the C compiler requires leading
+; underscores, then the underscores are added to the symbol names, otherwise
+; they are left off. The symbol name is referenced in the assembler code
+; using the non-underscored symbol name.
+
+%imacro cextern 2
+%ifdef __NOU_VAR__
+extern %1
+%else
+extern _%1
+%define %1 _%1
+%endif
+%endmacro
+
+%imacro cexternfunc 2
+%ifdef __NOU__
+extern %1
+%else
+extern _%1
+%define %1 _%1
+%endif
+%endmacro
+
+; Macro for a public C symbol. If the C compiler requires leading
+; underscores, then the underscores are added to the symbol names, otherwise
+; they are left off. The symbol name is referenced in the assembler code
+; using the non-underscored symbol name.
+
+%imacro cpublic 1
+%ifdef __NOU_VAR__
+global %1
+%1:
+%else
+global _%1
+_%1:
+%define %1 _%1
+%endif
+%endmacro
+
+; Macro for an global C symbol. If the C compiler requires leading
+; underscores, then the underscores are added to the symbol names, otherwise
+; they are left off. The symbol name is referenced in the assembler code
+; using the non-underscored symbol name.
+
+%imacro cglobal 1
+%ifdef __NOU_VAR__
+global %1
+%else
+global _%1
+%define %1 _%1
+%endif
+%endmacro
+
+; Macro for an global C function symbol. If the C compiler requires leading
+; underscores, then the underscores are added to the symbol names, otherwise
+; they are left off. The symbol name is referenced in the assembler code
+; using the non-underscored symbol name.
+
+%imacro cglobalfunc 1
+%ifdef __PIC__
+global %1:function
+%else
+%ifdef __NOU__
+global %1
+%else
+global _%1
+%define %1 _%1
+%endif
+%endif
+%endmacro
+
+; Macro to start a C callable function. This will be a far function for
+; 16-bit code, and a near function for 32-bit code.
+
+%imacro cprocstatic 1
+%push cproc
+%1:
+%ifdef flatmodel
+%stacksize flat
+%define ret retn
+%else
+%stacksize large
+%define ret retf
+%endif
+%assign %$localsize 0
+%endmacro
+
+%imacro cprocstart 1
+%push cproc
+ cglobalfunc %1
+%1:
+%ifdef flatmodel
+%stacksize flat
+%define ret retn
+%else
+%stacksize large
+%define ret retf
+%endif
+%assign %$localsize 0
+%endmacro
+
+; This macro sets up a procedure to be exported from a 16 bit DLL. Since the
+; calling conventions are always _far _pascal for 16 bit DLL's, we actually
+; rename this routine with an extra underscore with 'C' calling conventions
+; and a small DLL stub will be provided by the high level code to call the
+; assembler routine.
+
+%imacro cprocstartdll16 1
+%ifdef __WINDOWS16__
+cprocstart _%1
+%else
+cprocstart %1
+%endif
+%endmacro
+
+; Macro to start a C callable near function.
+
+%imacro cprocnear 1
+%push cproc
+ cglobalfunc %1
+%1:
+%define ret retn
+%ifdef flatmodel
+%stacksize flat
+%else
+%stacksize small
+%endif
+%assign %$localsize 0
+%endmacro
+
+; Macro to start a C callable far function.
+
+%imacro cprocfar 1
+%push cproc
+ cglobalfunc %1
+%1:
+%define ret retf
+%ifdef flatmodel
+%stacksize flat
+%else
+%stacksize large
+%endif
+%assign %$localsize 0
+%endmacro
+
+; Macro to end a C function
+
+%imacro cprocend 0
+%pop
+%endmacro
+
+; Macros for entering and exiting C callable functions. Note that we must
+; always save and restore the SI and DI registers for C functions, and for
+; 32 bit C functions we also need to save and restore EBX and clear the
+; direction flag.
+
+%imacro enter_c 0
+ push _bp
+ mov _bp,_sp
+%ifnidn %$localsize,0
+ sub _sp,%$localsize
+%endif
+%ifdef flatmodel
+ push ebx
+%endif
+ push _si
+ push _di
+%endmacro
+
+%imacro leave_c 0
+ pop _di
+ pop _si
+%ifdef flatmodel
+ pop ebx
+ cld
+%endif
+%ifnidn %$localsize,0
+ mov _sp,_bp
+%endif
+ pop _bp
+%endmacro
+
+%imacro use_ebx 0
+%ifdef flatmodel
+ push ebx
+%endif
+%endmacro
+
+%imacro unuse_ebx 0
+%ifdef flatmodel
+ pop ebx
+%endif
+%endmacro
+
+; Macros for saving and restoring the value of DS,ES,FS,GS when it is to
+; be used in assembly routines. This evaluates to nothing in the flat memory
+; model, but is saves and restores DS in the large memory model.
+
+%imacro use_ds 0
+%ifndef flatmodel
+ push ds
+%endif
+%endmacro
+
+%imacro unuse_ds 0
+%ifndef flatmodel
+ pop ds
+%endif
+%endmacro
+
+%imacro use_es 0
+%ifndef flatmodel
+ push es
+%endif
+%endmacro
+
+%imacro unuse_es 0
+%ifndef flatmodel
+ pop es
+%endif
+%endmacro
+
+; Macros for loading the address of a data pointer into a segment and
+; index register pair. The %imacro explicitly loads DS or ES in the 16 bit
+; memory model, or it simply loads the offset into the register in the flat
+; memory model since DS and ES always point to all addressable memory. You
+; must use the correct _REG (ie: _BX) %imacros for documentation purposes.
+
+%imacro _lds 2
+%ifdef flatmodel
+ mov %1,%2
+%else
+ lds %1,%2
+%endif
+%endmacro
+
+%imacro _les 2
+%ifdef flatmodel
+ mov %1,%2
+%else
+ les %1,%2
+%endif
+%endmacro
+
+; Macros for adding and subtracting a value from registers. Two value are
+; provided, one for 16 bit modes and another for 32 bit modes (the extended
+; register is used in 32 bit modes).
+
+%imacro _add 3
+%ifdef flatmodel
+ add e%1, %3
+%else
+ add %1, %2
+%endif
+%endmacro
+
+%imacro _sub 3
+%ifdef flatmodel
+ sub e%1, %3
+%else
+ sub %1, %2
+%endif
+%endmacro
+
+; Macro to clear the high order word for the 32 bit extended registers.
+; This is used to convert an unsigned 16 bit value to an unsigned 32 bit
+; value, and will evaluate to nothing in 16 bit modes.
+
+%imacro clrhi 1
+%ifdef flatmodel
+ movzx e%1,%1
+%endif
+%endmacro
+
+%imacro sgnhi 1
+%ifdef flatmodel
+ movsx e%1,%1
+%endif
+%endmacro
+
+; Macro to load an extended register with an integer value in either mode
+
+%imacro loadint 2
+%ifdef flatmodel
+ mov e%1,%2
+%else
+ xor e%1,e%1
+ mov %1,%2
+%endif
+%endmacro
+
+; Macros to load and store integer values with string instructions
+
+%imacro LODSINT 0
+%ifdef flatmodel
+ lodsd
+%else
+ lodsw
+%endif
+%endmacro
+
+%imacro STOSINT 0
+%ifdef flatmodel
+ stosd
+%else
+ stosw
+%endif
+%endmacro
+
+; Macros to provide resb, resw, resd compatibility with NASM
+
+%imacro dclb 1
+times %1 db 0
+%endmacro
+
+%imacro dclw 1
+times %1 dw 0
+%endmacro
+
+%imacro dcld 1
+times %1 dd 0
+%endmacro
+
+; Macro to get the addres of the GOT for Linux/FreeBSD shared
+; libraries into the EBX register.
+
+%imacro get_GOT 1
+ call %%getgot
+%%getgot: pop %1
+ add %1,_GLOBAL_OFFSET_TABLE_+$$-%%getgot wrt ..gotpc
+%endmacro
+
+; Macro to get the address of a *local* variable that is global to
+; a single module in a manner that will work correctly when compiled
+; into a Linux shared library. Note that this will *not* work for
+; variables that are defined as global to all modules. For that
+; use the LEA_G macro
+
+%macro LEA_L 2
+%ifdef __PIC__
+ get_GOT %1
+ lea %1,[%1+%2 wrt ..gotoff]
+%else
+ lea %1,[%2]
+%endif
+%endmacro
+
+; Same macro as above but for global variables public to *all*
+; modules.
+
+%macro LEA_G 2
+%ifdef __PIC__
+ get_GOT %1
+ mov %1,[%1+%2 wrt ..got]
+%else
+ lea %1,[%2]
+%endif
+%endmacro
+
+; macros to declare assembler function stubs for function structures
+
+%imacro BEGIN_STUBS_DEF 2
+begdataseg _STUBS
+%ifdef __NOU_VAR__
+extern %1
+%define STUBS_START %1
+%else
+extern _%1
+%define STUBS_START _%1
+%endif
+enddataseg _STUBS
+begcodeseg _STUBS
+%assign off %2
+%endmacro
+
+%imacro DECLARE_STUB 1
+%ifdef __PIC__
+ global %1:function
+%1:
+ get_GOT eax
+ mov eax,[eax+STUBS_START wrt ..got]
+ jmp [eax+off]
+%else
+%ifdef __NOU__
+ global %1
+%1:
+%else
+ global _%1
+_%1:
+%endif
+ jmp [DWORD STUBS_START+off]
+%endif
+%assign off off+4
+%endmacro
+
+%imacro SKIP_STUB 1
+%assign off off+4
+%endmacro
+
+%imacro DECLARE_STDCALL 2
+%ifdef STDCALL_MANGLE
+ global _%1@%2
+_%1@%2:
+%else
+%ifdef STDCALL_USCORE
+ global _%1
+_%1:
+%else
+ global %1
+%1:
+%endif
+%endif
+ jmp [DWORD STUBS_START+off]
+%assign off off+4
+%endmacro
+
+%imacro END_STUBS_DEF 0
+endcodeseg _STUBS
+%endmacro
+
+; macros to declare assembler import stubs for binary loadable drivers
+
+%imacro BEGIN_IMPORTS_DEF 1
+BEGIN_STUBS_DEF %1,4
+%endmacro
+
+%imacro DECLARE_IMP 2
+DECLARE_STUB %1
+%endmacro
+
+%imacro SKIP_IMP 2
+SKIP_STUB %1
+%endmacro
+
+%imacro SKIP_IMP2 1
+DECLARE_STUB %1
+%endmacro
+
+%imacro SKIP_IMP3 1
+SKIP_STUB %1
+%endmacro
+
+%imacro END_IMPORTS_DEF 0
+END_STUBS_DEF
+%endmacro
+
+else ; __NASM_MAJOR__
+
+;============================================================================
+; Macro package when compiling with TASM.
+;============================================================================
+
+; Turn off underscores for globals if disabled for all externals
+
+ifdef __NOU__
+__NOU_VAR__ = 1
+endif
+
+; Define the __WINDOWS__ symbol if we are compiling for any Windows
+; environment
+
+ifdef __WINDOWS16__
+__WINDOWS__ = 1
+endif
+ifdef __WINDOWS32__
+__WINDOWS__ = 1
+__WINDOWS32_386__ = 1
+endif
+ifdef __WIN386__
+__WINDOWS__ = 1
+__WINDOWS32_386__ = 1
+endif
+ifdef __VXD__
+__WINDOWS__ = 1
+__WINDOWS32_386__ = 1
+ MASM
+ .386
+ NO_SEGMENTS = 1
+ include vmm.inc ; IGNORE DEPEND
+ include vsegment.inc ; IGNORE DEPEND
+ IDEAL
+endif
+
+; Macros for accessing 'generic' registers
+
+ifdef __FLAT__
+ _ax EQU eax ; EAX is used for accumulator
+ _bx EQU ebx ; EBX is used for accumulator
+ _cx EQU ecx ; ECX is used for looping
+ _dx EQU edx ; EDX is used for data register
+ _si EQU esi ; ESI is the source index register
+ _di EQU edi ; EDI is the destination index register
+ _bp EQU ebp ; EBP is used for base pointer register
+ _sp EQU esp ; ESP is used for stack pointer register
+ _es EQU ; ES and DS are the same in 32 bit PM
+ typedef UCHAR BYTE ; Size of a character
+ typedef USHORT WORD ; Size of a short
+ typedef UINT DWORD ; Size of an integer
+ typedef ULONG DWORD ; Size of a long
+ typedef BOOL DWORD ; Size of a boolean
+ typedef DPTR DWORD ; Size of a data pointer
+ typedef FDPTR FWORD ; Size of a far data pointer
+ typedef NDPTR DWORD ; Size of a near data pointer
+ typedef CPTR DWORD ; Size of a code pointer
+ typedef FCPTR FWORD ; Size of a far code pointer
+ typedef NCPTR DWORD ; Size of a near code pointer
+ typedef DUINT DWORD ; Declare a integer variable
+ FPTR EQU NEAR ; Distance for function pointers
+ intsize = 4 ; Size of an integer
+ flatmodel = 1 ; This is a flat memory model
+ P386 ; Turn on 386 code generation
+ MODEL FLAT ; Set up for 32 bit simplified FLAT model
+else
+ _ax EQU ax ; AX is used for accumulator
+ _bx EQU bx ; BX is used for accumulator
+ _cx EQU cx ; CX is used for looping
+ _dx EQU dx ; DX is used for data register
+ _si EQU si ; SI is the source index register
+ _di EQU di ; DI is the destination index register
+ _bp EQU bp ; BP is used for base pointer register
+ _sp EQU sp ; SP is used for stack pointer register
+ _es EQU es: ; ES is used for segment override
+ typedef UCHAR BYTE ; Size of a character
+ typedef USHORT WORD ; Size of a short
+ typedef UINT WORD ; Size of an integer
+ typedef ULONG DWORD ; Size of a long
+ typedef BOOL WORD ; Size of a boolean
+ typedef DPTR DWORD ; Size of a data pointer
+ typedef FDPTR DWORD ; Size of a far data pointer
+ typedef NDPTR WORD ; Size of a near data pointer
+ typedef CPTR DWORD ; Size of a code pointer
+ typedef FCPTR DWORD ; Size of a far code pointer
+ typedef NCPTR WORD ; Size of a near code pointer
+ typedef DUINT WORD ; Declare a integer variable
+ FPTR EQU FAR ; Distance for function pointers
+ intsize = 2 ; Size of an integer
+ P386 ; Turn on 386 code generation
+endif
+ invert EQU not
+
+; Provide a typedef for real floating point numbers
+
+ifdef DOUBLE
+typedef REAL QWORD
+typedef DREAL QWORD
+else
+typedef REAL DWORD
+typedef DREAL DWORD
+endif
+
+; Macros to access the floating point stack registers to convert them
+; from NASM style to TASM style
+
+st0 EQU st(0)
+st1 EQU st(1)
+st2 EQU st(2)
+st3 EQU st(3)
+st4 EQU st(4)
+st5 EQU st(5)
+st6 EQU st(6)
+st7 EQU st(7)
+st8 EQU st(8)
+
+; Boolean truth values (same as those in debug.h)
+
+ifndef __VXD__
+False = 0
+True = 1
+No = 0
+Yes = 1
+Yes = 1
+endif
+
+; Macros for the _DATA data segment. This segment contains initialised data.
+
+MACRO begdataseg name
+ifdef __VXD__
+ MASM
+VXD_LOCKED_DATA_SEG
+ IDEAL
+else
+ifdef flatmodel
+ DATASEG
+else
+SEGMENT _DATA DWORD PUBLIC USE16 'DATA'
+endif
+endif
+ENDM
+
+MACRO enddataseg name
+ifdef __VXD__
+ MASM
+VXD_LOCKED_DATA_ENDS
+ IDEAL
+else
+ifndef flatmodel
+ENDS _DATA
+endif
+endif
+ENDM
+
+; Macro for the main code segment.
+
+MACRO begcodeseg name
+ifdef __VXD__
+ MASM
+VXD_LOCKED_CODE_SEG
+ IDEAL
+else
+ifdef flatmodel
+ CODESEG
+ ASSUME CS:FLAT,DS:FLAT,SS:FLAT
+else
+SEGMENT &name&_TEXT PARA PUBLIC USE16 'CODE'
+ ASSUME CS:&name&_TEXT,DS:_DATA
+endif
+endif
+ENDM
+
+; Macro for a near code segment
+
+MACRO begcodeseg_near
+ifdef flatmodel
+ CODESEG
+ ASSUME CS:FLAT,DS:FLAT,SS:FLAT
+else
+SEGMENT _TEXT PARA PUBLIC USE16 'CODE'
+ ASSUME CS:_TEXT,DS:_DATA
+endif
+ENDM
+
+MACRO endcodeseg name
+ifdef __VXD__
+ MASM
+VXD_LOCKED_CODE_ENDS
+ IDEAL
+else
+ifndef flatmodel
+ENDS &name&_TEXT
+endif
+endif
+ENDM
+
+MACRO endcodeseg_near
+ifndef flatmodel
+ENDS _TEXT
+endif
+ENDM
+
+; Macro to be invoked at the start of all modules to set up segments for
+; later use.
+
+MACRO header name
+begdataseg name
+enddataseg name
+ENDM
+
+; Macro for an extern C symbol. If the C compiler requires leading
+; underscores, then the underscores are added to the symbol names, otherwise
+; they are left off. The symbol name is referenced in the assembler code
+; using the non-underscored symbol name.
+
+MACRO cextern name,size
+ifdef __NOU_VAR__
+ EXTRN name:size
+else
+ EXTRN _&name&:size
+name EQU _&name&
+endif
+ENDM
+
+MACRO cexternfunc name,size
+ifdef __NOU__
+ EXTRN name:size
+else
+ EXTRN _&name&:size
+name EQU _&name&
+endif
+ENDM
+
+MACRO stdexternfunc name,num_args,size
+ifdef STDCALL_MANGLE
+ EXTRN _&name&@&num_args&:size
+name EQU _&name&@&num_args
+else
+ EXTRN name:size
+endif
+ENDM
+
+; Macro for a public C symbol. If the C compiler requires leading
+; underscores, then the underscores are added to the symbol names, otherwise
+; they are left off. The symbol name is referenced in the assembler code
+; using the non-underscored symbol name.
+
+MACRO cpublic name
+ifdef __NOU_VAR__
+name:
+ PUBLIC name
+else
+_&name&:
+ PUBLIC _&name&
+name EQU _&name&
+endif
+ENDM
+
+; Macro for an global C symbol. If the C compiler requires leading
+; underscores, then the underscores are added to the symbol names, otherwise
+; they are left off. The symbol name is referenced in the assembler code
+; using the non-underscored symbol name.
+
+MACRO cglobal name
+ifdef __NOU_VAR__
+ PUBLIC name
+else
+ PUBLIC _&name&
+name EQU _&name&
+endif
+ENDM
+
+; Macro for an global C function symbol. If the C compiler requires leading
+; underscores, then the underscores are added to the symbol names, otherwise
+; they are left off. The symbol name is referenced in the assembler code
+; using the non-underscored symbol name.
+
+MACRO cglobalfunc name
+ifdef __NOU__
+ PUBLIC name
+else
+ PUBLIC _&name&
+name EQU _&name&
+endif
+ENDM
+
+; Macro to start a C callable function. This will be a far function for
+; 16-bit code, and a near function for 32-bit code.
+
+MACRO cprocstatic name ; Set up model independant private proc
+ifdef flatmodel
+PROC name NEAR
+else
+PROC name FAR
+endif
+LocalSize = 0
+ENDM
+
+MACRO cprocstart name ; Set up model independant proc
+ifdef flatmodel
+ifdef __NOU__
+PROC name NEAR
+else
+PROC _&name& NEAR
+endif
+else
+ifdef __NOU__
+PROC name FAR
+else
+PROC _&name& FAR
+endif
+endif
+LocalSize = 0
+ cglobalfunc name
+ENDM
+
+MACRO cprocnear name ; Set up near proc
+ifdef __NOU__
+PROC name NEAR
+else
+PROC _&name& NEAR
+endif
+LocalSize = 0
+ cglobalfunc name
+ENDM
+
+MACRO cprocfar name ; Set up far proc
+ifdef __NOU__
+PROC name FAR
+else
+PROC _&name& FAR
+endif
+LocalSize = 0
+ cglobalfunc name
+ENDM
+
+MACRO cprocend ; End procedure macro
+ENDP
+ENDM
+
+; This macro sets up a procedure to be exported from a 16 bit DLL. Since the
+; calling conventions are always _far _pascal for 16 bit DLL's, we actually
+; rename this routine with an extra underscore with 'C' calling conventions
+; and a small DLL stub will be provided by the high level code to call the
+; assembler routine.
+
+MACRO cprocstartdll16 name
+ifdef __WINDOWS16__
+cprocstart _&name&
+else
+cprocstart name
+endif
+ENDM
+
+; Macros for entering and exiting C callable functions. Note that we must
+; always save and restore the SI and DI registers for C functions, and for
+; 32 bit C functions we also need to save and restore EBX and clear the
+; direction flag.
+
+MACRO save_c_regs
+ifdef flatmodel
+ push ebx
+endif
+ push _si
+ push _di
+ENDM
+
+MACRO enter_c
+ push _bp
+ mov _bp,_sp
+ IFDIFI <LocalSize>,<0>
+ sub _sp,LocalSize
+ ENDIF
+ save_c_regs
+ENDM
+
+MACRO restore_c_regs
+ pop _di
+ pop _si
+ifdef flatmodel
+ pop ebx
+endif
+ENDM
+
+MACRO leave_c
+ restore_c_regs
+ cld
+ IFDIFI <LocalSize>,<0>
+ mov _sp,_bp
+ ENDIF
+ pop _bp
+ENDM
+
+MACRO use_ebx
+ifdef flatmodel
+ push ebx
+endif
+ENDM
+
+MACRO unuse_ebx
+ifdef flatmodel
+ pop ebx
+endif
+ENDM
+
+; Macros for saving and restoring the value of DS,ES,FS,GS when it is to
+; be used in assembly routines. This evaluates to nothing in the flat memory
+; model, but is saves and restores DS in the large memory model.
+
+MACRO use_ds
+ifndef flatmodel
+ push ds
+endif
+ENDM
+
+MACRO unuse_ds
+ifndef flatmodel
+ pop ds
+endif
+ENDM
+
+MACRO use_es
+ifndef flatmodel
+ push es
+endif
+ENDM
+
+MACRO unuse_es
+ifndef flatmodel
+ pop es
+endif
+ENDM
+
+; Macros for loading the address of a data pointer into a segment and
+; index register pair. The macro explicitly loads DS or ES in the 16 bit
+; memory model, or it simply loads the offset into the register in the flat
+; memory model since DS and ES always point to all addressable memory. You
+; must use the correct _REG (ie: _BX) macros for documentation purposes.
+
+MACRO _lds reg, addr
+ifdef flatmodel
+ mov reg,addr
+else
+ lds reg,addr
+endif
+ENDM
+
+MACRO _les reg, addr
+ifdef flatmodel
+ mov reg,addr
+else
+ les reg,addr
+endif
+ENDM
+
+; Macros for adding and subtracting a value from registers. Two value are
+; provided, one for 16 bit modes and another for 32 bit modes (the extended
+; register is used in 32 bit modes).
+
+MACRO _add reg, val16, val32
+ifdef flatmodel
+ add e®&, val32
+else
+ add reg, val16
+endif
+ENDM
+
+MACRO _sub reg, val16, val32
+ifdef flatmodel
+ sub e®&, val32
+else
+ sub reg, val16
+endif
+ENDM
+
+; Macro to clear the high order word for the 32 bit extended registers.
+; This is used to convert an unsigned 16 bit value to an unsigned 32 bit
+; value, and will evaluate to nothing in 16 bit modes.
+
+MACRO clrhi reg
+ifdef flatmodel
+ movzx e®&,reg
+endif
+ENDM
+
+MACRO sgnhi reg
+ifdef flatmodel
+ movsx e®&,reg
+endif
+ENDM
+
+; Macro to load an extended register with an integer value in either mode
+
+MACRO loadint reg,val
+ifdef flatmodel
+ mov e®&,val
+else
+ xor e®&,e®&
+ mov reg,val
+endif
+ENDM
+
+; Macros to load and store integer values with string instructions
+
+MACRO LODSINT
+ifdef flatmodel
+ lodsd
+else
+ lodsw
+endif
+ENDM
+
+MACRO STOSINT
+ifdef flatmodel
+ stosd
+else
+ stosw
+endif
+ENDM
+
+; Macros to provide resb, resw, resd compatibility with NASM
+
+MACRO dclb count
+db count dup (0)
+ENDM
+
+MACRO dclw count
+dw count dup (0)
+ENDM
+
+MACRO dcld count
+dd count dup (0)
+ENDM
+
+; Macros to provide resb, resw, resd compatibility with NASM
+
+MACRO resb count
+db count dup (?)
+ENDM
+
+MACRO resw count
+dw count dup (?)
+ENDM
+
+MACRO resd count
+dd count dup (?)
+ENDM
+
+; Macros to declare assembler stubs for function structures
+
+MACRO BEGIN_STUBS_DEF name, firstOffset
+begdataseg _STUBS
+ifdef __NOU_VAR__
+ EXTRN name:DWORD
+STUBS_START = name
+else
+ EXTRN _&name&:DWORD
+name EQU _&name&
+STUBS_START = _&name
+endif
+enddataseg _STUBS
+begcodeseg _STUBS
+off = firstOffset
+ENDM
+
+MACRO DECLARE_STUB name
+ifdef __NOU__
+name:
+ PUBLIC name
+else
+_&name:
+ PUBLIC _&name
+endif
+ jmp [DWORD STUBS_START+off]
+off = off + 4
+ENDM
+
+MACRO SKIP_STUB name
+off = off + 4
+ENDM
+
+MACRO DECLARE_STDCALL name,num_args
+ifdef STDCALL_MANGLE
+_&name&@&num_args&:
+ PUBLIC _&name&@&num_args&
+else
+name:
+ PUBLIC name
+endif
+ jmp [DWORD STUBS_START+off]
+off = off + 4
+ENDM
+
+MACRO END_STUBS_DEF
+endcodeseg _STUBS
+ENDM
+
+MACRO BEGIN_IMPORTS_DEF name
+BEGIN_STUBS_DEF name,4
+ENDM
+
+ifndef LOCAL_DECLARE_IMP
+MACRO DECLARE_IMP name, numArgs
+DECLARE_STUB name
+ENDM
+
+MACRO SKIP_IMP name
+SKIP_STUB name
+ENDM
+
+MACRO SKIP_IMP2 name, numArgs
+DECLARE_STUB name
+ENDM
+
+MACRO SKIP_IMP3 name
+SKIP_STUB name
+ENDM
+endif
+
+MACRO END_IMPORTS_DEF
+END_STUBS_DEF
+ENDM
+
+MACRO LEA_L reg,name
+ lea reg,[name]
+ENDM
+
+MACRO LEA_G reg,name
+ lea reg,[name]
+ENDM
+
+endif
+
diff --git a/board/MAI/bios_emulator/scitech/include/x86emu.h b/board/MAI/bios_emulator/scitech/include/x86emu.h
new file mode 100644
index 00000000000..1d87d4e57fc
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/include/x86emu.h
@@ -0,0 +1,194 @@
+/****************************************************************************
+*
+* Realmode X86 Emulator Library
+*
+* Copyright (C) 1996-1999 SciTech Software, Inc.
+* Copyright (C) David Mosberger-Tang
+* Copyright (C) 1999 Egbert Eich
+*
+* ========================================================================
+*
+* Permission to use, copy, modify, distribute, and sell this software and
+* its documentation for any purpose is hereby granted without fee,
+* provided that the above copyright notice appear in all copies and that
+* both that copyright notice and this permission notice appear in
+* supporting documentation, and that the name of the authors not be used
+* in advertising or publicity pertaining to distribution of the software
+* without specific, written prior permission. The authors makes no
+* representations about the suitability of this software for any purpose.
+* It is provided "as is" without express or implied warranty.
+*
+* THE AUTHORS DISCLAIMS ALL WARRANTIES WITH REGARD TO THIS SOFTWARE,
+* INCLUDING ALL IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS, IN NO
+* EVENT SHALL THE AUTHORS BE LIABLE FOR ANY SPECIAL, INDIRECT OR
+* CONSEQUENTIAL DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF
+* USE, DATA OR PROFITS, WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE OR
+* OTHER TORTIOUS ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE OR
+* PERFORMANCE OF THIS SOFTWARE.
+*
+* ========================================================================
+*
+* Language: ANSI C
+* Environment: Any
+* Developer: Kendall Bennett
+*
+* Description: Header file for public specific functions.
+* Any application linking against us should only
+* include this header
+*
+****************************************************************************/
+
+#ifndef __X86EMU_X86EMU_H
+#define __X86EMU_X86EMU_H
+
+#ifdef SCITECH
+#include "scitech.h"
+#define X86API _ASMAPI
+#define X86APIP _ASMAPIP
+typedef int X86EMU_pioAddr;
+#else
+#include "x86emu/types.h"
+#define X86API
+#define X86APIP *
+#endif
+#include "x86emu/regs.h"
+
+/*---------------------- Macros and type definitions ----------------------*/
+
+#pragma pack(1)
+
+/****************************************************************************
+REMARKS:
+Data structure containing ponters to programmed I/O functions used by the
+emulator. This is used so that the user program can hook all programmed
+I/O for the emulator to handled as necessary by the user program. By
+default the emulator contains simple functions that do not do access the
+hardware in any way. To allow the emualtor access the hardware, you will
+need to override the programmed I/O functions using the X86EMU_setupPioFuncs
+function.
+
+HEADER:
+x86emu.h
+
+MEMBERS:
+inb - Function to read a byte from an I/O port
+inw - Function to read a word from an I/O port
+inl - Function to read a dword from an I/O port
+outb - Function to write a byte to an I/O port
+outw - Function to write a word to an I/O port
+outl - Function to write a dword to an I/O port
+****************************************************************************/
+typedef struct {
+ u8 (X86APIP inb)(X86EMU_pioAddr addr);
+ u16 (X86APIP inw)(X86EMU_pioAddr addr);
+ u32 (X86APIP inl)(X86EMU_pioAddr addr);
+ void (X86APIP outb)(X86EMU_pioAddr addr, u8 val);
+ void (X86APIP outw)(X86EMU_pioAddr addr, u16 val);
+ void (X86APIP outl)(X86EMU_pioAddr addr, u32 val);
+ } X86EMU_pioFuncs;
+
+/****************************************************************************
+REMARKS:
+Data structure containing ponters to memory access functions used by the
+emulator. This is used so that the user program can hook all memory
+access functions as necessary for the emulator. By default the emulator
+contains simple functions that only access the internal memory of the
+emulator. If you need specialised functions to handle access to different
+types of memory (ie: hardware framebuffer accesses and BIOS memory access
+etc), you will need to override this using the X86EMU_setupMemFuncs
+function.
+
+HEADER:
+x86emu.h
+
+MEMBERS:
+rdb - Function to read a byte from an address
+rdw - Function to read a word from an address
+rdl - Function to read a dword from an address
+wrb - Function to write a byte to an address
+wrw - Function to write a word to an address
+wrl - Function to write a dword to an address
+****************************************************************************/
+typedef struct {
+ u8 (X86APIP rdb)(u32 addr);
+ u16 (X86APIP rdw)(u32 addr);
+ u32 (X86APIP rdl)(u32 addr);
+ void (X86APIP wrb)(u32 addr, u8 val);
+ void (X86APIP wrw)(u32 addr, u16 val);
+ void (X86APIP wrl)(u32 addr, u32 val);
+ } X86EMU_memFuncs;
+
+/****************************************************************************
+ Here are the default memory read and write
+ function in case they are needed as fallbacks.
+***************************************************************************/
+extern u8 X86API rdb(u32 addr);
+extern u16 X86API rdw(u32 addr);
+extern u32 X86API rdl(u32 addr);
+extern void X86API wrb(u32 addr, u8 val);
+extern void X86API wrw(u32 addr, u16 val);
+extern void X86API wrl(u32 addr, u32 val);
+
+#pragma pack()
+
+/*--------------------- type definitions -----------------------------------*/
+
+typedef void (X86APIP X86EMU_intrFuncs)(int num);
+extern X86EMU_intrFuncs _X86EMU_intrTab[256];
+
+/*-------------------------- Function Prototypes --------------------------*/
+
+#ifdef __cplusplus
+extern "C" { /* Use "C" linkage when in C++ mode */
+#endif
+
+void X86EMU_setupMemFuncs(X86EMU_memFuncs *funcs);
+void X86EMU_setupPioFuncs(X86EMU_pioFuncs *funcs);
+void X86EMU_setupIntrFuncs(X86EMU_intrFuncs funcs[]);
+void X86EMU_prepareForInt(int num);
+
+/* decode.c */
+
+void X86EMU_exec(void);
+void X86EMU_halt_sys(void);
+
+#ifdef DEBUG
+#define HALT_SYS() \
+ printk("halt_sys: file %s, line %d\n", __FILE__, __LINE__), \
+ X86EMU_halt_sys()
+#else
+#define HALT_SYS() X86EMU_halt_sys()
+#endif
+
+/* Debug options */
+
+#define DEBUG_DECODE_F 0x0001 /* print decoded instruction */
+#define DEBUG_TRACE_F 0x0002 /* dump regs before/after execution */
+#define DEBUG_STEP_F 0x0004
+#define DEBUG_DISASSEMBLE_F 0x0008
+#define DEBUG_BREAK_F 0x0010
+#define DEBUG_SVC_F 0x0020
+#define DEBUG_SAVE_CS_IP 0x0040
+#define DEBUG_FS_F 0x0080
+#define DEBUG_PROC_F 0x0100
+#define DEBUG_SYSINT_F 0x0200 /* bios system interrupts. */
+#define DEBUG_TRACECALL_F 0x0400
+#define DEBUG_INSTRUMENT_F 0x0800
+#define DEBUG_MEM_TRACE_F 0x1000
+#define DEBUG_IO_TRACE_F 0x2000
+#define DEBUG_TRACECALL_REGS_F 0x4000
+#define DEBUG_DECODE_NOPRINT_F 0x8000
+#define DEBUG_EXIT 0x10000
+#define DEBUG_SYS_F (DEBUG_SVC_F|DEBUG_FS_F|DEBUG_PROC_F)
+
+void X86EMU_trace_regs(void);
+void X86EMU_trace_xregs(void);
+void X86EMU_dump_memory(u16 seg, u16 off, u32 amt);
+int X86EMU_trace_on(void);
+int X86EMU_trace_off(void);
+
+#ifdef __cplusplus
+} /* End of "C" linkage for C++ */
+#endif
+
+#endif /* __X86EMU_X86EMU_H */
diff --git a/board/MAI/bios_emulator/scitech/include/x86emu/fpu_regs.h b/board/MAI/bios_emulator/scitech/include/x86emu/fpu_regs.h
new file mode 100644
index 00000000000..777b03cd718
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/include/x86emu/fpu_regs.h
@@ -0,0 +1,115 @@
+/****************************************************************************
+*
+* Realmode X86 Emulator Library
+*
+* Copyright (C) 1996-1999 SciTech Software, Inc.
+* Copyright (C) David Mosberger-Tang
+* Copyright (C) 1999 Egbert Eich
+*
+* ========================================================================
+*
+* Permission to use, copy, modify, distribute, and sell this software and
+* its documentation for any purpose is hereby granted without fee,
+* provided that the above copyright notice appear in all copies and that
+* both that copyright notice and this permission notice appear in
+* supporting documentation, and that the name of the authors not be used
+* in advertising or publicity pertaining to distribution of the software
+* without specific, written prior permission. The authors makes no
+* representations about the suitability of this software for any purpose.
+* It is provided "as is" without express or implied warranty.
+*
+* THE AUTHORS DISCLAIMS ALL WARRANTIES WITH REGARD TO THIS SOFTWARE,
+* INCLUDING ALL IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS, IN NO
+* EVENT SHALL THE AUTHORS BE LIABLE FOR ANY SPECIAL, INDIRECT OR
+* CONSEQUENTIAL DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF
+* USE, DATA OR PROFITS, WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE OR
+* OTHER TORTIOUS ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE OR
+* PERFORMANCE OF THIS SOFTWARE.
+*
+* ========================================================================
+*
+* Language: ANSI C
+* Environment: Any
+* Developer: Kendall Bennett
+*
+* Description: Header file for FPU register definitions.
+*
+****************************************************************************/
+
+#ifndef __X86EMU_FPU_REGS_H
+#define __X86EMU_FPU_REGS_H
+
+#ifdef X86_FPU_SUPPORT
+
+#pragma pack(1)
+
+/* Basic 8087 register can hold any of the following values: */
+
+union x86_fpu_reg_u {
+ s8 tenbytes[10];
+ double dval;
+ float fval;
+ s16 sval;
+ s32 lval;
+ };
+
+struct x86_fpu_reg {
+ union x86_fpu_reg_u reg;
+ char tag;
+ };
+
+/*
+ * Since we are not going to worry about the problems of aliasing
+ * registers, every time a register is modified, its result type is
+ * set in the tag fields for that register. If some operation
+ * attempts to access the type in a way inconsistent with its current
+ * storage format, then we flag the operation. If common, we'll
+ * attempt the conversion.
+ */
+
+#define X86_FPU_VALID 0x80
+#define X86_FPU_REGTYP(r) ((r) & 0x7F)
+
+#define X86_FPU_WORD 0x0
+#define X86_FPU_SHORT 0x1
+#define X86_FPU_LONG 0x2
+#define X86_FPU_FLOAT 0x3
+#define X86_FPU_DOUBLE 0x4
+#define X86_FPU_LDBL 0x5
+#define X86_FPU_BSD 0x6
+
+#define X86_FPU_STKTOP 0
+
+struct x86_fpu_registers {
+ struct x86_fpu_reg x86_fpu_stack[8];
+ int x86_fpu_flags;
+ int x86_fpu_config; /* rounding modes, etc. */
+ short x86_fpu_tos, x86_fpu_bos;
+ };
+
+#pragma pack()
+
+/*
+ * There are two versions of the following macro.
+ *
+ * One version is for opcode D9, for which there are more than 32
+ * instructions encoded in the second byte of the opcode.
+ *
+ * The other version, deals with all the other 7 i87 opcodes, for
+ * which there are only 32 strings needed to describe the
+ * instructions.
+ */
+
+#endif /* X86_FPU_SUPPORT */
+
+#ifdef DEBUG
+# define DECODE_PRINTINSTR32(t,mod,rh,rl) \
+ DECODE_PRINTF(t[(mod<<3)+(rh)]);
+# define DECODE_PRINTINSTR256(t,mod,rh,rl) \
+ DECODE_PRINTF(t[(mod<<6)+(rh<<3)+(rl)]);
+#else
+# define DECODE_PRINTINSTR32(t,mod,rh,rl)
+# define DECODE_PRINTINSTR256(t,mod,rh,rl)
+#endif
+
+#endif /* __X86EMU_FPU_REGS_H */
diff --git a/board/MAI/bios_emulator/scitech/include/x86emu/regs.h b/board/MAI/bios_emulator/scitech/include/x86emu/regs.h
new file mode 100644
index 00000000000..c6ce88462aa
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/include/x86emu/regs.h
@@ -0,0 +1,331 @@
+/****************************************************************************
+*
+* Realmode X86 Emulator Library
+*
+* Copyright (C) 1996-1999 SciTech Software, Inc.
+* Copyright (C) David Mosberger-Tang
+* Copyright (C) 1999 Egbert Eich
+*
+* ========================================================================
+*
+* Permission to use, copy, modify, distribute, and sell this software and
+* its documentation for any purpose is hereby granted without fee,
+* provided that the above copyright notice appear in all copies and that
+* both that copyright notice and this permission notice appear in
+* supporting documentation, and that the name of the authors not be used
+* in advertising or publicity pertaining to distribution of the software
+* without specific, written prior permission. The authors makes no
+* representations about the suitability of this software for any purpose.
+* It is provided "as is" without express or implied warranty.
+*
+* THE AUTHORS DISCLAIMS ALL WARRANTIES WITH REGARD TO THIS SOFTWARE,
+* INCLUDING ALL IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS, IN NO
+* EVENT SHALL THE AUTHORS BE LIABLE FOR ANY SPECIAL, INDIRECT OR
+* CONSEQUENTIAL DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF
+* USE, DATA OR PROFITS, WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE OR
+* OTHER TORTIOUS ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE OR
+* PERFORMANCE OF THIS SOFTWARE.
+*
+* ========================================================================
+*
+* Language: ANSI C
+* Environment: Any
+* Developer: Kendall Bennett
+*
+* Description: Header file for x86 register definitions.
+*
+****************************************************************************/
+
+#ifndef __X86EMU_REGS_H
+#define __X86EMU_REGS_H
+
+/*---------------------- Macros and type definitions ----------------------*/
+
+#pragma pack(1)
+
+/*
+ * General EAX, EBX, ECX, EDX type registers. Note that for
+ * portability, and speed, the issue of byte swapping is not addressed
+ * in the registers. All registers are stored in the default format
+ * available on the host machine. The only critical issue is that the
+ * registers should line up EXACTLY in the same manner as they do in
+ * the 386. That is:
+ *
+ * EAX & 0xff === AL
+ * EAX & 0xffff == AX
+ *
+ * etc. The result is that alot of the calculations can then be
+ * done using the native instruction set fully.
+ */
+
+#ifdef __BIG_ENDIAN__
+
+typedef struct {
+ u32 e_reg;
+ } I32_reg_t;
+
+typedef struct {
+ u16 filler0, x_reg;
+ } I16_reg_t;
+
+typedef struct {
+ u8 filler0, filler1, h_reg, l_reg;
+ } I8_reg_t;
+
+#else /* !__BIG_ENDIAN__ */
+
+typedef struct {
+ u32 e_reg;
+ } I32_reg_t;
+
+typedef struct {
+ u16 x_reg;
+ } I16_reg_t;
+
+typedef struct {
+ u8 l_reg, h_reg;
+ } I8_reg_t;
+
+#endif /* BIG_ENDIAN */
+
+typedef union {
+ I32_reg_t I32_reg;
+ I16_reg_t I16_reg;
+ I8_reg_t I8_reg;
+ } i386_general_register;
+
+struct i386_general_regs {
+ i386_general_register A, B, C, D;
+ };
+
+typedef struct i386_general_regs Gen_reg_t;
+
+struct i386_special_regs {
+ i386_general_register SP, BP, SI, DI, IP;
+ u32 FLAGS;
+ };
+
+/*
+ * Segment registers here represent the 16 bit quantities
+ * CS, DS, ES, SS.
+ */
+
+struct i386_segment_regs {
+ u16 CS, DS, SS, ES, FS, GS;
+ };
+
+/* 8 bit registers */
+#define R_AH gen.A.I8_reg.h_reg
+#define R_AL gen.A.I8_reg.l_reg
+#define R_BH gen.B.I8_reg.h_reg
+#define R_BL gen.B.I8_reg.l_reg
+#define R_CH gen.C.I8_reg.h_reg
+#define R_CL gen.C.I8_reg.l_reg
+#define R_DH gen.D.I8_reg.h_reg
+#define R_DL gen.D.I8_reg.l_reg
+
+/* 16 bit registers */
+#define R_AX gen.A.I16_reg.x_reg
+#define R_BX gen.B.I16_reg.x_reg
+#define R_CX gen.C.I16_reg.x_reg
+#define R_DX gen.D.I16_reg.x_reg
+
+/* 32 bit extended registers */
+#define R_EAX gen.A.I32_reg.e_reg
+#define R_EBX gen.B.I32_reg.e_reg
+#define R_ECX gen.C.I32_reg.e_reg
+#define R_EDX gen.D.I32_reg.e_reg
+
+/* special registers */
+#define R_SP spc.SP.I16_reg.x_reg
+#define R_BP spc.BP.I16_reg.x_reg
+#define R_SI spc.SI.I16_reg.x_reg
+#define R_DI spc.DI.I16_reg.x_reg
+#define R_IP spc.IP.I16_reg.x_reg
+#define R_FLG spc.FLAGS
+
+/* special registers */
+#define R_SP spc.SP.I16_reg.x_reg
+#define R_BP spc.BP.I16_reg.x_reg
+#define R_SI spc.SI.I16_reg.x_reg
+#define R_DI spc.DI.I16_reg.x_reg
+#define R_IP spc.IP.I16_reg.x_reg
+#define R_FLG spc.FLAGS
+
+/* special registers */
+#define R_ESP spc.SP.I32_reg.e_reg
+#define R_EBP spc.BP.I32_reg.e_reg
+#define R_ESI spc.SI.I32_reg.e_reg
+#define R_EDI spc.DI.I32_reg.e_reg
+#define R_EIP spc.IP.I32_reg.e_reg
+#define R_EFLG spc.FLAGS
+
+/* segment registers */
+#define R_CS seg.CS
+#define R_DS seg.DS
+#define R_SS seg.SS
+#define R_ES seg.ES
+#define R_FS seg.FS
+#define R_GS seg.GS
+
+/* flag conditions */
+#define FB_CF 0x0001 /* CARRY flag */
+#define FB_PF 0x0004 /* PARITY flag */
+#define FB_AF 0x0010 /* AUX flag */
+#define FB_ZF 0x0040 /* ZERO flag */
+#define FB_SF 0x0080 /* SIGN flag */
+#define FB_TF 0x0100 /* TRAP flag */
+#define FB_IF 0x0200 /* INTERRUPT ENABLE flag */
+#define FB_DF 0x0400 /* DIR flag */
+#define FB_OF 0x0800 /* OVERFLOW flag */
+
+/* 80286 and above always have bit#1 set */
+#define F_ALWAYS_ON (0x0002) /* flag bits always on */
+
+/*
+ * Define a mask for only those flag bits we will ever pass back
+ * (via PUSHF)
+ */
+#define F_MSK (FB_CF|FB_PF|FB_AF|FB_ZF|FB_SF|FB_TF|FB_IF|FB_DF|FB_OF)
+
+/* following bits masked in to a 16bit quantity */
+
+#define F_CF 0x0001 /* CARRY flag */
+#define F_PF 0x0004 /* PARITY flag */
+#define F_AF 0x0010 /* AUX flag */
+#define F_ZF 0x0040 /* ZERO flag */
+#define F_SF 0x0080 /* SIGN flag */
+#define F_TF 0x0100 /* TRAP flag */
+#define F_IF 0x0200 /* INTERRUPT ENABLE flag */
+#define F_DF 0x0400 /* DIR flag */
+#define F_OF 0x0800 /* OVERFLOW flag */
+
+#define TOGGLE_FLAG(flag) (M.x86.R_FLG ^= (flag))
+#define SET_FLAG(flag) (M.x86.R_FLG |= (flag))
+#define CLEAR_FLAG(flag) (M.x86.R_FLG &= ~(flag))
+#define ACCESS_FLAG(flag) (M.x86.R_FLG & (flag))
+#define CLEARALL_FLAG(m) (M.x86.R_FLG = 0)
+
+#define CONDITIONAL_SET_FLAG(COND,FLAG) \
+ if (COND) SET_FLAG(FLAG); else CLEAR_FLAG(FLAG)
+
+#define F_PF_CALC 0x010000 /* PARITY flag has been calced */
+#define F_ZF_CALC 0x020000 /* ZERO flag has been calced */
+#define F_SF_CALC 0x040000 /* SIGN flag has been calced */
+
+#define F_ALL_CALC 0xff0000 /* All have been calced */
+
+/*
+ * Emulator machine state.
+ * Segment usage control.
+ */
+#define SYSMODE_SEG_DS_SS 0x00000001
+#define SYSMODE_SEGOVR_CS 0x00000002
+#define SYSMODE_SEGOVR_DS 0x00000004
+#define SYSMODE_SEGOVR_ES 0x00000008
+#define SYSMODE_SEGOVR_FS 0x00000010
+#define SYSMODE_SEGOVR_GS 0x00000020
+#define SYSMODE_SEGOVR_SS 0x00000040
+#define SYSMODE_PREFIX_REPE 0x00000080
+#define SYSMODE_PREFIX_REPNE 0x00000100
+#define SYSMODE_PREFIX_DATA 0x00000200
+#define SYSMODE_PREFIX_ADDR 0x00000400
+#define SYSMODE_INTR_PENDING 0x10000000
+#define SYSMODE_EXTRN_INTR 0x20000000
+#define SYSMODE_HALTED 0x40000000
+
+#define SYSMODE_SEGMASK (SYSMODE_SEG_DS_SS | \
+ SYSMODE_SEGOVR_CS | \
+ SYSMODE_SEGOVR_DS | \
+ SYSMODE_SEGOVR_ES | \
+ SYSMODE_SEGOVR_FS | \
+ SYSMODE_SEGOVR_GS | \
+ SYSMODE_SEGOVR_SS)
+#define SYSMODE_CLRMASK (SYSMODE_SEG_DS_SS | \
+ SYSMODE_SEGOVR_CS | \
+ SYSMODE_SEGOVR_DS | \
+ SYSMODE_SEGOVR_ES | \
+ SYSMODE_SEGOVR_FS | \
+ SYSMODE_SEGOVR_GS | \
+ SYSMODE_SEGOVR_SS | \
+ SYSMODE_PREFIX_DATA | \
+ SYSMODE_PREFIX_ADDR)
+
+#define INTR_SYNCH 0x1
+#define INTR_ASYNCH 0x2
+#define INTR_HALTED 0x4
+
+typedef struct {
+ struct i386_general_regs gen;
+ struct i386_special_regs spc;
+ struct i386_segment_regs seg;
+ /*
+ * MODE contains information on:
+ * REPE prefix 2 bits repe,repne
+ * SEGMENT overrides 5 bits normal,DS,SS,CS,ES
+ * Delayed flag set 3 bits (zero, signed, parity)
+ * reserved 6 bits
+ * interrupt # 8 bits instruction raised interrupt
+ * BIOS video segregs 4 bits
+ * Interrupt Pending 1 bits
+ * Extern interrupt 1 bits
+ * Halted 1 bits
+ */
+ long mode;
+ u8 intno;
+ volatile int intr; /* mask of pending interrupts */
+ int debug;
+#ifdef DEBUG
+ int check;
+ u16 saved_ip;
+ u16 saved_cs;
+ int enc_pos;
+ int enc_str_pos;
+ char decode_buf[32]; /* encoded byte stream */
+ char decoded_buf[256]; /* disassembled strings */
+#endif
+ } X86EMU_regs;
+
+/****************************************************************************
+REMARKS:
+Structure maintaining the emulator machine state.
+
+MEMBERS:
+x86 - X86 registers
+mem_base - Base real mode memory for the emulator
+mem_size - Size of the real mode memory block for the emulator
+****************************************************************************/
+typedef struct {
+ X86EMU_regs x86;
+ unsigned long mem_base;
+ unsigned long mem_size;
+ void* private;
+ } X86EMU_sysEnv;
+
+#pragma pack()
+
+/*----------------------------- Global Variables --------------------------*/
+
+#ifdef __cplusplus
+extern "C" { /* Use "C" linkage when in C++ mode */
+#endif
+
+/* Global emulator machine state.
+ *
+ * We keep it global to avoid pointer dereferences in the code for speed.
+ */
+
+extern X86EMU_sysEnv _X86EMU_env;
+#define M _X86EMU_env
+
+/*-------------------------- Function Prototypes --------------------------*/
+
+/* Function to log information at runtime */
+
+//void printk(const char *fmt, ...);
+
+#ifdef __cplusplus
+} /* End of "C" linkage for C++ */
+#endif
+
+#endif /* __X86EMU_REGS_H */
diff --git a/board/MAI/bios_emulator/scitech/include/x86emu/types.h b/board/MAI/bios_emulator/scitech/include/x86emu/types.h
new file mode 100644
index 00000000000..0a17c547ee1
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/include/x86emu/types.h
@@ -0,0 +1,70 @@
+/****************************************************************************
+*
+* Realmode X86 Emulator Library
+*
+* Copyright (C) 1996-1999 SciTech Software, Inc.
+* Copyright (C) David Mosberger-Tang
+* Copyright (C) 1999 Egbert Eich
+*
+* ========================================================================
+*
+* Permission to use, copy, modify, distribute, and sell this software and
+* its documentation for any purpose is hereby granted without fee,
+* provided that the above copyright notice appear in all copies and that
+* both that copyright notice and this permission notice appear in
+* supporting documentation, and that the name of the authors not be used
+* in advertising or publicity pertaining to distribution of the software
+* without specific, written prior permission. The authors makes no
+* representations about the suitability of this software for any purpose.
+* It is provided "as is" without express or implied warranty.
+*
+* THE AUTHORS DISCLAIMS ALL WARRANTIES WITH REGARD TO THIS SOFTWARE,
+* INCLUDING ALL IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS, IN NO
+* EVENT SHALL THE AUTHORS BE LIABLE FOR ANY SPECIAL, INDIRECT OR
+* CONSEQUENTIAL DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF
+* USE, DATA OR PROFITS, WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE OR
+* OTHER TORTIOUS ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE OR
+* PERFORMANCE OF THIS SOFTWARE.
+*
+* ========================================================================
+*
+* Language: ANSI C
+* Environment: Any
+* Developer: Kendall Bennett
+*
+* Description: Header file for x86 emulator type definitions.
+*
+****************************************************************************/
+
+#ifndef __X86EMU_TYPES_H
+#define __X86EMU_TYPES_H
+
+#include <sys/types.h>
+
+/*---------------------- Macros and type definitions ----------------------*/
+
+/* Currently only for Linux/32bit */
+#if defined(__GNUC__) && !defined(NO_LONG_LONG)
+#define __HAS_LONG_LONG__
+#endif
+
+typedef unsigned char u8;
+typedef unsigned short u16;
+typedef unsigned int u32;
+#ifdef __HAS_LONG_LONG__
+typedef unsigned long long u64;
+#endif
+
+typedef char s8;
+typedef short s16;
+typedef long s32;
+#ifdef __HAS_LONG_LONG__
+typedef long long s64;
+#endif
+
+/*typedef unsigned int uint;*/
+typedef int sint;
+
+typedef u16 X86EMU_pioAddr;
+
+#endif /* __X86EMU_TYPES_H */
diff --git a/board/MAI/bios_emulator/scitech/lib/debug/linux/gcc/glibc/readme.txt b/board/MAI/bios_emulator/scitech/lib/debug/linux/gcc/glibc/readme.txt
new file mode 100644
index 00000000000..0d87effa998
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/lib/debug/linux/gcc/glibc/readme.txt
@@ -0,0 +1 @@
+This file is just to ensure that the directory is created.
diff --git a/board/MAI/bios_emulator/scitech/lib/debug/linux/gcc/libc/readme.txt b/board/MAI/bios_emulator/scitech/lib/debug/linux/gcc/libc/readme.txt
new file mode 100644
index 00000000000..0d87effa998
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/lib/debug/linux/gcc/libc/readme.txt
@@ -0,0 +1 @@
+This file is just to ensure that the directory is created.
diff --git a/board/MAI/bios_emulator/scitech/lib/release/linux/gcc/glibc/readme.txt b/board/MAI/bios_emulator/scitech/lib/release/linux/gcc/glibc/readme.txt
new file mode 100644
index 00000000000..0d87effa998
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/lib/release/linux/gcc/glibc/readme.txt
@@ -0,0 +1 @@
+This file is just to ensure that the directory is created.
diff --git a/board/MAI/bios_emulator/scitech/lib/release/linux/gcc/libc/readme.txt b/board/MAI/bios_emulator/scitech/lib/release/linux/gcc/libc/readme.txt
new file mode 100644
index 00000000000..0d87effa998
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/lib/release/linux/gcc/libc/readme.txt
@@ -0,0 +1 @@
+This file is just to ensure that the directory is created.
diff --git a/board/MAI/bios_emulator/scitech/makedefs/bc16.mk b/board/MAI/bios_emulator/scitech/makedefs/bc16.mk
new file mode 100644
index 00000000000..aa4fe76a40e
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/makedefs/bc16.mk
@@ -0,0 +1,137 @@
+#############################################################################
+#
+# SciTech Multi-platform Graphics Library
+#
+# ========================================================================
+#
+# The contents of this file are subject to the SciTech MGL Public
+# License Version 1.0 (the "License"); you may not use this file
+# except in compliance with the License. You may obtain a copy of
+# the License at http://www.scitechsoft.com/mgl-license.txt
+#
+# Software distributed under the License is distributed on an
+# "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+# implied. See the License for the specific language governing
+# rights and limitations under the License.
+#
+# The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+#
+# The Initial Developer of the Original Code is SciTech Software, Inc.
+# All Rights Reserved.
+#
+# ========================================================================
+#
+# Descripton: Generic DMAKE startup makefile definitions file. Assumes
+# that the SCITECH environment variable has been set to point
+# to where all our stuff is installed. You should not need
+# to change anything in this file.
+#
+# Borland C++ 4.x 16 bit version. Supports 16 bit DOS,
+# DPMI16 DOS extender and 16 bit Windows development.
+#
+#############################################################################
+
+# Include standard startup script definitions
+.IMPORT: SCITECH
+.INCLUDE: "$(SCITECH)\makedefs\startup.mk"
+
+# Import enivornment variables that we use
+.IMPORT .IGNORE : USE_WIN16 USE_BC5 BC_LIBBASE USE_WIN95
+
+# Default commands for compiling, assembling linking and archiving
+ CC := bcc
+ CFLAGS := -ml -H=bcc.sym -i60 -d -dc -4 -f287
+.IF $(USE_TASM32)
+ AS := tasm32
+.ELIF $(USE_TASMX)
+ AS := tasmx
+.ELSE
+ AS := tasm
+.ENDIF
+ ASFLAGS := /t /mx /m /iINCLUDE /iINCLUDE /i$(SCITECH)\INCLUDE
+ LD := bclink tlink.exe
+ LDFLAGS := -c
+ RC := brc
+ RCFLAGS :=
+.IF $(USE_BC5)
+.IF $(USE_WIN95)
+ WIN_VERSION := -V4.0
+.ENDIF
+.ENDIF
+ LIBR := tlib
+ LIBFLAGS := /C /P32
+ ILIB := implib
+ ILIBFLAGS := -c
+
+# Optionally turn on debugging information
+.IF $(DBG)
+ CFLAGS += -v
+ LDFLAGS += -v
+ ASFLAGS += /zi
+ LIBFLAGS += /P128
+.ELSE
+ LDFLAGS += -x
+ ASFLAGS += /q
+.END
+
+# Optionally turn on optimisations
+.IF $(OPT)
+ CFLAGS += -O2 -k-
+.ELIF $(OPT_SIZE)
+ CFLAGS += -O1 -k-
+.END
+
+# Optionally turn on direct i387 FPU instructions
+
+.IF $(FPU)
+ CFLAGS += -DFPU387
+ ASFLAGS += -DFPU387
+.END
+
+# Optionally compile a beta release version of a product
+.IF $(BETA)
+ CFLAGS += -DBETA
+ ASFLAGS += -DBETA
+.END
+
+# Optionally compile as Win16
+.IF $(USE_WIN16)
+.IF $(BUILD_DLL)
+ CFLAGS += -WD -Fs- -DBUILD_DLL
+ ASFLAGS += -DBUILD_DLL
+.ELSE
+ CFLAGS += -W -Fs-
+.ENDIF
+ DEF_LIBS := import.lib mathwl.lib cwl.lib
+ DX_ASFLAGS += -D__WINDOWS16__
+ LIB_OS = WIN16
+.ELSE
+ USE_REALDOS := 1
+ DEF_LIBS := mathl.lib fp87.lib cl.lib
+ LIB_OS = DOS16
+.END
+
+# Place to look for PMODE library files
+
+.IF $(USE_DPMI16)
+PMLIB := dpmi16\pm.lib
+.ELSE
+PMLIB := pm.lib
+.END
+
+# Define the base directory for library files
+
+.IF $(CHECKED)
+LIB_BASE_DIR := $(SCITECH_LIB)\lib\debug
+CFLAGS += -DCHECKED=1
+.ELSE
+LIB_BASE_DIR := $(SCITECH_LIB)\lib\release
+.ENDIF
+
+# Define where to install library files
+ LIB_BASE := $(LIB_BASE_DIR)\$(LIB_OS)\$(BC_LIBBASE)
+ LIB_DEST := $(LIB_BASE)
+
+# Define which file contains our rules
+
+ RULES_MAK := bc16.mk
diff --git a/board/MAI/bios_emulator/scitech/makedefs/bc3.mk b/board/MAI/bios_emulator/scitech/makedefs/bc3.mk
new file mode 100644
index 00000000000..133d80edf73
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/makedefs/bc3.mk
@@ -0,0 +1,102 @@
+#############################################################################
+#
+# SciTech Multi-platform Graphics Library
+#
+# ========================================================================
+#
+# The contents of this file are subject to the SciTech MGL Public
+# License Version 1.0 (the "License"); you may not use this file
+# except in compliance with the License. You may obtain a copy of
+# the License at http://www.scitechsoft.com/mgl-license.txt
+#
+# Software distributed under the License is distributed on an
+# "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+# implied. See the License for the specific language governing
+# rights and limitations under the License.
+#
+# The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+#
+# The Initial Developer of the Original Code is SciTech Software, Inc.
+# All Rights Reserved.
+#
+# ========================================================================
+#
+# Descripton: Generic DMAKE startup makefile definitions file. Assumes
+# that the SCITECH environment variable has been set to point
+# to where all our stuff is installed. You should not need
+# to change anything in this file.
+#
+# Borland C++ 3.1 version. Supports 16 bit DOS development.
+#
+#############################################################################
+
+# Include standard startup script definitions
+.IMPORT: SCITECH
+.INCLUDE: "$(SCITECH)\makedefs\startup.mk"
+
+# Default commands for compiling, assembling linking and archiving
+ CC := bcc
+ CFLAGS := -ml -H=bcc.sym -i60 -d
+.IF $(USE_TASM32)
+ AS := tasm32
+.ELIF $(USE_TASMX)
+ AS := tasmx
+.ELSE
+ AS := tasm
+.ENDIF
+ ASFLAGS := /t /mx /m /iINCLUDE /i$(SCITECH)\INCLUDE
+ LD := bclink tlink.exe
+ LDFLAGS := -c
+ LIB := tlib
+ LIBFLAGS := /C
+
+# Optionally turn on debugging information
+.IF $(DBG)
+ CFLAGS += -v
+ LDFLAGS += -v
+ ASFLAGS += /zi
+ LIBFLAGS += /P128
+.ELSE
+ LDFLAGS += -x
+ ASFLAGS += /q
+.END
+
+# Optionally turn on optimisations
+.IF $(OPT)
+ CFLAGS += -3 -O2
+.ELIF $(OPT_SIZE)
+ CFLAGS += -3 -O1
+.END
+
+# Optionally turn on direct i387 FPU instructions
+
+.IF $(FPU)
+ CFLAGS += -f287 -DFPU387
+ ASFLAGS += -DFPU387
+.END
+
+# Optionally compile a beta release version of a product
+.IF $(BETA)
+ CFLAGS += -DBETA
+ ASFLAGS += -DBETA
+.END
+ USE_REALDOS := 1
+
+# Define the default libraries to link with
+ DEF_LIBS := mathl.lib cl.lib
+
+# Define the base directory for library files
+
+.IF $(CHECKED)
+LIB_BASE_DIR := $(SCITECH_LIB)\lib\debug
+CFLAGS += -DCHECKED=1
+.ELSE
+LIB_BASE_DIR := $(SCITECH_LIB)\lib\release
+.ENDIF
+
+# Define where to install library files
+ LIB_DEST := $(LIB_BASE_DIR)\dos16\bc3
+
+# Define which file contains our rules
+
+ RULES_MAK := bc3.mk
diff --git a/board/MAI/bios_emulator/scitech/makedefs/bc32.mk b/board/MAI/bios_emulator/scitech/makedefs/bc32.mk
new file mode 100644
index 00000000000..246de1dfc5e
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/makedefs/bc32.mk
@@ -0,0 +1,201 @@
+#############################################################################
+#
+# SciTech Multi-platform Graphics Library
+#
+# ========================================================================
+#
+# The contents of this file are subject to the SciTech MGL Public
+# License Version 1.0 (the "License"); you may not use this file
+# except in compliance with the License. You may obtain a copy of
+# the License at http://www.scitechsoft.com/mgl-license.txt
+#
+# Software distributed under the License is distributed on an
+# "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+# implied. See the License for the specific language governing
+# rights and limitations under the License.
+#
+# The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+#
+# The Initial Developer of the Original Code is SciTech Software, Inc.
+# All Rights Reserved.
+#
+# ========================================================================
+#
+# Descripton: Generic DMAKE startup makefile definitions file. Assumes
+# that the SCITECH environment variable has been set to point
+# to where all our stuff is installed. You should not need
+# to change anything in this file.
+#
+# Borland C++ 4.0 32 bit version. Supports Borland's DOS Power
+# Pack DPMI32 DOS extender, Phar Lap's TNT DOS Extender and
+# 32 bit Windows development.
+#
+#############################################################################
+
+# Include standard startup script definitions
+.IMPORT: SCITECH
+.INCLUDE: "$(SCITECH)\makedefs\startup.mk"
+
+# Import enivornment variables that we use
+.IMPORT .IGNORE : USE_SMX32 USE_TNT USE_WIN32 USE_BC5 USE_VXD BC_LIBBASE
+.IMPORT .IGNORE : VTOOLSD
+
+# We are compiling for a 32 bit envionment
+ _32BIT_ := 1
+
+# Default commands for compiling, assembling linking and archiving
+ CC := bcc32
+.IF $(USE_VXD)
+ CFLAGS := -4 -i60 -d -w-stu
+.ELSE
+ CFLAGS := -4 -H=bcc32.sym -i60 -d -w-stu
+.ENDIF
+.IF $(USE_NASM)
+ AS := nasm
+ ASFLAGS := -t -f obj -d__FLAT__ -iINCLUDE -i$(SCITECH)\INCLUDE
+.ELSE
+.IF $(USE_TASM32)
+ AS := tasm32
+.ELIF $(USE_TASMX)
+ AS := tasmx
+.ELSE
+ AS := tasm
+.ENDIF
+ ASFLAGS := /t /mx /m /w-res /w-mcp /D__FLAT__ /iINCLUDE /i$(SCITECH)\INCLUDE
+.ENDIF
+ LD := bclink tlink32.exe
+ LDFLAGS := -c
+ RC := brc32
+.IF $(USE_BC5)
+ WIN_VERSION := -V4.0
+ RCFLAGS := -32
+.ELSE
+ RCFLAGS := -w32
+.ENDIF
+ LIB := tlib
+ LIBFLAGS := /C
+ ILIB := implib
+ ILIBFLAGS := -c
+ INTEL_X86 := 1
+ NMSYM := $(SOFTICE_PATH)\nmsym.exe
+ NMSYMFLAGS := /TRANSLATE:source,package,always /PROMPT /SOURCE:$(SCITECH)\src\pm;$(SCITECH)\src\pm\common;$(SCITECH)\src\pm\win32
+
+# Optionally turn on debugging information
+.IF $(DBG)
+ CFLAGS += -v
+ LDFLAGS += -v
+ LIBFLAGS += /P256
+.IF $(USE_NASM)
+ ASFLAGS += -F borland -g
+.ELSE
+ ASFLAGS += /zi
+.ENDIF
+.ELSE
+ LDFLAGS += -x
+ LIBFLAGS += /P128
+.IF $(USE_NASM)
+ ASFLAGS += -F null
+.ELSE
+ ASFLAGS += /q
+.ENDIF
+.END
+
+# Optionally disable nagging warnings if MAX_WARN is not on
+.IF $(MAX_WARN)
+.ELSE
+ CFLAGS += -w-aus -w-par -w-hid -w-pia
+.ENDIF
+
+# Optionally turn on optimisations (-5 -O2 breaks BC++ 4.0-4.5 sometimes)
+.IF $(OPT)
+ CFLAGS += -5 -O2 -k-
+.ELIF $(OPT_SIZE)
+ CFLAGS += -5 -O1 -k-
+.END
+
+# Optionally turn on direct i387 FPU instructions
+.IF $(FPU)
+ CFLAGS += -DFPU387
+ ASFLAGS += -dFPU387
+.END
+
+# Optionally compile a beta release version of a product
+.IF $(BETA)
+ CFLAGS += -DBETA
+ ASFLAGS += -dBETA
+.END
+
+# Optionally use Phar Lap's TNT DOS Extender, otherwise use the DOS Power Pack
+.IF $(USE_TNT)
+ CFLAGS += -D__MSDOS__
+ DX_CFLAGS += -DTNT
+ DX_ASFLAGS += -dTNT
+ LIB_OS = DOS32
+ DEF_LIBS := import32.lib cw32.lib dosx32.lib tntapi.lib
+.ELIF $(USE_VXD)
+ LDFLAGS += -n -P- -x
+ CFLAGS += -RT- -x- -Oi -VC -I$(VTOOLSD)\INCLUDE -DIS_32 -DWANTVXDWRAPS -DVTOOLSD -DWIN40 -DWIN40_OR_LATER -DDEFSEG=1 -zC_LTEXT -zALCODE -zR_LDATA -zTLCODE
+ DEF_LIBS := $(VTOOLSD)\lib\cfbc440d.lib $(VTOOLSD)\lib\wr0bc440.lib $(VTOOLSD)\lib\wr1bc440.lib $(VTOOLSD)\lib\wr2bc440.lib $(VTOOLSD)\lib\wr3bc440.lib $(VTOOLSD)\lib\rtbc440d.lib
+ DX_ASFLAGS += -d__VXD__ -d__BORLANDC__=1 -I$(VTOOLSD)\INCLUDE -I$(VTOOLSD)\LIB\INCLUDE
+ LIB_OS = VXD
+.ELIF $(USE_WIN32)
+.IF $(WIN32_GUI)
+.ELSE
+ CFLAGS += -D__CONSOLE__
+.ENDIF
+.IF $(BUILD_DLL)
+ CFLAGS += -WD -DBUILD_DLL
+ ASFLAGS += -dBUILD_DLL
+.ELSE
+ CFLAGS += -W -WM
+.ENDIF
+.IF $(USE_BC5)
+.ELSE
+ CFLAGS += -D_WIN32
+.ENDIF
+ DEF_LIBS := import32.lib cw32mt.lib
+ DX_ASFLAGS += -d__WINDOWS32__
+ LIB_OS = WIN32
+.ELIF $(USE_SMX32)
+ CFLAGS += -D__SMX32__ -DPME32
+ DX_CFLAGS +=
+ DX_ASFLAGS += -d__SMX32__ -dDPMI32 -dPME32
+ USE_REALDOS := 1
+ LIB_OS = SMX32
+ DEF_LIBS := cw32mt.lib
+.ELSE
+ USE_DPMI32 := 1
+ CFLAGS += -D__MSDOS__
+ DX_CFLAGS += -WX -DDPMI32
+ DX_ASFLAGS += -dDPMI32
+ USE_REALDOS := 1
+ LIB_OS = DOS32
+ DEF_LIBS :=
+.END
+
+# Define the base directory for library files
+
+.IF $(CHECKED)
+LIB_BASE_DIR := $(SCITECH_LIB)\lib\debug
+CFLAGS += -DCHECKED=1
+.ELSE
+LIB_BASE_DIR := $(SCITECH_LIB)\lib\release
+.ENDIF
+
+# Define where to install library files
+ LIB_BASE := $(LIB_BASE_DIR)\$(LIB_OS)\$(BC_LIBBASE)
+ LIB_DEST := $(LIB_BASE)
+
+# Place to look for PMODE library files
+
+.IF $(USE_TNT)
+PMLIB := $(LIB_BASE)\tnt\pm.lib
+.ELIF $(USE_DPMI32)
+PMLIB := $(LIB_BASE)\dpmi32\pm.lib
+.ELSE
+PMLIB := $(LIB_BASE)\pm.lib
+.END
+
+# Define which file contains our rules
+
+ RULES_MAK := bc32.mk
diff --git a/board/MAI/bios_emulator/scitech/makedefs/bcos2.mk b/board/MAI/bios_emulator/scitech/makedefs/bcos2.mk
new file mode 100644
index 00000000000..23aeb7cde40
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/makedefs/bcos2.mk
@@ -0,0 +1,137 @@
+#############################################################################
+#
+# SciTech Multi-platform Graphics Library
+#
+# ========================================================================
+#
+# The contents of this file are subject to the SciTech MGL Public
+# License Version 1.0 (the "License"); you may not use this file
+# except in compliance with the License. You may obtain a copy of
+# the License at http://www.scitechsoft.com/mgl-license.txt
+#
+# Software distributed under the License is distributed on an
+# "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+# implied. See the License for the specific language governing
+# rights and limitations under the License.
+#
+# The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+#
+# The Initial Developer of the Original Code is SciTech Software, Inc.
+# All Rights Reserved.
+#
+# ========================================================================
+#
+# Descripton: Generic DMAKE startup makefile definitions file. Assumes
+# that the SCITECH environment variable has been set to point
+# to where all our stuff is installed. You should not need
+# to change anything in this file.
+#
+# Borland C++ 2.0 32-bit OS/2 version.
+#
+#############################################################################
+
+# Include standard startup script definitions
+.IMPORT: SCITECH
+.INCLUDE: "$(SCITECH)\makedefs\startup.mk"
+
+# Import enivornment variables that we use
+.IMPORT .IGNORE : USE_OS2GUI BC_LIBBASE
+
+# We are compiling for a 32 bit envionment
+ _32BIT_ := 1
+
+# Default commands for compiling, assembling linking and archiving
+ CC := bcc
+ CFLAGS := -w- -4 -H=bcc32.sym -i60 -d
+.IF $(USE_NASM)
+ AS := nasm
+ ASFLAGS := -t -f obj -d__FLAT__ -iINCLUDE -i$(SCITECH)\INCLUDE
+.ELSE
+ AS := tasm
+ ASFLAGS := /t /mx /m /D__FLAT__ /D__OS2__ /iINCLUDE /i$(SCITECH)\INCLUDE
+.ENDIF
+ LD := bclink tlink.exe
+ LDFLAGS := -c
+ RC := brcc
+ RCFLAGS :=
+ LIB := tlib
+ LIBFLAGS := /C /P32
+ ILIB := implib
+ ILIBFLAGS := -c
+.IF $(USE_OS2GUI)
+ CFLAGS += -D__OS2_PM__
+.ENDIF
+
+# Optionally turn on debugging information
+.IF $(DBG)
+ CFLAGS += -v
+ LDFLAGS += -v
+ LIBFLAGS += /P128
+.IF $(USE_NASM)
+ ASFLAGS += -F borland
+.ELSE
+ ASFLAGS += /zi
+.ENDIF
+.ELSE
+ LDFLAGS += -x
+.IF $(USE_NASM)
+ ASFLAGS += -F null
+.ELSE
+ ASFLAGS += /q
+.ENDIF
+.END
+
+# Optionally turn on optimisations
+.IF $(OPT)
+ CFLAGS += -5 -O2 -k-
+.ELIF $(OPT_SIZE)
+ CFLAGS += -5 -O1 -k-
+.END
+
+# Optionally turn on direct i387 FPU instructions
+.IF $(FPU)
+ CFLAGS += -DFPU387
+ ASFLAGS += -dFPU387
+.END
+
+# Optionally compile a beta release version of a product
+.IF $(BETA)
+ CFLAGS += -DBETA
+ ASFLAGS += -dBETA
+.END
+
+# Optionally use Phar Lap's TNT DOS Extender, otherwise use the DOS Power Pack
+.IF $(BUILD_DLL)
+ CFLAGS += -sd -sm -DBUILD_DLL
+ ASFLAGS += -dBUILD_DLL
+.ELSE
+ CFLAGS += -sm
+.ENDIF
+ DEF_LIBS := os2.lib c2mt.lib
+ DX_ASFLAGS += -d__OS2__
+ LIB_OS = os232
+
+# Define the base directory for library files
+
+.IF $(CHECKED)
+LIB_BASE_DIR := $(SCITECH_LIB)\lib\debug
+CFLAGS += -DCHECKED=1
+.ELSE
+LIB_BASE_DIR := $(SCITECH_LIB)\lib\release
+.ENDIF
+
+# Define where to install library files
+ LIB_BASE := $(LIB_BASE_DIR)\$(LIB_OS)\$(BC_LIBBASE)
+ LIB_DEST := $(LIB_BASE)
+
+# Place to look for PMODE library files
+
+.IF $(USE_OS2GUI)
+DEF_LIBS += pm_pm.lib
+.ELSE
+DEF_LIBS += pm.lib
+.ENDIF
+
+# Define which file contains our rules
+
+ RULES_MAK := bcos2.mk
diff --git a/board/MAI/bios_emulator/scitech/makedefs/cl16.mk b/board/MAI/bios_emulator/scitech/makedefs/cl16.mk
new file mode 100644
index 00000000000..0f29a1521ec
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/makedefs/cl16.mk
@@ -0,0 +1,132 @@
+#############################################################################
+#
+# SciTech Multi-platform Graphics Library
+#
+# ========================================================================
+#
+# The contents of this file are subject to the SciTech MGL Public
+# License Version 1.0 (the "License"); you may not use this file
+# except in compliance with the License. You may obtain a copy of
+# the License at http://www.scitechsoft.com/mgl-license.txt
+#
+# Software distributed under the License is distributed on an
+# "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+# implied. See the License for the specific language governing
+# rights and limitations under the License.
+#
+# The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+#
+# The Initial Developer of the Original Code is SciTech Software, Inc.
+# All Rights Reserved.
+#
+# ========================================================================
+#
+# Descripton: Generic DMAKE startup makefile definitions file. Assumes
+# that the SCITECH environment variable has been set to point
+# to where all our stuff is installed. You should not need
+# to change anything in this file.
+#
+# Microsoft C 6.0 16 bit version. Supports 16 bit
+# OS/2 development.
+#
+#############################################################################
+
+# Include standard startup script definitions
+.IMPORT: SCITECH
+.INCLUDE: "$(SCITECH)\makedefs\startup.mk"
+
+# Import enivornment variables that we use
+.IMPORT .IGNORE : VC_LIBBASE
+.IMPORT .IGNORE : USE_MASM
+
+# Default commands for compiling, assembling linking and archiving
+ CC := cl # C-compiler and flags
+ CFLAGS := /w /Gs
+ ASFLAGS := /t /mx /m /D__COMM__ /iINCLUDE /i$(SCITECH)\INCLUDE
+.IF $(USE_TASM32)
+ AS := tasm32
+.ELIF $(USE_TASMX)
+ AS := tasmx # Assembler and flags
+.ELIF $(USE_MASM)
+ AS := masm # Assembler and flags
+ ASFLAGS := /D__COMM__ /iINCLUDE /i$(SCITECH)\INCLUDE
+.ELSE
+ AS := tasm # Assembler and flags
+.ENDIF
+ LD := cl # Loader and flags
+ LDFLAGS = $(CFLAGS)
+ RC := rc # WIndows resource compiler
+ RCFLAGS :=
+ LIB := lib # Librarian
+ LIBFLAGS := /NOI /NOE
+ ILIB := implib # Import librarian
+ ILIBFLAGS := /noignorecase
+
+# Optionally turn on debugging information
+.IF $(DBG)
+ CFLAGS += /Zi # Turn on debugging for C compiler
+ ASFLAGS += /zi # Turn on debugging for assembler
+.ELSE
+ ASFLAGS += /q # Suppress object records not needed for linking
+.END
+
+# Optionally turn on optimisations
+.IF $(OPT)
+ CFLAGS += /Ox
+.END
+
+# Optionally turn on direct i387 FPU instructions
+
+.IF $(FPU)
+ CFLAGS += /FPi87 /DFPU387
+ ASFLAGS += /DFPU387 /DFPU_REG_RTN
+.END
+
+# Optionally compile a beta release version of a product
+.IF $(BETA)
+ CFLAGS += /DBETA
+ ASFLAGS += /DBETA
+.END
+
+# Use a larger stack during linking if requested ???? How the fuck do you
+# specify linker options on the CL command line?????
+
+.IF $(STKSIZE)
+.ENDIF
+
+# Optionally compile for 16 bit Windows
+.IF $(USE_WIN16)
+.IF $(BUILD_DLL)
+ CFLAGS += /GD /Alfw /DBUILD_DLL
+ ASFLAGS += -DBUILD_DLL
+.ELSE
+ CFLAGS += /GA /AL
+.ENDIF
+ DX_ASFLAGS += -D__WINDOWS16__
+ LIB_OS = WIN16
+.ELSE
+ USE_REALDOS := 1
+ CFLAGS += /AL
+ LIB_OS = DOS16
+.END
+
+# Place to look for PMODE library files
+
+PMLIB := pm.lib
+
+# Define the base directory for library files
+
+.IF $(CHECKED)
+LIB_BASE_DIR := $(SCITECH_LIB)\lib\debug
+CFLAGS += -DCHECKED=1
+.ELSE
+LIB_BASE_DIR := $(SCITECH_LIB)\lib\release
+.ENDIF
+
+# Define where to install library files
+ LIB_BASE := $(LIB_BASE_DIR)\$(LIB_OS)\$(VC_LIBBASE)
+ LIB_DEST := $(LIB_BASE)
+
+# Define which file contains our rules
+
+ RULES_MAK := cl16.mk
diff --git a/board/MAI/bios_emulator/scitech/makedefs/cl386.mk b/board/MAI/bios_emulator/scitech/makedefs/cl386.mk
new file mode 100644
index 00000000000..52157f91f4e
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/makedefs/cl386.mk
@@ -0,0 +1,120 @@
+#############################################################################
+#
+# SciTech Multi-platform Graphics Library
+#
+# ========================================================================
+#
+# The contents of this file are subject to the SciTech MGL Public
+# License Version 1.0 (the "License"); you may not use this file
+# except in compliance with the License. You may obtain a copy of
+# the License at http://www.scitechsoft.com/mgl-license.txt
+#
+# Software distributed under the License is distributed on an
+# "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+# implied. See the License for the specific language governing
+# rights and limitations under the License.
+#
+# The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+#
+# The Initial Developer of the Original Code is SciTech Software, Inc.
+# All Rights Reserved.
+#
+# ========================================================================
+#
+# Descripton: Generic DMAKE startup makefile definitions file. Assumes
+# that the SCITECH environment variable has been set to point
+# to where all our stuff is installed. You should not need
+# to change anything in this file.
+#
+# Microsoft 386 C 6.0 32 bit. Supports 32 bit
+# OS/2 development.
+#
+#############################################################################
+
+# Include standard startup script definitions
+.IMPORT: SCITECH
+.INCLUDE: "$(SCITECH)\makedefs\startup.mk"
+
+# Import enivornment variables that we use
+.IMPORT .IGNORE : CL_LIBBASE USE_VDD
+.IMPORT .IGNORE : USE_MASM
+
+# Default commands for compiling, assembling linking and archiving
+ CC := cl386 # C-compiler and flags
+ # NB: The -Zf flag is ABSOLUTELY NECESSARY to compile IBM's OS/2 headers.
+ # It isn't documented anywhere but obviously adds support for 48-bit
+ # far pointers (ie. _far is valid in 32-bit code). Great.
+ CFLAGS := -G3s -Zf -D__386__
+ ASFLAGS := /t /mx /m /oi /D__FLAT__ /DSTDCALL_MANGLE /D__NOU_VAR__ /iINCLUDE /i$(SCITECH)\INCLUDE
+.IF $(USE_TASM32)
+ AS := tasm32
+.ELIF $(USE_TASMX)
+ AS := tasmx # Assembler and flags
+.ELIF $(USE_MASM)
+ AS := masm # Assembler and flags
+ ASFLAGS := /t /mx /D__FLAT__ /DSTDCALL_MANGLE /D__NOU_VAR__ /iINCLUDE /i$(SCITECH)\INCLUDE
+.ELSE
+ AS := tasm # Assembler and flags
+.ENDIF
+ LD := link386 # Linker and flags
+ LDFLAGS = $(CFLAGS)
+ RC := rc # Windows resource compiler
+ RCFLAGS :=
+ LIB := lib # Librarian
+ LIBFLAGS := /NOI /NOE
+ ILIB := implib # Import librarian
+ ILIBFLAGS := /noignorecase
+
+# Optionally turn on debugging information
+.IF $(DBG)
+ CFLAGS += -Zi # Turn on debugging for C compiler
+ ASFLAGS += /zi # Turn on debugging for assembler
+.ELSE
+ ASFLAGS += /q # Suppress object records not needed for linking
+.END
+
+# Optionally turn on optimisations
+.IF $(OPT)
+ CFLAGS += /Ox
+.END
+
+# Optionally turn on direct i387 FPU instructions
+
+.IF $(FPU)
+ CFLAGS += /FPi87 /DFPU387
+ ASFLAGS += /DFPU387 /DFPU_REG_RTN
+.END
+
+# Optionally compile a beta release version of a product
+.IF $(BETA)
+ CFLAGS += /DBETA
+ ASFLAGS += /DBETA
+.END
+
+# Use a larger stack during linking if requested ???? How the fuck do you
+# specify linker options on the CL command line?????
+
+.IF $(STKSIZE)
+.ENDIF
+
+# Place to look for PMODE library files
+
+PMLIB := pm.lib
+
+# Define the base directory for library files
+
+.IF $(CHECKED)
+LIB_BASE_DIR := $(SCITECH_LIB)\lib\debug
+CFLAGS += -DCHECKED=1
+.ELSE
+LIB_BASE_DIR := $(SCITECH_LIB)\lib\release
+.ENDIF
+
+# Define where to install library files
+ LIB_OS = os232
+ LIB_BASE := $(LIB_BASE_DIR)\$(LIB_OS)\$(CL_LIBBASE)
+ LIB_DEST := $(LIB_BASE)
+
+# Define which file contains our rules
+
+ RULES_MAK := cl386.mk
diff --git a/board/MAI/bios_emulator/scitech/makedefs/common.mk b/board/MAI/bios_emulator/scitech/makedefs/common.mk
new file mode 100644
index 00000000000..da2364f6445
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/makedefs/common.mk
@@ -0,0 +1,181 @@
+#############################################################################
+#
+# SciTech Multi-platform Graphics Library
+#
+# ========================================================================
+#
+# The contents of this file are subject to the SciTech MGL Public
+# License Version 1.0 (the "License"); you may not use this file
+# except in compliance with the License. You may obtain a copy of
+# the License at http://www.scitechsoft.com/mgl-license.txt
+#
+# Software distributed under the License is distributed on an
+# "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+# implied. See the License for the specific language governing
+# rights and limitations under the License.
+#
+# The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+#
+# The Initial Developer of the Original Code is SciTech Software, Inc.
+# All Rights Reserved.
+#
+# ========================================================================
+#
+# Descripton: Common makefile targets used by all SciTech Software
+# makefiles. This file includes targets for cleaning the
+# current directory, and maintaining the source files with
+# RCS.
+#
+#############################################################################
+
+# Override global OpenGL includes when compiling against MGL version
+
+.IF $(USE_MGL_OPENGL)
+.IF $(UNIX_HOST)
+CFLAGS += -I$(SCITECH)/include/mglgl
+DEPEND_INC += $(SCITECH)/include/mglgl
+.ELSE
+CFLAGS += -I$(SCITECH)\include\mglgl
+DEPEND_INC += $(SCITECH)\include/mglgl
+.ENDIF
+.ENDIF
+
+# Define where to install all compiled DLL files
+
+.IF $(UNIX_HOST)
+.IF $(CHECKED)
+DLL_DEST := $(SCITECH_LIB)/redist/debug
+.ELSE
+DLL_DEST := $(SCITECH_LIB)/redist/release
+.ENDIF
+.ELSE
+.IF $(CHECKED)
+DLL_DEST := $(SCITECH_LIB)\redist\debug
+.ELSE
+DLL_DEST := $(SCITECH_LIB)\redist\release
+.ENDIF
+.ENDIF
+
+# Target to build the library and DLL file if specified
+
+.IF $(LIBFILE)
+
+lib: $(LIBFILE)
+
+.IF $(DLLFILE)
+
+# Build and install a DLL file, or simply build import library and install
+
+.IF $(BUILD_DLL)
+
+$(DLLFILE): $(OBJECTS)
+$(LIBFILE): $(DLLFILE)
+install: $(LIBFILE) $(DLLFILE)
+ $(INSTALL) $(LIBFILE) $(LIB_DEST)$(LIB_EXTENDER)
+ $(INSTALL) $(DLLFILE) $(DLL_DEST)
+.IF $(USE_SOFTICE)
+ $(INSTALL) $(DLLFILE:s/.dll/.nms) $(DLL_DEST)
+.ENDIF
+.ELSE
+
+$(LIBFILE): $(DLL_DEST)\$(DLLFILE)
+install: $(LIBFILE)
+ $(INSTALL) $(LIBFILE) $(LIB_DEST)$(LIB_EXTENDER)
+
+.ENDIF
+.ELSE
+
+.IF $(BUILD_DLL)
+
+# Build and install a Unix shared library
+
+$(LIBFILE): $(OBJECTS)
+install: $(LIBFILE)
+ $(INSTALL) $(LIBFILE) $(LIB_DEST)$(LIB_EXTENDER)
+ $(INSTALL) $(LIBFILE) $(DLL_DEST)/$(LIBFILE).$(VERSION)
+
+.ELSE
+
+# Build and install a normal library file
+
+.IF $(USE_DLL)
+.ELSE
+$(LIBFILE): $(OBJECTS)
+install: $(LIBFILE)
+ $(INSTALL) $(LIBFILE) $(LIB_DEST)$(LIB_EXTENDER)
+.ENDIF
+.ENDIF
+.ENDIF
+.ENDIF
+
+# Build and install a VxD file, including debug information
+
+.IF $(VXDFILE)
+$(VXDFILE:s/.vxd/.dll): $(OBJECTS)
+$(VXDFILE): $(VXDFILE:s/.vxd/.dll)
+install: $(VXDFILE)
+ $(INSTALL) $(VXDFILE) $(DLL_DEST)
+.IF $(DBG)
+ $(INSTALL) $(VXDFILE:s/.vxd/.nms) $(DLL_DEST)
+.ENDIF
+.ENDIF
+
+# Clean up directory removing all files not needed to make the library.
+
+__CLEAN_FILES := *.obj *.o *.sym *.bak *.tdk *.swp *.map *.err *.csm *.lib *.aps *.nms *.sys
+__CLEAN_FILES += *.~* *.td *.tr *.tr? *.td? *.rws *.res *.exp *.ilk *.pdb *.pch *.a bcc32.*
+__CLEAN_FILES += $(LIBCLEAN)
+__CLEANEXE_FILES := $(__CLEAN_FILES) *$E *.drv *.rex *.dll *.vxd *.nms *.pel *.smf *.so.*
+
+.PHONY clean:
+ @$(RM) -f -S $(mktmp $(__CLEAN_FILES:t"\n"))
+
+.PHONY cleanexe:
+ @$(RM) -f -S $(mktmp $(__CLEANEXE_FILES:t"\n"))
+
+# Define the source directories to find common files
+
+.IF $(NO_SCITECH_COMMON)
+.ELSE
+.SOURCE: $(SCITECH)/src/common
+.ENDIF
+
+# Create the include file dependencies using the MKUTIL makedep program if
+# the list of dependent object files is defined
+
+.IF $(DEPEND_OBJ)
+depend:
+ @$(RM) -f makefile.dep
+.IF $(DEPEND_SRC)
+.IF $(DEPEND_INC)
+ @makedep -amakefile.dep -r -s -I@$(mktmp $(DEPEND_INC:s/\/\\)) -S@$(mktmp $(DEPEND_SRC:s/\/\\);$(SCITECH)/src/common) @$(mktmp $(DEPEND_OBJ:t"\n")\n)
+.ELSE
+ @makedep -amakefile.dep -r -s -S@$(mktmp $(DEPEND_SRC:s/\/\\);$(SCITECH)/src/common) @$(mktmp $(DEPEND_OBJ:t"\n")\n)
+.ENDIF
+.ELSE
+.IF $(DEPEND_INC)
+ @makedep -amakefile.dep -r -s -I@$(mktmp $(DEPEND_INC:s/\/\\)) -S@$(mktmp $(SCITECH)/src/common) @$(mktmp $(DEPEND_OBJ:t"\n")\n)
+.ELSE
+ @makedep -amakefile.dep -r -s -S@$(mktmp $(SCITECH)/src/common) @$(mktmp $(DEPEND_OBJ:t"\n")\n)
+.ENDIF
+.ENDIF
+ @$(ECHO) Object file dependency information generated.
+.ENDIF
+
+# Set up for compiling Snap executeables and dynamic link libraries
+
+.IF $(USE_SNAP)
+#CFLAGS += -I$(PRIVATE)\include\drvlib -I$(SCITECH)\include\drvlib -D__SNAP__
+CFLAGS += -D__SNAP__
+ASFLAGS += -d__SNAP__
+#EXELIBS += snap$L
+.ENDIF
+
+# Include rule definitions for the compiler
+
+.INCLUDE: "$(SCITECH)/makedefs/rules/$(RULES_MAK)"
+
+# Include file dependencies
+
+.INCLUDE .IGNORE: "makefile.dep"
+
diff --git a/board/MAI/bios_emulator/scitech/makedefs/emx.mk b/board/MAI/bios_emulator/scitech/makedefs/emx.mk
new file mode 100644
index 00000000000..f569790a3c3
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/makedefs/emx.mk
@@ -0,0 +1,194 @@
+#############################################################################
+#
+# SciTech Multi-platform Graphics Library
+#
+# ========================================================================
+#
+# The contents of this file are subject to the SciTech MGL Public
+# License Version 1.0 (the "License"); you may not use this file
+# except in compliance with the License. You may obtain a copy of
+# the License at http://www.scitechsoft.com/mgl-license.txt
+#
+# Software distributed under the License is distributed on an
+# "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+# implied. See the License for the specific language governing
+# rights and limitations under the License.
+#
+# The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+#
+# The Initial Developer of the Original Code is SciTech Software, Inc.
+# All Rights Reserved.
+#
+# ========================================================================
+#
+# Descripton: Generic DMAKE startup makefile definitions file. Assumes
+# that the SCITECH environment variable has been set to point
+# to where all our stuff is installed. You should not need
+# to change anything in this file.
+#
+# OS/2 version for EMX/GNU C/C++.
+#
+#############################################################################
+
+# Include standard startup script definitions
+.IMPORT: SCITECH
+.INCLUDE: "$(SCITECH)\makedefs\startup.mk"
+
+# Disable warnings for macros redefined here that were given
+# on the command line.
+__.SILENT := $(.SILENT)
+.SILENT := yes
+
+# Import enivornment variables that we use common to all compilers
+.IMPORT .IGNORE : TEMP SHELL INCLUDE LIB SCITECH PRIVATE SCITECH_LIB
+.IMPORT .IGNORE : DBG OPT OPT_SIZE CRTDLL SHW BETA CHECKED NO_EXCEPT NO_RTTI
+.IMPORT .IGNORE : FULLSCREEN SHOW_ARGS
+ TMPDIR := $(TEMP)
+
+# Standard file suffix definitions
+ L := .lib # Libraries
+ E := .exe # Executables
+ O := .obj # Objects
+ A := .asm # Assembler sources
+ S := .s # GNU assembler sources
+ P := .cpp # C++ sources
+
+# File prefix/suffix definitions. The following prefixes are defined, and are
+# used primarily to abstract between the Unix style libXX.a naming convention
+# and the DOS/Windows/OS2 naming convention of XX.lib.
+ LP := # LP - Library file prefix (name of file on disk)
+ LL := -l # Library link prefix (name of library on link command line)
+ LE := # Library link suffix (extension of library on link command line)
+
+# Import enivornment variables that we use
+.IMPORT .IGNORE : EMX_LIBBASE USE_OS232 USE_OS2GUI
+
+# We are compiling for a 32 bit envionment
+ _32BIT_ := 1
+
+# DMAKE uses this recipe to remove intermediate targets
+.REMOVE :; $(RM) -f $<
+
+# Turn warnings back to previous setting.
+.SILENT := $(__.SILENT)
+
+# We dont use TABS in our makefiles
+.NOTABS := yes
+
+# Default commands for compiling, assembling linking and archiving.
+ CC := gcc
+ CFLAGS := -Zmt -Zomf -Wall -I. -I$(INCLUDE)
+ CXX := gcc -x c++ -fno-exceptions -fno-rtti
+.IF $(USE_NASM)
+ AS := nasm
+ ASFLAGS := -t -f obj -F null -d__FLAT__ -d__NOU__ -iINCLUDE -i$(SCITECH)\INCLUDE
+.ELSE
+ AS := tasm # Assembler and flags
+ ASFLAGS := /t /mx /m /oi /D__FLAT__ /D__NOU__ /iINCLUDE /i$(SCITECH)\INCLUDE
+.ENDIF
+ LD := gcc
+ LDXX := gcc -x c++
+ LDFLAGS := -L. -Zomf -Zmt
+ LIB := emxomfar
+ LIBFLAGS := -p32 rcv
+
+ YACC := bison -y
+ LEX := flex
+ SED := sed
+
+# Optionally turn off exceptions and RTTI for C++ code
+.IF $(NO_EXCEPT)
+ CXX += -fno-exceptions
+.ENDIF
+.IF $(NO_RTTI)
+ CXX += -fno-rtti
+.ENDIF
+
+# Optionally turn on debugging information
+.IF $(DBG)
+ CFLAGS += -g
+.ELSE
+# Without -s, emx always runs LINK386 with the /DEBUG option
+ CFLAGS += -s
+ LDFLAGS += -s
+# NASM does not support debugging information yet
+ ASFLAGS +=
+.ENDIF
+
+# Optionally turn on optimisations
+.IF $(OPT_MAX)
+ CFLAGS += -O6
+.ELIF $(OPT)
+ CFLAGS += -O3 -fomit-frame-pointer
+.ELIF $(OPT_SIZE)
+ CFLAGS += -Os
+.ENDIF
+
+# Optionally turn on direct i387 FPU instructions
+.IF $(FPU)
+ CFLAGS += -DFPU387
+ ASFLAGS += -dFPU387
+.END
+
+# Optionally compile a beta release version of a product
+.IF $(BETA)
+ CFLAGS += -DBETA
+ ASFLAGS += -dBETA
+.ENDIF
+
+# Disable standard C runtime library
+.IF $(NO_RUNTIME)
+CFLAGS += -fno-builtin -nostdinc
+.ENDIF
+
+# Link against EMX DLLs (CRTDLL=1) or link with static C runtime libraries
+.IF $(CRTDLL)
+ LDFLAGS += -Zcrtdll
+.ELSE
+ CFLAGS += -Zsys
+ LDFLAGS += -Zsys
+.ENDIF
+
+# Target environment dependant flags
+ CFLAGS += -D__OS2_32__
+ CFLAGS += -D__OS2__
+ ASFLAGS += -d__OS2__
+
+# Define the base directory for library files
+
+.IF $(CHECKED)
+LIB_BASE_DIR := $(SCITECH_LIB)/lib/debug
+CFLAGS += -DCHECKED=1
+.ELSE
+LIB_BASE_DIR := $(SCITECH_LIB)/lib/release
+.ENDIF
+
+# Define where to install library files
+ LIB_DEST := $(LIB_BASE_DIR)\OS232\$(EMX_LIBBASE)
+ LDFLAGS += -L$(LIB_DEST)
+
+# Build 32-bit OS/2 apps
+.IF $(BUILD_DLL)
+ CFLAGS += -Zdll -DBUILD_DLL
+ LDFLAGS += -Zdll
+ ASFLAGS += -dBUILD_DLL
+.ELSE
+.IF $(USE_OS2GUI)
+ CFLAGS += -D__OS2_PM__
+ LDFLAGS += -Zlinker /PMTYPE:PM
+.ELSE
+.IF $(FULLSCREEN)
+ LDFLAGS += -Zlinker /PMTYPE:NOVIO
+.ELSE
+ LDFLAGS += -Zlinker /PMTYPE:VIO
+.ENDIF
+.ENDIF
+.ENDIF
+
+# Place to look for PMODE library files
+
+PMLIB := -lpm
+
+# Define which file contains our rules
+
+ RULES_MAK := emx.mk
diff --git a/board/MAI/bios_emulator/scitech/makedefs/gcc_beos.mk b/board/MAI/bios_emulator/scitech/makedefs/gcc_beos.mk
new file mode 100644
index 00000000000..0d62fdf1a89
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/makedefs/gcc_beos.mk
@@ -0,0 +1,161 @@
+#############################################################################
+#
+# SciTech Multi-platform Graphics Library
+#
+# ========================================================================
+#
+# The contents of this file are subject to the SciTech MGL Public
+# License Version 1.0 (the "License"); you may not use this file
+# except in compliance with the License. You may obtain a copy of
+# the License at http://www.scitechsoft.com/mgl-license.txt
+#
+# Software distributed under the License is distributed on an
+# "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+# implied. See the License for the specific language governing
+# rights and limitations under the License.
+#
+# The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+#
+# The Initial Developer of the Original Code is SciTech Software, Inc.
+# All Rights Reserved.
+#
+# ========================================================================
+#
+# Descripton: Generic DMAKE startup makefile definitions file. Assumes
+# that the SCITECH environment variable has been set to point
+# to where all our stuff is installed. You should not need
+# to change anything in this file.
+#
+# BeOS version for GNU C/C++.
+#
+#############################################################################
+
+# Disable warnings for macros redefined here that were given
+# on the command line.
+__.SILENT := $(.SILENT)
+.SILENT := yes
+
+# Import enivornment variables that we use common to all compilers
+.IMPORT .IGNORE : TEMP SHELL INCLUDE LIB SCITECH PRIVATE SCITECH_LIB
+.IMPORT .IGNORE : DBG OPT OPT_SIZE SHW BETA CHECKED USE_X11 USE_LINUX
+.IMPORT .IGNORE : USE_EGCS USE_PGCC STATIC_LIBS LIBC
+ TMPDIR := $(TEMP)
+
+# Standard file suffix definitions
+#
+# NOTE: BeOS does not require any extenion for executeable files, but you
+# can use an extension if you wish. We use the .x extension for building
+# executeable files so that we can use implicit rules to make the
+# makefiles simpler and more portable between systems. When you install
+# the files to a local bin directory, you will probably want to remove
+# the .x extension.
+ L := .a # Libraries
+ E := .x # Executables
+ O := .o # Objects
+ A := .asm # Assembler sources
+ S := .s # GNU assembler sources
+ P := .cpp # C++ sources
+
+# File prefix/suffix definitions. The following prefixes are defined, and are
+# used primarily to abstract between the Unix style libXX.a naming convention
+# and the DOS/Windows/OS2 naming convention of XX.lib.
+ LP := lib # LP - Library file prefix (name of file on disk)
+ LL := -l # Library link prefix (name of library on link command line)
+ LE := # Library link suffix (extension of library on link command line)
+
+# We use the Unix shell at all times
+ SHELLFLAGS := -c
+
+# Definition of $(MAKE) macro for recursive makes.
+ MAKE = $(MAKECMD) $(MFLAGS)
+
+# Macro to install a library file
+ INSTALL := cp
+
+# DMAKE uses this recipe to remove intermediate targets
+.REMOVE :; $(RM) -f $<
+
+# Turn warnings back to previous setting.
+.SILENT := $(__.SILENT)
+
+# We dont use TABS in our makefiles
+.NOTABS := yes
+
+# Define that we are compiling for BeOS
+ USE_BEOS := 1
+
+# Default commands for compiling, assembling linking and archiving.
+ CC := gcc
+ CFLAGS := -Wall -I. -Iinclude $(INCLUDE)
+ CXX := g++
+ AS := nasm
+ ASFLAGS := -f elf -d__FLAT__ -iinclude -i$(SCITECH)/include -d__NOU__
+ LD := gcc
+ LDFLAGS := -L.
+ LIB := ar
+ LIBFLAGS := rcs
+
+# Link to static libraries if requested
+.IF $(STATIC_LIBS)
+ LDFLAGS += -static
+.ENDIF
+
+# Optionally turn on debugging information
+.IF $(DBG)
+ CFLAGS += -g
+.ELSE
+# NASM does not support debugging information yet
+ ASFLAGS +=
+.ENDIF
+
+# Optionally turn on optimisations
+.IF $(OPT_MAX)
+ CFLAGS += -O6
+.ELIF $(OPT)
+ CFLAGS += -O2
+.ELIF $(OPT_SIZE)
+ CFLAGS += -O1
+.ENDIF
+
+# Optionally turn on direct i387 FPU instructions
+.IF $(FPU)
+ CFLAGS += -DFPU387
+ ASFLAGS += -dFPU387
+.END
+
+# Optionally compile a beta release version of a product
+.IF $(BETA)
+ CFLAGS += -DBETA
+ ASFLAGS += -dBETA
+.ENDIF
+
+# Disable standard C runtime library
+
+.IF $(NO_RUNTIME)
+CFLAGS += -fno-builtin -nostdinc
+.ENDIF
+
+# Target environment dependant flags
+ CFLAGS += -D__BEOS__
+ ASFLAGS += -d__BEOS__ -d__UNIX__
+
+# Define the base directory for library files
+
+.IF $(CHECKED)
+LIB_BASE_DIR := $(SCITECH_LIB)/lib/debug
+CFLAGS += -DCHECKED=1
+.ELSE
+LIB_BASE_DIR := $(SCITECH_LIB)/lib/release
+.ENDIF
+
+# Define where to install library files
+LIB_DEST := $(LIB_BASE_DIR)/beos/gcc
+LDFLAGS += -L$(LIB_DEST)
+
+# Place to look for PMODE library files
+
+PMLIB := -lpm
+
+# Define which file contains our rules
+
+ RULES_MAK := gcc_beos.mk
diff --git a/board/MAI/bios_emulator/scitech/makedefs/gcc_dos.mk b/board/MAI/bios_emulator/scitech/makedefs/gcc_dos.mk
new file mode 100644
index 00000000000..65589c83a3a
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/makedefs/gcc_dos.mk
@@ -0,0 +1,112 @@
+#############################################################################
+#
+# SciTech Multi-platform Graphics Library
+#
+# ========================================================================
+#
+# The contents of this file are subject to the SciTech MGL Public
+# License Version 1.0 (the "License"); you may not use this file
+# except in compliance with the License. You may obtain a copy of
+# the License at http://www.scitechsoft.com/mgl-license.txt
+#
+# Software distributed under the License is distributed on an
+# "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+# implied. See the License for the specific language governing
+# rights and limitations under the License.
+#
+# The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+#
+# The Initial Developer of the Original Code is SciTech Software, Inc.
+# All Rights Reserved.
+#
+# ========================================================================
+#
+# Descripton: Generic DMAKE startup makefile definitions file. Assumes
+# that the SCITECH environment variable has been set to point
+# to where all our stuff is installed. You should not need
+# to change anything in this file.
+#
+# DJGPP V2 port of GNU C/C++ to DOS with DPMI only.
+#
+#############################################################################
+
+# Include standard startup script definitions
+.IMPORT: SCITECH
+.INCLUDE: "$(SCITECH)\makedefs\startup.mk"
+
+# Override some file suffix definitions
+ L := .a # Libraries
+ O := .o # Objects
+
+# Override the file prefix/suffix definitions for library naming.
+ LP := lib # LP - Library file prefix (name of file on disk)
+ LL := -l # Library link prefix (name of library on link command line)
+ LE := # Library link suffix (extension of library on link command line)
+
+# Import enivornment variables that we use
+.IMPORT .IGNORE : DJ_LIBBASE
+
+# We are compiling for a 32 bit envionment
+ _32BIT_ := 1
+
+# Default commands for compiling, assembling linking and archiving
+ CC := gcc # C-compiler and flags
+ CFLAGS := -Wall
+ AS := nasm
+ ASFLAGS := -t -f coff -F null -d__FLAT__ -d__GNUC__ -dSTDCALL_USCORE -iINCLUDE -i$(SCITECH)\INCLUDE
+ LD := dj_ld # Loader and flags
+ LDFLAGS :=
+ LIB := ar # Librarian
+ LIBFLAGS := rs
+ USE_NASM := 1
+ USE_GCC := 1
+
+# Optionally turn on debugging information
+.IF $(DBG)
+ CFLAGS += -g # Turn on debugging for C compiler
+.END
+
+# Optionally turn on optimisations
+.IF $(OPT)
+ CFLAGS += -O2
+.ELIF $(OPT_SIZE)
+ CFLAGS += -O1
+.END
+
+# Optionally turn on direct i387 FPU instructions
+
+.IF $(FPU)
+ CFLAGS += -DFPU387
+ ASFLAGS += -dFPU387
+.END
+
+# Optionally compile a beta release version of a product
+.IF $(BETA)
+ CFLAGS += -DBETA
+ ASFLAGS += -dBETA
+.END
+
+# DOS extender dependant flags
+ DX_CFLAGS +=
+ DX_ASFLAGS += -dDJGPP
+ USE_REALDOS := 1
+
+# Define the base directory for library files
+
+.IF $(CHECKED)
+LIB_BASE_DIR := $(SCITECH_LIB)\lib\debug
+CFLAGS += -DCHECKED=1
+.ELSE
+LIB_BASE_DIR := $(SCITECH_LIB)\lib\release
+.ENDIF
+
+# Define where to install library files
+ LIB_DEST := $(LIB_BASE_DIR)\DOS32\$(DJ_LIBBASE)
+
+# Place to look for PMODE library files
+
+PMLIB := -lpm
+
+# Define which file contains our rules
+
+ RULES_MAK := dj32.mk
diff --git a/board/MAI/bios_emulator/scitech/makedefs/gcc_freebsd.mk b/board/MAI/bios_emulator/scitech/makedefs/gcc_freebsd.mk
new file mode 100644
index 00000000000..0cb4b8530b5
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/makedefs/gcc_freebsd.mk
@@ -0,0 +1,174 @@
+#############################################################################
+#
+# SciTech Multi-platform Graphics Library
+#
+# ========================================================================
+#
+# The contents of this file are subject to the SciTech MGL Public
+# License Version 1.0 (the "License"); you may not use this file
+# except in compliance with the License. You may obtain a copy of
+# the License at http://www.scitechsoft.com/mgl-license.txt
+#
+# Software distributed under the License is distributed on an
+# "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+# implied. See the License for the specific language governing
+# rights and limitations under the License.
+#
+# The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+#
+# The Initial Developer of the Original Code is SciTech Software, Inc.
+# All Rights Reserved.
+#
+# ========================================================================
+#
+# Descripton: Generic DMAKE startup makefile definitions file. Assumes
+# that the SCITECH environment variable has been set to point
+# to where all our stuff is installed. You should not need
+# to change anything in this file.
+#
+# Linux version for GNU C/C++.
+#
+#############################################################################
+
+# Disable warnings for macros redefined here that were given
+# on the command line.
+__.SILENT := $(.SILENT)
+.SILENT := yes
+
+# Import enivornment variables that we use common to all compilers
+.IMPORT .IGNORE : TEMP SHELL INCLUDE LIB SCITECH PRIVATE SCITECH_LIB
+.IMPORT .IGNORE : DBG OPT OPT_SIZE SHW BETA CHECKED USE_X11 USE_FREEBSD
+.IMPORT .IGNORE : USE_EGCS USE_PGCC STATIC_LIBS
+ TMPDIR := $(TEMP)
+
+# Standard file suffix definitions
+#
+# NOTE: Linux does not require any extenion for executeable files, but you
+# can use an extension if you wish. We use the .x extension for building
+# executeable files so that we can use implicit rules to make the
+# makefiles simpler and more portable between systems. When you install
+# the files to a local bin directory, you will probably want to remove
+# the .x extension.
+ L := .a # Libraries
+ E := .x # Executables
+ O := .o # Objects
+ A := .asm # Assembler sources
+ S := .s # GNU assembler sources
+ P := .cpp # C++ sources
+
+# File prefix/suffix definitions. The following prefixes are defined, and are
+# used primarily to abstract between the Unix style libXX.a naming convention
+# and the DOS/Windows/OS2 naming convention of XX.lib.
+ LP := lib # LP - Library file prefix (name of file on disk)
+ LL := -l # Library link prefix (name of library on link command line)
+ LE := # Library link suffix (extension of library on link command line)
+
+# We use the Unix shell at all times
+ SHELL := /bin/sh
+ SHELLFLAGS := -c
+
+# Definition of $(MAKE) macro for recursive makes.
+ MAKE = $(MAKECMD) $(MFLAGS)
+
+# Macro to install a library file
+ INSTALL := cp
+
+# DMAKE uses this recipe to remove intermediate targets
+.REMOVE :; $(RM) -f $<
+
+# Turn warnings back to previous setting.
+.SILENT := $(__.SILENT)
+
+# We dont use TABS in our makefiles
+.NOTABS := yes
+
+# Define that we are compiling for FreeBSD
+ USE_LINUX := 1
+
+# Default commands for compiling, assembling linking and archiving.
+.IF $(USE_EGCS)
+ CC := egcs
+.ELIF $(USE_PGCC)
+ CC := pgcc
+.ELSE
+ CC := gcc
+.ENDIF
+ CFLAGS := -Wall -I. -Iinclude $(INCLUDE)
+ CXX := g++
+ AS := nasm
+# TODO: On earlier versions of FreeBSD (<3.0) a.out is used instead of ELF
+ ASFLAGS := -f elf -d__FLAT__ -iinclude -i$(SCITECH)/include -d__NOU__
+ LD := g++
+ LDFLAGS := -L.
+ LIB := ar
+ LIBFLAGS := rcs
+
+# Link to static libraries if requested
+.IF $(STATIC_LIBS)
+ LDFLAGS += -static
+.ENDIF
+
+# Optionally turn on debugging information
+.IF $(DBG)
+ CFLAGS += -g
+.ELSE
+# NASM does not support debugging information yet
+ ASFLAGS +=
+.ENDIF
+
+# Optionally turn on optimisations
+.IF $(OPT_MAX)
+ CFLAGS += -O6
+.ELIF $(OPT)
+ CFLAGS += -O2
+.ELIF $(OPT_SIZE)
+ CFLAGS += -O1
+.ENDIF
+
+# Optionally turn on direct i387 FPU instructions
+.IF $(FPU)
+ CFLAGS += -DFPU387
+ ASFLAGS += -dFPU387
+.END
+
+# Optionally compile a beta release version of a product
+.IF $(BETA)
+ CFLAGS += -DBETA
+ ASFLAGS += -dBETA
+.ENDIF
+
+# Disable standard C runtime library
+
+.IF $(NO_RUNTIME)
+CFLAGS += -fno-builtin -nostdinc
+.ENDIF
+
+# Compile flag for whether to build X11 or non-X11 lib
+.IF $(USE_X11)
+ CFLAGS += -D__X11__
+.ENDIF
+
+# Target environment dependant flags
+ CFLAGS += -D__FREEBSD__
+ ASFLAGS += -d__FREEBSD__ -d__UNIX__
+
+# Define the base directory for library files
+
+.IF $(CHECKED)
+LIB_BASE_DIR := $(SCITECH_LIB)/lib/debug
+CFLAGS += -DCHECKED=1
+.ELSE
+LIB_BASE_DIR := $(SCITECH_LIB)/lib/release
+.ENDIF
+
+# Define where to install library files
+ LIB_DEST := $(LIB_BASE_DIR)/freebsd/gcc
+ LDFLAGS += -L$(LIB_DEST)
+
+# Place to look for PMODE library files
+
+PMLIB := -lpm
+
+# Define which file contains our rules
+
+ RULES_MAK := gcc_freebsd.mk
diff --git a/board/MAI/bios_emulator/scitech/makedefs/gcc_linux.mk b/board/MAI/bios_emulator/scitech/makedefs/gcc_linux.mk
new file mode 100644
index 00000000000..361ed4a2a73
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/makedefs/gcc_linux.mk
@@ -0,0 +1,181 @@
+#############################################################################
+#
+# SciTech Multi-platform Graphics Library
+#
+# ========================================================================
+#
+# The contents of this file are subject to the SciTech MGL Public
+# License Version 1.0 (the "License"); you may not use this file
+# except in compliance with the License. You may obtain a copy of
+# the License at http://www.scitechsoft.com/mgl-license.txt
+#
+# Software distributed under the License is distributed on an
+# "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+# implied. See the License for the specific language governing
+# rights and limitations under the License.
+#
+# The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+#
+# The Initial Developer of the Original Code is SciTech Software, Inc.
+# All Rights Reserved.
+#
+# ========================================================================
+#
+# Descripton: Generic DMAKE startup makefile definitions file. Assumes
+# that the SCITECH environment variable has been set to point
+# to where all our stuff is installed. You should not need
+# to change anything in this file.
+#
+# Linux version for GNU C/C++.
+#
+#############################################################################
+
+# Include standard startup script definitions
+.IMPORT: SCITECH
+.INCLUDE: "$(SCITECH)/makedefs/startup.mk"
+
+# Import enivornment variables that we use
+.IMPORT .IGNORE : GCC2_LIBBASE
+
+# Override some file suffix definitions
+ L := .a # Libraries
+ O := .o # Objects
+
+# Override the file prefix/suffix definitions for library naming.
+ LP := lib # LP - Library file prefix (name of file on disk)
+ LL := -l # Library link prefix (name of library on link command line)
+ LE := # Library link suffix (extension of library on link command line)
+
+# We are compiling for a 32 bit envionment
+ _32BIT_ := 1
+
+# Define that we are compiling for Linux
+ USE_LINUX := 1
+
+# Default commands for compiling, assembling linking and archiving.
+ CC := gcc
+ CFLAGS := -Wall -I. -Iinclude -I$(SCITECH:s,\,/)/include -I$(PRIVATE:s,\,/)/include
+ SHOW_CFLAGS := -c
+ CXX := g++
+ AS := nasm
+ ASFLAGS := -t -f elf -d__FLAT__ -d__GNUC__ -iinclude -i$(SCITECH)/include -d__NOU__
+ SHOW_ASFLAGS := -f elf
+ LD := gcc
+ LDXX := g++
+ LDFLAGS := -L.
+ LIB := ar
+ LIBFLAGS := rcs
+ YACC := bison -y
+ LEX := flex
+ SED := sed
+
+# Optionally turn on debugging information
+.IF $(DBG)
+ CFLAGS += -g
+ SHOW_CFLAGS += -g
+.ELSE
+# NASM does not support debugging information yet
+ ASFLAGS +=
+.ENDIF
+
+# Optionally turn on optimisations
+.IF $(OPT_MAX)
+ CFLAGS += -O6
+ SHOW_CFLAGS += -O6
+.ELIF $(OPT)
+ CFLAGS += -O2
+ SHOW_CFLAGS += -O2
+.ELIF $(OPT_SIZE)
+ CFLAGS += -O1
+ SHOW_CFLAGS += -O1
+.ENDIF
+
+# Optionally turn on direct i387 FPU instructions
+.IF $(FPU)
+ CFLAGS += -DFPU387
+ ASFLAGS += -dFPU387
+.END
+
+# Optionally compile a beta release version of a product
+.IF $(BETA)
+ CFLAGS += -DBETA
+ SHOW_CFLAGS += -DBETA
+ ASFLAGS += -dBETA
+ SHOW_ASFLAGS += -dBETA
+.ENDIF
+
+# Disable standard C runtime library
+
+.IF $(NO_RUNTIME)
+CFLAGS += -fno-builtin -nostdinc
+.ENDIF
+
+# Compile flag for whether to build X11 or non-X11 lib
+.IF $(USE_X11)
+ CFLAGS += -D__X11__
+.ENDIF
+
+# Target environment dependant flags
+ CFLAGS += -D__LINUX__
+ ASFLAGS += -d__LINUX__ -d__UNIX__
+
+# Define the base directory for library files
+
+.IF $(CHECKED)
+LIB_BASE_DIR := $(SCITECH_LIB)/lib/debug
+CFLAGS += -DCHECKED=1
+SHOW_CFLAGS += -DCHECKED=1
+.ELSE
+LIB_BASE_DIR := $(SCITECH_LIB)/lib/release
+.ENDIF
+
+# Define where to install library files
+.IF $(LIBC)
+ LIB_DEST_SHARED := $(LIB_BASE_DIR)/linux/gcc/libc.so
+ LIB_DEST_STATIC := $(LIB_BASE_DIR)/linux/gcc/libc
+.ELSE
+ LIB_DEST_SHARED := $(LIB_BASE_DIR)/linux/gcc/glibc.so
+ LIB_DEST_STATIC := $(LIB_BASE_DIR)/linux/gcc/glibc
+.ENDIF
+
+# Link to static libraries if requested
+.IF $(STATIC_LIBS_ALL)
+ LDFLAGS += -static
+ STATIC_LIBS := 1
+.ENDIF
+
+# Link to static libraries if requested
+.IF $(STATIC_LIBS)
+ LDFLAGS += -L$(LIB_DEST_STATIC)
+.ELSE
+ LDFLAGS += -L$(LIB_DEST_SHARED) -L$(LIB_DEST_STATIC)
+.ENDIF
+
+# Optionally enable some dynamic libraries to be built
+.IF $(BUILD_DLL)
+.IF $(VERSIONMAJ)
+.ELSE
+ VERSIONMAJ := 5
+ VERSIONMIN := 0
+.ENDIF
+ VERSION := $(VERSIONMAJ).$(VERSIONMIN)
+ LIB := gcc -shared
+ LIBFLAGS :=
+ L := .so
+ CFLAGS += -fPIC
+ SHOW_CFLAGS += -fPIC
+ ASFLAGS += -D__PIC__
+ SHOW_ASFLAGS += -D__PIC__
+ LIB_DEST := $(LIB_DEST_SHARED)
+.ELSE
+ LIB_DEST := $(LIB_DEST_STATIC)
+.ENDIF
+
+# Place to look for PMODE library files
+
+PMLIB := -lpm
+
+# Define which file contains our rules
+
+ RULES_MAK := gcc_linux.mk
+
diff --git a/board/MAI/bios_emulator/scitech/makedefs/gcc_win32.mk b/board/MAI/bios_emulator/scitech/makedefs/gcc_win32.mk
new file mode 100644
index 00000000000..1709d884c36
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/makedefs/gcc_win32.mk
@@ -0,0 +1,136 @@
+#############################################################################
+#
+# SciTech Multi-platform Graphics Library
+#
+# ========================================================================
+#
+# The contents of this file are subject to the SciTech MGL Public
+# License Version 1.0 (the "License"); you may not use this file
+# except in compliance with the License. You may obtain a copy of
+# the License at http://www.scitechsoft.com/mgl-license.txt
+#
+# Software distributed under the License is distributed on an
+# "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+# implied. See the License for the specific language governing
+# rights and limitations under the License.
+#
+# The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+#
+# The Initial Developer of the Original Code is SciTech Software, Inc.
+# All Rights Reserved.
+#
+# ========================================================================
+#
+# Descripton: Generic DMAKE startup makefile definitions file. Assumes
+# that the SCITECH environment variable has been set to point
+# to where all our stuff is installed. You should not need
+# to change anything in this file.
+#
+# Cygwin port of GNU C/C++ to Win32.
+#
+#############################################################################
+
+# Include standard startup script definitions
+.IMPORT: SCITECH
+.INCLUDE: "$(SCITECH)\makedefs\startup.mk"
+
+# Import enivornment variables that we use
+.IMPORT .IGNORE : GCC2_LIBBASE
+
+# Override some file suffix definitions
+ L := .a # Libraries
+ O := .o # Objects
+
+# Override the file prefix/suffix definitions for library naming.
+ LP := lib # LP - Library file prefix (name of file on disk)
+ LL := -l # Library link prefix (name of library on link command line)
+ LE := # Library link suffix (extension of library on link command line)
+
+# We are compiling for a 32 bit envionment
+ _32BIT_ := 1
+
+# Default commands for compiling, assembling linking and archiving
+ CC := gcc # C-compiler and flags
+ CFLAGS := -Wall -I. -Iinclude -I$(SCITECH:s,\,/)/include -I$(PRIVATE:s,\,/)/include
+ SHOW_CFLAGS := -c
+ CXX := g++
+ AS := nasm
+ ASFLAGS := -t -f coff -F null -d__FLAT__ -d__GNUC__ -dSTDCALL_USCORE -iINCLUDE -i$(SCITECH)\INCLUDE
+ SHOW_ASFLAGS := -f coff
+ LD := gcc # Loader and flags
+ LDXX := g++
+.IF $(WIN32_GUI)
+ LDFLAGS := -L. -mwindows -e _mainCRTStartup
+.ELSE
+ LDFLAGS := -L.
+.ENDIF
+ RC := windres
+ RCFLAGS := -O coff
+ LIB := ar # Librarian
+ LIBFLAGS := rcs
+ YACC := bison -y
+ LEX := flex
+ SED := sed
+
+# Optionally turn on debugging information
+.IF $(DBG)
+ CFLAGS += -g
+ SHOW_CFLAGS += -g
+.ELSE
+# NASM does not support debugging information yet
+ ASFLAGS +=
+.ENDIF
+
+# Optionally turn on optimisations
+.IF $(OPT_MAX)
+ CFLAGS += -O6
+ SHOW_CFLAGS += -O6
+.ELIF $(OPT)
+ CFLAGS += -O2
+ SHOW_CFLAGS += -O2
+.ELIF $(OPT_SIZE)
+ CFLAGS += -O1
+ SHOW_CFLAGS += -O1
+.ENDIF
+
+# Optionally turn on direct i387 FPU instructions
+
+.IF $(FPU)
+ CFLAGS += -DFPU387
+ ASFLAGS += -dFPU387
+.END
+
+# Optionally compile a beta release version of a product
+.IF $(BETA)
+ CFLAGS += -DBETA
+ SHOW_CFLAGS += -DBETA
+ ASFLAGS += -dBETA
+ SHOW_ASFLAGS += -dBETA
+.ENDIF
+
+# DOS extender dependant flags
+ DX_CFLAGS +=
+ DX_ASFLAGS += -dGCC_WIN32
+
+# Define the base directory for library files
+
+.IF $(CHECKED)
+LIB_BASE_DIR := $(SCITECH_LIB)\lib\debug
+CFLAGS += -DCHECKED=1
+SHOW_CFLAGS += -DCHECKED=1
+.ELSE
+LIB_BASE_DIR := $(SCITECH_LIB)\lib\release
+.ENDIF
+
+# Define where to install library files
+ LIB_DEST := $(LIB_BASE_DIR)\WIN32\$(GCC2_LIBBASE)
+ LDFLAGS += -L$(LIB_DEST)
+
+# Place to look for PMODE library files
+
+PMLIB := -lpm
+
+# Define which file contains our rules
+
+ RULES_MAK := gcc_win32.mk
+
diff --git a/board/MAI/bios_emulator/scitech/makedefs/hc32.mk b/board/MAI/bios_emulator/scitech/makedefs/hc32.mk
new file mode 100644
index 00000000000..f0b065a47c4
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/makedefs/hc32.mk
@@ -0,0 +1,113 @@
+#############################################################################
+#
+# SciTech Multi-platform Graphics Library
+#
+# ========================================================================
+#
+# The contents of this file are subject to the SciTech MGL Public
+# License Version 1.0 (the "License"); you may not use this file
+# except in compliance with the License. You may obtain a copy of
+# the License at http://www.scitechsoft.com/mgl-license.txt
+#
+# Software distributed under the License is distributed on an
+# "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+# implied. See the License for the specific language governing
+# rights and limitations under the License.
+#
+# The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+#
+# The Initial Developer of the Original Code is SciTech Software, Inc.
+# All Rights Reserved.
+#
+# ========================================================================
+#
+# Descripton: Generic DMAKE startup makefile definitions file. Assumes
+# that the SCITECH environment variable has been set to point
+# to where all our stuff is installed. You should not need
+# to change anything in this file.
+#
+# Metaware High C/C++ 3.21 32 bit version. Supports Phar Lap's
+# TNT DOS Extender.
+#
+#############################################################################
+
+# Include standard startup script definitions
+.IMPORT: SCITECH
+.INCLUDE: "$(SCITECH)\makedefs\startup.mk"
+
+# We are compiling for a 32 bit envionment
+ _32BIT_ := 1
+
+# Default commands for compiling, assembling linking and archiving
+ CC := hc386 # C-compiler and flags
+ CFLAGS :=
+.IF $(USE_TASM32)
+ AS := tasm32
+.ELIF $(USE_TASMX)
+ AS := tasmx # Assembler and flags
+.ELSE
+ AS := tasm # Assembler and flags
+.ENDIF
+ ASFLAGS := /t /mx /m /D__FLAT__ /iINCLUDE /i$(SCITECH)\INCLUDE
+ LD := hc386
+ LDFLAGS = $(CFLAGS)
+ LIB := 386lib # TNT 386|lib Librarian
+ LIBFLAGS := -TC
+
+# Optionally turn on debugging information
+.IF $(DBG)
+ CFLAGS += -g # Turn on debugging for C compiler
+ ASFLAGS += /zi # Turn on debugging for assembler
+.ELSE
+ ASFLAGS += /q # Suppress object records not needed for linking
+.END
+
+# Optionally turn on optimisations
+.IF $(OPT)
+ CFLAGS += -586 -O
+.ELIF $(OPT_SIZE)
+ CFLAGS += -586 -O1
+.ELSE
+ CFLAGS += -O0
+.END
+
+# Optionally turn on direct i387 FPU instructions
+
+.IF $(FPU)
+ CFLAGS += -DFPU387
+ ASFLAGS += -DFPU387
+.END
+
+# Optionally compile a beta release version of a product
+.IF $(BETA)
+ CFLAGS += -DBETA
+ ASFLAGS += -DBETA
+.END
+
+# DOS extender dependant flags
+ USE_TNT := 1
+ USE_REALDOS := 1
+ DX_CFLAGS += -DTNT
+ DX_ASFLAGS += -DTNT
+ LDFLAGS += -LH:\TNT\LIB
+
+# Place to look for PMODE library files
+
+PMLIB := tnt\pm.lib
+
+# Define the base directory for library files
+
+.IF $(CHECKED)
+LIB_BASE_DIR := $(SCITECH_LIB)\lib\debug
+CFLAGS += -DCHECKED=1
+.ELSE
+LIB_BASE_DIR := $(SCITECH_LIB)\lib\release
+.ENDIF
+
+# Define where to install library files
+ LIB_BASE := $(LIB_BASE_DIR)\DOS32\HC
+ LIB_DEST := $(LIB_BASE)
+
+# Define which file contains our rules
+
+ RULES_MAK := hc32.mk
diff --git a/board/MAI/bios_emulator/scitech/makedefs/makedefs.prj b/board/MAI/bios_emulator/scitech/makedefs/makedefs.prj
new file mode 100644
index 0000000000000000000000000000000000000000..edd8809e29703910feeca27a5c3d465461aff1de
GIT binary patch
literal 9025
zcmeI2`BxKH6vyvn5fm2$6v1tjh#(3itm1-U2pA<KCSj?@4G4(JVgR?cNcW!hw5PTI
zK=*yoZa;PTxpiqz7q|WsUA5L~dhaA}oRH8=0@c%=KF|5QJC}RsJMYbMXX0~@_&Nq8
zS#tOW_Io>rrH0;vUMUxFRz@~bmtq2E>KBjz2wxHb&M5X-h36E{d4->(@n1hx_?g1b
zi3r~)k>4u(j+h7+h@0S|;<=>oG7%E5FySZ4fu9+_Fn%TAZ){zKB!Dr1YrOG0<2vIH
z&XP_g5fgq?_HZGM+!q;_l;gO}<`pv2;Rj+8+~B+q=MerRE9oY0-eUL}fTTzbFp&UB
zjAX_%_N5SVQVCtt3DOJ#q%mePW-(?Ha1LAPY|Ujn&uT9a@I|&>V(VqLUSaE1#%qk%
z*>{R@nm6BPe88J;Fy162zQxwtjCUCCGTvi+#Q2zz!IGJL1X+xEjQNag49wvI-pE0o
z?_4$)G8PeVF<VOriA#A?;?3oZJcfa>f{{<j{u3+7DpGcHAc4#s1l-Bk#pqykGP)RE
zMmM8}v5x?KjDE%d`wp=+#MTH~huJ#9)={>OF^)6tW!y)Ary2M2<|yL?V~p_t<3Ywl
z1bCROM;MRt=3|V<dGiUzlZ>Yr&oG{4oMb%5NJ=LpGo~?87^#dkSWh!J`Bsc$&`{&4
zlgm8TX1S@Q-m*@v@wjBG+ahlkuF1>%?H)>QA48M14m^xI-Ad{5EHeQZF&Ru1q;4X^
zSXv5Dh9~ay!Hm}{$0e|8yfb9GB5Fis)QGC65!F#6)<%t}i5jskYQ*}e5gVdLY>XOF
z8#Q7RUAT9<neYDPS&yl7?^IP*(Og)_t~RcvI|-oS?jM>=cX6@oa6qF{D*S%BpJ5u+
z+JuwN{2B0lDvUNdEe;(gvB&2f)DfmTWKDmOWUyIm1x8bKp=4;byV}eS$>4C>Z4S3&
zkZHr_YAoQRGm%kvc%ZjST2<UB=~lQifoJ?U>Q-Ll%tJ%ozK(-l-$cT0v&%No-{SF?
z*xIF%?N+J8E*YkJ-|-wzyg6t65SYQydT+-_PtU|N2*X|RibT#cSlTVkW}7AQU;jPc
zbLte*$3!=MM@)DT!tfwPOyS7>D^qyhkIqr=(7=eV(<{jXeS;IvqEnv2`J-JKrh11{
zdw9C{_7yz~t$l+7zG11Ux5KyB*SoiWf@G`BF{Q7$hN<4+1jqePyTA5xjsCw)Y6dD`
zI9=?3=2L0B?Q)x)?iNR}Z7bN!TP^jL2A4<U6DhiT{z)YX3e<S5mTb4#?9D9YQMGRS
z)D+!DGQGB?z)Ce<t5qi(D_M!YSXC|IQxjq^QeisGfP6J0RI7}o`0H4srTEnNSd287
z3A12@nlety6h5vp#iu63V9bU&^h=aM%?Q=9yObS=j4S9<GxQsCAp<fYPfgHj)o%%m
zK|6=SrzXT;WWhX`56jgIt(L{s9(KNhJ~ciTBO4Y#4lGksv|5d_yt~0UYGgrie`$Sc
zl1?KR7Q!Ns)adbAP1bNN;Zu`z8jE2GETw;<X|*=X;pa>EM0_lL9$kYgV6mE_)!NqF
zUOxVs7d|y11|y%I83i<pqK(sPcH3F)_PtD6L7&Lb-xt!aG(~jIMAK@yB0QsnPsGR4
zuZA^H47qAbs8;y-as|(!nh=9g0;OQ2t6ns%R;xK&OZY^5EWL?7(97u_6D>q5!W^~+
zeIh=Vz5*(t3bNIdP^}2#n#3Gd!&<1Jr<7<~t+oi`5<U?hOTP}*!v=aLiWaIBKCZS&
zjB6v*!Y0TPQlQmxwlrB>^xJZvItSi2LVaqQF2f9UAX8NlEs~Z}iG%MpLMxu?Tn`p#
zpc*DxL@lLYhK?&RyCO?p-w2z*3Uk%qNLs;4th}>{am7=ex4>3tqPGCi!nH&t){aZ~
zM3%nZ2F+lncMj3QwStv6<b1_fogJ_ZoG@ERMYs;NmDuG8%%Rq&rbabf;D#1@YZEPe
zT)baViM3k7Co-e=t<VPT^o}T6xR$8I+VdrRB1>QIft|1m($wH^Em4WJTEeHM=`wc1
z9@tB7*`h_%3RYtNP6?c^_^NXUbV3)s(~B0aB`UFYT*4=^^z~loh8{>&gCl7Lo)Mv1
z@jN&7K`-p5uOiXHwL~S>Y6+jn($^n=gV0CcV4_9PitwC|uR8a`01QI1kcx0Gw+1U#
z$hhLFVu!#7L-Z9ZTKKp`CDv*QpUBeJ55ou?rf+7^B58$R8}U`=BXAUs@uGyWbG6a_
z87X2%ZAQ&bC33Fumhp6EJpZa-A0DT{ZNT-o4tL;oya#)*8@<?to!EhUaS!gsUAPlH
z*p6-3iY@3y7dmkpI?#^IXv4sqG~rg<f>zv&jo5$|tVbE^(2Sd~7B^xIuElDs!b+^b
zax6m=8nF~hu$cZ^d^Hx~DlEhTT#5O(0u7jl%W)YkCs>M0XpO-lT!^`tg9|Vl=i@xg
z3Myt|2CbJ!r_~d)aTd<RG@OCcF_l(bOv7YMq7@kl%E}Bst=G6ot2b`Y@{jAZ7~~qQ
P4!J5$=pF3&XR^NlFRrwm
literal 0
HcmV?d00001
diff --git a/board/MAI/bios_emulator/scitech/makedefs/qnx4.mk b/board/MAI/bios_emulator/scitech/makedefs/qnx4.mk
new file mode 100644
index 00000000000..56dfa4de561
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/makedefs/qnx4.mk
@@ -0,0 +1,165 @@
+#############################################################################
+#
+# SciTech Multi-platform Graphics Library
+#
+# ========================================================================
+#
+# The contents of this file are subject to the SciTech MGL Public
+# License Version 1.0 (the "License"); you may not use this file
+# except in compliance with the License. You may obtain a copy of
+# the License at http://www.scitechsoft.com/mgl-license.txt
+#
+# Software distributed under the License is distributed on an
+# "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+# implied. See the License for the specific language governing
+# rights and limitations under the License.
+#
+# The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+#
+# The Initial Developer of the Original Code is SciTech Software, Inc.
+# All Rights Reserved.
+#
+# ========================================================================
+#
+# Descripton: Generic DMAKE startup makefile definitions file. Assumes
+# that the SCITECH environment variable has been set to point
+# to where all our stuff is installed. You should not need
+# to change anything in this file.
+#
+# QNX version for Watcom C.
+#
+#############################################################################
+
+# Disable warnings for macros redefined here that were given
+# on the command line.
+__.SILENT := $(.SILENT)
+.SILENT := yes
+
+# Import enivornment variables that we use common to all compilers
+.IMPORT .IGNORE : TEMP SHELL INCLUDE LIB SCITECH PRIVATE SCITECH_LIB
+.IMPORT .IGNORE : DBG OPT OPT_SIZE SHW BETA CHECKED USE_QNX USE_QNX4
+.IMPORT .IGNORE : USE_PHOTON USE_X11 USE_BIOS SHOW_ARGS MAX_WARN WC_LIBBASE
+ TMPDIR := $(TEMP)
+
+# Standard file suffix definitions
+#
+# NOTE: Qnx does not require any extension for executeable files, but you
+# can use an extension if you wish. We use the .x extension for building
+# executeable files so that we can use implicit rules to make the
+# makefiles simpler and more portable between systems. When you install
+# the files to a local bin directory, you will probably want to remove
+# the .x extension.
+ L := .a # Libraries
+ E := .exe # Executables
+ O := .o # Objects
+ A := .asm # Assembler sources
+ S := .s # GNU assembler sources
+ P := .cpp # C++ sources
+
+# File prefix/suffix definitions. The following prefixes are defined, and are
+# used primarily to abstract between the Unix style libXX.a naming convention
+# and the DOS/Windows/OS2 naming convention of XX.lib.
+ LP := lib # LP - Library file prefix (name of file on disk)
+ LL := -l # Library link prefix (name of library on link command line)
+ LE := # Library link suffix (extension of library on link command line)
+
+# We use the Unix shell at all times
+ SHELL := /bin/sh
+ SHELLFLAGS := -c
+
+# Definition of $(MAKE) macro for recursive makes.
+ MAKE = $(MAKECMD) $(MFLAGS)
+
+# Macro to install a library file
+ INSTALL := cp
+
+# DMAKE uses this recipe to remove intermediate targets
+.REMOVE :; $(RM) -f $<
+
+# Turn warnings back to previous setting.
+.SILENT := $(__.SILENT)
+
+# We dont use TABS in our makefiles
+.NOTABS := yes
+
+# Define that we are compiling for QNX
+ USE_QNX := 1
+
+# Default commands for compiling, assembling linking and archiving.
+ CC := wcc386
+ CFLAGS := -I. -Iinclude $(INCLUDE)
+ CXX := wpp386
+ AS := nasm
+ ASFLAGS := -t -f obj -d__FLAT__ -dSTDCALL_MANGLE -iinclude -i$(SCITECH)/include
+ LD := cc
+ LDFLAGS := -L.
+ LIB := ar
+ LIBFLAGS := rc
+
+# Set the compiler warning level
+.IF $(MAX_WARN)
+ CFLAGS += -w4
+.ELSE
+ CFLAGS += -w1
+.ENDIF
+
+# Optionally turn on debugging information
+.IF $(DBG)
+ CFLAGS += -d2
+ LDFLAGS += -g2
+.ELSE
+# NASM does not support debugging information yet
+ ASFLAGS +=
+.ENDIF
+
+# Optionally turn on optimisations
+.IF $(OPT)
+ CFLAGS += -onatx-5r-fp5
+.ELIF $(OPT_SIZE)
+ CFLAGS += -onaslmr-5r-fp5
+.ELIF $(NOOPT)
+ CFLAGS += -od-5r
+.END
+
+# Compile flag for whether to build photon or non-photon lib
+.IF $(USE_PHOTON)
+ CFLAGS += -D__PHOTON__
+.ENDIF
+
+# Compile flag for whether to build X11 or non-X11 lib
+.IF $(USE_X11)
+ CFLAGS += -D__X11__
+.ENDIF
+
+# Optionally compile a beta release version of a product
+.IF $(BETA)
+ CFLAGS += -DBETA
+ ASFLAGS += -dBETA
+.ENDIF
+
+# Target environment dependant flags
+ CFLAGS += -D__QNX__ -D__UNIX__
+ ASFLAGS += -d__QNX__ -d__UNIX__
+
+# Define the base directory for library files
+
+.IF $(CHECKED)
+ LIB_BASE_DIR := $(SCITECH_LIB)/lib/debug
+ CFLAGS += -DCHECKED=1
+.ELSE
+ LIB_BASE_DIR := $(SCITECH_LIB)/lib/release
+.ENDIF
+
+# Define where to install library files
+ LIB_BASE := $(LIB_BASE_DIR)/qnx4/$(WC_LIBBASE)
+ LIB_DEST := $(LIB_BASE)
+ LDFLAGS += -L$(LIB_DEST)
+
+# Place to look for PMODE library files
+
+PMLIB := -lpm
+
+# Define which file contains our rules
+
+ RULES_MAK := qnx4.mk
+
diff --git a/board/MAI/bios_emulator/scitech/makedefs/qnxnto.mk b/board/MAI/bios_emulator/scitech/makedefs/qnxnto.mk
new file mode 100644
index 00000000000..5168ed269bc
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/makedefs/qnxnto.mk
@@ -0,0 +1,157 @@
+#############################################################################
+#
+# SciTech Multi-platform Graphics Library
+#
+# ========================================================================
+#
+# The contents of this file are subject to the SciTech MGL Public
+# License Version 1.0 (the "License"); you may not use this file
+# except in compliance with the License. You may obtain a copy of
+# the License at http://www.scitechsoft.com/mgl-license.txt
+#
+# Software distributed under the License is distributed on an
+# "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+# implied. See the License for the specific language governing
+# rights and limitations under the License.
+#
+# The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+#
+# The Initial Developer of the Original Code is SciTech Software, Inc.
+# All Rights Reserved.
+#
+# ========================================================================
+#
+# Descripton: Generic DMAKE startup makefile definitions file. Assumes
+# that the SCITECH environment variable has been set to point
+# to where all our stuff is installed. You should not need
+# to change anything in this file.
+#
+# QNX Neutrino version for GNU C/C++
+#
+#############################################################################
+
+# Disable warnings for macros redefined here that were given
+# on the command line.
+__.SILENT := $(.SILENT)
+.SILENT := yes
+
+# Import enivornment variables that we use common to all compilers
+.IMPORT .IGNORE : TEMP SHELL INCLUDE LIB SCITECH PRIVATE SCITECH_LIB
+.IMPORT .IGNORE : DBG OPT OPT_SIZE SHW BETA CHECKED USE_QNX USE_QNXNTO
+.IMPORT .IGNORE : USE_EGCS USE_PHOTON USE_X11 USE_BIOS
+ TMPDIR := $(TEMP)
+
+# Standard file suffix definitions
+#
+# NOTE: Qnx does not require any extension for executeable files, but you
+# can use an extension if you wish. We use the .x extension for building
+# executeable files so that we can use implicit rules to make the
+# makefiles simpler and more portable between systems. When you install
+# the files to a local bin directory, you will probably want to remove
+# the .x extension.
+ L := .a # Libraries
+ E := .x # Executables
+ O := .o # Objects
+ A := .asm # Assembler sources
+ S := .s # GNU assembler sources
+ P := .cpp # C++ sources
+
+# File prefix/suffix definitions. The following prefixes are defined, and are
+# used primarily to abstract between the Unix style libXX.a naming convention
+# and the DOS/Windows/OS2 naming convention of XX.lib.
+ LP := lib # LP - Library file prefix (name of file on disk)
+ LL := -l # Library link prefix (name of library on link command line)
+ LE := # Library link suffix (extension of library on link command line)
+
+# We use the Unix shell at all times
+ SHELL := /bin/sh
+ SHELLFLAGS := -c
+
+# Definition of $(MAKE) macro for recursive makes.
+ MAKE = $(MAKECMD) $(MFLAGS)
+
+# Macro to install a library file
+ INSTALL := cp
+
+# DMAKE uses this recipe to remove intermediate targets
+.REMOVE :; $(RM) -f $<
+
+# Turn warnings back to previous setting.
+.SILENT := $(__.SILENT)
+
+# We dont use TABS in our makefiles
+.NOTABS := yes
+
+# Define that we are compiling for QNX
+ USE_QNX := 1
+
+# Default commands for compiling, assembling linking and archiving.
+ CC := qcc
+ CFLAGS := -Vgcc_ntox86 -I. -Iinclude $(INCLUDE)
+ CPPFLAGS := -Vgcc_ntox86 -I. -Iinclude $(INCLUDE)
+ CXX := QCC
+ AS := nasm
+ ASFLAGS := -t -f elf -d__FLAT__ -d__GNUC__ -dSTDCALL_MANGLE -iinclude -i$(SCITECH)/include -d__NOU__
+ LD := qcc
+ LDFLAGS := -Vgcc_ntox86 -L. -lm
+ LIB := ar
+ LIBFLAGS := rc
+
+# Optionally turn on debugging information
+.IF $(DBG)
+ CFLAGS += -g2
+ LDFLAGS += -g2
+.ELSE
+# NASM does not support debugging information yet
+ ASFLAGS +=
+.ENDIF
+
+# Optionally turn on optimisations
+.IF $(OPT_MAX)
+ CFLAGS += -Ot
+.ELIF $(OPT)
+ CFLAGS += -O
+.ELIF $(OPT_SIZE)
+ CFLAGS += -Os
+.ENDIF
+
+# Compile flag for whether to build photon or non-photon lib
+.IF $(USE_PHOTON)
+ CFLAGS += -D__PHOTON__
+.ENDIF
+
+# Compile flag for whether to build X11 or non-X11 lib
+.IF $(USE_X11)
+ CFLAGS += -D__X11__
+.ENDIF
+
+# Optionally compile a beta release version of a product
+.IF $(BETA)
+ CFLAGS += -DBETA
+ ASFLAGS += -dBETA
+.ENDIF
+
+# Target environment dependant flags
+ CFLAGS += -D__QNX__ -D__UNIX__
+ ASFLAGS += -d__QNX__ -d__UNIX__
+
+# Define the base directory for library files
+
+.IF $(CHECKED)
+ LIB_BASE_DIR := $(SCITECH_LIB)/lib/debug
+ CFLAGS += -DCHECKED=1
+.ELSE
+ LIB_BASE_DIR := $(SCITECH_LIB)/lib/release
+.ENDIF
+
+# Define where to install library files
+ LIB_DEST := $(LIB_BASE_DIR)/qnxnto
+ LDFLAGS += -L$(LIB_DEST)
+
+# Place to look for PMODE library files
+
+PMLIB := -lpm
+
+# Define which file contains our rules
+
+ RULES_MAK := qnxnto.mk
diff --git a/board/MAI/bios_emulator/scitech/makedefs/rules/bc16.mk b/board/MAI/bios_emulator/scitech/makedefs/rules/bc16.mk
new file mode 100644
index 00000000000..67ae9101b13
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/makedefs/rules/bc16.mk
@@ -0,0 +1,69 @@
+#############################################################################
+#
+# SciTech Multi-platform Graphics Library
+#
+# ========================================================================
+#
+# The contents of this file are subject to the SciTech MGL Public
+# License Version 1.0 (the "License"); you may not use this file
+# except in compliance with the License. You may obtain a copy of
+# the License at http://www.scitechsoft.com/mgl-license.txt
+#
+# Software distributed under the License is distributed on an
+# "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+# implied. See the License for the specific language governing
+# rights and limitations under the License.
+#
+# The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+#
+# The Initial Developer of the Original Code is SciTech Software, Inc.
+# All Rights Reserved.
+#
+# ========================================================================
+#
+# Descripton: Rules makefile definitions, which define the rules used to
+# build targets. We include them here at the end of the
+# makefile so the generic project makefiles can override
+# certain things with macros (such as linking C++ programs
+# differently).
+#
+#############################################################################
+
+# Take out PMLIB if we don't need to link with it
+
+.IF $(NO_PMLIB)
+PMLIB :=
+.ENDIF
+
+# Implicit generation rules for making object files
+%$O: %.c ; $(CC) @$(mktmp $(CFLAGS:s/\/\\)) -c $<
+%$O: %$P ; $(CC) @$(mktmp $(CFLAGS:s/\/\\)) -c $<
+%$O: %$A ; $(AS) @$(mktmp $(ASFLAGS:s/\/\\)) $(<:s,/,\)
+
+# Implicit rule for building resource files
+%$R: %.rc ; $(RC) $(RCFLAGS) -r $<
+
+# Implicit rule for building a DLL using a response file
+%$D: ; $(LD) $(mktmp $(LDFLAGS) -C -Twd c0dl.obj+\n$(&:s/\/\\)\n$@\n$*.map\n$(DEF_LIBS) $(EXELIBS)\n$*.def)
+
+# Implicit rule for building a library file using response file
+.IF $(BUILD_DLL)
+%$L: ;
+ @$(RM) $@
+ $(ILIB) $(ILIBFLAGS) $@ $?
+.ELIF $(IMPORT_DLL)
+%$L: ;
+ @$(RM) $@
+ $(ILIB) $(ILIBFLAGS) $@ $?
+.ELSE
+%$L: ;
+ @$(RM) $@
+ $(LIBR) $(LIBFLAGS) $@ @$(mktmp +$(&:t" &\n+")\n)
+.ENDIF
+
+# Implicit rule for building an executable file using response file
+.IF $(USE_WIN16)
+%$E: ; $(LD) $(mktmp $(LDFLAGS) -C -Twe $(WIN_VERSION) c0wl.obj+\n$(&:s/\/\\)\n$@\n$*.map\n$(DEF_LIBS) $(EXELIBS)\n$*.def)
+.ELSE
+%$E: ; $(LD) $(mktmp $(LDFLAGS) -Tde c0l.obj+\n$(&:s/\/\\)\n$@\n$*.map\n$(PMLIB) $(DEF_LIBS) $(EXELIBS))
+.ENDIF
diff --git a/board/MAI/bios_emulator/scitech/makedefs/rules/bc3.mk b/board/MAI/bios_emulator/scitech/makedefs/rules/bc3.mk
new file mode 100644
index 00000000000..d4d071c0d80
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/makedefs/rules/bc3.mk
@@ -0,0 +1,43 @@
+#############################################################################
+#
+# SciTech Multi-platform Graphics Library
+#
+# ========================================================================
+#
+# The contents of this file are subject to the SciTech MGL Public
+# License Version 1.0 (the "License"); you may not use this file
+# except in compliance with the License. You may obtain a copy of
+# the License at http://www.scitechsoft.com/mgl-license.txt
+#
+# Software distributed under the License is distributed on an
+# "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+# implied. See the License for the specific language governing
+# rights and limitations under the License.
+#
+# The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+#
+# The Initial Developer of the Original Code is SciTech Software, Inc.
+# All Rights Reserved.
+#
+# ========================================================================
+#
+# Descripton: Rules makefile definitions, which define the rules used to
+# build targets. We include them here at the end of the
+# makefile so the generic project makefiles can override
+# certain things with macros (such as linking C++ programs
+# differently).
+#
+#############################################################################
+
+# Implicit generation rules for making object files
+%$O: %.c ; $(CC) @$(mktmp $(CFLAGS)) -c $<
+%$O: %$P ; $(CC) @$(mktmp $(CFLAGS)) -c $<
+%$O: %$A ; $(AS) @$(mktmp $(ASFLAGS)) $(<:s,/,\)
+
+# Implicit rule for building a library file using response file
+%$L: ;
+ @$(RM) $@
+ $(LIBR) $(LIBFLAGS) $@ @$(mktmp +$(&:t" &\n+")\n)
+
+# Implicit rule for building an executable file using response file
+%$E: ; $(LD) $(mktmp $(LDFLAGS) -Tde c0l.obj+\n$(&:s/\/\\)\n$@\n$*.map\n$(DEF_LIBS) $(EXELIBS))
diff --git a/board/MAI/bios_emulator/scitech/makedefs/rules/bc32.mk b/board/MAI/bios_emulator/scitech/makedefs/rules/bc32.mk
new file mode 100644
index 00000000000..e3ce25bded3
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/makedefs/rules/bc32.mk
@@ -0,0 +1,151 @@
+#############################################################################
+#
+# SciTech Multi-platform Graphics Library
+#
+# ========================================================================
+#
+# The contents of this file are subject to the SciTech MGL Public
+# License Version 1.0 (the "License"); you may not use this file
+# except in compliance with the License. You may obtain a copy of
+# the License at http://www.scitechsoft.com/mgl-license.txt
+#
+# Software distributed under the License is distributed on an
+# "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+# implied. See the License for the specific language governing
+# rights and limitations under the License.
+#
+# The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+#
+# The Initial Developer of the Original Code is SciTech Software, Inc.
+# All Rights Reserved.
+#
+# ========================================================================
+#
+# Descripton: Rules makefile definitions, which define the rules used to
+# build targets. We include them here at the end of the
+# makefile so the generic project makefiles can override
+# certain things with macros (such as linking C++ programs
+# differently).
+#
+#############################################################################
+
+# Take out PMLIB if we don't need to link with it
+
+.IF $(NO_PMLIB)
+PMLIB :=
+.ENDIF
+
+.IF $(USE_VXD)
+
+# Implicit rule generation to build VxD's
+
+%$O: %.c ;
+ $(CC) @$(mktmp $(CFLAGS:s/\/\\)) -c $(<:s,/,\)
+ @$(VTOOLSD)\bin\segalias.exe -p $(VTOOLSD)\include\default.seg $@
+
+%$O: %$P ;
+ $(CC) @$(mktmp $(CFLAGS:s/\/\\)) -c $(<:s,/,\)
+ @$(VTOOLSD)\bin\segalias.exe -p $(VTOOLSD)\include\default.seg $@
+
+%$O: %$A ; $(AS) @$(mktmp $(ASFLAGS:s/\/\\)) $(<:s,/,\)
+
+%$L: ; $(LIB) $(LIBFLAGS) $@ @$(mktmp -+$(?:t" &\n-+")\n)
+
+%.dll: ;
+ @$(CP) $(mktmp EXPORTS\n_The_DDB @1) $*.def
+ tlink32.exe @$(mktmp $(LDFLAGS) -Tpd $(VTOOLSD:s/\/\\)\lib\icrtbc4.obj+\n$(&:s/\/\\)\n$*.dll\n$*.map\n$(DEF_LIBS:s/\/\\) $(PMLIB:s/\/\\) $(EXELIBS:s/\/\\)\n$*.def)
+ @$(RM) -S $(mktmp $*.def)
+
+%.vxd: %.dll ;
+ @$(CP) $(mktmp DYNAMIC\nATTRIB ICODE INIT\nATTRIB LCODE LOCKED\nATTRIB PCODE PAGEABLE\nATTRIB SCODE STATIC\nATTRIB DBOCODE DEBUG\nMERGE ICODE INITDAT0 INITDATA) $*.pel
+ @$(VTOOLSD)\bin\vxdver.exe $*.vrc $*.res
+ @$(VTOOLSD)\bin\pele.exe -d -s $*.smf -c $*.pel -o $@ -k 400 $*.dll
+ @$(VTOOLSD)\bin\sethdr.exe -n $* -x $@ -r $*.res
+.IF $(DBG)
+ $(NMSYM) /TRANS:source,package /SOURCE:$(VXDSOURCE) $*.smf
+.ENDIF
+ @$(RM) -S $(mktmp $*.pel)
+
+.ELSE
+
+# Implicit generation rules for making object files, libraries and exe's
+
+%$O: %.c ; $(CC) @$(mktmp $(CFLAGS:s/\/\\)) -c $(<:s,/,\)
+%$O: %$P ; $(CC) @$(mktmp $(CFLAGS:s/\/\\)) -c $(<:s,/,\)
+.IF $(USE_NASM)
+%$O: %$A ; $(AS) @$(mktmp -o $@ $(ASFLAGS:s/\/\\)) $(<:s,/,\)
+.ELSE
+%$O: %$A ; $(AS) @$(mktmp $(ASFLAGS:s/\/\\)) $(<:s,/,\)
+.ENDIF
+
+# Implicit rule for building resource files
+%$R: %.rc ; $(RC) $(RCFLAGS) -r $<
+
+# Implicit rule for building a DLL using a response file
+.IF $(IMPORT_DLL)
+.ELSE
+.IF $(NO_RUNTIME)
+%$D: ; $(LD) $(mktmp $(LDFLAGS) -Tpd -aa $(&:s/\/\\)\n$@\n$*.map\n$(EXELIBS)\n$*.def)
+.ELSE
+%$D: ;
+ makedef $(@:b)
+ $(LD) $(mktmp $(LDFLAGS) -Tpd -aa c0d32.obj+\n$(&:s/\/\\)\n$@\n$*.map\n$(DEF_LIBS:s/\/\\) $(PMLIB:s/\/\\) $(EXELIBS)\n$*.def)
+.IF $(DBG)
+.IF $(USE_SOFTICE)
+ $(NMSYM) $(NMSYMFLAGS);$(SI_SOURCE) $@
+ tdstrp32 $@
+.ENDIF
+.ENDIF
+.ENDIF
+.ENDIF
+
+# Implicit rule for building a library file using response file
+.IF $(BUILD_DLL)
+%$L: ;
+ @$(RM) $@
+ $(ILIB) $(ILIBFLAGS) $@ $?
+.ELIF $(IMPORT_DLL)
+%$L: ;
+ @$(RM) $@
+ $(ILIB) $(ILIBFLAGS) $@ $?
+.ELSE
+%$L: ;
+ @$(RM) $@
+ $(LIB) $(LIBFLAGS) $@ @$(mktmp +$(&:t" &\n+")\n)
+.ENDIF
+
+# Implicit rule for building an executable file using response file
+
+.IF $(USE_WIN32)
+.IF $(WIN32_GUI)
+%$E: ;
+ $(LD) $(mktmp $(LDFLAGS) -Tpe -aa $(WIN_VERSION) c0w32.obj+\n$(&:s/\/\\)\n$@\n$*.map\n$(DEF_LIBS:s/\/\\) $(PMLIB:s/\/\\) $(EXELIBS)\n$*.def)
+.IF $(DBG)
+.IF $(USE_SOFTICE)
+ $(NMSYM) $(NMSYMFLAGS);$(SI_SOURCE) $@
+ tdstrp32 $@
+.ENDIF
+.ENDIF
+.ELSE
+%$E: ;
+ $(LD) $(mktmp $(LDFLAGS) -Tpe -ap c0x32.obj+\n$(&:s/\/\\)\n$@\n$*.map\n$(DEF_LIBS:s/\/\\) $(PMLIB:s/\/\\) $(EXELIBS)\n$*.def)
+.IF $(USE_SOFTICE)
+ $(NMSYM) $(NMSYMFLAGS);$(SI_SOURCE) $@
+ tdstrp32 $@
+.ENDIF
+.ENDIF
+.ELIF $(USE_TNT)
+%$E: ;
+ @$(CP) $(mktmp stub 'gotnt.exe') $*.def
+ @$(LD) $(mktmp $(LDFLAGS) -Tpe -ap c0x32.obj+\n$(&:s/\/\\)\n$@\n$*.map\n$(DEF_LIBS) $(PMLIB:s/\/\\) $(EXELIBS)\n$*.def)
+.IF $(DOSSTYLE)
+ @markphar $@
+.ENDIF
+ @$(RM) -S $(mktmp $*.def)
+.ELIF $(USE_SMX32)
+%$E: ; $(LD) $(mktmp $(LDFLAGS) -Tpe -ap c0x32.obj+\n$(&:s/\/\\)\n$@\n$*.map\n$(DEF_LIBS) $(PMLIB:s/\/\\) $(EXELIBS)\n$*.def)
+.ELSE
+%$E: ; $(LD) $(mktmp $(LDFLAGS) -Tpe -ap c0x32.obj+\n$(&:s/\/\\)\n$@\n$*.map\n$(DEF_LIBS) $(PMLIB:s/\/\\) $(EXELIBS)\n$*.def)
+.END
+
+.ENDIF
diff --git a/board/MAI/bios_emulator/scitech/makedefs/rules/bcos2.mk b/board/MAI/bios_emulator/scitech/makedefs/rules/bcos2.mk
new file mode 100644
index 00000000000..f473fecf499
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/makedefs/rules/bcos2.mk
@@ -0,0 +1,70 @@
+#############################################################################
+#
+# SciTech Multi-platform Graphics Library
+#
+# ========================================================================
+#
+# The contents of this file are subject to the SciTech MGL Public
+# License Version 1.0 (the "License"); you may not use this file
+# except in compliance with the License. You may obtain a copy of
+# the License at http://www.scitechsoft.com/mgl-license.txt
+#
+# Software distributed under the License is distributed on an
+# "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+# implied. See the License for the specific language governing
+# rights and limitations under the License.
+#
+# The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+#
+# The Initial Developer of the Original Code is SciTech Software, Inc.
+# All Rights Reserved.
+#
+# ========================================================================
+#
+# Descripton: Rules makefile definitions, which define the rules used to
+# build targets. We include them here at the end of the
+# makefile so the generic project makefiles can override
+# certain things with macros (such as linking C++ programs
+# differently).
+#
+#############################################################################
+
+# Implicit generation rules for making object files
+%$O: %.c ; $(CC) @$(mktmp $(CFLAGS:s/\/\\)) -c $(<:s,/,\)
+%$O: %$P ; $(CC) @$(mktmp $(CFLAGS:s/\/\\)) -c $(<:s,/,\)
+.IF $(USE_NASM)
+%$O: %$A ; $(AS) @$(mktmp -o $@ $(ASFLAGS:s/\/\\)) $(<:s,/,\)
+.ELSE
+%$O: %$A ; $(AS) @$(mktmp $(ASFLAGS:s/\/\\)) $(<:s,/,\)
+.ENDIF
+
+# Implicit rule for building resource files
+%$R: %.rc ; $(RC) $(RCFLAGS) -r $<
+
+# Implicit rule for building a DLL using a response file
+%$D: ;
+ makedef $(@:b)
+ $(LD) $(mktmp $(LDFLAGS) -Tod -aa c02d.obj+\n$(&:s/\/\\)\n$@\n$*.map\n$(DEF_LIBS:s/\/\\) $(EXELIBS)\n$*.def)
+
+# Implicit rule for building a library file using response file
+.IF $(BUILD_DLL)
+%$L: ;
+ @$(RM) $@
+ $(ILIB) $(ILIBFLAGS) $@ $?
+.ELIF $(IMPORT_DLL)
+%$L: ;
+ @$(RM) $@
+ $(ILIB) $(ILIBFLAGS) $@ $?
+.ELSE
+%$L: ;
+ @$(RM) $@
+ $(LIB) $(LIBFLAGS) $@ @$(mktmp +$(&:t" &\n+")\n)
+.ENDIF
+
+# Implicit rule for building an executable file using response file
+
+.IF $(USE_OS2GUI)
+%$E: ; $(LD) $(mktmp $(LDFLAGS) -Toe -aa c02.obj+\n$(&:s/\/\\)\n$@\n$*.map\n$(DEF_LIBS:s/\/\\) $(EXELIBS)\n$*.def)
+.ELSE
+%$E: ; $(LD) $(mktmp $(LDFLAGS) -Toe -ap c02.obj+\n$(&:s/\/\\)\n$@\n$*.map\n$(DEF_LIBS:s/\/\\) $(EXELIBS)\n$*.def)
+.ENDIF
diff --git a/board/MAI/bios_emulator/scitech/makedefs/rules/cl16.mk b/board/MAI/bios_emulator/scitech/makedefs/rules/cl16.mk
new file mode 100644
index 00000000000..6489a3ee430
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/makedefs/rules/cl16.mk
@@ -0,0 +1,67 @@
+#############################################################################
+#
+# SciTech Multi-platform Graphics Library
+#
+# ========================================================================
+#
+# The contents of this file are subject to the SciTech MGL Public
+# License Version 1.0 (the "License"); you may not use this file
+# except in compliance with the License. You may obtain a copy of
+# the License at http://www.scitechsoft.com/mgl-license.txt
+#
+# Software distributed under the License is distributed on an
+# "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+# implied. See the License for the specific language governing
+# rights and limitations under the License.
+#
+# The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+#
+# The Initial Developer of the Original Code is SciTech Software, Inc.
+# All Rights Reserved.
+#
+# ========================================================================
+#
+# Descripton: Rules makefile definitions, which define the rules used to
+# build targets. We include them here at the end of the
+# makefile so the generic project makefiles can override
+# certain things with macros (such as linking C++ programs
+# differently).
+#
+#############################################################################
+
+# Take out PMLIB if we don't need to link with it
+
+.IF $(NO_PMLIB)
+PMLIB :=
+.ENDIF
+
+# Implicit generation rules for making object files
+%$O: %.c ; $(CC) /nologo $(CFLAGS) /c $<
+%$O: %$P ; $(CC) /nologo $(CFLAGS) /c $<
+%$O: %$A ; $(AS) $(ASFLAGS) $< $* NUL NUL
+
+# Implicit rule for building resource files
+%$R: %.rc ; $(RC) $(RCFLAGS) -r $<
+
+# Implicit rule for building a DLL using a response file
+#%$D: ; rclink $(LD) $(RC) $@ $(mktmp $(LDFLAGS:s/\/\\) -e$@\n$(&:t"\n":s/\/\\)\n$(EXELIBS))
+#%$D: ; $(LD) $(LDFLAGS) /Fe$@ $& $(EXELIBS)
+%$D: ; link @default.rsp
+
+
+# Implicit rule for building a library file using response file
+.IF $(BUILD_DLL)
+%$L: ; $(ILIB) $(ILIBFLAGS) $@ $?
+.ELIF $(IMPORT_DLL)
+%$L: ; $(ILIB) $(ILIBFLAGS) $@ $?
+.ELSE
+%$L: ; $(LIB) /nologo $(LIBFLAGS) $@ @$(mktmp -+$(?:t" &\n-+") &\n,,\n)
+.ENDIF
+
+# Implicit rule for building an executable file using response file
+.IF $(USE_WIN16)
+#%$E: ; rclink $(LD) $(RC) $@ $(mktmp $(LDFLAGS) /Fe$@ $(&:s/\/\\) $(EXELIBS))
+%$E: ; $(LD) @$(mktmp $(LDFLAGS) /Fe$@ $(&:s/\/\\) $(EXELIBS))
+.ELSE
+%$E: ; $(LD) @$(mktmp $(LDFLAGS) /Fe$@ $(&:s/\/\\) $(PMLIB) $(EXELIBS))
+.ENDIF
diff --git a/board/MAI/bios_emulator/scitech/makedefs/rules/cl386.mk b/board/MAI/bios_emulator/scitech/makedefs/rules/cl386.mk
new file mode 100644
index 00000000000..f50b2749e41
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/makedefs/rules/cl386.mk
@@ -0,0 +1,69 @@
+#############################################################################
+#
+# SciTech Multi-platform Graphics Library
+#
+# ========================================================================
+#
+# The contents of this file are subject to the SciTech MGL Public
+# License Version 1.0 (the "License"); you may not use this file
+# except in compliance with the License. You may obtain a copy of
+# the License at http://www.scitechsoft.com/mgl-license.txt
+#
+# Software distributed under the License is distributed on an
+# "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+# implied. See the License for the specific language governing
+# rights and limitations under the License.
+#
+# The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+#
+# The Initial Developer of the Original Code is SciTech Software, Inc.
+# All Rights Reserved.
+#
+# ========================================================================
+#
+# Descripton: Rules makefile definitions, which define the rules used to
+# build targets. We include them here at the end of the
+# makefile so the generic project makefiles can override
+# certain things with macros (such as linking C++ programs
+# differently).
+#
+#############################################################################
+
+# Take out PMLIB if we don't need to link with it
+
+.IF $(NO_PMLIB)
+PMLIB :=
+.ENDIF
+
+# Implicit generation rules for making object files
+%$O: %.c ; $(CC) -nologo $(CFLAGS) -c $<
+%$O: %$P ; $(CC) -nologo $(CFLAGS) -c $<
+%$O: %$A ; $(AS) $(ASFLAGS) $< $* NUL NUL
+
+# Implicit rule for building resource files
+%$R: %.rc ; $(RC) $(RCFLAGS) -r $<
+
+# Implicit rule for building a DLL using a response file
+#%$D: ; rclink $(LD) $(RC) $@ $(mktmp $(LDFLAGS:s/\/\\) -e$@\n$(&:t"\n":s/\/\\)\n$(EXELIBS))
+#%$D: ; $(LD) $(LDFLAGS) /Fe$@ $& $(EXELIBS)
+%$D: ; link386 @default.rsp
+
+# Implicit rule for building a device driver using a response file
+%.SYS: ; link386 @default.rsp
+
+# Implicit rule for building a library file using response file
+.IF $(BUILD_DLL)
+%$L: ; $(ILIB) $(ILIBFLAGS) $@ $?
+.ELIF $(IMPORT_DLL)
+%$L: ; $(ILIB) $(ILIBFLAGS) $@ $?
+.ELSE
+%$L: ; $(LIB) /nologo $(LIBFLAGS) $@ @$(mktmp -+$(?:t" &\n-+") &\n,,\n)
+.ENDIF
+
+# Implicit rule for building an executable file using response file
+.IF $(USE_WIN16)
+#%$E: ; rclink $(LD) $(RC) $@ $(mktmp $(LDFLAGS) /Fe$@ $(&:s/\/\\) $(EXELIBS))
+%$E: ; $(LD) @$(mktmp $(LDFLAGS) /Fe$@ $(&:s/\/\\) $(EXELIBS))
+.ELSE
+%$E: ; $(LD) @$(mktmp $(LDFLAGS) /Fe$@ $(&:s/\/\\) $(PMLIB) $(EXELIBS))
+.ENDIF
diff --git a/board/MAI/bios_emulator/scitech/makedefs/rules/dj32.mk b/board/MAI/bios_emulator/scitech/makedefs/rules/dj32.mk
new file mode 100644
index 00000000000..9f917bbdd98
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/makedefs/rules/dj32.mk
@@ -0,0 +1,47 @@
+#############################################################################
+#
+# SciTech Multi-platform Graphics Library
+#
+# ========================================================================
+#
+# The contents of this file are subject to the SciTech MGL Public
+# License Version 1.0 (the "License"); you may not use this file
+# except in compliance with the License. You may obtain a copy of
+# the License at http://www.scitechsoft.com/mgl-license.txt
+#
+# Software distributed under the License is distributed on an
+# "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+# implied. See the License for the specific language governing
+# rights and limitations under the License.
+#
+# The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+#
+# The Initial Developer of the Original Code is SciTech Software, Inc.
+# All Rights Reserved.
+#
+# ========================================================================
+#
+# Descripton: Rules makefile definitions, which define the rules used to
+# build targets. We include them here at the end of the
+# makefile so the generic project makefiles can override
+# certain things with macros (such as linking C++ programs
+# differently).
+#
+#############################################################################
+
+# Take out PMLIB if we don't need to link with it
+
+.IF $(NO_PMLIB)
+PMLIB :=
+.ENDIF
+
+# Implicit generation rules for making object files
+%$O: %.c ; $(CC) @$(mktmp $(CFLAGS:s/\/\\) -c) $(<:s,/,\)
+%$O: %$P ; $(CC) @$(mktmp $(CFLAGS:s/\/\\) -c) $(<:s,/,\)
+%$O: %$A ; $(AS) @$(mktmp -o $@ $(ASFLAGS:s/\/\\)) $(<:s,/,\)
+
+# Implicit rule for building a library file using response file
+%$L: ; $(LIB) $(LIBFLAGS) $@ @$(mktmp $(&:s/\/\\)\n)
+
+# Implicit rule for building an executable file using response file
+%$E: ; $(LD) $(LDFLAGS) $@ @$(mktmp $(&:s/\/\\) $(EXELIBS) $(PMLIB) -lstdcxx -lm)
diff --git a/board/MAI/bios_emulator/scitech/makedefs/rules/emx.mk b/board/MAI/bios_emulator/scitech/makedefs/rules/emx.mk
new file mode 100644
index 00000000000..26d223ad41a
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/makedefs/rules/emx.mk
@@ -0,0 +1,91 @@
+#############################################################################
+#
+# SciTech Multi-platform Graphics Library
+#
+# ========================================================================
+#
+# The contents of this file are subject to the SciTech MGL Public
+# License Version 1.0 (the "License"); you may not use this file
+# except in compliance with the License. You may obtain a copy of
+# the License at http://www.scitechsoft.com/mgl-license.txt
+#
+# Software distributed under the License is distributed on an
+# "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+# implied. See the License for the specific language governing
+# rights and limitations under the License.
+#
+# The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+#
+# The Initial Developer of the Original Code is SciTech Software, Inc.
+# All Rights Reserved.
+#
+# ========================================================================
+#
+# Descripton: Rules makefile definitions, which define the rules used to
+# build targets. We include them here at the end of the
+# makefile so the generic project makefiles can override
+# certain things with macros (such as linking C++ programs
+# differently).
+#
+# OS/2 version for EMX/GNU C/C++.
+#
+#############################################################################
+
+# Take out PMLIB if we don't need to link with it
+
+.IF $(NO_PMLIB)
+PMLIB :=
+.ENDIF
+
+# Implicit generation rules for making object files
+%$O: %.c ;
+.IF $(SHOW_ARGS)
+ $(CC) -c $(CFLAGS) $(<:s,\,/)
+.ELSE
+ @echo $(CC) -c $(<:s,\,/)
+ @$(CC) -c $(CFLAGS) $(<:s,\,/)
+.ENDIF
+
+%$O: %$P ;
+.IF $(SHOW_ARGS)
+ $(CXX) -c $(CFLAGS) $(<:s,\,/)
+.ELSE
+ @echo $(CXX) -c $(<:s,\,/)
+ @$(CXX) -c $(CFLAGS) $(<:s,\,/)
+.ENDIF
+
+%$O: %$A ;
+.IF $(USE_NASM)
+.IF $(SHOW_ARGS)
+ $(AS) -o $@ $(ASFLAGS) $(<:s,\,/)
+.ELSE
+ @echo $(AS) $(<:s,\,/)
+ @$(AS) @$(mktmp -o $@ $(ASFLAGS)) $(<:s,\,/)
+.ENDIF
+.ELSE
+.IF $(SHOW_ARGS)
+
+ $(AS) @$(mktmp $(ASFLAGS:s/\/\\)) $(<:s,/,\)
+.ELSE
+ @echo $(AS) $(<:s,/,\)
+ $(AS) @$(mktmp $(ASFLAGS:s/\/\\)) $(<:s,/,\)
+.ENDIF
+.ENDIF
+
+# Implicit rule for building a library file using response file
+%$L: ;
+.IF $(SHOW_ARGS)
+ $(LIB) $(LIBFLAGS) $@ $(&:s,\,/)
+.ELSE
+ @echo $(LIB) $@
+ @$(LIB) $(LIBFLAGS) $@ @$(mktmp $(?:t"\n"))
+.ENDIF
+
+# Implicit rule for building an executable file using response file
+%$E: ;
+.IF $(SHOW_ARGS)
+ $(LD) $(LDFLAGS) -o $@ $(&:s,\,/) $(EXELIBS) $(PMLIB) -lgpp -lstdcpp
+.ELSE
+ @echo $(LD) $@
+ @$(LD) $(LDFLAGS) -o $@ $(&:s,\,/) $(EXELIBS) $(PMLIB) -lgpp -lstdcpp
+.ENDIF
diff --git a/board/MAI/bios_emulator/scitech/makedefs/rules/gcc_beos.mk b/board/MAI/bios_emulator/scitech/makedefs/rules/gcc_beos.mk
new file mode 100644
index 00000000000..4b59328267e
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/makedefs/rules/gcc_beos.mk
@@ -0,0 +1,48 @@
+#############################################################################
+#
+# SciTech Multi-platform Graphics Library
+#
+# ========================================================================
+#
+# The contents of this file are subject to the SciTech MGL Public
+# License Version 1.0 (the "License"); you may not use this file
+# except in compliance with the License. You may obtain a copy of
+# the License at http://www.scitechsoft.com/mgl-license.txt
+#
+# Software distributed under the License is distributed on an
+# "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+# implied. See the License for the specific language governing
+# rights and limitations under the License.
+#
+# The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+#
+# The Initial Developer of the Original Code is SciTech Software, Inc.
+# All Rights Reserved.
+#
+# ========================================================================
+#
+# Descripton: Rules makefile definitions, which define the rules used to
+# build targets. We include them here at the end of the
+# makefile so the generic project makefiles can override
+# certain things with macros (such as linking C++ programs
+# differently).
+#
+#############################################################################
+
+# Take out PMLIB if we don't need to link with it
+
+.IF $(NO_PMLIB)
+PMLIB :=
+.ENDIF
+
+# Implicit generation rules for making object files from source files
+%$O: %.c ; $(CC) $(CFLAGS) -c $<
+%$O: %$P ; $(CXX) $(CFLAGS) -c $<
+%$O: %$A ; $(AS) $(ASFLAGS) $<
+
+# Implicit rule for building a library file
+%$L: ; $(LIB) $(LIBFLAGS) $@ $&
+
+# Implicit rule for building an executable file
+%$E: ; $(LD) $(LDFLAGS) -o $@ $& $(EXELIBS) $(PMLIB)
+
diff --git a/board/MAI/bios_emulator/scitech/makedefs/rules/gcc_freebsd.mk b/board/MAI/bios_emulator/scitech/makedefs/rules/gcc_freebsd.mk
new file mode 100644
index 00000000000..9b4d2362169
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/makedefs/rules/gcc_freebsd.mk
@@ -0,0 +1,47 @@
+#############################################################################
+#
+# SciTech Multi-platform Graphics Library
+#
+# ========================================================================
+#
+# The contents of this file are subject to the SciTech MGL Public
+# License Version 1.0 (the "License"); you may not use this file
+# except in compliance with the License. You may obtain a copy of
+# the License at http://www.scitechsoft.com/mgl-license.txt
+#
+# Software distributed under the License is distributed on an
+# "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+# implied. See the License for the specific language governing
+# rights and limitations under the License.
+#
+# The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+#
+# The Initial Developer of the Original Code is SciTech Software, Inc.
+# All Rights Reserved.
+#
+# ========================================================================
+#
+# Descripton: Rules makefile definitions, which define the rules used to
+# build targets. We include them here at the end of the
+# makefile so the generic project makefiles can override
+# certain things with macros (such as linking C++ programs
+# differently).
+#
+#############################################################################
+
+# Take out PMLIB if we don't need to link with it
+
+.IF $(NO_PMLIB)
+PMLIB :=
+.ENDIF
+
+# Implicit generation rules for making object files from source files
+%$O: %.c ; $(CC) $(CFLAGS) -c $<
+%$O: %$P ; $(CXX) $(CFLAGS) -c $<
+%$O: %$A ; $(AS) -o $@ $(ASFLAGS) $<
+
+# Implicit rule for building a library file
+%$L: ; $(LIB) $(LIBFLAGS) $@ $&
+
+# Implicit rule for building an executable file
+%$E: ; $(LD) $(LDFLAGS) -o $@ $& $(EXELIBS) $(PMLIB) -lm
diff --git a/board/MAI/bios_emulator/scitech/makedefs/rules/gcc_linux.mk b/board/MAI/bios_emulator/scitech/makedefs/rules/gcc_linux.mk
new file mode 100644
index 00000000000..56719ed7654
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/makedefs/rules/gcc_linux.mk
@@ -0,0 +1,94 @@
+#############################################################################
+#
+# SciTech Multi-platform Graphics Library
+#
+# ========================================================================
+#
+# The contents of this file are subject to the SciTech MGL Public
+# License Version 1.0 (the "License"); you may not use this file
+# except in compliance with the License. You may obtain a copy of
+# the License at http://www.scitechsoft.com/mgl-license.txt
+#
+# Software distributed under the License is distributed on an
+# "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+# implied. See the License for the specific language governing
+# rights and limitations under the License.
+#
+# The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+#
+# The Initial Developer of the Original Code is SciTech Software, Inc.
+# All Rights Reserved.
+#
+# ========================================================================
+#
+# Descripton: Rules makefile definitions, which define the rules used to
+# build targets. We include them here at the end of the
+# makefile so the generic project makefiles can override
+# certain things with macros (such as linking C++ programs
+# differently).
+#
+#############################################################################
+
+# Take out PMLIB if we don't need to link with it
+
+.IF $(NO_PMLIB)
+PMLIB :=
+.ENDIF
+
+.IF $(USE_CXX_LINKER)
+LD := $(LDXX)
+.ENDIF
+
+# Implicit generation rules for making object files from source files
+%$O: %.c ;
+.IF $(SHOW_ARGS)
+ $(CC) -c $(CFLAGS) $<
+.ELSE
+ @$(ECHO) $(CC) $(SHOW_CFLAGS) $<
+ @$(CC) -c $(CFLAGS) $<
+.ENDIF
+
+%$O: %$P ;
+.IF $(SHOW_ARGS)
+ $(CXX) -c $(CFLAGS) $<
+.ELSE
+ @$(ECHO) $(CXX) $(SHOW_CFLAGS) $<
+ @$(CXX) -c $(CFLAGS) $<
+.ENDIF
+
+%$O: %$A ;
+.IF $(SHOW_ARGS)
+ $(AS) -o $@ $(ASFLAGS) $<
+.ELSE
+ @$(ECHO) $(AS) $(SHOW_ASFLAGS) $<
+ @$(AS) @$(mktmp -o $@ $(ASFLAGS)) $<
+.ENDIF
+
+# Implicit rule for building a library file
+.IF $(BUILD_DLL)
+%$L: ;
+.IF $(SHOW_ARGS)
+ $(LIB) $(LIBFLAGS) -Wl,-soname,$@.$(VERSIONMAJ) -o $@ $& $(LIBS)
+.ELSE
+ @$(ECHO) $(LIB) $@
+ @$(LIB) $(LIBFLAGS) -Wl,-soname,$@.$(VERSIONMAJ) -o $@ $& $(LIBS)
+.ENDIF
+.ELSE
+%$L: ;
+.IF $(SHOW_ARGS)
+ $(LIB) $(LIBFLAGS) $@ $&
+.ELSE
+ @$(ECHO) $(LIB) $@
+ @$(LIB) $(LIBFLAGS) $@ $&
+.ENDIF
+.ENDIF
+
+# Implicit rule for building an executable file
+%$E: ;
+.IF $(SHOW_ARGS)
+ $(LD) $(LDFLAGS) -o $@ $& $(EXELIBS) $(PMLIB) -lm
+.ELSE
+ @$(ECHO) ld $@
+ @$(LD) $(LDFLAGS) -o $@ $& $(EXELIBS) $(PMLIB) -lm
+.ENDIF
+
diff --git a/board/MAI/bios_emulator/scitech/makedefs/rules/gcc_win32.mk b/board/MAI/bios_emulator/scitech/makedefs/rules/gcc_win32.mk
new file mode 100644
index 00000000000..36b24b1a7c4
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/makedefs/rules/gcc_win32.mk
@@ -0,0 +1,91 @@
+#############################################################################
+#
+# SciTech Multi-platform Graphics Library
+#
+# ========================================================================
+#
+# The contents of this file are subject to the SciTech MGL Public
+# License Version 1.0 (the "License"); you may not use this file
+# except in compliance with the License. You may obtain a copy of
+# the License at http://www.scitechsoft.com/mgl-license.txt
+#
+# Software distributed under the License is distributed on an
+# "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+# implied. See the License for the specific language governing
+# rights and limitations under the License.
+#
+# The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+#
+# The Initial Developer of the Original Code is SciTech Software, Inc.
+# All Rights Reserved.
+#
+# ========================================================================
+#
+# Descripton: Rules makefile definitions, which define the rules used to
+# build targets. We include them here at the end of the
+# makefile so the generic project makefiles can override
+# certain things with macros (such as linking C++ programs
+# differently).
+#
+#############################################################################
+
+# Take out PMLIB if we don't need to link with it
+
+.IF $(NO_PMLIB)
+PMLIB :=
+.ENDIF
+
+.IF $(USE_CXX_LINKER)
+LD := $(LDXX)
+.ENDIF
+
+# Implicit generation rules for making object files from source files
+%$O: %.c ;
+.IF $(SHOW_ARGS)
+ $(CC) -c $(CFLAGS:s/\/\\) $(<:s,/,\)
+.ELSE
+ @$(ECHO) $(CC) $(SHOW_CFLAGS:s/\/\\) $(<:s,/,\)
+ @$(CC) -c $(CFLAGS:s/\/\\) $(<:s,/,\)
+.ENDIF
+
+%$O: %$P ;
+.IF $(SHOW_ARGS)
+ $(CXX) -c $(CFLAGS:s/\/\\) $(<:s,/,\)
+.ELSE
+ @$(ECHO) $(CXX) $(SHOW_CFLAGS:s/\/\\) $(<:s,/,\)
+ @$(CXX) -c $(CFLAGS:s/\/\\) $(<:s,/,\)
+.ENDIF
+
+%$O: %$A ;
+.IF $(SHOW_ARGS)
+ $(AS) -o $(ASFLAGS:s/\/\\) $(<:s,/,\)
+.ELSE
+ @$(ECHO) $(AS) $(SHOW_ASFLAGS:s/\/\\) $(<:s,/,\)
+ @$(AS) @$(mktmp -o $@ $(ASFLAGS:s/\/\\)) $(<:s,/,\)
+.ENDIF
+
+# Implicit rule for building resource files
+%$R: %.rc ; $(RC) $< $(RCFLAGS) -o $@
+
+# Implicit rule for building a DLL
+# TODO!
+#%$D: ; +rclink $(LD) $(RC) $@ $(mktmp $(LDFLAGS) /Fe$@ $(&:t"\n"s/\/\\) $(PMLIB) $(EXELIBS) $(DEF_LIBS) $(LDENDFLAGS))
+
+# Implicit rule for building a library file
+%$L: ;
+.IF $(SHOW_ARGS)
+ $(LIB) $(LIBFLAGS) $@ $&
+.ELSE
+ @$(ECHO) $(LIB) $@
+ @$(LIB) $(LIBFLAGS) $@ @$(mktmp $(&:s/\/\\)\n)
+.ENDIF
+
+# Implicit rule for building an executable file
+%$E: ;
+.IF $(SHOW_ARGS)
+ $(LD) $(LDFLAGS) -o $@ $& $(EXELIBS) $(PMLIB) -lm
+.ELSE
+ @$(ECHO) ld $@
+ @$(LD) $(LDFLAGS) -o $@ @$(mktmp $(&:s/\/\\) $(EXELIBS) $(PMLIB) -lm)
+.ENDIF
+
diff --git a/board/MAI/bios_emulator/scitech/makedefs/rules/hc32.mk b/board/MAI/bios_emulator/scitech/makedefs/rules/hc32.mk
new file mode 100644
index 00000000000..011e9ab3a4c
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/makedefs/rules/hc32.mk
@@ -0,0 +1,51 @@
+#############################################################################
+#
+# SciTech Multi-platform Graphics Library
+#
+# ========================================================================
+#
+# The contents of this file are subject to the SciTech MGL Public
+# License Version 1.0 (the "License"); you may not use this file
+# except in compliance with the License. You may obtain a copy of
+# the License at http://www.scitechsoft.com/mgl-license.txt
+#
+# Software distributed under the License is distributed on an
+# "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+# implied. See the License for the specific language governing
+# rights and limitations under the License.
+#
+# The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+#
+# The Initial Developer of the Original Code is SciTech Software, Inc.
+# All Rights Reserved.
+#
+# ========================================================================
+#
+# Descripton: Rules makefile definitions, which define the rules used to
+# build targets. We include them here at the end of the
+# makefile so the generic project makefiles can override
+# certain things with macros (such as linking C++ programs
+# differently).
+#
+#############################################################################
+
+# Take out PMLIB if we don't need to link with it
+
+.IF $(NO_PMLIB)
+PMLIB :=
+.ENDIF
+
+# Implicit generation rules for making object files
+%$O: %.c ; $(CC) $(CFLAGS) -c $<
+%$O: %$P ; $(CC) $(CFLAGS) -c $<
+.IF $(USE_NASM)
+%$O: %$A ; $(AS) @$(mktmp -o $@ $(ASFLAGS:s/\/\\)) $(<:s,/,\)
+.ELSE
+%$O: %$A ; $(AS) @$(mktmp $(ASFLAGS:s/\/\\)) $(<:s,/,\)
+.ENDIF
+
+# Implicit rule for building a library file using response file
+%$L: ; $(LIB) $(LIBFLAGS) $@ @$(mktmp,$*.rsp -R $?)
+
+# Implicit rule for building an executable file using response file
+%$E: ; $(LD) $(LDFLAGS) -o $@ @$(mktmp $(&:s/\/\\) $(PMLIB) $(EXELIBS) -ldosx32.lib)
diff --git a/board/MAI/bios_emulator/scitech/makedefs/rules/qnx4.mk b/board/MAI/bios_emulator/scitech/makedefs/rules/qnx4.mk
new file mode 100644
index 00000000000..55dc0355009
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/makedefs/rules/qnx4.mk
@@ -0,0 +1,94 @@
+#############################################################################
+#
+# SciTech Multi-platform Graphics Library
+#
+# ========================================================================
+#
+# The contents of this file are subject to the SciTech MGL Public
+# License Version 1.0 (the "License"); you may not use this file
+# except in compliance with the License. You may obtain a copy of
+# the License at http://www.scitechsoft.com/mgl-license.txt
+#
+# Software distributed under the License is distributed on an
+# "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+# implied. See the License for the specific language governing
+# rights and limitations under the License.
+#
+# The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+#
+# The Initial Developer of the Original Code is SciTech Software, Inc.
+# All Rights Reserved.
+#
+# ========================================================================
+#
+# Descripton: Rules makefile definitions, which define the rules used to
+# build targets. We include them here at the end of the
+# makefile so the generic project makefiles can override
+# certain things with macros (such as linking C++ programs
+# differently).
+#
+#############################################################################
+
+# Take out PMLIB if we don't need to link with it
+
+.IF $(NO_PMLIB)
+PMLIB :=
+.ENDIF
+
+# Whether to link in real VBIOS library, or just the stub library
+
+.IF $(USE_BIOS)
+VBIOSLIB := -lvbios.lib
+.ELSE
+VBIOSLIB := -lvbstubs.lib
+.END
+
+# Require special privledges for Nucleus programs (requires root access)
+
+.IF $(USE_NUCLEUS)
+LDFLAGS += -T1
+.ENDIF
+
+# Implicit generation rules for making object files from source files
+%$O: %.c ;
+.IF $(SHOW_ARGS)
+ $(CC) $(CFLAGS) $<
+.ELSE
+ @echo $(CC) -c $<
+ +@$(CC) $(CFLAGS) $< > /dev/null
+.ENDIF
+
+%$O: %$P ;
+.IF $(SHOW_ARGS)
+ $(CXX) $(CFLAGS) $<
+.ELSE
+ @echo $(CXX) -c $<
+ +@$(CXX) $(CFLAGS) $< > /dev/null
+.ENDIF
+
+%$O: %$A ;
+.IF $(SHOW_ARGS)
+ $(AS) -o $@ $(ASFLAGS) $<
+.ELSE
+ @echo $(AS) $<
+ @$(AS) -o $@ $(ASFLAGS) $<
+.ENDIF
+
+# Implicit rule for building a library file
+%$L: ;
+.IF $(SHOW_ARGS)
+ $(LIB) $(LIBFLAGS) -q $@ $&
+.ELSE
+ @echo $(LIB) $@
+ +@$(LIB) $(LIBFLAGS) -q $@ $& > /dev/null
+.ENDIF
+
+
+# Implicit rule for building an executable file
+%$E: ;
+.IF $(SHOW_ARGS)
+ $(LD) $(LDFLAGS) -o $@ $& $(EXELIBS) $(PMLIB) $(VBIOSLIB)
+.ELSE
+ @echo wlink $@
+ +@$(LD) $(LDFLAGS) -o $@ $& $(EXELIBS) $(PMLIB) $(VBIOSLIB) > /dev/null
+.ENDIF
diff --git a/board/MAI/bios_emulator/scitech/makedefs/rules/qnxnto.mk b/board/MAI/bios_emulator/scitech/makedefs/rules/qnxnto.mk
new file mode 100644
index 00000000000..c43ad1f642c
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/makedefs/rules/qnxnto.mk
@@ -0,0 +1,55 @@
+#############################################################################
+#
+# SciTech Multi-platform Graphics Library
+#
+# ========================================================================
+#
+# The contents of this file are subject to the SciTech MGL Public
+# License Version 1.0 (the "License"); you may not use this file
+# except in compliance with the License. You may obtain a copy of
+# the License at http://www.scitechsoft.com/mgl-license.txt
+#
+# Software distributed under the License is distributed on an
+# "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+# implied. See the License for the specific language governing
+# rights and limitations under the License.
+#
+# The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+#
+# The Initial Developer of the Original Code is SciTech Software, Inc.
+# All Rights Reserved.
+#
+# ========================================================================
+#
+# Descripton: Rules makefile definitions, which define the rules used to
+# build targets. We include them here at the end of the
+# makefile so the generic project makefiles can override
+# certain things with macros (such as linking C++ programs
+# differently).
+#
+#############################################################################
+
+# Take out PMLIB if we don't need to link with it
+
+.IF $(NO_PMLIB)
+PMLIB :=
+.ENDIF
+
+# Whether to link in real VBIOS library, or just the stub library
+
+.IF $(USE_BIOS)
+VBIOSLIB := -lvbios
+.ELSE
+VBIOSLIB := -lvbstubs
+.END
+
+# Implicit generation rules for making object files from source files
+%$O: %.c ; $(CC) $(CFLAGS) -c $<
+%$O: %$P ; $(CXX) $(CPPFLAGS) -c $<
+%$O: %$A ; $(AS) -o $@ $(ASFLAGS) $<
+
+# Implicit rule for building a library file
+%$L: ; $(LIB) $(LIBFLAGS) $@ $&
+
+# Implicit rule for building an executable file
+%$E: ; $(LD) $(LDFLAGS) -o $@ $& $(EXELIBS) $(PMLIB) $(VBIOSLIB)
diff --git a/board/MAI/bios_emulator/scitech/makedefs/rules/sc16.mk b/board/MAI/bios_emulator/scitech/makedefs/rules/sc16.mk
new file mode 100644
index 00000000000..b33bcd86a0a
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/makedefs/rules/sc16.mk
@@ -0,0 +1,63 @@
+#############################################################################
+#
+# SciTech Multi-platform Graphics Library
+#
+# ========================================================================
+#
+# The contents of this file are subject to the SciTech MGL Public
+# License Version 1.0 (the "License"); you may not use this file
+# except in compliance with the License. You may obtain a copy of
+# the License at http://www.scitechsoft.com/mgl-license.txt
+#
+# Software distributed under the License is distributed on an
+# "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+# implied. See the License for the specific language governing
+# rights and limitations under the License.
+#
+# The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+#
+# The Initial Developer of the Original Code is SciTech Software, Inc.
+# All Rights Reserved.
+#
+# ========================================================================
+#
+# Descripton: Rules makefile definitions, which define the rules used to
+# build targets. We include them here at the end of the
+# makefile so the generic project makefiles can override
+# certain things with macros (such as linking C++ programs
+# differently).
+#
+#############################################################################
+
+# Take out PMLIB if we don't need to link with it
+
+.IF $(NO_PMLIB)
+PMLIB :=
+.ENDIF
+
+# Implicit generation rules for making object files
+%$O: %.c ; $(CC) $(CFLAGS) -c $<
+%$O: %$P ; $(CC) $(CFLAGS) -c $<
+%$O: %$A ; $(AS) @$(mktmp $(ASFLAGS)) $(<:s,/,\)
+
+# Implicit rule for building resource files
+%$R: %.rc ; $(RC) $(RCFLAGS) -r $<
+
+# Implicit rule for building a DLL using a response file
+%$D: ; $(LD) $(LDFLAGS) @$(mktmp $(&:s/\/\\) $(EXELIBS))
+
+# Implicit rule for building a library file using response file
+.IF $(BUILD_DLL)
+%$L: ; $(ILIB) $(ILIBFLAGS) $@ $?
+.ELIF $(IMPORT_DLL)
+%$L: ; $(ILIB) $(ILIBFLAGS) $@ $?
+.ELSE
+%$L: ; $(LIB) $(LIBFLAGS) $@ @$(mktmp -+$(?:t" &\n-+")\n)
+.ENDIF
+
+# Implicit rule for building an executable file using response file
+.IF $(USE_WIN16)
+%$E: ; $(LD) $(LDFLAGS) @$(mktmp $(&:s/\/\\) $(EXELIBS))
+.ELSE
+%$E: ; $(LD) $(LDFLAGS) @$(mktmp $(&:s/\/\\) $(PMLIB) $(EXELIBS))
+.ENDIF
diff --git a/board/MAI/bios_emulator/scitech/makedefs/rules/sc32.mk b/board/MAI/bios_emulator/scitech/makedefs/rules/sc32.mk
new file mode 100644
index 00000000000..2231906d66a
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/makedefs/rules/sc32.mk
@@ -0,0 +1,69 @@
+#############################################################################
+#
+# SciTech Multi-platform Graphics Library
+#
+# ========================================================================
+#
+# The contents of this file are subject to the SciTech MGL Public
+# License Version 1.0 (the "License"); you may not use this file
+# except in compliance with the License. You may obtain a copy of
+# the License at http://www.scitechsoft.com/mgl-license.txt
+#
+# Software distributed under the License is distributed on an
+# "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+# implied. See the License for the specific language governing
+# rights and limitations under the License.
+#
+# The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+#
+# The Initial Developer of the Original Code is SciTech Software, Inc.
+# All Rights Reserved.
+#
+# ========================================================================
+#
+# Descripton: Rules makefile definitions, which define the rules used to
+# build targets. We include them here at the end of the
+# makefile so the generic project makefiles can override
+# certain things with macros (such as linking C++ programs
+# differently).
+#
+#############################################################################
+
+# Take out PMLIB if we don't need to link with it
+
+.IF $(NO_PMLIB)
+PMLIB :=
+.ENDIF
+
+# Implicit generation rules for making object files
+%$O: %.c ; $(CC) $(CFLAGS) -c $<
+%$O: %$P ; $(CC) $(CFLAGS) -c $<
+.IF $(USE_NASM)
+%$O: %$A ; $(AS) @$(mktmp -o $@ $(ASFLAGS:s/\/\\)) $(<:s,/,\)
+.ELSE
+%$O: %$A ; $(AS) @$(mktmp $(ASFLAGS:s/\/\\)) $(<:s,/,\)
+.ENDIF
+
+# Implicit rule for building resource files
+%$R: %.rc ; $(RC) $(RCFLAGS) -r $<
+
+# Implicit rule for building a DLL using a response file
+%$D: ; $(LD) $(LDFLAGS) @$(mktmp,$*.lnk $(&:s/\/\\) $(EXELIBS) kernel32.lib user32.lib gdi32.lib winmm.lib comdlg32.lib advapi32.lib)
+
+# Implicit rule for building a library file using response file
+.IF $(BUILD_DLL)
+%$L: ; $(ILIB) $(ILIBFLAGS) $@ $?
+.ELIF $(IMPORT_DLL)
+%$L: ; $(ILIB) $(ILIBFLAGS) $@ $?
+.ELSE
+%$L: ; $(LIB) $(LIBFLAGS) $@ @$(mktmp -+$(?:t" &\n-+")\n)
+.ENDIF
+
+# Implicit rule for building an executable file using response file
+.IF $(USE_TNT)
+%$E: ; $(LD) $(LDFLAGS) @$(mktmp,$*.lnk $(&:s/\/\\) $(PMLIB) $(EXELIBS))
+.ELIF $(USE_WIN32)
+%$E: ; $(LD) $(LDFLAGS) @$(mktmp,$*.lnk $(&:s/\/\\) $(EXELIBS) kernel32.lib user32.lib gdi32.lib winmm.lib comdlg32.lib advapi32.lib)
+.ELSE
+%$E: ; $(LD) $(LDFLAGS) @$(mktmp,$*.lnk $(&:s/\/\\) $(PMLIB) $(EXELIBS))
+.ENDIF
diff --git a/board/MAI/bios_emulator/scitech/makedefs/rules/va32.mk b/board/MAI/bios_emulator/scitech/makedefs/rules/va32.mk
new file mode 100644
index 00000000000..588028f7347
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/makedefs/rules/va32.mk
@@ -0,0 +1,82 @@
+#############################################################################
+#
+# SciTech Multi-platform Graphics Library
+#
+# ========================================================================
+#
+# The contents of this file are subject to the SciTech MGL Public
+# License Version 1.0 (the "License"); you may not use this file
+# except in compliance with the License. You may obtain a copy of
+# the License at http://www.scitechsoft.com/mgl-license.txt
+#
+# Software distributed under the License is distributed on an
+# "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+# implied. See the License for the specific language governing
+# rights and limitations under the License.
+#
+# The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+#
+# The Initial Developer of the Original Code is SciTech Software, Inc.
+# All Rights Reserved.
+#
+# ========================================================================
+#
+# Descripton: Rules makefile definitions, which define the rules used to
+# build targets. We include them here at the end of the
+# makefile so the generic project makefiles can override
+# certain things with macros (such as linking C++ programs
+# differently).
+#
+#############################################################################
+
+# Take out PMLIB if we don't need to link with it
+
+.IF $(NO_PMLIB)
+PMLIB :=
+.ENDIF
+
+# Implicit generation rules for making object files
+%$O: %.c ; $(CC) -c @$(mktmp $(CFLAGS:s/\/\\)) $(<:s,/,\)
+%$O: %$P ; $(CPP) -c @$(mktmp $(CFLAGS:s/\/\\)) $(<:s,/,\)
+.IF $(USE_NASM)
+%$O: %$A ; $(AS) @$(mktmp -o $@ $(ASFLAGS:s/\/\\)) $(<:s,/,\)
+.ELSE
+%$O: %$A ; $(AS) @$(mktmp $(ASFLAGS:s/\/\\)) $(<:s,/,\)
+.ENDIF
+
+# Implicit rule for building resource files
+%$R: %.rc ; $(RC) $(RCFLAGS) -r $<
+
+# Implicit rule for building help files
+%.hlp: %.ipf; $(IPFC) $(IPFCFLAGS) $<
+
+# Implicit rule for building a DLL using a response file
+.IF $(USE_OS2GUI)
+%$D: ; rclink $(LD) $(RC) $@ $(mktmp $(LDFLAGS) $(&:t"+\n":s/\/\\)\n$@\n$*.map\n$(EXELIBS) $(PMLIB)\n$*.def\n)
+.ELSE
+%$D: ; $(LD) /nofree /nol @$(mktmp $(LDFLAGS) $(&:t"+\n":s/\/\\)\n$@\n$*.map\n$(EXELIBS) $(PMLIB)\n$*.def\n)
+.ENDIF
+
+# Implicit rule for building a library file using response file
+.IF $(BUILD_DLL)
+%$L: ; $(ILIB) $(ILIBFLAGS) $@ $?
+.ELIF $(IMPORT_DLL)
+%$L: ; $(ILIB) $(ILIBFLAGS) $@ $?
+.ELSE
+%$L: ; $(LIB) $(LIBFLAGS) @$(mktmp $@-+$(?:t"&\n-+":s/\/\\);)
+.ENDIF
+
+# Implicit rule for building an executable file using response file
+.IF $(USE_OS2GUI)
+%$E: ;
+ rclink $(LD) $(RC) $@ $(mktmp $(LDFLAGS) $(&:t"+\n":s/\/\\)\n$@\n$*.map\n$(EXELIBS) $(PMLIB)\n$*.def\n)
+.IF $(LXLITE)
+ lxlite $@
+.ENDIF
+.ELSE
+%$E: ;
+ rclink $(LD) $(RC) $@ $(mktmp $(LDFLAGS) $(&:t"+\n":s/\/\\)\n$@\n$*.map\n$(EXELIBS) $(PMLIB)\n\n)
+.IF $(LXLITE)
+ lxlite $@
+.ENDIF
+.ENDIF
diff --git a/board/MAI/bios_emulator/scitech/makedefs/rules/va365.mk b/board/MAI/bios_emulator/scitech/makedefs/rules/va365.mk
new file mode 100644
index 00000000000..0c149b758f7
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/makedefs/rules/va365.mk
@@ -0,0 +1,79 @@
+#############################################################################
+#
+# SciTech Multi-platform Graphics Library
+#
+# ========================================================================
+#
+# The contents of this file are subject to the SciTech MGL Public
+# License Version 1.0 (the "License"); you may not use this file
+# except in compliance with the License. You may obtain a copy of
+# the License at http://www.scitechsoft.com/mgl-license.txt
+#
+# Software distributed under the License is distributed on an
+# "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+# implied. See the License for the specific language governing
+# rights and limitations under the License.
+#
+# The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+#
+# The Initial Developer of the Original Code is SciTech Software, Inc.
+# All Rights Reserved.
+#
+# ========================================================================
+#
+# Descripton: Rules makefile definitions, which define the rules used to
+# build targets. We include them here at the end of the
+# makefile so the generic project makefiles can override
+# certain things with macros (such as linking C++ programs
+# differently).
+#
+#############################################################################
+
+# Take out PMLIB if we don't need to link with it
+
+.IF $(NO_PMLIB)
+PMLIB :=
+.ENDIF
+
+# Implicit generation rules for making object files
+%$O: %.c ; $(CC) -c @$(mktmp $(CFLAGS:s/\/\\)) $(<:s,/,\)
+%$O: %$P ; $(CPP) -c @$(mktmp $(CFLAGS:s/\/\\)) $(<:s,/,\)
+.IF $(USE_NASM)
+%$O: %$A ; $(AS) @$(mktmp -o $@ $(ASFLAGS:s/\/\\)) $(<:s,/,\)
+.ELSE
+%$O: %$A ; $(AS) @$(mktmp $(ASFLAGS:s/\/\\)) $(<:s,/,\)
+.ENDIF
+
+# Implicit rule for building resource files
+%$R: %.rc ; $(RC) $(RCFLAGS) -r $<
+
+# Implicit rule for building a DLL using a response file
+.IF $(USE_OS2GUI)
+%$D: ; rclink $(LD) $(RC) $@ $(mktmp $(LDFLAGS) $(&:t"+\n":s/\/\\)\n$@\n$*.map\n$(EXELIBS) $(PMLIB)\n$*.def\n)
+.ELSE
+%$D: ; $(LD) /nofree /nol @$(mktmp $(LDFLAGS) $(&:t"+\n":s/\/\\)\n$@\n$*.map\n$(EXELIBS) $(PMLIB)\n$*.def\n)
+.ENDIF
+
+# Implicit rule for building a library file using response file
+.IF $(BUILD_DLL)
+%$L: ; $(ILIB) $(ILIBFLAGS) /out:$@ $?
+.ELIF $(IMPORT_DLL)
+%$L: ; $(ILIB) $(ILIBFLAGS) /out:$@ $?
+.ELSE
+%$L: ; $(LIB) $(LIBFLAGS) /nowarn:86 /out:$@ @$(mktmp $(?:t"\n":s/\/\\))
+.ENDIF
+
+# Implicit rule for building an executable file using response file
+.IF $(USE_OS2GUI)
+%$E: ;
+ rclink $(LD) $(RC) $@ $(mktmp $(LDFLAGS) $(&:t"+\n":s/\/\\)\n$@\n$*.map\n$(EXELIBS) $(PMLIB)\n$*.def\n)
+.IF $(LXLITE)
+ lxlite $@
+.ENDIF
+.ELSE
+%$E: ;
+ rclink $(LD) $(RC) $@ $(mktmp $(LDFLAGS) $(&:t"+\n":s/\/\\)\n$@\n$*.map\n$(EXELIBS) $(PMLIB)\n\n)
+.IF $(LXLITE)
+ lxlite $@
+.ENDIF
+.ENDIF
diff --git a/board/MAI/bios_emulator/scitech/makedefs/rules/vc16.mk b/board/MAI/bios_emulator/scitech/makedefs/rules/vc16.mk
new file mode 100644
index 00000000000..6ffc270c01f
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/makedefs/rules/vc16.mk
@@ -0,0 +1,70 @@
+#############################################################################
+#
+# SciTech Multi-platform Graphics Library
+#
+# ========================================================================
+#
+# The contents of this file are subject to the SciTech MGL Public
+# License Version 1.0 (the "License"); you may not use this file
+# except in compliance with the License. You may obtain a copy of
+# the License at http://www.scitechsoft.com/mgl-license.txt
+#
+# Software distributed under the License is distributed on an
+# "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+# implied. See the License for the specific language governing
+# rights and limitations under the License.
+#
+# The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+#
+# The Initial Developer of the Original Code is SciTech Software, Inc.
+# All Rights Reserved.
+#
+# ========================================================================
+#
+# Descripton: Rules makefile definitions, which define the rules used to
+# build targets. We include them here at the end of the
+# makefile so the generic project makefiles can override
+# certain things with macros (such as linking C++ programs
+# differently).
+#
+#############################################################################
+
+# Take out PMLIB if we don't need to link with it
+
+.IF $(NO_PMLIB)
+PMLIB :=
+.ENDIF
+
+# Implicit generation rules for making object files
+%$O: %.c ; $(CC) /nologo $(CFLAGS) /c $<
+%$O: %$P ; $(CC) /nologo $(CFLAGS) /c $<
+%$O: %$A ; $(AS) @$(mktmp $(ASFLAGS)) $(<:s,/,\)
+
+# Implicit rule for building resource files
+%$R: %.rc ; $(RC) $(RCFLAGS) -r $<
+
+# Implicit rule for building a DLL using a response file
+%$D: ; rclink $(LD) $(RC) $@ $(mktmp $(LDFLAGS) -e$@\n$(&:t"\n":s/\/\\)\n$(EXELIBS))
+
+# Implicit rule for building a library file using response file
+.IF $(BUILD_DLL)
+%$L: ;
+ @$(RM) $@
+ $(ILIB) $(ILIBFLAGS) $@ $?
+.ELIF $(IMPORT_DLL)
+%$L: ;
+ @$(RM) $@
+ $(ILIB) $(ILIBFLAGS) $@ $?
+.ELSE
+%$L: ;
+ @$(RM) $@
+ $(LIB) $@ /nologo $(LIBFLAGS) @$(mktmp +$(&:t" &\n+") &\n,\n)
+.ENDIF
+
+# Implicit rule for building an executable file using response file
+.IF $(USE_WIN16)
+%$E: ; rclink $(LD) $(RC) $@ $(mktmp $(LDFLAGS) /Fe$@ $(&:s/\/\\) $(EXELIBS))
+#%$E: ; $(LD) @$(mktmp $(LDFLAGS) /Fe$@ $(&:s/\/\\) $(EXELIBS))
+.ELSE
+%$E: ; $(LD) @$(mktmp $(LDFLAGS) /Fe$@ $(&:s/\/\\) $(PMLIB) $(EXELIBS))
+.ENDIF
diff --git a/board/MAI/bios_emulator/scitech/makedefs/rules/vc32.mk b/board/MAI/bios_emulator/scitech/makedefs/rules/vc32.mk
new file mode 100644
index 00000000000..97f1a0c1627
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/makedefs/rules/vc32.mk
@@ -0,0 +1,122 @@
+#############################################################################
+#
+# SciTech Multi-platform Graphics Library
+#
+# ========================================================================
+#
+# The contents of this file are subject to the SciTech MGL Public
+# License Version 1.0 (the "License"); you may not use this file
+# except in compliance with the License. You may obtain a copy of
+# the License at http://www.scitechsoft.com/mgl-license.txt
+#
+# Software distributed under the License is distributed on an
+# "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+# implied. See the License for the specific language governing
+# rights and limitations under the License.
+#
+# The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+#
+# The Initial Developer of the Original Code is SciTech Software, Inc.
+# All Rights Reserved.
+#
+# ========================================================================
+#
+# Descripton: Rules makefile definitions, which define the rules used to
+# build targets. We include them here at the end of the
+# makefile so the generic project makefiles can override
+# certain things with macros (such as linking C++ programs
+# differently).
+#
+#############################################################################
+
+# Turn on pre-compiled headers as neccessary
+.IF $(PRECOMP_HDR)
+ CFLAGS += -YX"$(PRECOMP_HDR)"
+.ENDIF
+
+# Turn on runtime type information as necessary
+.IF $(USE_RTTI)
+ CFLAGS += /GR
+.ENDIF
+
+# Turn on C++ exception handling as necessary
+.IF $(USE_CPPEXCEPT)
+ CFLAGS += /GX
+.ENDIF
+
+# Take out PMLIB if we don't need to link with it
+
+.IF $(NO_PMLIB)
+PMLIB :=
+.ENDIF
+
+# Implicit generation rules for making object files
+%$O: %.c ; $(CC) /nologo @$(mktmp $(CFLAGS:s/\/\\)) /c $(<:s,/,\)
+%$O: %$P ; $(CC) /nologo @$(mktmp $(CFLAGS:s/\/\\)) /c $(<:s,/,\)
+.IF $(USE_NASM)
+%$O: %$A ; $(AS) @$(mktmp -o $@ $(ASFLAGS:s/\/\\)) $(<:s,/,\)
+.ELSE
+%$O: %$A ; $(AS) @$(mktmp $(ASFLAGS:s/\/\\)) $(<:s,/,\)
+.ENDIF
+
+# Implicit rule for building resource files
+%$R: %.rc ; $(RC) $(RCFLAGS) -r $<
+
+# Implicit rules for building NT device drivers
+
+%.sys: ;
+ $(LD) /nologo @$(mktmp $(LDFLAGS) /Fe$@ $(&:t"\n"s/\/\\) $(PMLIB) $(EXELIBS) $(DEF_LIBS) $(LDENDFLAGS))
+.IF $(DBG)
+.IF $(USE_SOFTICE)
+ $(NMSYM) $(NMSYMFLAGS);$(SI_SOURCE) $@
+.ENDIF
+.ENDIF
+
+# Implicit rule for building a DLL using a response file
+.IF $(IMPORT_DLL)
+.ELSE
+.IF $(NO_RUNTIME)
+%$D: ; $(LD) /nologo @$(mktmp $(LDFLAGS) /Fe$@ $(&:t"\n"s/\/\\) $(EXELIBS) $(DEF_LIBS) $(LDENDFLAGS))
+.ELSE
+%$D: ;
+ makedef -v $*
+ $(LD) /nologo @$(mktmp $(LDFLAGS) /Fe$@ $(&:t"\n"s/\/\\) $(PMLIB) $(EXELIBS) $(DEF_LIBS) $(LDENDFLAGS))
+.IF $(DBG)
+.IF $(USE_SOFTICE)
+ $(NMSYM) $(NMSYMFLAGS);$(SI_SOURCE) $@
+.ENDIF
+.ENDIF
+.ENDIF
+.ENDIF
+
+# Implicit rule for building a library file using response file. Note that
+# we use a special .VCD file that contains the EXPORT definitions for the
+# Microsoft compiler, since the LIB utility automatically adds leading
+# underscores to exported functions.
+.IF $(IMPORT_DLL)
+%$L: ;
+ makedef -v $(?:b)
+ @$(RM) $@
+ $(ILIB) $(ILIBFLAGS) /DEF:$(?:b).def /OUT:$@
+.ELSE
+%$L: ;
+ @$(RM) $@
+ $(LIB) $(LIBFLAGS) /out:$@ @$(mktmp $(&:t"\n")\n)
+.ENDIF
+
+# Implicit rule for building an executable file using response file
+.IF $(USE_WIN32)
+%$E: ;
+ $(LD) /nologo @$(mktmp $(LDFLAGS) /Fe$@ $(&:t"\n"s/\/\\) $(PMLIB) $(EXELIBS) $(DEF_LIBS) $(LDENDFLAGS))
+.IF $(DBG)
+.IF $(USE_SOFTICE)
+ $(NMSYM) $(NMSYMFLAGS);$(SI_SOURCE) $@
+.ENDIF
+.ENDIF
+.ELSE
+%$E: ;
+ @$(LD) /nologo @$(mktmp $(LDFLAGS) /Fe$@ $(&:t"\n"s/\/\\) $(PMLIB) $(EXELIBS) $(DEF_LIBS) $(LDENDFLAGS))
+.IF $(DOSSTYLE)
+ @markphar $@
+.ENDIF
+.ENDIF
diff --git a/board/MAI/bios_emulator/scitech/makedefs/rules/wc16.mk b/board/MAI/bios_emulator/scitech/makedefs/rules/wc16.mk
new file mode 100644
index 00000000000..d1ca9176efd
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/makedefs/rules/wc16.mk
@@ -0,0 +1,79 @@
+#############################################################################
+#
+# SciTech Multi-platform Graphics Library
+#
+# ========================================================================
+#
+# The contents of this file are subject to the SciTech MGL Public
+# License Version 1.0 (the "License"); you may not use this file
+# except in compliance with the License. You may obtain a copy of
+# the License at http://www.scitechsoft.com/mgl-license.txt
+#
+# Software distributed under the License is distributed on an
+# "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+# implied. See the License for the specific language governing
+# rights and limitations under the License.
+#
+# The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+#
+# The Initial Developer of the Original Code is SciTech Software, Inc.
+# All Rights Reserved.
+#
+# ========================================================================
+#
+# Descripton: Rules makefile definitions, which define the rules used to
+# build targets. We include them here at the end of the
+# makefile so the generic project makefiles can override
+# certain things with macros (such as linking C++ programs
+# differently).
+#
+#############################################################################
+
+# Take out PMLIB if we don't need to link with it
+
+.IF $(NO_PMLIB)
+PMLIB :=
+.ENDIF
+
+# Implicit generation rules for making object files
+%$O: %.c ; $(CC) @$(mktmp $(CFLAGS)) $<
+%$O: %$P ; $(CPP) @$(mktmp $(CFLAGS)) $<
+%$O: %$A ; $(AS) @$(mktmp $(ASFLAGS)) $(<:s,/,\)
+
+# Implicit rule for building resource files
+%$R: %.rc ; $(RC) $(RCFLAGS) -r $<
+
+# Implicit rule for building a library file using response file
+.IF $(BUILD_DLL)
+%$L: ;
+ @$(RM) $@
+ $(ILIB) $(ILIBFLAGS) $@ +$?
+.ELIF $(IMPORT_DLL)
+%$L: ;
+ @$(RM) $@
+ $(ILIB) $(ILIBFLAGS) $@ +$?
+.ELSE
+%$L: ;
+ @$(RM) $@
+ $(LIB) $(LIBFLAGS) $@ @$(mktmp,$*.rsp +$(&:t"\n+":s/\/\\)\n)
+.ENDIF
+
+# Implicit rule for building an executable file using response file
+.IF $(USE_WIN16)
+.IF $(BUILD_DLL)
+%$E: ;
+ @trimlib $(mktmp $(LDFLAGS) OP quiet SYS windows_dll\nN $@\nF $(&:t",":s/\/\\)\nLIBR $(EXELIBS:t",")) $*.lnk
+ rclink $(LD) $(RC) $@ $*.lnk
+ @$(RM) -S $(mktmp $*.lnk)
+.ELSE
+%$E: ;
+ @trimlib $(mktmp $(LDFLAGS) OP quiet SYS windows\nN $@\nF $(&:t",":s/\/\\)\nLIBR $(EXELIBS:t",")) $*.lnk
+ rclink $(LD) $(RC) $@ $*.lnk
+ @$(RM) -S $(mktmp $*.lnk)
+.ENDIF
+.ELSE
+%$E: ;
+ @trimlib $(mktmp OP quiet\nN $@\nF $(&:t",":s/\/\\)\nLIBR $(PMLIB) $(EXELIBS:t",")) $*.lnk
+ $(LD) $(LDFLAGS) @$*.lnk
+ @$(RM) -S $(mktmp $*.lnk)
+.ENDIF
diff --git a/board/MAI/bios_emulator/scitech/makedefs/rules/wc32.mk b/board/MAI/bios_emulator/scitech/makedefs/rules/wc32.mk
new file mode 100644
index 00000000000..68bfd83bea2
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/makedefs/rules/wc32.mk
@@ -0,0 +1,265 @@
+#############################################################################
+#
+# SciTech Multi-platform Graphics Library
+#
+# ========================================================================
+#
+# The contents of this file are subject to the SciTech MGL Public
+# License Version 1.0 (the "License"); you may not use this file
+# except in compliance with the License. You may obtain a copy of
+# the License at http://www.scitechsoft.com/mgl-license.txt
+#
+# Software distributed under the License is distributed on an
+# "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+# implied. See the License for the specific language governing
+# rights and limitations under the License.
+#
+# The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+#
+# The Initial Developer of the Original Code is SciTech Software, Inc.
+# All Rights Reserved.
+#
+# ========================================================================
+#
+# Descripton: Rules makefile definitions, which define the rules used to
+# build targets. We include them here at the end of the
+# makefile so the generic project makefiles can override
+# certain things with macros (such as linking C++ programs
+# differently).
+#
+#############################################################################
+
+# Take out PMLIB if we don't need to link with it
+
+.IF $(NO_PMLIB)
+PMLIB :=
+.ENDIF
+
+# Use a larger stack during linking if requested, or use a default stack
+# of 200k. The usual default stack provided by Watcom C++ is *way* to small
+# for real 32 bit code development. We also need a *huge* stack for OpenGL
+# software rendering also!
+.IF $(USE_QNX4)
+ # Not necessary for QNX code.
+.ELSE
+.IF $(STKSIZE)
+ LDFLAGS += OP STACK=$(STKSIZE)
+.ELSE
+ LDFLAGS += OP STACK=204800
+.ENDIF
+.ENDIF
+
+# Turn on runtime type information as necessary
+.IF $(USE_RTTI)
+ CPFLAGS += -xr
+.ENDIF
+
+# Optionally turn on pre-compiled headers
+.IF $(PRECOMP_HDR)
+ CFLAGS += -fhq
+.ENDIF
+
+.IF $(USE_QNX)
+# Whether to link in real VBIOS library, or just the stub library
+.IF $(USE_BIOS)
+VBIOSLIB := vbios.lib,
+.ELSE
+VBIOSLIB := vbstubs.lib,
+.END
+# Require special privledges for Nucleus programs (requires root access)
+.IF $(USE_NUCLEUS)
+LDFLAGS += OP PRIV=1
+.ENDIF
+.ENDIF
+
+# Implicit generation rules for making object files
+.IF $(WC_LIBBASE) == WC10A
+%$O: %.c ; $(CC) $(CFLAGS) $(<:s,/,\)
+%$O: %$P ; $(CPP) $(CFLAGS) $(<:s,/,\)
+.ELSE
+%$O: %.c ; $(CC) @$(mktmp $(CFLAGS:s/\/\\)) $(<:s,/,\)
+%$O: %$P ; $(CPP) @$(mktmp $(CPFLAGS:s/\/\\) $(CFLAGS:s/\/\\)) $(<:s,/,\)
+.ENDIF
+.IF $(USE_NASM)
+%$O: %$A ; $(AS) @$(mktmp -o $@ $(ASFLAGS:s/\/\\)) $(<:s,/,\)
+.ELSE
+%$O: %$A ; $(AS) @$(mktmp $(ASFLAGS:s/\/\\)) $(<:s,/,\)
+.ENDIF
+
+# Implit rule to compile .S assembler files. The first version
+# uses GAS directly and the second uses a pre-processor to
+# produce NASM code.
+
+.IF $(USE_GAS)
+.IF $(WC_LIBBASE) == WC11
+%$O: %$S ; $(GAS) -c @$(mktmp $(GAS_FLAGS:s/\/\\)) $(<:s,/,\)
+.ELSE
+# Black magic to build asm sources with Watcom 10.6 (requires sed)
+%$O: %$S ;
+ $(GAS) -c @$(mktmp $(GAS_FLAGS:s/\/\\)) $(<:s,/,\)
+ wdisasm \\ -a $(*:s,/,\).o > $(*:s,/,\).lst
+ sed -e "s/\.text/_TEXT/; s/\.data/_DATA/; s/\.bss/_BSS/; s/\.386/\.586/; s/lar *ecx,cx/lar ecx,ecx/" $(*:s,/,\).lst > $(*:s,/,\).asm
+ wasm \\ $(WFLAGS) -zq -fr=nul -fp3 -fo=$@ $(*:s,/,\).asm
+ $(RM) -S $(mktmp $(*:s,/,\).o)
+ $(RM) -S $(mktmp $(*:s,/,\).lst)
+ $(RM) -S $(mktmp $(*:s,/,\).asm)
+.ENDIF
+.ELSE
+%$O: %$S ;
+ @gcpp -DNASM_ASSEMBLER -D__WATCOMC__ -EP $(<:s,/,\) > $(*:s,/,\).asm
+ nasm @$(mktmp -f obj -o $@) $(*:s,/,\).asm
+ @$(RM) -S $(mktmp $(*:s,/,\).asm)
+.ENDIF
+
+# Special target to build dllstart.asm using Borland TASM
+dllstart.obj: dllstart.asm
+ $(DLL_TASM) @$(mktmp /t /mx /m /D__FLAT__ /i$(SCITECH)\INCLUDE /q) $(PRIVATE)\src\common\dllstart.asm
+
+# Implicit rule for building resource files
+%$R: %.rc ; $(RC) $(RCFLAGS) -r $<
+
+# Implicit rule for building a DLL using a response file
+.IF $(IMPORT_DLL)
+.ELSE
+.IF $(USE_OS232)
+%$D: ;
+ @trimlib $(mktmp $(LDFLAGS) OP quiet SYS os2v2 dll\nN $@\nF $(&:t",\n":s/\/\\)\nLIBR $(EXELIBS:t",")) $*.lnk
+ rclink $(LD) $(RC) $@ $*.lnk
+.IF $(LEAVE_LINKFILE)
+.ELSE
+ @$(RM) -S $(mktmp *.lnk)
+.ENDIF
+.ELIF $(USE_WIN32)
+%$D: ;
+ @trimlib $(mktmp $(LDFLAGS) OP quiet SYS nt_dll\nN $@\nF $(&:t",\n":s/\/\\)\nLIBR $(PMLIB)$(DEFLIBS)$(EXELIBS:t",")) $*.lnk
+ rclink $(LD) $(RC) $@ $*.lnk
+.IF $(LEAVE_LINKFILE)
+.ELSE
+ @$(RM) -S $(mktmp *.lnk)
+.ENDIF
+.ELSE
+%$D: ;
+ @trimlib $(mktmp $(LDFLAGS) OP quiet SYS win386\nN $*.rex\nF $(&:t",\n":s/\/\\)\nLIBR $(EXELIBS:t",")) $*.lnk
+ rclink $(LD) $(RC) $@ $*.lnk
+ wbind $* -d -q -n
+.IF $(LEAVE_LINKFILE)
+.ELSE
+ @$(RM) -S $(mktmp *.lnk)
+.ENDIF
+.ENDIF
+.ENDIF
+
+# Implicit rule for building a library file using response file
+.IF $(BUILD_DLL)
+%$L: ;
+ @$(RM) $@
+ $(ILIB) $(ILIBFLAGS) $@ +$?
+.ELIF $(IMPORT_DLL)
+%$L: ;
+ @$(RM) $@
+ $(ILIB) $(ILIBFLAGS) $@ +$?
+.ELSE
+%$L: ;
+ @$(RM) $@
+ $(LIB) $(LIBFLAGS) $@ @$(mktmp,$*.rsp +$(&:t"\n+":s/\/\\)\n)
+.ENDIF
+
+# Implicit rule for building an executable file using response file
+.IF $(USE_X32)
+%$E: ;
+ @trimlib $(mktmp OP quiet\nN $@\nF $(&:t",":s/\/\\)\nLIBR $(PMLIB)$(EXELIBS:t",")) $*.lnk
+ $(LD) $(LDFLAGS) @$*.lnk
+ x32fix $@
+.IF $(LEAVE_LINKFILE)
+.ELSE
+ @$(RM) -S $(mktmp *.lnk)
+.ENDIF
+.ELIF $(USE_OS232)
+.IF $(USE_OS2GUI)
+%$E: ;
+ @trimlib $(mktmp $(LDFLAGS) OP quiet SYS os2v2_pm\nN $@\nF $(&:t",":s/\/\\)\nLIBR $(PMLIB)$(EXELIBS:t",")) $*.lnk
+ rclink $(LD) $(RC) $@ $*.lnk
+.IF $(LEAVE_LINKFILE)
+.ELSE
+ @$(RM) -S $(mktmp *.lnk)
+.ENDIF
+.IF $(LXLITE)
+ lxlite $@
+.ENDIF
+.ELSE
+%$E: ;
+ @trimlib $(mktmp $(LDFLAGS) OP quiet SYS os2v2\nN $@\nF $(&:t",":s/\/\\)\nLIBR $(PMLIB)$(EXELIBS:t",")) $*.lnk
+ rclink $(LD) $(RC) $@ $*.lnk
+.IF $(LEAVE_LINKFILE)
+.ELSE
+ @$(RM) -S $(mktmp *.lnk)
+.ENDIF
+.IF $(LXLITE)
+ lxlite $@
+.ENDIF
+.ENDIF
+.ELIF $(USE_SNAP)
+%$E: ;
+ @trimlib $(mktmp $(LDFLAGS) OP quiet SYS nt\nN $@\nF $(&:t",":s/\/\\)\nLIBR $(DEFLIBS)$(EXELIBS:t",")) $*.lnk
+ rclink $(LD) $(RC) $@ $*.lnk
+.IF $(LEAVE_LINKFILE)
+.ELSE
+ @$(RM) -S $(mktmp *.lnk)
+.ENDIF
+.ELIF $(USE_WIN32)
+.IF $(WIN32_GUI)
+%$E: ;
+ @trimlib $(mktmp $(LDFLAGS) OP quiet SYS win95\nN $@\nF $(&:t",":s/\/\\)\nLIBR $(PMLIB)$(DEFLIBS)$(EXELIBS:t",")) $*.lnk
+ rclink $(LD) $(RC) $@ $*.lnk
+.IF $(LEAVE_LINKFILE)
+.ELSE
+ @$(RM) -S $(mktmp *.lnk)
+.ENDIF
+.ELSE
+%$E: ;
+ @trimlib $(mktmp $(LDFLAGS) OP quiet SYS nt\nN $@\nF $(&:t",":s/\/\\)\nLIBR $(PMLIB)$(DEFLIBS)$(EXELIBS:t",")) $*.lnk
+ rclink $(LD) $(RC) $@ $*.lnk
+.IF $(LEAVE_LINKFILE)
+.ELSE
+ @$(RM) -S $(mktmp *.lnk)
+.ENDIF
+.ENDIF
+.ELIF $(USE_WIN386)
+%$E: ;
+ @trimlib $(mktmp $(LDFLAGS) OP quiet SYS win386\nN $*.rex\nF $(&:t",":s/\/\\)\nLIBR $(PMLIB)$(EXELIBS:t",")) $*.lnk
+ rclink $(LD) wbind $*.rex $*.lnk
+.IF $(LEAVE_LINKFILE)
+.ELSE
+ @$(RM) -S $(mktmp *.lnk)
+.ENDIF
+.ELIF $(USE_TNT)
+%$E: ;
+ @trimlib $(mktmp $(LDFLAGS) OP quiet\nN $@\nF $(&:t",":s/\/\\)\nLIBR dosx32.lib,tntapi.lib,$(PMLIB)$(EXELIBS:t",")) $*.lnk
+ $(LD) @$*.lnk
+.IF $(LEAVE_LINKFILE)
+.ELSE
+ @$(RM) -S $(mktmp *.lnk)
+.ENDIF
+.IF $(DOSSTYLE)
+ @markphar $@
+.ENDIF
+.ELIF $(USE_QNX4)
+%$E: ;
+ @trimlib $(mktmp $(LDFLAGS) OP quiet\nN $@\nF $(&:t",":s/\/\\)\nLIBR $(PMLIB)$(VBIOSLIB)$(EXELIBS:t",")) $*.lnk
+ @+if exist $*.exe attrib -s $*.exe > NUL
+ $(LD) @$*.lnk
+ @attrib +s $*.exe
+.IF $(LEAVE_LINKFILE)
+.ELSE
+ @$(RM) -S $(mktmp *.lnk)
+.ENDIF
+.ELSE
+%$E: ;
+ @trimlib $(mktmp $(LDFLAGS) OP quiet\nN $@\nF $(&:t",":s/\/\\)\nLIBR $(PMLIB)$(EXELIBS:t",")) $*.lnk
+ $(LD) @$*.lnk
+.IF $(LEAVE_LINKFILE)
+.ELSE
+ @$(RM) -S $(mktmp *.lnk)
+.ENDIF
+.ENDIF
+
diff --git a/board/MAI/bios_emulator/scitech/makedefs/sc16.mk b/board/MAI/bios_emulator/scitech/makedefs/sc16.mk
new file mode 100644
index 00000000000..099ad45527b
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/makedefs/sc16.mk
@@ -0,0 +1,128 @@
+#############################################################################
+#
+# SciTech Multi-platform Graphics Library
+#
+# ========================================================================
+#
+# The contents of this file are subject to the SciTech MGL Public
+# License Version 1.0 (the "License"); you may not use this file
+# except in compliance with the License. You may obtain a copy of
+# the License at http://www.scitechsoft.com/mgl-license.txt
+#
+# Software distributed under the License is distributed on an
+# "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+# implied. See the License for the specific language governing
+# rights and limitations under the License.
+#
+# The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+#
+# The Initial Developer of the Original Code is SciTech Software, Inc.
+# All Rights Reserved.
+#
+# ========================================================================
+#
+# Descripton: Generic DMAKE startup makefile definitions file. Assumes
+# that the SCITECH environment variable has been set to point
+# to where all our stuff is installed. You should not need
+# to change anything in this file.
+#
+# Symantec C++ 6.x/7.x 16 bit version. Supports 16 bit DOS
+# and 16 bit Windows development.
+#
+#############################################################################
+
+# Include standard startup script definitions
+.IMPORT: SCITECH
+.INCLUDE: "$(SCITECH)\makedefs\startup.mk"
+
+# Import enivornment variables that we use
+.IMPORT .IGNORE : SC_LIBBASE
+
+# Default commands for compiling, assembling linking and archiving
+ CC := sc # C-compiler and flags
+ CFLAGS := -ml -Jm
+.IF $(USE_TASM32)
+ AS := tasm32
+.ELIF $(USE_TASMX)
+ AS := tasmx # Assembler and flags
+.ELSE
+ AS := tasm # Assembler and flags
+.ENDIF
+ ASFLAGS := /t /mx /m /D__COMM__ /iINCLUDE /i$(SCITECH)\INCLUDE
+ LD := sc # Loader and flags
+ LDFLAGS = $(CFLAGS)
+ RC := rcc # WIndows resource compiler
+ RCFLAGS := # Mark as Win32 compatible resources
+ LIB := lib # Librarian
+ LIBFLAGS := /N /B
+ ILIB := implib # Import librarian
+ ILIBFLAGS :=
+
+# Optionally turn on debugging information
+.IF $(DBG)
+ CFLAGS += -g # Turn on debugging for C compiler
+.ELSE
+ ASFLAGS += /q # Suppress object records not needed for linking
+.END
+
+# Optionally turn on optimisations
+.IF $(OPT)
+ CFLAGS += -5 -o+all
+.ELIF $(OPT_SIZE)
+ CFLAGS += -5 -o+space
+.END
+
+# Optionally turn on direct i387 FPU instructions
+
+.IF $(FPU)
+ CFLAGS += -ff -DFPU387
+ ASFLAGS += -DFPU387 -DFPU_REG_RTN
+.END
+
+# Optionally compile a beta release version of a product
+.IF $(BETA)
+ CFLAGS += -DBETA
+ ASFLAGS += -DBETA
+.END
+
+# User a larger stack if requested
+
+.IF $(STKSIZE)
+ LDFLAGS += =$(STKSIZE)
+.ENDIF
+
+# Optionally compile for 16 bit Windows
+.IF $(USE_WIN16)
+.IF $(BUILD_DLL)
+ CFLAGS += -WD -DBUILD_DLL
+ ASFLAGS += -DBUILD_DLL
+.ELSE
+ CFLAGS += -WA
+.ENDIF
+ DX_ASFLAGS += -D__WINDOWS16__
+ LIB_OS = WIN16
+.ELSE
+ USE_REALDOS := 1
+ LIB_OS = DOS16
+.END
+
+# Place to look for PMODE library files
+
+PMLIB := pm.lib
+
+# Define the base directory for library files
+
+.IF $(CHECKED)
+LIB_BASE_DIR := $(SCITECH_LIB)\lib\debug
+CFLAGS += -DCHECKED=1
+.ELSE
+LIB_BASE_DIR := $(SCITECH_LIB)\lib\release
+.ENDIF
+
+# Define where to install library files
+ LIB_BASE := $(LIB_BASE_DIR)\$(LIB_OS)\$(SC_LIBBASE)
+ LIB_DEST := $(LIB_BASE)
+
+# Define which file contains our rules
+
+ RULES_MAK := sc16.mk
diff --git a/board/MAI/bios_emulator/scitech/makedefs/sc32.mk b/board/MAI/bios_emulator/scitech/makedefs/sc32.mk
new file mode 100644
index 00000000000..9ca757088ae
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/makedefs/sc32.mk
@@ -0,0 +1,178 @@
+#############################################################################
+#
+# SciTech Multi-platform Graphics Library
+#
+# ========================================================================
+#
+# The contents of this file are subject to the SciTech MGL Public
+# License Version 1.0 (the "License"); you may not use this file
+# except in compliance with the License. You may obtain a copy of
+# the License at http://www.scitechsoft.com/mgl-license.txt
+#
+# Software distributed under the License is distributed on an
+# "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+# implied. See the License for the specific language governing
+# rights and limitations under the License.
+#
+# The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+#
+# The Initial Developer of the Original Code is SciTech Software, Inc.
+# All Rights Reserved.
+#
+# ========================================================================
+#
+# Descripton: Generic DMAKE startup makefile definitions file. Assumes
+# that the SCITECH environment variable has been set to point
+# to where all our stuff is installed. You should not need
+# to change anything in this file.
+#
+# Symantec C++ 6.x/7.x 32 bit version. Supports the DOSX
+# extender, FlashTek X32 and Phar Lap's TNT DOS Extender
+# and 32 bit Windows development.
+#
+#############################################################################
+
+# Include standard startup script definitions
+.IMPORT: SCITECH
+.INCLUDE: "$(SCITECH)\makedefs\startup.mk"
+
+# Import enivornment variables that we use
+.IMPORT .IGNORE : USE_TNT USE_X32 USE_X32VM SC_LIBBASE
+
+# We are compiling for a 32 bit envionment
+ _32BIT_ := 1
+
+# Default commands for compiling, assembling linking and archiving
+ CC := sc # C-compiler and flags
+ CFLAGS := -Jm
+.IF $(USE_TASM32)
+ AS := tasm32
+.ELIF $(USE_TASMX)
+ AS := tasmx # Assembler and flags
+.ELSE
+ AS := tasm # Assembler and flags
+.ENDIF
+.IF $(USE_WIN32)
+ ASFLAGS := /t /mx /m /D__FLAT__ /iINCLUDE /i$(SCITECH)\INCLUDE
+.ELSE
+ ASFLAGS := /t /mx /m /DES_NOT_DS /D__COMM__ /i$(SCITECH)\INCLUDE
+.ENDIF
+ LD := sc # Loader and flags
+ LD_FLAGS =
+ RC := rcc # WIndows resource compiler
+ RCFLAGS := -32 # Mark as Win32 compatible resources
+ LIB := lib # Librarian
+ LIBFLAGS := /N /B
+ ILIB := implib # Import librarian
+ ILIBFLAGS :=
+
+# Optionally turn on debugging information
+.IF $(DBG)
+ CFLAGS += -g # Turn on debugging for C compiler (FlashView)
+.IF $(USE_TNT)
+ LDFLAGS += -fullsym # Turn on debugging for TNT 386link linker
+.END
+.IF $(USE_X32) or $(USE_X32VM)
+ LDFLAGS += -L/map # Turn on debugging for FlashView debugger
+.END
+.ELSE
+ ASFLAGS += /q # Suppress object records not needed for linking
+.END
+
+# Optionally turn on optimisations
+.IF $(OPT)
+ CFLAGS += -5 -o+all
+.ELIF $(OPT_SIZE)
+ CFLAGS += -5 -o+space
+.END
+
+# Optionally turn on direct i387 FPU instructions
+
+.IF $(FPU)
+ CFLAGS += -ff -DFPU387
+ ASFLAGS += -DFPU387 -DFPU_REG_RTN
+.END
+
+# Optionally compile a beta release version of a product
+.IF $(BETA)
+ CFLAGS += -DBETA
+ ASFLAGS += -DBETA
+.END
+
+# User a larger stack if requested
+
+.IF $(STKSIZE)
+ LDFLAGS += =$(STKSIZE)
+.ENDIF
+
+.IF $(USE_TNT) # Use Phar Lap's TNT DOS Extender
+ CFLAGS += -mp
+ DX_CFLAGS += -DTNT
+ ASFLAGS += /D__FLAT__
+ DX_ASFLAGS += -DTNT
+ LD := 386link
+ LDFLAGS += @sc32.dos -exe $@
+ LIB_OS = DOS32
+.ELIF $(USE_X32VM) # Use FlashTek X-32VM DOS extender
+ CFLAGS += -mx
+ DX_CFLAGS += -DX32VM
+ ASFLAGS += /D__X386__
+ DX_ASFLAGS += -DX32VM
+ LD := sc
+ LDFLAGS += $(CFLAGS) x32v.lib
+ LIB_OS = DOS32
+.ELIF $(USE_X32) # Use FlashTek X-32 DOS extender
+ CFLAGS += -mx
+ DX_CFLAGS += -DX32VM
+ ASFLAGS += /D__X386__
+ DX_ASFLAGS += -DX32VM
+ LD := sc
+ LDFLAGS += $(CFLAGS) x32.lib
+ LIB_OS = DOS32
+.ELIF $(USE_WIN32) # Build 32 bit Windows NT app
+.IF $(BUILD_DLL)
+ CFLAGS += -WD -mn
+ ASFLAGS += -DBUILD_DLL
+.ELSE
+ CFLAGS += -WA -mn
+.ENDIF
+ DX_ASFLAGS += -D__WINDOWS32__
+ LIB_OS = WIN32
+.ELSE # Use default Symantec DOSX extender
+ USE_DOSX := 1
+ USE_REALDOS := 1
+ CFLAGS += -mx
+ DX_CFLAGS += -DDOSX
+ ASFLAGS += /D__X386__
+ DX_ASFLAGS += -DDOSX
+ LD := sc
+ LDFLAGS += $(CFLAGS)
+ LIB_OS = DOS32
+.END
+
+# Place to look for PMODE library files
+
+.IF $(USE_TNT)
+PMLIB := tnt\pm.lib
+.ELIF $(USE_X32)
+PMLIB := x32\pm.lib
+.ELSE
+PMLIB := dosx\pm.lib
+.END
+
+# Define the base directory for library files
+
+.IF $(CHECKED)
+LIB_BASE_DIR := $(SCITECH_LIB)\lib\debug
+CFLAGS += -DCHECKED=1
+.ELSE
+LIB_BASE_DIR := $(SCITECH_LIB)\lib\release
+.ENDIF
+
+# Define where to install library files
+ LIB_BASE := $(LIB_BASE_DIR)\$(LIB_OS)\$(SC_LIBBASE)
+ LIB_DEST := $(LIB_BASE)
+
+# Define which file contains our rules
+
+ RULES_MAK := sc32.mk
diff --git a/board/MAI/bios_emulator/scitech/makedefs/startup.mk b/board/MAI/bios_emulator/scitech/makedefs/startup.mk
new file mode 100644
index 00000000000..1d67a975e85
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/makedefs/startup.mk
@@ -0,0 +1,162 @@
+#############################################################################
+#
+# SciTech Multi-platform Graphics Library
+#
+# ========================================================================
+#
+# The contents of this file are subject to the SciTech MGL Public
+# License Version 1.0 (the "License"); you may not use this file
+# except in compliance with the License. You may obtain a copy of
+# the License at http://www.scitechsoft.com/mgl-license.txt
+#
+# Software distributed under the License is distributed on an
+# "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+# implied. See the License for the specific language governing
+# rights and limitations under the License.
+#
+# The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+#
+# The Initial Developer of the Original Code is SciTech Software, Inc.
+# All Rights Reserved.
+#
+# ========================================================================
+#
+# Descripton: Generic DMAKE startup makefile definitions file. Assumes
+# that the SCITECH environment variable has been set to point
+# to where all our stuff is installed. You should not need
+# to change anything in this file.
+#
+# Common startup script that defines all variables common to
+# all startup scripts. These define the DMAKE runtime
+# environment and the values are dependant on the version of
+# DMAKE in use.
+#
+#############################################################################
+
+# Disable warnings for macros redefined here that were given
+# on the command line.
+__.SILENT := $(.SILENT)
+.SILENT := yes
+
+# Import enivornment variables that we use common to all compilers
+.IMPORT .IGNORE : TEMP SHELL COMSPEC INCLUDE LIB SCITECH PRIVATE SCITECH_LIB
+.IMPORT .IGNORE : DBG OPT OPT_SIZE SHW BETA USE_WIN32 FPU BUILD_DLL BUILD_FOR_DLL
+.IMPORT .IGNORE : IMPORT_DLL USE_TASMX WIN32_GUI USE_WIN16 USE_NASM CHECKED
+.IMPORT .IGNORE : OS2_SHELL SOFTICE_PATH MAX_WARN USE_SOFTICE USE_TASM32
+.IMPORT .IGNORE : DLL_START_TASM USE_SNAP USE_X11 USE_LINUX STATIC_LIBS LIBC
+.IMPORT .IGNORE : SHOW_ARGS BOOT_STRAP_DMAKE
+ TMPDIR := $(TEMP)
+
+# Determine if the host machine is a Windows/DOS or Unix box
+.IF $(COMSPEC)
+ WIN32_HOST := 1
+.ELSE
+ USE_NASM := 1
+ UNIX_HOST := 1
+.ENDIF
+
+# Setup to either user NASM or TASM as the assembler
+.IF $(USE_NASM)
+.ELSE
+ USE_TASM := 1
+.ENDIF
+
+.IF $(UNIX_HOST)
+# Standard file suffix definitions
+#
+# NOTE: Linux/Unix does not require any extenion for executeable files, but you
+# can use an extension if you wish. We use the .exe extension for building
+# executeable files so that we can use implicit rules to make the
+# makefiles simpler and more portable between systems (exe also makes it
+# easier for cross-compile/debugging situations). When you install
+# the files to a local bin directory, you will probably want to remove
+# the .exe extension.
+ L := .a # Libraries
+ E := .exe # Executables for glibc
+ O := .o # Objects
+ A := .asm # Assembler sources
+ S := .s # GNU assembler sources
+ P := .cpp # C++ sources
+
+# File prefix/suffix definitions. The following prefixes are defined, and are
+# used primarily to abstract between the Unix style libXX.a naming convention
+# and the DOS/Windows/OS2 naming convention of XX.lib.
+ LP := lib # LP - Library file prefix (name of file on disk)
+ LL := -l # Library link prefix (name of library on link command line)
+ LE := # Library link suffix (extension of library on link command line)
+
+# We use the Unix shell at all times
+ SHELL := /bin/sh
+ SHELLFLAGS := -c
+
+.ELSE
+# Standard file DOS/Win/OS2 suffix definitions
+ L := .lib # Libraries
+.IF $(USE_SNAP)
+ E := .sxe # Snap Executables
+ D := .sll # Snap Dynamic Link Library file
+.ELSE
+ E := .exe # Executables
+ D := .dll # Dynamic Link Library file
+.ENDIF
+ O := .obj # Objects
+ A := .asm # Assembler sources
+ P := .cpp # C++ sources
+ R := .res # Compiled resource file
+ S := .s # Assyntax.h style assembler
+
+# File prefix/suffix definitions. The following prefixes are defined, and are
+# used primarily to abstract between the Unix style libXX.a naming convention
+# and the DOS/Windows/OS2 naming convention of XX.lib.
+ LP := # LP - Library file prefix (name of file on disk)
+ LL := # Library link prefix (name of library on link command line)
+ LE := .lib # Library link suffix (extension of library on link command line)
+
+# We use the DOS/Win/OS2 style shell at all times
+ SHELL := $(COMSPEC)
+ GROUPSHELL := $(SHELL)
+ SHELLFLAGS := $(SWITCHAR)c
+ GROUPFLAGS := $(SHELLFLAGS)
+ SHELLMETAS := *"?<>
+.IF $(OS2_SHELL)
+ GROUPSUFFIX := .cmd
+.ELSE
+ GROUPSUFFIX := .bat
+.ENDIF
+ DIRSEPSTR := \\
+ DIVFILE = $(TMPFILE:s,/,\)
+
+.ENDIF
+
+# Standard Unix style shell commands. Since these do not exist on
+# regular DOS/Win/OS2 installations we use our own '' versions
+# instead. To boostrtap a new OS you may wish to use the regular
+# unix versions.
+
+.IF $(BOOT_STRAP_DMAKE)
+ CP := cp
+ MD := mkdir
+ RM := rm
+ ECHO := echo
+.ELSE
+ CP := k_cp
+ MD := k_md
+ RM := k_rm
+ ECHO := k_echo
+.ENDIF
+
+# Definition of $(MAKE) macro for recursive makes.
+ MAKE = $(MAKECMD) $(MFLAGS)
+
+# Macro to install a library file
+ INSTALL := $(CP)
+
+# DMAKE uses this recipe to remove intermediate targets
+.REMOVE :; $(RM) -f $<
+
+# Turn warnings back to previous setting.
+.SILENT := $(__.SILENT)
+
+# We dont use TABS in our makefiles
+.NOTABS := yes
+
diff --git a/board/MAI/bios_emulator/scitech/makedefs/va32.mk b/board/MAI/bios_emulator/scitech/makedefs/va32.mk
new file mode 100644
index 00000000000..fbca523922a
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/makedefs/va32.mk
@@ -0,0 +1,163 @@
+#############################################################################
+#
+# SciTech Multi-platform Graphics Library
+#
+# ========================================================================
+#
+# The contents of this file are subject to the SciTech MGL Public
+# License Version 1.0 (the "License"); you may not use this file
+# except in compliance with the License. You may obtain a copy of
+# the License at http://www.scitechsoft.com/mgl-license.txt
+#
+# Software distributed under the License is distributed on an
+# "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+# implied. See the License for the specific language governing
+# rights and limitations under the License.
+#
+# The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+#
+# The Initial Developer of the Original Code is SciTech Software, Inc.
+# All Rights Reserved.
+#
+# ========================================================================
+#
+# Descripton: Generic DMAKE startup makefile definitions file. Assumes
+# that the SCITECH environment variable has been set to point
+# to where all our stuff is installed. You should not need
+# to change anything in this file.
+#
+# IBM VisualAge C++ 3.0 OS/2 32-bit version.
+#
+#############################################################################
+
+# Include standard startup script definitions
+.IMPORT: SCITECH
+.INCLUDE: "$(SCITECH)\makedefs\startup.mk"
+
+# Import enivornment variables that we use
+.IMPORT .IGNORE : VA_LIBBASE USE_OS232 USE_OS2GUI FULLSCREEN NOOPT MAX_WARN
+
+# We are compiling for a 32 bit envionment
+ _32BIT_ := 1
+
+# Default commands for compiling, assembling linking and archiving
+ CC := icc
+ CPP := icc
+ CFLAGS := /Q /G5 /Gl+ /Fi /Si /J- /Ss+ /Sp1 /Gm+ /I.
+.IF $(USE_NASM)
+ AS := nasm
+ ASFLAGS := -t -f obj -F null -d__FLAT__ -dSTDCALL_MANGLE -d__NOU_VAR__ -iINCLUDE -i$(SCITECH)\INCLUDE
+.ELSE
+.IF $(USE_TASM32)
+ AS := tasm32
+.ELIF $(USE_TASMX)
+ AS := tasmx
+.ELSE
+ AS := tasm
+.ENDIF
+ ASFLAGS := /t /mx /m /D__FLAT__ /DSTDCALL_MANGLE /D__NOU_VAR__ /iINCLUDE /i$(SCITECH)\INCLUDE
+.ENDIF
+ LD := ilink
+ LDFLAGS = /noi /exepack:2 /packcode /packdata /align:32 /map /noe
+ RC := rc
+ RCFLAGS := -n -x2
+ LIB := ilib
+ LIBFLAGS := /nologo
+ ILIB := implib
+ ILIBFLAGS := /nologo
+ IPFC := ipfc
+ IPFCFLAGS :=
+ IBMCOBJ := 1
+
+# Set the compiler warning level
+.IF $(MAX_WARN)
+ CFLAGS += /W3
+.ELSE
+ CFLAGS += /W1
+.ENDIF
+
+# Optionally turn on debugging information
+.IF $(DBG)
+ CFLAGS += /Ti
+ LDFLAGS += /DE
+.ELSE
+.IF $(USE_TASM)
+ ASFLAGS += /q
+.ENDIF
+.END
+
+# Optionally turn on optimisations
+.IF $(OPT)
+ CFLAGS += /Gfi /O /Oi
+.ELIF $(OPT_SIZE)
+ CFLAGS += /Gfi /O /Oc
+.ELIF $(NOOPT)
+ CFLAGS += /O-
+.END
+
+# Optionally turn on direct i387 FPU instructions optimised for Pentium
+.IF $(FPU)
+ CFLAGS += -DFPU387
+ ASFLAGS += -dFPU387
+.END
+
+# Optionally compile a beta release version of a product
+.IF $(BETA)
+ CFLAGS += -DBETA
+ ASFLAGS += -dBETA
+.END
+
+# Build 32-bit OS/2 apps
+.IF $(BUILD_DLL)
+ CFLAGS += /Ge- /DBUILD_DLL
+ LDFLAGS += /DLL /NOE
+ ASFLAGS += -dBUILD_DLL
+.ELSE
+.IF $(USE_OS2GUI)
+ CFLAGS += -D__OS2_PM__
+ LDFLAGS += /PMTYPE:PM
+.ELSE
+.IF $(FULLSCREEN)
+ LDFLAGS += /PMTYPE:NOVIO
+.ELSE
+ LDFLAGS += /PMTYPE:VIO
+.ENDIF
+.ENDIF
+.ENDIF
+ DX_ASFLAGS += -d__OS2__
+ LIB_OS = os232
+
+# Place to look for PMODE library files
+
+.IF $(USE_OS2GUI)
+.IF $(USE_SDDPMDLL)
+#Note: This is OK for now but might need to be changed if the GUI PM library
+# were really different
+PMLIB := sddpmlib.lib
+.ELSE
+PMLIB := pm_pm.lib
+.ENDIF
+.ELSE
+.IF $(USE_SDDPMDLL)
+PMLIB := sddpmlib.lib
+.ELSE
+PMLIB := pm.lib
+.ENDIF
+.ENDIF
+
+# Define the base directory for library files
+
+.IF $(CHECKED)
+LIB_BASE_DIR := $(SCITECH_LIB)\lib\debug
+CFLAGS += /DCHECKED=1
+.ELSE
+LIB_BASE_DIR := $(SCITECH_LIB)\lib\release
+.ENDIF
+
+# Define where to install library files
+ LIB_BASE := $(LIB_BASE_DIR)\$(LIB_OS)\$(VA_LIBBASE)
+ LIB_DEST := $(LIB_BASE)
+
+# Define which file contains our rules
+
+ RULES_MAK := va32.mk
diff --git a/board/MAI/bios_emulator/scitech/makedefs/va365.mk b/board/MAI/bios_emulator/scitech/makedefs/va365.mk
new file mode 100644
index 00000000000..3a2eccbbce9
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/makedefs/va365.mk
@@ -0,0 +1,151 @@
+#############################################################################
+#
+# SciTech Multi-platform Graphics Library
+#
+# ========================================================================
+#
+# The contents of this file are subject to the SciTech MGL Public
+# License Version 1.0 (the "License"); you may not use this file
+# except in compliance with the License. You may obtain a copy of
+# the License at http://www.scitechsoft.com/mgl-license.txt
+#
+# Software distributed under the License is distributed on an
+# "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+# implied. See the License for the specific language governing
+# rights and limitations under the License.
+#
+# The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+#
+# The Initial Developer of the Original Code is SciTech Software, Inc.
+# All Rights Reserved.
+#
+# ========================================================================
+#
+# Descripton: Generic DMAKE startup makefile definitions file. Assumes
+# that the SCITECH environment variable has been set to point
+# to where all our stuff is installed. You should not need
+# to change anything in this file.
+#
+# IBM VisualAge C++ 3.65 OS/2 32-bit version.
+#
+#############################################################################
+
+# Include standard startup script definitions
+.IMPORT: SCITECH
+.INCLUDE: "$(SCITECH)\makedefs\startup.mk"
+
+# Import enivornment variables that we use
+.IMPORT .IGNORE : VA_LIBBASE USE_OS232 USE_OS2GUI FULLSCREEN NOOPT MAX_WARN
+
+# We are compiling for a 32 bit envionment
+ _32BIT_ := 1
+
+# Default commands for compiling, assembling linking and archiving
+ CC := icc
+ CPP := icc
+ CFLAGS := /Q /G5l /Fi /Si /J- /Ss+ /Sp1 /Gm+ /I.
+.IF $(USE_NASM)
+ AS := nasm
+ ASFLAGS := -t -f obj -F null -d__FLAT__ -dSTDCALL_MANGLE -d__NOU_VAR__ -iINCLUDE -i$(SCITECH)\INCLUDE
+.ELSE
+.IF $(USE_TASM32)
+ AS := tasm32
+.ELIF $(USE_TASMX)
+ AS := tasmx
+.ELSE
+ AS := tasm
+.ENDIF
+ ASFLAGS := /t /mx /m /D__FLAT__ /DSTDCALL_MANGLE /D__NOU_VAR__ /iINCLUDE /i$(SCITECH)\INCLUDE
+.ENDIF
+ LD := ilink
+ LDFLAGS = /noi /exepack /packcode /packdata /align:32 /map /noe
+ RC := rc
+ RCFLAGS := /nologo
+ LIB := ilib
+ LIBFLAGS := /nologo
+ ILIB := implib
+ ILIBFLAGS := /nologo
+ IBMCOBJ := 1
+
+# Set the compiler warning level
+.IF $(MAX_WARN)
+ CFLAGS += /W3
+.ELSE
+ CFLAGS += /W1
+.ENDIF
+
+# Optionally turn on debugging information
+.IF $(DBG)
+ CFLAGS += /Ti
+ LDFLAGS += /DE
+.ELSE
+.IF $(USE_TASM)
+ ASFLAGS += /q
+.ENDIF
+.END
+
+# Optionally turn on optimisations
+.IF $(OPT)
+ CFLAGS += /Gfi /O /Oi
+.ELIF $(OPT_SIZE)
+ CFLAGS += /Gfi /O /Oc
+.ELIF $(NOOPT)
+ CFLAGS += /O-
+.END
+
+# Optionally turn on direct i387 FPU instructions optimised for Pentium
+.IF $(FPU)
+ CFLAGS += -DFPU387
+ ASFLAGS += -dFPU387
+.END
+
+# Optionally compile a beta release version of a product
+.IF $(BETA)
+ CFLAGS += -DBETA
+ ASFLAGS += -dBETA
+.END
+
+# Build 32-bit OS/2 apps
+.IF $(BUILD_DLL)
+ CFLAGS += /Gme- /DBUILD_DLL
+ LDFLAGS += /DLL /NOE
+ ASFLAGS += -dBUILD_DLL
+.ELSE
+.IF $(USE_OS2GUI)
+ CFLAGS += -D__OS2_PM__
+ LDFLAGS += /PMTYPE:PM
+.ELSE
+.IF $(FULLSCREEN)
+ LDFLAGS += /PMTYPE:NOVIO
+.ELSE
+ LDFLAGS += /PMTYPE:VIO
+.ENDIF
+.ENDIF
+.ENDIF
+ DX_ASFLAGS += -d__OS2__
+ LIB_OS = os232
+
+# Place to look for PMODE library files
+
+.IF $(USE_OS2GUI)
+PMLIB := pm_pm.lib
+.ELSE
+PMLIB := pm.lib
+.ENDIF
+
+# Define the base directory for library files
+
+.IF $(CHECKED)
+LIB_BASE_DIR := $(SCITECH_LIB)\lib\debug
+CFLAGS += /DCHECKED=1
+.ELSE
+LIB_BASE_DIR := $(SCITECH_LIB)\lib\release
+.ENDIF
+
+# Define where to install library files
+ LIB_BASE := $(LIB_BASE_DIR)\$(LIB_OS)\$(VA_LIBBASE)
+ LIB_DEST := $(LIB_BASE)
+
+# Define which file contains our rules
+
+ RULES_MAK := va365.mk
diff --git a/board/MAI/bios_emulator/scitech/makedefs/vc16.mk b/board/MAI/bios_emulator/scitech/makedefs/vc16.mk
new file mode 100644
index 00000000000..913bf9c3e4d
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/makedefs/vc16.mk
@@ -0,0 +1,128 @@
+#############################################################################
+#
+# SciTech Multi-platform Graphics Library
+#
+# ========================================================================
+#
+# The contents of this file are subject to the SciTech MGL Public
+# License Version 1.0 (the "License"); you may not use this file
+# except in compliance with the License. You may obtain a copy of
+# the License at http://www.scitechsoft.com/mgl-license.txt
+#
+# Software distributed under the License is distributed on an
+# "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+# implied. See the License for the specific language governing
+# rights and limitations under the License.
+#
+# The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+#
+# The Initial Developer of the Original Code is SciTech Software, Inc.
+# All Rights Reserved.
+#
+# ========================================================================
+#
+# Descripton: Generic DMAKE startup makefile definitions file. Assumes
+# that the SCITECH environment variable has been set to point
+# to where all our stuff is installed. You should not need
+# to change anything in this file.
+#
+# Microsoft Visual C++ 1.x 16 bit version. Supports 16 bit
+# DOS and Windows development.
+#
+#############################################################################
+
+# Include standard startup script definitions
+.IMPORT: SCITECH
+.INCLUDE: "$(SCITECH)\makedefs\startup.mk"
+
+# Import enivornment variables that we use
+.IMPORT .IGNORE : VC_LIBBASE
+
+# Default commands for compiling, assembling linking and archiving
+ CC := cl # C-compiler and flags
+ CFLAGS := /YX /w /G3 /Gs
+.IF $(USE_TASM32)
+ AS := tasm32
+.ELIF $(USE_TASMX)
+ AS := tasmx # Assembler and flags
+.ELSE
+ AS := tasm # Assembler and flags
+.ENDIF
+ ASFLAGS := /t /mx /m /D__COMM__ /iINCLUDE /i$(SCITECH)\INCLUDE
+ LD := cl # Loader and flags
+ LDFLAGS = $(CFLAGS)
+ RC := rc # WIndows resource compiler
+ RCFLAGS :=
+ LIB := lib # Librarian
+ LIBFLAGS := /NOI /NOE
+ ILIB := implib # Import librarian
+ ILIBFLAGS := /noignorecase
+
+# Optionally turn on debugging information
+.IF $(DBG)
+ CFLAGS += /Yd /Zi # Turn on debugging for C compiler
+ ASFLAGS += /zi # Turn on debugging for assembler
+.ELSE
+ ASFLAGS += /q # Suppress object records not needed for linking
+.END
+
+# Optionally turn on optimisations
+.IF $(OPT)
+ CFLAGS += /Ox
+.END
+
+# Optionally turn on direct i387 FPU instructions
+
+.IF $(FPU)
+ CFLAGS += /FPi87 /DFPU387
+ ASFLAGS += /DFPU387 /DFPU_REG_RTN
+.END
+
+# Optionally compile a beta release version of a product
+.IF $(BETA)
+ CFLAGS += /DBETA
+ ASFLAGS += /DBETA
+.END
+
+# Use a larger stack during linking if requested ???? How the fuck do you
+# specify linker options on the CL command line?????
+
+.IF $(STKSIZE)
+.ENDIF
+
+# Optionally compile for 16 bit Windows
+.IF $(USE_WIN16)
+.IF $(BUILD_DLL)
+ CFLAGS += /GD /Alfw /DBUILD_DLL
+ ASFLAGS += -DBUILD_DLL
+.ELSE
+ CFLAGS += /GA /AL
+.ENDIF
+ DX_ASFLAGS += -D__WINDOWS16__
+ LIB_OS = WIN16
+.ELSE
+ USE_REALDOS := 1
+ CFLAGS += /AL
+ LIB_OS = DOS16
+.END
+
+# Place to look for PMODE library files
+
+PMLIB := pm.lib
+
+# Define the base directory for library files
+
+.IF $(CHECKED)
+LIB_BASE_DIR := $(SCITECH_LIB)\lib\debug
+CFLAGS += -DCHECKED=1
+.ELSE
+LIB_BASE_DIR := $(SCITECH_LIB)\lib\release
+.ENDIF
+
+# Define where to install library files
+ LIB_BASE := $(LIB_BASE_DIR)\$(LIB_OS)\$(VC_LIBBASE)
+ LIB_DEST := $(LIB_BASE)
+
+# Define which file contains our rules
+
+ RULES_MAK := vc16.mk
diff --git a/board/MAI/bios_emulator/scitech/makedefs/vc32.mk b/board/MAI/bios_emulator/scitech/makedefs/vc32.mk
new file mode 100644
index 00000000000..11c9071fb82
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/makedefs/vc32.mk
@@ -0,0 +1,226 @@
+#############################################################################
+#
+# SciTech Multi-platform Graphics Library
+#
+# ========================================================================
+#
+# The contents of this file are subject to the SciTech MGL Public
+# License Version 1.0 (the "License"); you may not use this file
+# except in compliance with the License. You may obtain a copy of
+# the License at http://www.scitechsoft.com/mgl-license.txt
+#
+# Software distributed under the License is distributed on an
+# "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+# implied. See the License for the specific language governing
+# rights and limitations under the License.
+#
+# The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+#
+# The Initial Developer of the Original Code is SciTech Software, Inc.
+# All Rights Reserved.
+#
+# ========================================================================
+#
+# Descripton: Generic DMAKE startup makefile definitions file. Assumes
+# that the SCITECH environment variable has been set to point
+# to where all our stuff is installed. You should not need
+# to change anything in this file.
+#
+# Microsoft Visual C++ 2.x 32 bit version. Supports Phar Lap
+# TNT DOS Extender and 32 bit Windows development.
+#
+#############################################################################
+
+# Include standard startup script definitions
+.IMPORT: SCITECH
+.INCLUDE: "$(SCITECH)\makedefs\startup.mk"
+
+# Import enivornment variables that we use
+.IMPORT .IGNORE : TNT_PATH VC_LIBBASE DOSSTYLE USE_TNT USE_RTTARGET MSVCDIR
+.IMPORT .IGNORE : USE_VXD USE_NTDRV USE_W2KDRV NT_DDKROOT USE_RTTI USE_CPPEXCEPT
+
+# We are compiling for a 32 bit envionment
+ _32BIT_ := 1
+
+# Default commands for compiling, assembling linking and archiving
+ CC := cl # C-compiler and flags
+ CFLAGS :=
+.IF $(USE_NASM)
+ AS := nasm
+ ASFLAGS := -t -f win32 -F null -d__FLAT__ -dSTDCALL_MANGLE -iINCLUDE -i$(SCITECH)\INCLUDE
+.ELSE
+.IF $(USE_TASM32)
+ AS := tasm32
+.ELIF $(USE_TASMX)
+ AS := tasmx # Assembler and flags
+.ELSE
+ AS := tasm # Assembler and flags
+.ENDIF
+ ASFLAGS := /t /mx /m /D__FLAT__ /DSTDCALL_MANGLE /iINCLUDE /i$(SCITECH)\INCLUDE
+.ENDIF
+ LD := cl
+.IF $(USE_WIN32)
+ LDFLAGS = $(CFLAGS)
+.IF $(USE_NTDRV)
+ LDENDFLAGS = -link /INCREMENTAL:NO /DRIVER /SUBSYSTEM:NATIVE,4.00 /VERSION:4.00 /MACHINE:I386 /NODEFAULTLIB /DEBUGTYPE:CV /PDB:NONE /ALIGN:0x20 /BASE:0x10000 /ENTRY:DriverEntry@8
+ #/MERGE:_page=page /MERGE:_text=.text /MERGE:.rdata=.text
+.ELIF $(WIN32_GUI)
+ LDENDFLAGS = -link /INCREMENTAL:NO /DEF:$(@:b).def /SUBSYSTEM:WINDOWS /MACHINE:I386 /DEBUGTYPE:CV /PDB:NONE
+.ELSE
+ LDENDFLAGS = -link /INCREMENTAL:NO /SUBSYSTEM:CONSOLE /MACHINE:I386 /DEBUGTYPE:CV /PDB:NONE
+.ENDIF
+.ELSE
+ LDFLAGS = $(CFLAGS)
+ LDENDFLAGS := -link -stub:$(TNT_PATH:s/\/\\)\\bin\\gotnt.exe /PDB:NONE
+.ENDIF
+ RC := rc # Watcom resource compiler
+ RCFLAGS := # Mark as Win32 compatible resources
+ LIB := lib # Librarian
+ LIBFLAGS :=
+ ILIB := lib # Import librarian
+ ILIBFLAGS := /MACHINE:IX86
+ INTEL_X86 := 1
+ NMSYM := $(SOFTICE_PATH)\nmsym.exe
+.IF $(USE_NTDRV)
+ NMSYMFLAGS := /TRANSLATE:source,package,always /PROMPT /SOURCE:$(MSVCDIR)\crt\src\intel;$(SCITECH)\src\pm;$(SCITECH)\src\pm\common;$(SCITECH)\src\pm\ntdrv
+.ELSE
+ NMSYMFLAGS := /TRANSLATE:source,package,always /PROMPT /SOURCE:$(SCITECH)\src\pm;$(SCITECH)\src\pm\common;$(SCITECH)\src\pm\win32
+.ENDIF
+
+# Set the compiler warning level
+.IF $(MAX_WARN)
+ CFLAGS += -W3
+.ELSE
+ CFLAGS += -W1
+.ENDIF
+
+# Optionally turn on debugging information
+.IF $(DBG)
+ CFLAGS += /Yd /Zi # Turn on debugging for C compiler
+.IF $(USE_TASM)
+ ASFLAGS += /zi # Turn on debugging for assembler
+.ENDIF
+.ELSE
+.IF $(USE_TASM)
+ ASFLAGS += /q # Suppress object records not needed for linking
+.ENDIF
+.END
+
+# Optionally turn on optimisations
+.IF $(VC_LIBBASE) == vc5
+.IF $(OPT)
+ CFLAGS += /G6 /O2 /Ox /Oi-
+.ELIF $(OPT_SIZE)
+ CFLAGS += /G6 /O1
+.END
+.ELSE
+.IF $(OPT)
+ CFLAGS += /G5 /O2 /Ox
+.ELIF $(OPT_SIZE)
+ CFLAGS += /G5 /O1
+.END
+.ENDIF
+
+# Optionally turn on direct i387 FPU instructions
+
+.IF $(FPU)
+ CFLAGS += /DFPU387
+ ASFLAGS += -dFPU387
+.END
+
+# Optionally compile a beta release version of a product
+.IF $(BETA)
+ CFLAGS += /DBETA
+ ASFLAGS += -dBETA
+.END
+
+# Use a larger stack during linking if requested, or use a default stack
+# of 50k. The usual default stack provided by Visual C++ is *way* to small
+# for real 32 bit code development.
+
+.IF $(USE_WIN32)
+ # Not necessary for Win32 code.
+.ELSE
+.IF $(STKSIZE)
+ LDENDFLAGS += /STACK:$(STKSIZE)
+.ELSE
+ LDENDFLAGS += /STACK:51200
+.ENDIF
+.ENDIF
+
+# DOS extender dependant flags
+.IF $(USE_NTDRV) # Build 32 bit Windows NT driver
+ CFLAGS += /LD /Zl /Gy /Gz /GF /D__NT_DRIVER__ /D_X86_=1 /Di386=1
+.IF $(DBG)
+ CFLAGS += /QIf
+.ENDIF
+ ASFLAGS +=
+ DEF_LIBS := int64.lib ntoskrnl.lib hal.lib
+ DX_ASFLAGS += -d__NT_DRIVER__
+.IF $(USE_W2KDRV) # Build 32 bit Windows 2000 driver
+ LIB_OS = W2KDRV
+.ELSE
+ LIB_OS = NTDRV
+.ENDIF
+.ELIF $(USE_WIN32) # Build 32 bit Windows NT app
+.IF $(WIN32_GUI)
+.ELSE
+ CFLAGS += -D__CONSOLE__
+.ENDIF
+.IF $(BUILD_DLL)
+ CFLAGS += /MT /LD /DBUILD_DLL
+ ASFLAGS += -dBUILD_DLL
+.IF $(NO_RUNTIME)
+ LDENDFLAGS += /NODEFAULTLIB
+ CFLAGS += /Zl
+ DEF_LIBS :=
+.ELSE
+ DEF_LIBS := kernel32.lib user32.lib gdi32.lib advapi32.lib shell32.lib winmm.lib comdlg32.lib comctl32.lib ole32.lib oleaut32.lib version.lib winspool.lib uuid.lib odbc32.lib odbccp32.lib wsock32.lib rpcrt4.lib
+.ENDIF
+.ELSE
+ CFLAGS += /MT
+ DEF_LIBS := kernel32.lib user32.lib gdi32.lib advapi32.lib shell32.lib winmm.lib comdlg32.lib comctl32.lib ole32.lib oleaut32.lib version.lib winspool.lib uuid.lib odbc32.lib odbccp32.lib wsock32.lib rpcrt4.lib
+.ENDIF
+ DX_ASFLAGS += -d__WINDOWS32__
+ LIB_OS = WIN32
+.ELIF $(USE_RTTARGET)
+ CFLAGS += -D__RTTARGET__
+ DX_CFLAGS +=
+ DX_ASFLAGS += -d__RTTARGET__
+ USE_REALDOS :=
+ LIB_OS = RTT32
+ DEF_LIBS := cw32mt.lib
+.ELSE
+ USE_TNT := 1
+ USE_REALDOS := 1
+ CFLAGS += /MT /D__MSDOS32__
+ DX_CFLAGS += -DTNT
+ DX_ASFLAGS += -dTNT
+ LIB_OS = DOS32
+ DEF_LIBS := dosx32.lib tntapi.lib
+.ENDIF
+
+# Define the base directory for library files
+
+.IF $(CHECKED)
+LIB_BASE_DIR := $(SCITECH_LIB)\lib\debug
+CFLAGS += /DCHECKED=1
+.ELSE
+LIB_BASE_DIR := $(SCITECH_LIB)\lib\release
+.ENDIF
+
+# Define where to install library files
+ LIB_BASE := $(LIB_BASE_DIR)\$(LIB_OS)\$(VC_LIBBASE)
+ LIB_DEST := $(LIB_BASE)
+
+# Place to look for PMODE library files
+
+.IF $(USE_TNT)
+PMLIB := $(LIB_BASE:s/\/\\)\\tnt\\pm.lib
+.ELSE
+PMLIB := $(LIB_BASE:s/\/\\)\\pm.lib
+.ENDIF
+
+# Define which file contains our rules
+
+ RULES_MAK := vc32.mk
diff --git a/board/MAI/bios_emulator/scitech/makedefs/wc16.mk b/board/MAI/bios_emulator/scitech/makedefs/wc16.mk
new file mode 100644
index 00000000000..e316f4c7609
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/makedefs/wc16.mk
@@ -0,0 +1,141 @@
+#############################################################################
+#
+# SciTech Multi-platform Graphics Library
+#
+# ========================================================================
+#
+# The contents of this file are subject to the SciTech MGL Public
+# License Version 1.0 (the "License"); you may not use this file
+# except in compliance with the License. You may obtain a copy of
+# the License at http://www.scitechsoft.com/mgl-license.txt
+#
+# Software distributed under the License is distributed on an
+# "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+# implied. See the License for the specific language governing
+# rights and limitations under the License.
+#
+# The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+#
+# The Initial Developer of the Original Code is SciTech Software, Inc.
+# All Rights Reserved.
+#
+# ========================================================================
+#
+# Descripton: Generic DMAKE startup makefile definitions file. Assumes
+# that the SCITECH environment variable has been set to point
+# to where all our stuff is installed. You should not need
+# to change anything in this file.
+#
+# Watcom C++ 10.x 16 bit version. Supports 16-bit DOS,
+# 16-bit Windows development and 16-bit OS/2 development.
+#
+#############################################################################
+
+# Include standard startup script definitions
+.IMPORT: SCITECH
+.INCLUDE: "$(SCITECH)\makedefs\startup.mk"
+
+# Import enivornment variables that we use
+.IMPORT .IGNORE : WC_LIBBASE USE_WIN16 USE_OS216 USE_OS2GUI
+
+# Default commands for compiling, assembling linking and archiving
+ CC := wcc # C-compiler and flags
+ CPP := wpp # C++-compiler and flags
+ CFLAGS := -ml-zq-j-w2-s-fh -fhq
+.IF $(USE_TASM32)
+ AS := tasm32
+.ELIF $(USE_TASMX)
+ AS := tasmx # Assembler and flags
+.ELSE
+ AS := tasm # Assembler and flags
+.ENDIF
+ AS := tasm # Assembler and flags
+ ASFLAGS := /t /mx /m /D__LARGE__ /iINCLUDE /i$(SCITECH)\INCLUDE
+ LD := wlink # Loader and flags
+ LDFLAGS =
+ RC := wrc # Watcom resource compiler
+ RCFLAGS := /bt=windows
+ LIB := wlib # Librarian
+ LIBFLAGS := -q
+ ILIB := wlib # Import librarian
+ ILIBFLAGS := -c
+
+# Optionally turn on debugging information
+.IF $(DBG)
+ CFLAGS += -d2 # Turn on debugging for C compiler
+ LIBFLAGS += -p=128 # Larger page size for libraries with debug info!
+ ASFLAGS += /zi # Turn on debugging for assembler
+ LDFLAGS += D A # Turn on debugging for linker
+.ELSE
+ ASFLAGS += /q # Suppress object records not needed for linking
+.END
+
+# Optionally turn on optimisations
+.IF $(OPT)
+ CFLAGS += -onatx-5
+.ELIF $(OPT_SIZE)
+ CFLAGS += -onaslmr-5
+.END
+
+# Optionally turn on direct i387 FPU instructions optimised for Pentium
+
+.IF $(FPU)
+ CFLAGS += -fpi87-fp5-DFPU387
+ ASFLAGS += -DFPU387
+.END
+
+# Optionally compile a beta release version of a product
+.IF $(BETA)
+ CFLAGS += -DBETA
+ ASFLAGS += -DBETA
+.END
+
+# Use a larger stack during linking if requested
+
+.IF $(STKSIZE)
+ LDFLAGS += OP STACK=$(STKSIZE)
+.ENDIF
+
+.IF $(USE_OS216)
+.IF $(BUILD_DLL)
+ CFLAGS += -bd-bt=os2-DBUILD_DLL
+ ASFLAGS += -DBUILD_DLL
+.ELSE
+ CFLAGS += -bt=os2
+.ENDIF
+ DX_ASFLAGS += -D__OS216__
+ LIB_OS = os216
+.ELIF $(USE_WIN16)
+.IF $(BUILD_DLL)
+ CFLAGS += -bd-bt=windows-D_WINDOWS-DBUILD_DLL
+ ASFLAGS += -DBUILD_DLL
+.ELSE
+ CFLAGS += -bt=windows-D_WINDOWS
+.ENDIF
+ DX_ASFLAGS += -D__WINDOWS16__
+ LIB_OS = WIN16
+.ELSE
+ USE_REALDOS := 1
+ LIB_OS = DOS16
+.END
+
+# Place to look for PMODE library files
+
+PMLIB := pm.lib,
+
+# Define the base directory for library files
+
+.IF $(CHECKED)
+LIB_BASE_DIR := $(SCITECH_LIB)\lib\debug
+CFLAGS += -DCHECKED=1
+.ELSE
+LIB_BASE_DIR := $(SCITECH_LIB)\lib\release
+.ENDIF
+
+# Define where to install library files
+ LIB_BASE := $(LIB_BASE_DIR)\$(LIB_OS)\$(WC_LIBBASE)
+ LIB_DEST := $(LIB_BASE)
+
+# Define which file contains our rules
+
+ RULES_MAK := wc16.mk
diff --git a/board/MAI/bios_emulator/scitech/makedefs/wc32.mk b/board/MAI/bios_emulator/scitech/makedefs/wc32.mk
new file mode 100644
index 00000000000..ff035117be1
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/makedefs/wc32.mk
@@ -0,0 +1,354 @@
+#############################################################################
+#
+# SciTech Multi-platform Graphics Library
+#
+# ========================================================================
+#
+# The contents of this file are subject to the SciTech MGL Public
+# License Version 1.0 (the "License"); you may not use this file
+# except in compliance with the License. You may obtain a copy of
+# the License at http://www.scitechsoft.com/mgl-license.txt
+#
+# Software distributed under the License is distributed on an
+# "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+# implied. See the License for the specific language governing
+# rights and limitations under the License.
+#
+# The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+#
+# The Initial Developer of the Original Code is SciTech Software, Inc.
+# All Rights Reserved.
+#
+# ========================================================================
+#
+# Descripton: Generic DMAKE startup makefile definitions file. Assumes
+# that the SCITECH environment variable has been set to point
+# to where all our stuff is installed. You should not need
+# to change anything in this file.
+#
+# Watcom C++ 10.x 32 bit version. Supports Rational's DOS4GW
+# DOS Extender, PMODE/W, Causeway, FlashTek's X32-VM,
+# Phar Lap's TNT DOS Extender, 32-bit Windows development and
+# 32-bit OS/2 development.
+#
+#############################################################################
+
+# Include standard startup script definitions
+.IMPORT: SCITECH
+.INCLUDE: "$(SCITECH)\makedefs\startup.mk"
+
+# Import enivornment variables that we use
+.IMPORT .IGNORE : USE_TNT USE_X32 USE_X32VM USE_PMODEW STKCALL USE_CAUSEWAY
+.IMPORT .IGNORE : USE_WIN386 USE_OS232 USE_OS2GUI WC_LIBBASE NOOPT DOSSTYLE
+.IMPORT .IGNORE : OS2_SHELL USE_CODEVIEW USE_DOS32A USE_QNX4 LEAVE_LINKFILE
+
+# We are compiling for a 32 bit envionment
+ _32BIT_ := 1
+
+# Setup special environment for QNX 4 (Unix'ish)
+.IF $(USE_QNX4)
+ USE_QNX := 1
+ L := .a # Libraries
+ LP := lib # LP - Library file prefix (name of file on disk)
+ LL := lib # Library link prefix (name of library on link command line)
+ LE := .a # Library link suffix (extension of library on link command line)
+.ENDIF
+
+# Default commands for compiling, assembling linking and archiving
+ CC := wcc386
+ CPP := wpp386
+ CFLAGS := -zq-j-s-fpi87
+.IF $(USE_NASM)
+ AS := nasm
+ ASFLAGS := -t -f obj -d__FLAT__ -dSTDCALL_MANGLE -iINCLUDE -i$(SCITECH)\INCLUDE
+.ELSE
+.IF $(USE_TASM32)
+ AS := tasm32
+ DLL_TASM := tasm32
+.ELIF $(USE_TASMX)
+ AS := tasmx
+ DLL_TASM := tasmx
+.ELSE
+ AS := tasm
+ DLL_TASM := tasm
+.ENDIF
+ ASFLAGS := /t /mx /m /w-res /w-mcp /D__FLAT__ /DSTDCALL_MANGLE /iINCLUDE /i$(SCITECH)\INCLUDE
+ GAS := gcc
+ GAS_FLAGS := -D__WATCOMC__ -D__SW_3S -D__SW_S -U__GNUC__ -UDJGPP -U__unix__ -Wall -I. -I$(SCITECH)\include -x assembler-with-cpp
+.ENDIF
+ LD := wlink
+ LDFLAGS =
+.IF $(USE_OS232)
+ RC := rc
+.ELSE
+ RC := wrc
+.ENDIF
+.IF $(USE_WIN32)
+ RCFLAGS := -q /bt=nt
+.ELIF $(USE_OS232)
+.IF $(USE_OS2GUI)
+ CFLAGS += -D__OS2_PM__
+.ENDIF
+.ELSE
+ RCFLAGS := -q
+.ENDIF
+ LIB := wlib
+ LIBFLAGS := -q
+ ILIB := wlib
+ ILIBFLAGS := -c
+ INTEL_X86 := 1
+
+# Set the compiler warning level
+.IF $(MAX_WARN)
+ CFLAGS += -w4
+.ELSE
+ CFLAGS += -w1
+.ENDIF
+
+# Optionally turn on debugging information (Codeview format)
+.IF $(DBG)
+.IF $(USE_WIN32)
+.IF $(USE_CODEVIEW)
+ CFLAGS += -d2 -hc
+ LDFLAGS += D CODEVIEW OPT CVPACK
+.ELSE
+ CFLAGS += -d2
+ LDFLAGS += D A
+.ENDIF
+.ELSE
+ CFLAGS += -d2
+ LDFLAGS += D A
+.ENDIF
+ LIBFLAGS += -p=768
+.IF $(USE_NASM)
+ ASFLAGS += -F borland -g
+.ELSE
+.IF $(USE_TASM32)
+ ASFLAGS += /q # TASM32 fucks up Watcom C++ debug info
+.ELIF $(OS2_SHELL)
+ ASFLAGS += /q # TASM for OS/2 fucks up Watcom C++ debug info
+.ELSE
+ ASFLAGS += /zi
+.ENDIF
+.ENDIF
+.ELSE
+.IF $(USE_NASM)
+ ASFLAGS += -F null
+.ELSE
+ ASFLAGS += /q
+.ENDIF
+.END
+
+# Optionally turn on optimisations (with or without stack conventions)
+.IF $(STKCALL)
+.IF $(OPT)
+ CFLAGS += -onatx-5s-fp5
+.ELIF $(OPT_SIZE)
+ CFLAGS += -onaslmr-5s-fp5
+.ELIF $(NOOPT)
+ CFLAGS += -od-5s
+.ELSE
+ CFLAGS += -3s
+.END
+.ELSE
+.IF $(OPT)
+ CFLAGS += -onatx-5r-fp5
+.ELIF $(OPT_SIZE)
+ CFLAGS += -onaslmr-5r-fp5
+.ELIF $(NOOPT)
+ CFLAGS += -od-5r
+.END
+.END
+
+# Optionally turn on direct i387 FPU instructions optimised for Pentium
+.IF $(FPU)
+ CFLAGS += -DFPU387
+ ASFLAGS += -dFPU387
+.END
+
+# Optionally compile a beta release version of a product
+.IF $(BETA)
+ CFLAGS += -DBETA
+ ASFLAGS += -dBETA
+.END
+
+.IF $(USE_TNT) # Use Phar Lap's TNT DOS Extender
+ CFLAGS += -bt=nt -DTNT
+ ASFLAGS += -dTNT
+ LDFLAGS += SYS NT OP STUB=GOTNT.EXE
+ LIB_OS = DOS32
+.ELIF $(USE_X32VM) # Use FlashTek X-32VM DOS extender
+ CFLAGS += -bt=dos
+ LDFLAGS += SYS X32RV
+ DX_CFLAGS += -DX32VM
+ DX_ASFLAGS += -dX32VM
+ LIB_OS = DOS32
+.ELIF $(USE_X32) # Use FlashTek X-32 DOS extender
+ CFLAGS += -bt=dos
+ LDFLAGS += SYS X32R
+ DX_CFLAGS += -DX32VM
+ DX_ASFLAGS += -dX32VM
+ LIB_OS = DOS32
+.ELIF $(USE_QNX4) # Build QNX 4 app
+ CFLAGS += -bt=qnx386
+ LDFLAGS += SYS QNX386FLAT OP CASEEXACT OP OFFSET=40k OP STACK=32k
+ CFLAGS += -D__QNX__ -D__UNIX__
+ ASFLAGS += -d__QNX__ -d__UNIX__
+ LIB_OS = QNX4
+.ELIF $(USE_OS232)
+.IF $(BUILD_DLL)
+ CFLAGS += -bm-bd-bt=os2-sg-DBUILD_DLL
+ ASFLAGS += -dBUILD_DLL
+.ELSE
+ CFLAGS += -bm-bt=os2-sg
+.ENDIF
+ DX_ASFLAGS += -d__OS2__
+ LIB_OS = os232
+.ELIF $(USE_SNAP) # Build 32 bit Snap app
+.IF $(BUILD_DLL)
+ CFLAGS += -bm-bd-bt=nt-DBUILD_DLL
+ ASFLAGS += -dBUILD_DLL
+.ELSE
+ CFLAGS += -bm-bt=nt-D_WIN32
+.ENDIF
+ LDFLAGS += OP nodefaultlibs
+.IF $(STKCALL)
+ DEFLIBS := clib3s.lib,math3s.lib,noemu387.lib,
+.ELSE
+ DEFLIBS := clib3r.lib,math3r.lib,noemu387.lib,
+.ENDIF
+ LIB_OS = SNAP
+.ELIF $(USE_WIN32) # Build 32 bit Windows NT app
+.IF $(WIN32_GUI)
+.ELSE
+ CFLAGS += -D__CONSOLE__
+.ENDIF
+.IF $(BUILD_DLL)
+ CFLAGS += -bm-bd-bt=nt-sg-DBUILD_DLL -D_WIN32
+ ASFLAGS += -dBUILD_DLL
+.ELSE
+ CFLAGS += -bm-bt=nt-sg-D_WIN32
+.ENDIF
+ DX_ASFLAGS += -d__WINDOWS32__
+ LIB_OS = WIN32
+ DEFLIBS := kernel32.lib,user32.lib,gdi32.lib,advapi32.lib,shell32.lib,winmm.lib,comdlg32.lib,comctl32.lib,ole32.lib,oleaut32.lib,version.lib,winspool.lib,uuid.lib,wsock32.lib,rpcrt4.lib,
+.ELIF $(USE_WIN386) # Build 32 bit Win386 extended app
+.IF $(BUILD_DLL)
+ CFLAGS += -bd-bt=windows-DBUILD_DLL
+ ASFLAGS += -dBUILD_DLL
+.ELSE
+ CFLAGS += -bt=windows
+.ENDIF
+ DX_ASFLAGS += -d__WIN386__
+ LIB_OS = WIN386
+.ELIF $(USE_PMODEW) # PMODE/W
+ CFLAGS += -bt=dos
+ USE_DOS4GW := 1
+ USE_REALDOS := 1
+ LDFLAGS += SYS PMODEW
+ DX_CFLAGS += -DDOS4GW
+ DX_ASFLAGS += -dDOS4GW
+ LIB_OS = DOS32
+.ELIF $(USE_CAUSEWAY) # Causeway
+ CFLAGS += -bt=dos
+ USE_DOS4GW := 1
+ USE_REALDOS := 1
+ LDFLAGS += SYS CAUSEWAY
+ DX_CFLAGS += -DDOS4GW
+ DX_ASFLAGS += -dDOS4GW
+ LIB_OS = DOS32
+.ELIF $(USE_DOS32A) # DOS32/A
+ CFLAGS += -bt=dos
+ USE_DOS4GW := 1
+ USE_REALDOS := 1
+ LDFLAGS += SYS DOS32A
+ DX_CFLAGS += -DDOS4GW
+ DX_ASFLAGS += -dDOS4GW
+ LIB_OS = DOS32
+.ELSE # Use DOS4GW
+ CFLAGS += -bt=dos
+ USE_DOS4GW := 1
+ USE_REALDOS := 1
+ LDFLAGS += SYS DOS4G
+ DX_CFLAGS += -DDOS4GW
+ DX_ASFLAGS += -dDOS4GW
+ LIB_OS = DOS32
+.END
+
+# Disable linking to default C runtime library and PM library
+
+.IF $(NO_RUNTIME)
+LDFLAGS += OP nodefaultlibs
+DEFLIBS :=
+.ELSE
+
+# Place to look for PM library files
+
+.IF $(USE_SNAP) # Build 32 bit Snap app or dll
+PMLIB :=
+.ELIF $(USE_WIN32)
+.IF $(STKCALL)
+PMLIB := spm.lib,
+.ELSE
+PMLIB := pm.lib,
+.ENDIF
+.ELIF $(USE_OS232)
+.IF $(STKCALL)
+.IF $(USE_OS2GUI)
+PMLIB := spm_pm.lib,
+.ELSE
+PMLIB := spm.lib,
+.ENDIF
+.ELSE
+.IF $(USE_OS2GUI)
+PMLIB := pm_pm.lib,
+.ELSE
+PMLIB := pm.lib,
+.ENDIF
+.ENDIF
+.ELIF $(USE_QNX4)
+.IF $(STKCALL)
+PMLIB := libspm.a,
+.ELSE
+PMLIB := libpm.a,
+.ENDIF
+.ELIF $(USE_TNT)
+.IF $(STKCALL)
+PMLIB := tnt\spm.lib,
+.ELSE
+PMLIB := tnt\pm.lib,
+.ENDIF
+.ELIF $(USE_X32)
+.IF $(STKCALL)
+PMLIB := x32\spm.lib,
+.ELSE
+PMLIB := x32\pm.lib,
+.ENDIF
+.ELSE
+.IF $(STKCALL)
+PMLIB := dos4gw\spm.lib,
+.ELSE
+PMLIB := dos4gw\pm.lib,
+.ENDIF
+.ENDIF
+.ENDIF
+
+# Define the base directory for library files
+
+.IF $(CHECKED)
+LIB_BASE_DIR := $(SCITECH_LIB)\lib\debug
+CFLAGS += -DCHECKED=1
+.ELSE
+LIB_BASE_DIR := $(SCITECH_LIB)\lib\release
+.ENDIF
+
+# Define where to install library files
+ LIB_BASE := $(LIB_BASE_DIR)\$(LIB_OS)\$(WC_LIBBASE)
+ LIB_DEST := $(LIB_BASE)
+
+ LDFLAGS += op map
+
+# Define which file contains our rules
+
+ RULES_MAK := wc32.mk
+
diff --git a/board/MAI/bios_emulator/scitech/src/biosemu/besys.c b/board/MAI/bios_emulator/scitech/src/biosemu/besys.c
new file mode 100644
index 00000000000..7f7ea999393
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/biosemu/besys.c
@@ -0,0 +1,408 @@
+/****************************************************************************
+*
+* BIOS emulator and interface
+* to Realmode X86 Emulator Library
+*
+* Copyright (C) 1996-1999 SciTech Software, Inc.
+*
+* ========================================================================
+*
+* Permission to use, copy, modify, distribute, and sell this software and
+* its documentation for any purpose is hereby granted without fee,
+* provided that the above copyright notice appear in all copies and that
+* both that copyright notice and this permission notice appear in
+* supporting documentation, and that the name of the authors not be used
+* in advertising or publicity pertaining to distribution of the software
+* without specific, written prior permission. The authors makes no
+* representations about the suitability of this software for any purpose.
+* It is provided "as is" without express or implied warranty.
+*
+* THE AUTHORS DISCLAIMS ALL WARRANTIES WITH REGARD TO THIS SOFTWARE,
+* INCLUDING ALL IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS, IN NO
+* EVENT SHALL THE AUTHORS BE LIABLE FOR ANY SPECIAL, INDIRECT OR
+* CONSEQUENTIAL DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF
+* USE, DATA OR PROFITS, WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE OR
+* OTHER TORTIOUS ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE OR
+* PERFORMANCE OF THIS SOFTWARE.
+*
+* ========================================================================
+*
+* Language: ANSI C
+* Environment: Any
+* Developer: Kendall Bennett
+*
+* Description: This file includes BIOS emulator I/O and memory access
+* functions.
+*
+****************************************************************************/
+
+#include "biosemui.h"
+
+/*------------------------------- Macros ----------------------------------*/
+
+/* Macros to read and write values to x86 bus memory. Replace these as
+ * necessary if you need to do something special to access memory over
+ * the bus on a particular processor family.
+ */
+
+#define readb(base,off) *((u8*)((u32)(base) + (off)))
+#define readw(base,off) *((u16*)((u32)(base) + (off)))
+#define readl(base,off) *((u32*)((u32)(base) + (off)))
+#define writeb(v,base,off) *((u8*)((u32)(base) + (off))) = (v)
+#define writew(v,base,off) *((u16*)((u32)(base) + (off))) = (v)
+#define writel(v,base,off) *((u32*)((u32)(base) + (off))) = (v)
+
+/*----------------------------- Implementation ----------------------------*/
+
+#ifdef DEBUG
+# define DEBUG_MEM() (M.x86.debug & DEBUG_MEM_TRACE_F)
+#else
+# define DEBUG_MEM()
+#endif
+
+/****************************************************************************
+PARAMETERS:
+addr - Emulator memory address to read
+
+RETURNS:
+Byte value read from emulator memory.
+
+REMARKS:
+Reads a byte value from the emulator memory. We have three distinct memory
+regions that are handled differently, which this function handles.
+****************************************************************************/
+u8 X86API BE_rdb(
+ u32 addr)
+{
+ u8 val = 0;
+
+ if (addr >= 0xC0000 && addr <= _BE_env.biosmem_limit) {
+ val = *(u8*)(_BE_env.biosmem_base + addr - 0xC0000);
+ }
+ else if (addr >= 0xA0000 && addr <= 0xFFFFF) {
+ val = readb(_BE_env.busmem_base, addr - 0xA0000);
+ }
+ else if (addr > M.mem_size - 1) {
+DB( printk("mem_read: address %#lx out of range!\n", addr);)
+ HALT_SYS();
+ }
+ else {
+ val = *(u8*)(M.mem_base + addr);
+ }
+DB( if (DEBUG_MEM())
+ printk("%#08x 1 -> %#x\n", addr, val);)
+ return val;
+}
+
+/****************************************************************************
+PARAMETERS:
+addr - Emulator memory address to read
+
+RETURNS:
+Word value read from emulator memory.
+
+REMARKS:
+Reads a word value from the emulator memory. We have three distinct memory
+regions that are handled differently, which this function handles.
+****************************************************************************/
+u16 X86API BE_rdw(
+ u32 addr)
+{
+ u16 val = 0;
+
+ if (addr >= 0xC0000 && addr <= _BE_env.biosmem_limit) {
+#ifdef __BIG_ENDIAN__
+ if (addr & 0x1) {
+ addr -= 0xC0000;
+ val = ( *(u8*)(_BE_env.biosmem_base + addr) |
+ (*(u8*)(_BE_env.biosmem_base + addr + 1) << 8));
+ }
+ else
+#endif
+ val = *(u16*)(_BE_env.biosmem_base + addr - 0xC0000);
+ }
+ else if (addr >= 0xA0000 && addr <= 0xFFFFF) {
+#ifdef __BIG_ENDIAN__
+ if (addr & 0x1) {
+ addr -= 0xA0000;
+ val = ( readb(_BE_env.busmem_base, addr) |
+ (readb(_BE_env.busmem_base, addr + 1) << 8));
+ }
+ else
+#endif
+ val = readw(_BE_env.busmem_base, addr - 0xA0000);
+ }
+ else if (addr > M.mem_size - 2) {
+DB( printk("mem_read: address %#lx out of range!\n", addr);)
+ HALT_SYS();
+ }
+ else {
+#ifdef __BIG_ENDIAN__
+ if (addr & 0x1) {
+ val = ( *(u8*)(M.mem_base + addr) |
+ (*(u8*)(M.mem_base + addr + 1) << 8));
+ }
+ else
+#endif
+ val = *(u16*)(M.mem_base + addr);
+ }
+DB( if (DEBUG_MEM())
+ printk("%#08x 2 -> %#x\n", addr, val);)
+ return val;
+}
+
+/****************************************************************************
+PARAMETERS:
+addr - Emulator memory address to read
+
+RETURNS:
+Long value read from emulator memory.
+
+REMARKS:
+Reads a long value from the emulator memory. We have three distinct memory
+regions that are handled differently, which this function handles.
+****************************************************************************/
+u32 X86API BE_rdl(
+ u32 addr)
+{
+ u32 val = 0;
+
+ if (addr >= 0xC0000 && addr <= _BE_env.biosmem_limit) {
+#ifdef __BIG_ENDIAN__
+ if (addr & 0x3) {
+ addr -= 0xC0000;
+ val = ( *(u8*)(_BE_env.biosmem_base + addr + 0) |
+ (*(u8*)(_BE_env.biosmem_base + addr + 1) << 8) |
+ (*(u8*)(_BE_env.biosmem_base + addr + 2) << 16) |
+ (*(u8*)(_BE_env.biosmem_base + addr + 3) << 24));
+ }
+ else
+#endif
+ val = *(u32*)(_BE_env.biosmem_base + addr - 0xC0000);
+ }
+ else if (addr >= 0xA0000 && addr <= 0xFFFFF) {
+#ifdef __BIG_ENDIAN__
+ if (addr & 0x3) {
+ addr -= 0xA0000;
+ val = ( readb(_BE_env.busmem_base, addr) |
+ (readb(_BE_env.busmem_base, addr + 1) << 8) |
+ (readb(_BE_env.busmem_base, addr + 2) << 16) |
+ (readb(_BE_env.busmem_base, addr + 3) << 24));
+ }
+ else
+#endif
+ val = readl(_BE_env.busmem_base, addr - 0xA0000);
+ }
+ else if (addr > M.mem_size - 4) {
+DB( printk("mem_read: address %#lx out of range!\n", addr);)
+ HALT_SYS();
+ }
+ else {
+#ifdef __BIG_ENDIAN__
+ if (addr & 0x3) {
+ val = ( *(u8*)(M.mem_base + addr + 0) |
+ (*(u8*)(M.mem_base + addr + 1) << 8) |
+ (*(u8*)(M.mem_base + addr + 2) << 16) |
+ (*(u8*)(M.mem_base + addr + 3) << 24));
+ }
+ else
+#endif
+ val = *(u32*)(M.mem_base + addr);
+ }
+DB( if (DEBUG_MEM())
+ printk("%#08x 4 -> %#x\n", addr, val);)
+ return val;
+}
+
+/****************************************************************************
+PARAMETERS:
+addr - Emulator memory address to read
+val - Value to store
+
+REMARKS:
+Writes a byte value to emulator memory. We have three distinct memory
+regions that are handled differently, which this function handles.
+****************************************************************************/
+void X86API BE_wrb(
+ u32 addr,
+ u8 val)
+{
+DB( if (DEBUG_MEM())
+ printk("%#08x 1 <- %#x\n", addr, val);)
+ if (addr >= 0xC0000 && addr <= _BE_env.biosmem_limit) {
+ *(u8*)(_BE_env.biosmem_base + addr - 0xC0000) = val;
+ }
+ else if (addr >= 0xA0000 && addr <= 0xFFFFF) {
+ writeb(val, _BE_env.busmem_base, addr - 0xA0000);
+ }
+ else if (addr > M.mem_size-1) {
+DB( printk("mem_write: address %#lx out of range!\n", addr);)
+ HALT_SYS();
+ }
+ else {
+ *(u8*)(M.mem_base + addr) = val;
+ }
+}
+
+/****************************************************************************
+PARAMETERS:
+addr - Emulator memory address to read
+val - Value to store
+
+REMARKS:
+Writes a word value to emulator memory. We have three distinct memory
+regions that are handled differently, which this function handles.
+****************************************************************************/
+void X86API BE_wrw(
+ u32 addr,
+ u16 val)
+{
+DB( if (DEBUG_MEM())
+ printk("%#08x 2 <- %#x\n", addr, val);)
+ if (addr >= 0xC0000 && addr <= _BE_env.biosmem_limit) {
+#ifdef __BIG_ENDIAN__
+ if (addr & 0x1) {
+ addr -= 0xC0000;
+ *(u8*)(_BE_env.biosmem_base + addr + 0) = (val >> 0) & 0xff;
+ *(u8*)(_BE_env.biosmem_base + addr + 1) = (val >> 8) & 0xff;
+ }
+ else
+#endif
+ *(u16*)(_BE_env.biosmem_base + addr - 0xC0000) = val;
+ }
+ else if (addr >= 0xA0000 && addr <= 0xFFFFF) {
+#ifdef __BIG_ENDIAN__
+ if (addr & 0x1) {
+ addr -= 0xA0000;
+ writeb(val >> 0, _BE_env.busmem_base, addr);
+ writeb(val >> 8, _BE_env.busmem_base, addr + 1);
+ }
+ else
+#endif
+ writew(val, _BE_env.busmem_base, addr - 0xA0000);
+ }
+ else if (addr > M.mem_size-2) {
+DB( printk("mem_write: address %#lx out of range!\n", addr);)
+ HALT_SYS();
+ }
+ else {
+#ifdef __BIG_ENDIAN__
+ if (addr & 0x1) {
+ *(u8*)(M.mem_base + addr + 0) = (val >> 0) & 0xff;
+ *(u8*)(M.mem_base + addr + 1) = (val >> 8) & 0xff;
+ }
+ else
+#endif
+ *(u16*)(M.mem_base + addr) = val;
+ }
+}
+
+/****************************************************************************
+PARAMETERS:
+addr - Emulator memory address to read
+val - Value to store
+
+REMARKS:
+Writes a long value to emulator memory. We have three distinct memory
+regions that are handled differently, which this function handles.
+****************************************************************************/
+void X86API BE_wrl(
+ u32 addr,
+ u32 val)
+{
+DB( if (DEBUG_MEM())
+ printk("%#08x 4 <- %#x\n", addr, val);)
+ if (addr >= 0xC0000 && addr <= _BE_env.biosmem_limit) {
+#ifdef __BIG_ENDIAN__
+ if (addr & 0x1) {
+ addr -= 0xC0000;
+ *(u8*)(M.mem_base + addr + 0) = (val >> 0) & 0xff;
+ *(u8*)(M.mem_base + addr + 1) = (val >> 8) & 0xff;
+ *(u8*)(M.mem_base + addr + 2) = (val >> 16) & 0xff;
+ *(u8*)(M.mem_base + addr + 3) = (val >> 24) & 0xff;
+ }
+ else
+#endif
+ *(u32*)(M.mem_base + addr - 0xC0000) = val;
+ }
+ else if (addr >= 0xA0000 && addr <= 0xFFFFF) {
+#ifdef __BIG_ENDIAN__
+ if (addr & 0x3) {
+ addr -= 0xA0000;
+ writeb(val >> 0, _BE_env.busmem_base, addr);
+ writeb(val >> 8, _BE_env.busmem_base, addr + 1);
+ writeb(val >> 16, _BE_env.busmem_base, addr + 1);
+ writeb(val >> 24, _BE_env.busmem_base, addr + 1);
+ }
+ else
+#endif
+ writel(val, _BE_env.busmem_base, addr - 0xA0000);
+ }
+ else if (addr > M.mem_size-4) {
+DB( printk("mem_write: address %#lx out of range!\n", addr);)
+ HALT_SYS();
+ }
+ else {
+#ifdef __BIG_ENDIAN__
+ if (addr & 0x1) {
+ *(u8*)(M.mem_base + addr + 0) = (val >> 0) & 0xff;
+ *(u8*)(M.mem_base + addr + 1) = (val >> 8) & 0xff;
+ *(u8*)(M.mem_base + addr + 2) = (val >> 16) & 0xff;
+ *(u8*)(M.mem_base + addr + 3) = (val >> 24) & 0xff;
+ }
+ else
+#endif
+ *(u32*)(M.mem_base + addr) = val;
+ }
+}
+
+/* Debug functions to do ISA/PCI bus port I/O */
+
+#ifdef DEBUG
+#define DEBUG_IO() (M.x86.debug & DEBUG_IO_TRACE_F)
+
+u8 X86API BE_inb(int port)
+{
+ u8 val = PM_inpb(port);
+ if (DEBUG_IO())
+ printk("%04X:%04X: inb.%04X -> %02X\n",M.x86.saved_cs, M.x86.saved_ip, (ushort)port, val);
+ return val;
+}
+
+u16 X86API BE_inw(int port)
+{
+ u16 val = PM_inpw(port);
+ if (DEBUG_IO())
+ printk("%04X:%04X: inw.%04X -> %04X\n",M.x86.saved_cs, M.x86.saved_ip, (ushort)port, val);
+ return val;
+}
+
+u32 X86API BE_inl(int port)
+{
+ u32 val = PM_inpd(port);
+ if (DEBUG_IO())
+ printk("%04X:%04X: inl.%04X -> %08X\n",M.x86.saved_cs, M.x86.saved_ip, (ushort)port, val);
+ return val;
+}
+
+void X86API BE_outb(int port, u8 val)
+{
+ if (DEBUG_IO())
+ printk("%04X:%04X: outb.%04X <- %02X\n",M.x86.saved_cs, M.x86.saved_ip, (ushort)port, val);
+ PM_outpb(port,val);
+}
+
+void X86API BE_outw(int port, u16 val)
+{
+ if (DEBUG_IO())
+ printk("%04X:%04X: outw.%04X <- %04X\n",M.x86.saved_cs, M.x86.saved_ip, (ushort)port, val);
+ PM_outpw(port,val);
+}
+
+void X86API BE_outl(int port, u32 val)
+{
+ if (DEBUG_IO())
+ printk("%04X:%04X: outl.%04X <- %08X\n",M.x86.saved_cs, M.x86.saved_ip, (ushort)port, val);
+ PM_outpd(port,val);
+}
+#endif
diff --git a/board/MAI/bios_emulator/scitech/src/biosemu/bios.c b/board/MAI/bios_emulator/scitech/src/biosemu/bios.c
new file mode 100644
index 00000000000..3fb4c3608a4
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/biosemu/bios.c
@@ -0,0 +1,250 @@
+/****************************************************************************
+*
+* BIOS emulator and interface
+* to Realmode X86 Emulator Library
+*
+* Copyright (C) 1996-1999 SciTech Software, Inc.
+*
+* ========================================================================
+*
+* Permission to use, copy, modify, distribute, and sell this software and
+* its documentation for any purpose is hereby granted without fee,
+* provided that the above copyright notice appear in all copies and that
+* both that copyright notice and this permission notice appear in
+* supporting documentation, and that the name of the authors not be used
+* in advertising or publicity pertaining to distribution of the software
+* without specific, written prior permission. The authors makes no
+* representations about the suitability of this software for any purpose.
+* It is provided "as is" without express or implied warranty.
+*
+* THE AUTHORS DISCLAIMS ALL WARRANTIES WITH REGARD TO THIS SOFTWARE,
+* INCLUDING ALL IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS, IN NO
+* EVENT SHALL THE AUTHORS BE LIABLE FOR ANY SPECIAL, INDIRECT OR
+* CONSEQUENTIAL DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF
+* USE, DATA OR PROFITS, WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE OR
+* OTHER TORTIOUS ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE OR
+* PERFORMANCE OF THIS SOFTWARE.
+*
+* ========================================================================
+*
+* Language: ANSI C
+* Environment: Any
+* Developer: Kendall Bennett
+*
+* Description: Module implementing the BIOS specific functions.
+*
+****************************************************************************/
+
+#include "biosemui.h"
+
+/*----------------------------- Implementation ----------------------------*/
+
+/****************************************************************************
+PARAMETERS:
+intno - Interrupt number being serviced
+
+REMARKS:
+Handler for undefined interrupts.
+****************************************************************************/
+static void X86API undefined_intr(
+ int intno)
+{
+ if (BE_rdw(intno * 4 + 2) == BIOS_SEG)
+ printk("biosEmu: undefined interrupt %xh called!\n",intno);
+ else
+ X86EMU_prepareForInt(intno);
+}
+
+/****************************************************************************
+PARAMETERS:
+intno - Interrupt number being serviced
+
+REMARKS:
+This function handles the default system BIOS Int 10h (the default is stored
+in the Int 42h vector by the system BIOS at bootup). We only need to handle
+a small number of special functions used by the BIOS during POST time.
+****************************************************************************/
+static void X86API int42(
+ int intno)
+{
+ if (M.x86.R_AH == 0x12 && M.x86.R_BL == 0x32) {
+ if (M.x86.R_AL == 0) {
+ /* Enable CPU accesses to video memory */
+ PM_outpb(0x3c2, PM_inpb(0x3cc) | (u8)0x02);
+ return;
+ }
+ else if (M.x86.R_AL == 1) {
+ /* Disable CPU accesses to video memory */
+ PM_outpb(0x3c2, PM_inpb(0x3cc) & (u8)~0x02);
+ return;
+ }
+#ifdef DEBUG
+ else {
+ printk("biosEmu/bios.int42: unknown function AH=0x12, BL=0x32, AL=%#02x\n",M.x86.R_AL);
+ }
+#endif
+ }
+#ifdef DEBUG
+ else {
+ printk("biosEmu/bios.int42: unknown function AH=%#02x, AL=%#02x, BL=%#02x\n",M.x86.R_AH, M.x86.R_AL, M.x86.R_BL);
+ }
+#endif
+}
+
+/****************************************************************************
+PARAMETERS:
+intno - Interrupt number being serviced
+
+REMARKS:
+This function handles the default system BIOS Int 10h. If the POST code
+has not yet re-vectored the Int 10h BIOS interrupt vector, we handle this
+by simply calling the int42 interrupt handler above. Very early in the
+BIOS POST process, the vector gets replaced and we simply let the real
+mode interrupt handler process the interrupt.
+****************************************************************************/
+static void X86API int10(
+ int intno)
+{
+ if (BE_rdw(intno * 4 + 2) == BIOS_SEG)
+ int42(intno);
+ else
+ X86EMU_prepareForInt(intno);
+}
+
+/* Result codes returned by the PCI BIOS */
+
+#define SUCCESSFUL 0x00
+#define FUNC_NOT_SUPPORT 0x81
+#define BAD_VENDOR_ID 0x83
+#define DEVICE_NOT_FOUND 0x86
+#define BAD_REGISTER_NUMBER 0x87
+#define SET_FAILED 0x88
+#define BUFFER_TOO_SMALL 0x89
+
+/****************************************************************************
+PARAMETERS:
+intno - Interrupt number being serviced
+
+REMARKS:
+This function handles the default Int 1Ah interrupt handler for the real
+mode code, which provides support for the PCI BIOS functions. Since we only
+want to allow the real mode BIOS code *only* see the PCI config space for
+its own device, we only return information for the specific PCI config
+space that we have passed in to the init function. This solves problems
+when using the BIOS to warm boot a secondary adapter when there is an
+identical adapter before it on the bus (some BIOS'es get confused in this
+case).
+****************************************************************************/
+static void X86API int1A(
+ unused)
+{
+ u16 pciSlot;
+
+ /* Fail if no PCI device information has been registered */
+ if (!_BE_env.vgaInfo.pciInfo)
+ return;
+ pciSlot = (u16)(_BE_env.vgaInfo.pciInfo->slot.i >> 8);
+ switch (M.x86.R_AX) {
+ case 0xB101: /* PCI bios present? */
+ M.x86.R_AL = 0x00; /* no config space/special cycle generation support */
+ M.x86.R_EDX = 0x20494350; /* " ICP" */
+ M.x86.R_BX = 0x0210; /* Version 2.10 */
+ M.x86.R_CL = 0; /* Max bus number in system */
+ CLEAR_FLAG(F_CF);
+ break;
+ case 0xB102: /* Find PCI device */
+ M.x86.R_AH = DEVICE_NOT_FOUND;
+ if (M.x86.R_DX == _BE_env.vgaInfo.pciInfo->VendorID &&
+ M.x86.R_CX == _BE_env.vgaInfo.pciInfo->DeviceID &&
+ M.x86.R_SI == 0) {
+ M.x86.R_AH = SUCCESSFUL;
+ M.x86.R_BX = pciSlot;
+ }
+ CONDITIONAL_SET_FLAG((M.x86.R_AH != SUCCESSFUL), F_CF);
+ break;
+ case 0xB103: /* Find PCI class code */
+ M.x86.R_AH = DEVICE_NOT_FOUND;
+ if (M.x86.R_CL == _BE_env.vgaInfo.pciInfo->Interface &&
+ M.x86.R_CH == _BE_env.vgaInfo.pciInfo->SubClass &&
+ (u8)(M.x86.R_ECX >> 16) == _BE_env.vgaInfo.pciInfo->BaseClass) {
+ M.x86.R_AH = SUCCESSFUL;
+ M.x86.R_BX = pciSlot;
+ }
+ CONDITIONAL_SET_FLAG((M.x86.R_AH != SUCCESSFUL), F_CF);
+ break;
+ case 0xB108: /* Read configuration byte */
+ M.x86.R_AH = BAD_REGISTER_NUMBER;
+ if (M.x86.R_BX == pciSlot) {
+ M.x86.R_AH = SUCCESSFUL;
+ M.x86.R_CL = (u8)PCI_accessReg(M.x86.R_DI,0,PCI_READ_BYTE,_BE_env.vgaInfo.pciInfo);
+ }
+ CONDITIONAL_SET_FLAG((M.x86.R_AH != SUCCESSFUL), F_CF);
+ break;
+ case 0xB109: /* Read configuration word */
+ M.x86.R_AH = BAD_REGISTER_NUMBER;
+ if (M.x86.R_BX == pciSlot) {
+ M.x86.R_AH = SUCCESSFUL;
+ M.x86.R_CX = (u16)PCI_accessReg(M.x86.R_DI,0,PCI_READ_WORD,_BE_env.vgaInfo.pciInfo);
+ }
+ CONDITIONAL_SET_FLAG((M.x86.R_AH != SUCCESSFUL), F_CF);
+ break;
+ case 0xB10A: /* Read configuration dword */
+ M.x86.R_AH = BAD_REGISTER_NUMBER;
+ if (M.x86.R_BX == pciSlot) {
+ M.x86.R_AH = SUCCESSFUL;
+ M.x86.R_ECX = (u32)PCI_accessReg(M.x86.R_DI,0,PCI_READ_DWORD,_BE_env.vgaInfo.pciInfo);
+ }
+ CONDITIONAL_SET_FLAG((M.x86.R_AH != SUCCESSFUL), F_CF);
+ break;
+ case 0xB10B: /* Write configuration byte */
+ M.x86.R_AH = BAD_REGISTER_NUMBER;
+ if (M.x86.R_BX == pciSlot) {
+ M.x86.R_AH = SUCCESSFUL;
+ PCI_accessReg(M.x86.R_DI,M.x86.R_CL,PCI_WRITE_BYTE,_BE_env.vgaInfo.pciInfo);
+ }
+ CONDITIONAL_SET_FLAG((M.x86.R_AH != SUCCESSFUL), F_CF);
+ break;
+ case 0xB10C: /* Write configuration word */
+ M.x86.R_AH = BAD_REGISTER_NUMBER;
+ if (M.x86.R_BX == pciSlot) {
+ M.x86.R_AH = SUCCESSFUL;
+ PCI_accessReg(M.x86.R_DI,M.x86.R_CX,PCI_WRITE_WORD,_BE_env.vgaInfo.pciInfo);
+ }
+ CONDITIONAL_SET_FLAG((M.x86.R_AH != SUCCESSFUL), F_CF);
+ break;
+ case 0xB10D: /* Write configuration dword */
+ M.x86.R_AH = BAD_REGISTER_NUMBER;
+ if (M.x86.R_BX == pciSlot) {
+ M.x86.R_AH = SUCCESSFUL;
+ PCI_accessReg(M.x86.R_DI,M.x86.R_ECX,PCI_WRITE_DWORD,_BE_env.vgaInfo.pciInfo);
+ }
+ CONDITIONAL_SET_FLAG((M.x86.R_AH != SUCCESSFUL), F_CF);
+ break;
+ default:
+ printk("biosEmu/bios.int1a: unknown function AX=%#04x\n", M.x86.R_AX);
+ }
+}
+
+/****************************************************************************
+REMARKS:
+This function initialises the BIOS emulation functions for the specific
+PCI display device. We insulate the real mode BIOS from any other devices
+on the bus, so that it will work correctly thinking that it is the only
+device present on the bus (ie: avoiding any adapters present in from of
+the device we are trying to control).
+****************************************************************************/
+void _BE_bios_init(
+ u32 *intrTab)
+{
+ int i;
+ X86EMU_intrFuncs bios_intr_tab[256];
+
+ for (i = 0; i < 256; ++i) {
+ intrTab[i] = BIOS_SEG << 16;
+ bios_intr_tab[i] = undefined_intr;
+ }
+ bios_intr_tab[0x10] = int10;
+ bios_intr_tab[0x1A] = int1A;
+ bios_intr_tab[0x42] = int42;
+ X86EMU_setupIntrFuncs(bios_intr_tab);
+}
diff --git a/board/MAI/bios_emulator/scitech/src/biosemu/biosemu.c b/board/MAI/bios_emulator/scitech/src/biosemu/biosemu.c
new file mode 100644
index 00000000000..ed2717c218e
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/biosemu/biosemu.c
@@ -0,0 +1,445 @@
+/****************************************************************************
+*
+* BIOS emulator and interface
+* to Realmode X86 Emulator Library
+*
+* Copyright (C) 1996-1999 SciTech Software, Inc.
+*
+* ========================================================================
+*
+* Permission to use, copy, modify, distribute, and sell this software and
+* its documentation for any purpose is hereby granted without fee,
+* provided that the above copyright notice appear in all copies and that
+* both that copyright notice and this permission notice appear in
+* supporting documentation, and that the name of the authors not be used
+* in advertising or publicity pertaining to distribution of the software
+* without specific, written prior permission. The authors makes no
+* representations about the suitability of this software for any purpose.
+* It is provided "as is" without express or implied warranty.
+*
+* THE AUTHORS DISCLAIMS ALL WARRANTIES WITH REGARD TO THIS SOFTWARE,
+* INCLUDING ALL IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS, IN NO
+* EVENT SHALL THE AUTHORS BE LIABLE FOR ANY SPECIAL, INDIRECT OR
+* CONSEQUENTIAL DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF
+* USE, DATA OR PROFITS, WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE OR
+* OTHER TORTIOUS ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE OR
+* PERFORMANCE OF THIS SOFTWARE.
+*
+* ========================================================================
+*
+* Language: ANSI C
+* Environment: Any
+* Developer: Kendall Bennett
+*
+* Description: Module implementing the system specific functions. This
+* module is always compiled and linked in the OS depedent
+* libraries, and never in a binary portable driver.
+*
+****************************************************************************/
+
+#include "biosemui.h"
+#include <string.h>
+#include <stdlib.h>
+
+/*------------------------- Global Variables ------------------------------*/
+
+BE_sysEnv _BE_env;
+#ifdef __DRIVER__
+PM_imports _VARAPI _PM_imports;
+#endif
+static X86EMU_memFuncs _BE_mem = {
+ BE_rdb,
+ BE_rdw,
+ BE_rdl,
+ BE_wrb,
+ BE_wrw,
+ BE_wrl,
+ };
+#ifdef DEBUG
+static X86EMU_pioFuncs _BE_pio = {
+ BE_inb,
+ BE_inw,
+ BE_inl,
+ BE_outb,
+ BE_outw,
+ BE_outl,
+ };
+#else
+static X86EMU_pioFuncs _BE_pio = {
+ (void*)PM_inpb,
+ (void*)PM_inpw,
+ (void*)PM_inpd,
+ (void*)PM_outpb,
+ (void*)PM_outpw,
+ (void*)PM_outpd,
+ };
+#endif
+
+/*-------------------------- Implementation -------------------------------*/
+
+#define OFF(addr) (u16)(((addr) >> 0) & 0xffff)
+#define SEG(addr) (u16)(((addr) >> 4) & 0xf000)
+
+/****************************************************************************
+PARAMETERS:
+debugFlags - Flags to enable debugging options (debug builds only)
+memSize - Amount of memory to allocate for real mode machine
+info - Pointer to default VGA device information
+
+REMARKS:
+This functions initialises the BElib, and uses the passed in
+BIOS image as the BIOS that is used and emulated at 0xC0000.
+****************************************************************************/
+ibool PMAPI BE_init(
+ u32 debugFlags,
+ int memSize,
+ BE_VGAInfo *info)
+{
+#ifndef __DRIVER__
+ PM_init();
+#endif
+ memset(&M,0,sizeof(M));
+ if (memSize < 20480)
+ PM_fatalError("Emulator requires at least 20Kb of memory!\n");
+ if ((M.mem_base = (unsigned long)malloc(memSize)) == NULL)
+ PM_fatalError("Out of memory!");
+ M.mem_size = memSize;
+ _BE_env.busmem_base = (ulong)PM_mapPhysicalAddr(0xA0000,0x5FFFF,true);
+ M.x86.debug = debugFlags;
+ _BE_bios_init((u32*)info->LowMem);
+ X86EMU_setupMemFuncs(&_BE_mem);
+ X86EMU_setupPioFuncs(&_BE_pio);
+ BE_setVGA(info);
+ return true;
+}
+
+/****************************************************************************
+PARAMETERS:
+debugFlags - Flags to enable debugging options (debug builds only)
+
+REMARKS:
+This function allows the application to enable logging and debug flags
+on a function call basis, so we can specifically enable logging only
+for specific functions that are causing problems in debug mode.
+****************************************************************************/
+void PMAPI BE_setDebugFlags(
+ u32 debugFlags)
+{
+ M.x86.debug = debugFlags;
+}
+
+/****************************************************************************
+PARAMETERS:
+info - Pointer to VGA device information to make current
+
+REMARKS:
+This function sets the VGA BIOS functions in the emulator to point to the
+specific VGA BIOS in use. This includes swapping the BIOS interrupt
+vectors, BIOS image and BIOS data area to the new BIOS. This allows the
+real mode BIOS to be swapped without resetting the entire emulator.
+****************************************************************************/
+void PMAPI BE_setVGA(
+ BE_VGAInfo *info)
+{
+ _BE_env.vgaInfo.pciInfo = info->pciInfo;
+ _BE_env.vgaInfo.BIOSImage = info->BIOSImage;
+ if (info->BIOSImage) {
+ _BE_env.biosmem_base = (ulong)info->BIOSImage;
+ _BE_env.biosmem_limit = 0xC0000 + info->BIOSImageLen-1;
+ }
+ else {
+ _BE_env.biosmem_base = _BE_env.busmem_base + 0x20000;
+ _BE_env.biosmem_limit = 0xC7FFF;
+ }
+ if (*((u32*)info->LowMem) == 0)
+ _BE_bios_init((u32*)info->LowMem);
+ memcpy((u8*)M.mem_base,info->LowMem,sizeof(info->LowMem));
+}
+
+/****************************************************************************
+PARAMETERS:
+info - Pointer to VGA device information to retrieve current
+
+REMARKS:
+This function returns the VGA BIOS functions currently active in the
+emulator, so they can be restored at a later date.
+****************************************************************************/
+void PMAPI BE_getVGA(
+ BE_VGAInfo *info)
+{
+ info->pciInfo = _BE_env.vgaInfo.pciInfo;
+ info->BIOSImage = _BE_env.vgaInfo.BIOSImage;
+ memcpy(info->LowMem,(u8*)M.mem_base,sizeof(info->LowMem));
+}
+
+/****************************************************************************
+PARAMETERS:
+r_seg - Segment for pointer to convert
+r_off - Offset for pointer to convert
+
+REMARKS:
+This function maps a real mode pointer in the emulator memory to a protected
+mode pointer that can be used to directly access the memory.
+
+NOTE: The memory is *always* in little endian format, son on non-x86
+ systems you will need to do endian translations to access this
+ memory.
+****************************************************************************/
+void * PMAPI BE_mapRealPointer(
+ uint r_seg,
+ uint r_off)
+{
+ u32 addr = ((u32)r_seg << 4) + r_off;
+
+ if (addr >= 0xC0000 && addr <= _BE_env.biosmem_limit) {
+ return (void*)(_BE_env.biosmem_base + addr - 0xC0000);
+ }
+ else if (addr >= 0xA0000 && addr <= 0xFFFFF) {
+ return (void*)(_BE_env.busmem_base + addr - 0xA0000);
+ }
+ return (void*)(M.mem_base + addr);
+}
+
+/****************************************************************************
+PARAMETERS:
+len - Return the length of the VESA buffer
+rseg - Place to store VESA buffer segment
+roff - Place to store VESA buffer offset
+
+REMARKS:
+This function returns the address of the VESA transfer buffer in real
+mode emulator memory. The VESA transfer buffer is always 1024 bytes long,
+and located at 15Kb into the start of the real mode memory (16Kb is where
+we put the real mode code we execute for issuing interrupts).
+
+NOTE: The memory is *always* in little endian format, son on non-x86
+ systems you will need to do endian translations to access this
+ memory.
+****************************************************************************/
+void * PMAPI BE_getVESABuf(
+ uint *len,
+ uint *rseg,
+ uint *roff)
+{
+ *len = 1024;
+ *rseg = SEG(0x03C00);
+ *roff = OFF(0x03C00);
+ return (void*)(M.mem_base + ((u32)*rseg << 4) + *roff);
+}
+
+/****************************************************************************
+REMARKS:
+Cleans up and exits the emulator.
+****************************************************************************/
+void PMAPI BE_exit(void)
+{
+ free((void*)M.mem_base);
+ PM_freePhysicalAddr((void*)_BE_env.busmem_base,0x5FFFF);
+}
+
+/****************************************************************************
+PARAMETERS:
+seg - Segment of code to call
+off - Offset of code to call
+regs - Real mode registers to load
+sregs - Real mode segment registers to load
+
+REMARKS:
+This functions calls a real mode far function at the specified address,
+and loads all the x86 registers from the passed in registers structure.
+On exit the registers returned from the call are returned in the same
+structures.
+****************************************************************************/
+void PMAPI BE_callRealMode(
+ uint seg,
+ uint off,
+ RMREGS *regs,
+ RMSREGS *sregs)
+{
+ M.x86.R_EAX = regs->e.eax;
+ M.x86.R_EBX = regs->e.ebx;
+ M.x86.R_ECX = regs->e.ecx;
+ M.x86.R_EDX = regs->e.edx;
+ M.x86.R_ESI = regs->e.esi;
+ M.x86.R_EDI = regs->e.edi;
+ M.x86.R_DS = sregs->ds;
+ M.x86.R_ES = sregs->es;
+ M.x86.R_FS = sregs->fs;
+ M.x86.R_GS = sregs->gs;
+ M.x86.R_CS = (u16)seg;
+ M.x86.R_IP = (u16)off;
+ M.x86.R_SS = SEG(M.mem_size - 1);
+ M.x86.R_SP = OFF(M.mem_size - 1);
+ X86EMU_exec();
+ regs->e.cflag = M.x86.R_EFLG & F_CF;
+ regs->e.eax = M.x86.R_EAX;
+ regs->e.ebx = M.x86.R_EBX;
+ regs->e.ecx = M.x86.R_ECX;
+ regs->e.edx = M.x86.R_EDX;
+ regs->e.esi = M.x86.R_ESI;
+ regs->e.edi = M.x86.R_EDI;
+ sregs->ds = M.x86.R_DS;
+ sregs->es = M.x86.R_ES;
+ sregs->fs = M.x86.R_FS;
+ sregs->gs = M.x86.R_GS;
+}
+
+/****************************************************************************
+PARAMETERS:
+intno - Interrupt number to execute
+in - Real mode registers to load
+out - Place to store resulting real mode registers
+
+REMARKS:
+This functions calls a real mode interrupt function at the specified address,
+and loads all the x86 registers from the passed in registers structure.
+On exit the registers returned from the call are returned in out stucture.
+****************************************************************************/
+int PMAPI BE_int86(
+ int intno,
+ RMREGS *in,
+ RMREGS *out)
+{
+ M.x86.R_EAX = in->e.eax;
+ M.x86.R_EBX = in->e.ebx;
+ M.x86.R_ECX = in->e.ecx;
+ M.x86.R_EDX = in->e.edx;
+ M.x86.R_ESI = in->e.esi;
+ M.x86.R_EDI = in->e.edi;
+ ((u8*)M.mem_base)[0x4000] = 0xCD;
+ ((u8*)M.mem_base)[0x4001] = (u8)intno;
+ ((u8*)M.mem_base)[0x4002] = 0xC3;
+ M.x86.R_CS = SEG(0x04000);
+ M.x86.R_IP = OFF(0x04000);
+ M.x86.R_SS = SEG(M.mem_size - 1);
+ M.x86.R_SP = OFF(M.mem_size - 1);
+ X86EMU_exec();
+ out->e.cflag = M.x86.R_EFLG & F_CF;
+ out->e.eax = M.x86.R_EAX;
+ out->e.ebx = M.x86.R_EBX;
+ out->e.ecx = M.x86.R_ECX;
+ out->e.edx = M.x86.R_EDX;
+ out->e.esi = M.x86.R_ESI;
+ out->e.edi = M.x86.R_EDI;
+ return out->x.ax;
+}
+
+/****************************************************************************
+PARAMETERS:
+intno - Interrupt number to execute
+in - Real mode registers to load
+out - Place to store resulting real mode registers
+sregs - Real mode segment registers to load
+
+REMARKS:
+This functions calls a real mode interrupt function at the specified address,
+and loads all the x86 registers from the passed in registers structure.
+On exit the registers returned from the call are returned in out stucture.
+****************************************************************************/
+int PMAPI BE_int86x(
+ int intno,
+ RMREGS *in,
+ RMREGS *out,
+ RMSREGS *sregs)
+{
+ M.x86.R_EAX = in->e.eax;
+ M.x86.R_EBX = in->e.ebx;
+ M.x86.R_ECX = in->e.ecx;
+ M.x86.R_EDX = in->e.edx;
+ M.x86.R_ESI = in->e.esi;
+ M.x86.R_EDI = in->e.edi;
+ M.x86.R_DS = sregs->ds;
+ M.x86.R_ES = sregs->es;
+ M.x86.R_FS = sregs->fs;
+ M.x86.R_GS = sregs->gs;
+ ((u8*)M.mem_base)[0x4000] = 0xCD;
+ ((u8*)M.mem_base)[0x4001] = (u8)intno;
+ ((u8*)M.mem_base)[0x4002] = 0xC3;
+ M.x86.R_CS = SEG(0x04000);
+ M.x86.R_IP = OFF(0x04000);
+ M.x86.R_SS = SEG(M.mem_size - 1);
+ M.x86.R_SP = OFF(M.mem_size - 1);
+ X86EMU_exec();
+ out->e.cflag = M.x86.R_EFLG & F_CF;
+ out->e.eax = M.x86.R_EAX;
+ out->e.ebx = M.x86.R_EBX;
+ out->e.ecx = M.x86.R_ECX;
+ out->e.edx = M.x86.R_EDX;
+ out->e.esi = M.x86.R_ESI;
+ out->e.edi = M.x86.R_EDI;
+ sregs->ds = M.x86.R_DS;
+ sregs->es = M.x86.R_ES;
+ sregs->fs = M.x86.R_FS;
+ sregs->gs = M.x86.R_GS;
+ return out->x.ax;
+}
+
+#ifdef __DRIVER__
+
+/****************************************************************************
+REMARKS:
+Empty log function for binary portable DLL. The BPD is compiled without
+debug information, so very little is logged anyway so it is simpler this
+way.
+****************************************************************************/
+void printk(const char *msg, ...)
+{
+}
+
+/****************************************************************************
+REMARKS:
+Fatal error handler called when a non-imported function is called by the
+driver. We leave this to a runtime error so that older applications and
+shell drivers will work with newer bpd drivers provided no newer functions
+are required by the driver itself. If they are, the application or shell
+driver needs to be recompiled.
+****************************************************************************/
+static void _PM_fatalErrorHandler(void)
+{
+ PM_fatalError("Unsupported PM_imports import function called! Please re-compile!\n");
+}
+
+/****************************************************************************
+PARAMETERS:
+beImp - BE library imports
+beImp - Generic emulator imports
+
+RETURNS:
+Pointer to exported function list
+
+REMARKS:
+This function initialises the BIOS emulator library and returns the list of
+loader library exported functions.
+{secret}
+****************************************************************************/
+BE_exports * _CEXPORT BE_initLibrary(
+ PM_imports *pmImp)
+{
+ static BE_exports _BE_exports = {
+ sizeof(BE_exports),
+ BE_init,
+ BE_setVGA,
+ BE_getVGA,
+ BE_mapRealPointer,
+ BE_getVESABuf,
+ BE_callRealMode,
+ BE_int86,
+ BE_int86x,
+ NULL,
+ BE_exit,
+ };
+ int i,max;
+ ulong *p;
+
+ // Initialize all default imports to point to fatal error handler
+ // for upwards compatibility.
+ max = sizeof(_PM_imports)/sizeof(BE_initLibrary_t);
+ for (i = 0,p = (ulong*)&_PM_imports; i < max; i++)
+ *p++ = (ulong)_PM_fatalErrorHandler;
+
+ // Now copy all our imported functions
+ memcpy(&_PM_imports,pmImp,MIN(sizeof(_PM_imports),pmImp->dwSize));
+ return &_BE_exports;
+}
+
+#endif /* __DRIVER__ */
diff --git a/board/MAI/bios_emulator/scitech/src/biosemu/biosemui.h b/board/MAI/bios_emulator/scitech/src/biosemu/biosemui.h
new file mode 100644
index 00000000000..23edebc95ce
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/biosemu/biosemui.h
@@ -0,0 +1,79 @@
+/****************************************************************************
+*
+* BIOS emulator and interface
+* to Realmode X86 Emulator Library
+*
+* Copyright (C) 1996-1999 SciTech Software, Inc.
+*
+* ========================================================================
+*
+* Permission to use, copy, modify, distribute, and sell this software and
+* its documentation for any purpose is hereby granted without fee,
+* provided that the above copyright notice appear in all copies and that
+* both that copyright notice and this permission notice appear in
+* supporting documentation, and that the name of the authors not be used
+* in advertising or publicity pertaining to distribution of the software
+* without specific, written prior permission. The authors makes no
+* representations about the suitability of this software for any purpose.
+* It is provided "as is" without express or implied warranty.
+*
+* THE AUTHORS DISCLAIMS ALL WARRANTIES WITH REGARD TO THIS SOFTWARE,
+* INCLUDING ALL IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS, IN NO
+* EVENT SHALL THE AUTHORS BE LIABLE FOR ANY SPECIAL, INDIRECT OR
+* CONSEQUENTIAL DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF
+* USE, DATA OR PROFITS, WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE OR
+* OTHER TORTIOUS ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE OR
+* PERFORMANCE OF THIS SOFTWARE.
+*
+* ========================================================================
+*
+* Language: ANSI C
+* Environment: Any
+* Developer: Kendall Bennett
+*
+* Description: Internal header file for the BIOS emulator library.
+*
+****************************************************************************/
+
+#ifndef __BIOSEMUI_H
+#define __BIOSEMUI_H
+
+#include <biosemu.h>
+
+/*---------------------- Macros and type definitions ----------------------*/
+
+#ifdef DEBUG
+#define DB(x) x
+#else
+#define DB(x)
+#endif
+
+#define BIOS_SEG 0xfff0
+
+#define M _X86EMU_env
+
+/*-------------------------- Function Prototypes --------------------------*/
+
+/* bios.c */
+
+void _BE_bios_init(u32 *intrTab);
+void _BE_setup_funcs(void);
+
+/* besys.c */
+
+u8 X86API BE_rdb(u32 addr);
+u16 X86API BE_rdw(u32 addr);
+u32 X86API BE_rdl(u32 addr);
+void X86API BE_wrb(u32 addr,u8 val);
+void X86API BE_wrw(u32 addr,u16 val);
+void X86API BE_wrl(u32 addr,u32 val);
+#ifdef DEBUG
+u8 X86API BE_inb(int port);
+u16 X86API BE_inw(int port);
+u32 X86API BE_inl(int port);
+void X86API BE_outb(int port, u8 val);
+void X86API BE_outw(int port, u16 val);
+void X86API BE_outl(int port, u32 val);
+#endif
+
+#endif /* __BIOSEMUI_H */
diff --git a/board/MAI/bios_emulator/scitech/src/biosemu/makefile b/board/MAI/bios_emulator/scitech/src/biosemu/makefile
new file mode 100644
index 00000000000..80730b2997f
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/biosemu/makefile
@@ -0,0 +1,99 @@
+#############################################################################
+#
+# BIOS emulator and interface
+# to Realmode X86 Emulator Library
+#
+# Copyright (C) 1996-1999 SciTech Software, Inc.
+#
+# ========================================================================
+#
+# Permission to use, copy, modify, distribute, and sell this software and
+# its documentation for any purpose is hereby granted without fee,
+# provided that the above copyright notice appear in all copies and that
+# both that copyright notice and this permission notice appear in
+# supporting documentation, and that the name of the authors not be used
+# in advertising or publicity pertaining to distribution of the software
+# without specific, written prior permission. The authors makes no
+# representations about the suitability of this software for any purpose.
+# It is provided "as is" without express or implied warranty.
+#
+# THE AUTHORS DISCLAIMS ALL WARRANTIES WITH REGARD TO THIS SOFTWARE,
+# INCLUDING ALL IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS, IN NO
+# EVENT SHALL THE AUTHORS BE LIABLE FOR ANY SPECIAL, INDIRECT OR
+# CONSEQUENTIAL DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF
+# USE, DATA OR PROFITS, WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE OR
+# OTHER TORTIOUS ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE OR
+# PERFORMANCE OF THIS SOFTWARE.
+#
+# ========================================================================
+#
+# Descripton: Generic makefile for the x86emu library. Requires
+# the SciTech Software makefile definitions package to be
+# installed, which uses the DMAKE make program.
+#
+#############################################################################
+
+.IMPORT .IGNORE: DEBUG
+
+#----------------------------------------------------------------------------
+# Define the lists of object files
+#----------------------------------------------------------------------------
+
+DLL_OBJS = dllstart$O _pm_imp$O
+BIOS_OBJS = biosemu$O bios$O besys$O
+X86_OBJS = sys$O decode$O ops$O ops2$O prim_ops$O fpu$O debug$O
+CFLAGS += -DSCITECH -I$(SCITECH)\src\x86emu
+
+.IF $(BUILD_DLL)
+
+CFLAGS += -I$(PRIVATE)\include\drvlib -I$(SCITECH)\include\drvlib -D__DRIVER__
+ASFLAGS += -d__DRIVER__
+EXELIBS = drvlib$L
+
+.ELSE
+
+.IF $(DEBUG)
+CFLAGS += -DDEBUG
+.ENDIF
+OBJECTS = $(BIOS_OBJS) $(X86_OBJS)
+LIBCLEAN = *.dll *.lib *.a
+LIBFILE = $(LP)biosemu$L
+
+.ENDIF
+
+#----------------------------------------------------------------------------
+# Sample test programs
+#----------------------------------------------------------------------------
+
+all: $(LIBFILE) warmboot$E
+
+warmboot$E: warmboot$O $(LIBFILE)
+
+#----------------------------------------------------------------------------
+# Target to build the Binary Portable DLL target
+#----------------------------------------------------------------------------
+
+biosemu.dll: $(DLL_OBJS) $(BIOS_OBJS) $(X86_OBJS)
+
+#----------------------------------------------------------------------------
+# Target to build all Intel binary drivers
+#----------------------------------------------------------------------------
+
+.PHONY mkdrv:
+ @build wc11-w32 biosemu.dll -u BUILD_DLL=1 NO_RUNTIME=1 OPT=1
+ @$(CP) biosemu.dll $(PRIVATE)\nucleus\graphics\biosemu.bpd
+ @dmake cleanexe
+
+.PHONY db:
+ @build wc11-w32 biosemu.dll BUILD_DLL=1 NO_RUNTIME=1 OPT=1
+ @$(CP) biosemu.dll $(PRIVATE)\nucleus\graphics\biosemu.bpd
+
+#----------------------------------------------------------------------------
+# Define the list of object files to create dependency information for
+#----------------------------------------------------------------------------
+
+DEPEND_OBJ = warmboot$O $(BIOS_OBJS) $(X86_OBJS) $(DLL_OBJS)
+DEPEND_SRC = $(SCITECH)/src/x86emu;$(PRIVATE)/src/common
+.SOURCE: $(SCITECH)/src/x86emu $(PRIVATE)/src/common
+
+.INCLUDE: "$(SCITECH)/makedefs/common.mk"
diff --git a/board/MAI/bios_emulator/scitech/src/biosemu/makefile.cross b/board/MAI/bios_emulator/scitech/src/biosemu/makefile.cross
new file mode 100644
index 00000000000..91410030762
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/biosemu/makefile.cross
@@ -0,0 +1,10 @@
+CC = ppc-elf32-gcc
+AR = ppc-elf32-ar
+
+CFLAGS = -D__DRIVER__ -I../../include -DDEBUG -I.
+
+BIOS_OBJS = biosemu.o bios.o besys.o
+X86_OBJS = sys.o decode.o ops.o prim_ops.o fpu.o debug.o
+
+libbios.a: $(BIOS_OBJS)
+ $(AR) rcs libbios.a $(BIOS_OBJS)
\ No newline at end of file
diff --git a/board/MAI/bios_emulator/scitech/src/biosemu/warmboot.c b/board/MAI/bios_emulator/scitech/src/biosemu/warmboot.c
new file mode 100644
index 00000000000..96fa5a0e0f2
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/biosemu/warmboot.c
@@ -0,0 +1,569 @@
+/****************************************************************************
+*
+* BIOS emulator and interface
+* to Realmode X86 Emulator Library
+*
+* Copyright (C) 1996-1999 SciTech Software, Inc.
+*
+* ========================================================================
+*
+* Permission to use, copy, modify, distribute, and sell this software and
+* its documentation for any purpose is hereby granted without fee,
+* provided that the above copyright notice appear in all copies and that
+* both that copyright notice and this permission notice appear in
+* supporting documentation, and that the name of the authors not be used
+* in advertising or publicity pertaining to distribution of the software
+* without specific, written prior permission. The authors makes no
+* representations about the suitability of this software for any purpose.
+* It is provided "as is" without express or implied warranty.
+*
+* THE AUTHORS DISCLAIMS ALL WARRANTIES WITH REGARD TO THIS SOFTWARE,
+* INCLUDING ALL IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS, IN NO
+* EVENT SHALL THE AUTHORS BE LIABLE FOR ANY SPECIAL, INDIRECT OR
+* CONSEQUENTIAL DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF
+* USE, DATA OR PROFITS, WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE OR
+* OTHER TORTIOUS ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE OR
+* PERFORMANCE OF THIS SOFTWARE.
+*
+* ========================================================================
+*
+* Language: ANSI C
+* Environment: Any
+* Developer: Kendall Bennett
+*
+* Description: Module to implement warm booting of all PCI/AGP controllers
+* on the bus. We use the x86 real mode emulator to run the
+* BIOS on the primary and secondary controllers to bring
+* the cards up.
+*
+****************************************************************************/
+
+#include <stdio.h>
+#include <stdlib.h>
+#include <string.h>
+#include <stdarg.h>
+#include "biosemu.h"
+#ifndef _MAX_PATH
+#define _MAX_PATH 256
+#endif
+
+/*------------------------- Global Variables ------------------------------*/
+
+static PCIDeviceInfo PCI[MAX_PCI_DEVICES];
+static int NumPCI = -1;
+static int BridgeIndex[MAX_PCI_DEVICES] = {0};
+static int NumBridges;
+static PCIBridgeInfo *AGPBridge = NULL;
+static int DeviceIndex[MAX_PCI_DEVICES] = {0};
+static int NumDevices;
+static u32 debugFlags = 0;
+static BE_VGAInfo VGAInfo[MAX_PCI_DEVICES] = {{0}};
+static ibool useV86 = false;
+static ibool forcePost = false;
+
+/* Length of the BIOS image */
+
+#define MAX_BIOSLEN (64 * 1024L)
+#define FINAL_BIOSLEN (32 * 1024L)
+
+/* Macro to determine if the VGA is enabled and responding */
+
+#define VGA_NOT_ACTIVE() (forcePost || (PM_inpb(0x3CC) == 0xFF) || ((PM_inpb(0x3CC) & 0x2) == 0))
+
+#define ENABLE_DEVICE(device) \
+ PCI_writePCIRegB(0x4,PCI[DeviceIndex[device]].Command | 0x7,device)
+
+#define DISABLE_DEVICE(device) \
+ PCI_writePCIRegB(0x4,0,device)
+
+/* Macros to enable and disable AGP VGA resources */
+
+#define ENABLE_AGP_VGA() \
+ PCI_accessReg(0x3E,AGPBridge->BridgeControl | 0x8,PCI_WRITE_WORD,(PCIDeviceInfo*)AGPBridge)
+
+#define DISABLE_AGP_VGA() \
+ PCI_accessReg(0x3E,AGPBridge->BridgeControl & ~0x8,PCI_WRITE_WORD,(PCIDeviceInfo*)AGPBridge)
+
+#define RESTORE_AGP_VGA() \
+ PCI_accessReg(0x3E,AGPBridge->BridgeControl,PCI_WRITE_WORD,(PCIDeviceInfo*)AGPBridge)
+
+/*-------------------------- Implementation -------------------------------*/
+
+/****************************************************************************
+RETURNS:
+The address to use to map the secondary BIOS (PCI/AGP devices)
+
+REMARKS:
+Searches all the PCI base address registers for the device looking for a
+memory mapping that is large enough to hold our ROM BIOS. We usually end up
+finding the framebuffer mapping (usually BAR 0x10), and we use this mapping
+to map the BIOS for the device into. We use a mapping that is already
+assigned to the device to ensure the memory range will be passed through
+by any PCI->PCI or AGP->PCI bridge that may be present.
+
+NOTE: Usually this function is only used for AGP devices, but it may be
+ used for PCI devices that have already been POST'ed and the BIOS
+ ROM base address has been zero'ed out.
+****************************************************************************/
+static ulong PCI_findBIOSAddr(
+ int device)
+{
+ ulong base,size;
+ int bar;
+
+ for (bar = 0x10; bar <= 0x14; bar++) {
+ base = PCI_readPCIRegL(bar,device) & ~0xFF;
+ if (!(base & 0x1)) {
+ PCI_writePCIRegL(bar,0xFFFFFFFF,device);
+ size = PCI_readPCIRegL(bar,device) & ~0xFF;
+ size = ~size+1;
+ PCI_writePCIRegL(bar,0,device);
+ if (size >= MAX_BIOSLEN)
+ return base;
+ }
+ }
+ return 0;
+}
+
+/****************************************************************************
+REMARKS:
+Re-writes the PCI base address registers for the secondary PCI controller
+with the values from our initial PCI bus enumeration. This fixes up the
+values after we have POST'ed the secondary display controller BIOS, which
+may have incorrectly re-programmed the base registers the same as the
+primary display controller (the case for identical S3 cards).
+****************************************************************************/
+static void _PCI_fixupSecondaryBARs(void)
+{
+ int i;
+
+ for (i = 0; i < NumDevices; i++) {
+ PCI_writePCIRegL(0x10,PCI[DeviceIndex[i]].BaseAddress10,i);
+ PCI_writePCIRegL(0x14,PCI[DeviceIndex[i]].BaseAddress14,i);
+ PCI_writePCIRegL(0x18,PCI[DeviceIndex[i]].BaseAddress18,i);
+ PCI_writePCIRegL(0x1C,PCI[DeviceIndex[i]].BaseAddress1C,i);
+ PCI_writePCIRegL(0x20,PCI[DeviceIndex[i]].BaseAddress20,i);
+ PCI_writePCIRegL(0x24,PCI[DeviceIndex[i]].BaseAddress24,i);
+ }
+}
+
+/****************************************************************************
+RETURNS:
+True if successfully initialised, false if not.
+
+REMARKS:
+This function executes the BIOS POST code on the controller. We assume that
+at this stage the controller has its I/O and memory space enabled and
+that all other controllers are in a disabled state.
+****************************************************************************/
+static void PCI_doBIOSPOST(
+ int device,
+ ulong BIOSPhysAddr,
+ void *mappedBIOS,
+ ulong BIOSLen)
+{
+ RMREGS regs;
+ RMSREGS sregs;
+
+ // Determine the value to store in AX for BIOS POST
+ regs.x.ax = (u16)(PCI[DeviceIndex[device]].slot.i >> 8);
+ if (useV86) {
+ // Post the BIOS using the PM functions (ie: v86 mode on Linux)
+ if (!PM_doBIOSPOST(regs.x.ax,BIOSPhysAddr,mappedBIOS,BIOSLen)) {
+ // If the PM function fails, this probably means are we are on
+ // DOS and can't re-map the real mode 0xC0000 region. In thise
+ // case if the device is the primary, we can use the real
+ // BIOS at 0xC0000 directly.
+ if (device == 0)
+ PM_doBIOSPOST(regs.x.ax,0xC0000,mappedBIOS,BIOSLen);
+ }
+ }
+ else {
+ // Setup the X86 emulator for the VGA BIOS
+ BE_setVGA(&VGAInfo[device]);
+
+ // Execute the BIOS POST code
+ BE_callRealMode(0xC000,0x0003,®s,&sregs);
+
+ // Cleanup and exit
+ BE_getVGA(&VGAInfo[device]);
+ }
+}
+
+/****************************************************************************
+RETURNS:
+True if successfully initialised, false if not.
+
+REMARKS:
+Loads and POST's the secondary controllers BIOS, directly from the BIOS
+image we can extract over the PCI bus.
+****************************************************************************/
+static ibool PCI_postControllers(void)
+{
+ int device;
+ ulong BIOSImageLen,mappedBIOSPhys;
+ uchar *mappedBIOS,*copyOfBIOS;
+ char filename[_MAX_PATH];
+ FILE *f;
+
+ // Disable the primary display controller and AGP VGA pass-through
+ DISABLE_DEVICE(0);
+ if (AGPBridge)
+ DISABLE_AGP_VGA();
+
+ // Now POST all the secondary controllers
+ for (device = 0; device < NumDevices; device++) {
+ // Skip the device if it is not enabled (probably an ISA device)
+ if (DeviceIndex[device] == -1)
+ continue;
+
+ // Enable secondary display controller. If the secondary controller
+ // is on the AGP bus, then enable VGA resources for the AGP device.
+ ENABLE_DEVICE(device);
+ if (AGPBridge && AGPBridge->SecondayBusNumber == PCI[DeviceIndex[device]].slot.p.Bus)
+ ENABLE_AGP_VGA();
+
+ // Check if the controller has already been POST'ed
+ if (VGA_NOT_ACTIVE()) {
+ // Find a viable place to map the secondary PCI BIOS image and map it
+ printk("Device %d not enabled, so attempting warm boot it\n", device);
+
+ // For AGP devices (and PCI devices that do have the ROM base
+ // address zero'ed out) we have to map the BIOS to a location
+ // that is passed by the AGP bridge to the bus. Some AGP devices
+ // have the ROM base address already set up for us, and some
+ // do not (we map to one of the existing BAR locations in
+ // this case).
+ mappedBIOS = NULL;
+ if (PCI[DeviceIndex[device]].ROMBaseAddress != 0)
+ mappedBIOSPhys = PCI[DeviceIndex[device]].ROMBaseAddress & ~0xF;
+ else
+ mappedBIOSPhys = PCI_findBIOSAddr(device);
+ printk("Mapping BIOS image to 0x%08X\n", mappedBIOSPhys);
+ mappedBIOS = PM_mapPhysicalAddr(mappedBIOSPhys,MAX_BIOSLEN-1,false);
+ PCI_writePCIRegL(0x30,mappedBIOSPhys | 0x1,device);
+ BIOSImageLen = mappedBIOS[2] * 512;
+ if ((copyOfBIOS = malloc(BIOSImageLen)) == NULL)
+ return false;
+ memcpy(copyOfBIOS,mappedBIOS,BIOSImageLen);
+ PM_freePhysicalAddr(mappedBIOS,MAX_BIOSLEN-1);
+
+ // Allocate memory to store copy of BIOS from secondary controllers
+ VGAInfo[device].pciInfo = &PCI[DeviceIndex[device]];
+ VGAInfo[device].BIOSImage = copyOfBIOS;
+ VGAInfo[device].BIOSImageLen = BIOSImageLen;
+
+ // Restore device mappings
+ PCI_writePCIRegL(0x30,PCI[DeviceIndex[device]].ROMBaseAddress,device);
+ PCI_writePCIRegL(0x10,PCI[DeviceIndex[device]].BaseAddress10,device);
+ PCI_writePCIRegL(0x14,PCI[DeviceIndex[device]].BaseAddress14,device);
+
+ // Now execute the BIOS POST for the device
+ if (copyOfBIOS[0] == 0x55 && copyOfBIOS[1] == 0xAA) {
+ printk("Executing BIOS POST for controller.\n");
+ PCI_doBIOSPOST(device,mappedBIOSPhys,copyOfBIOS,BIOSImageLen);
+ }
+
+ // Reset the size of the BIOS image to the final size
+ VGAInfo[device].BIOSImageLen = FINAL_BIOSLEN;
+
+ // Save the BIOS and interrupt vector information to disk
+ sprintf(filename,"%s/bios.%02d",PM_getNucleusConfigPath(),device);
+ if ((f = fopen(filename,"wb")) != NULL) {
+ fwrite(copyOfBIOS,1,FINAL_BIOSLEN,f);
+ fwrite(VGAInfo[device].LowMem,1,sizeof(VGAInfo[device].LowMem),f);
+ fclose(f);
+ }
+ }
+ else {
+ // Allocate memory to store copy of BIOS from secondary controllers
+ if ((copyOfBIOS = malloc(FINAL_BIOSLEN)) == NULL)
+ return false;
+ VGAInfo[device].pciInfo = &PCI[DeviceIndex[device]];
+ VGAInfo[device].BIOSImage = copyOfBIOS;
+ VGAInfo[device].BIOSImageLen = FINAL_BIOSLEN;
+
+ // Load the BIOS and interrupt vector information from disk
+ sprintf(filename,"%s/bios.%02d",PM_getNucleusConfigPath(),device);
+ if ((f = fopen(filename,"rb")) != NULL) {
+ fread(copyOfBIOS,1,FINAL_BIOSLEN,f);
+ fread(VGAInfo[device].LowMem,1,sizeof(VGAInfo[device].LowMem),f);
+ fclose(f);
+ }
+ }
+
+ // Fix up all the secondary PCI base address registers
+ // (restores them all from the values we read previously)
+ _PCI_fixupSecondaryBARs();
+
+ // Disable the secondary controller and AGP VGA pass-through
+ DISABLE_DEVICE(device);
+ if (AGPBridge)
+ DISABLE_AGP_VGA();
+ }
+
+ // Reenable primary display controller and reset AGP bridge control
+ if (AGPBridge)
+ RESTORE_AGP_VGA();
+ ENABLE_DEVICE(0);
+
+ // Free physical BIOS image mapping
+ PM_freePhysicalAddr(mappedBIOS,MAX_BIOSLEN-1);
+
+ // Restore the X86 emulator BIOS info to primary controller
+ if (!useV86)
+ BE_setVGA(&VGAInfo[0]);
+ return true;
+}
+
+/****************************************************************************
+REMARKS:
+Enumerates the PCI bus and dumps the PCI configuration information to the
+log file.
+****************************************************************************/
+static void EnumeratePCI(void)
+{
+ int i,index;
+ PCIBridgeInfo *info;
+
+ printk("Displaying enumeration of PCI bus (%d devices, %d display devices)\n",
+ NumPCI, NumDevices);
+ for (index = 0; index < NumDevices; index++)
+ printk(" Display device %d is PCI device %d\n",index,DeviceIndex[index]);
+ printk("\n");
+ printk("Bus Slot Fnc DeviceID SubSystem Rev Class IRQ Int Cmd\n");
+ for (i = 0; i < NumPCI; i++) {
+ printk("%2d %2d %2d %04X:%04X %04X:%04X %02X %02X:%02X %02X %02X %04X ",
+ PCI[i].slot.p.Bus,
+ PCI[i].slot.p.Device,
+ PCI[i].slot.p.Function,
+ PCI[i].VendorID,
+ PCI[i].DeviceID,
+ PCI[i].SubSystemVendorID,
+ PCI[i].SubSystemID,
+ PCI[i].RevID,
+ PCI[i].BaseClass,
+ PCI[i].SubClass,
+ PCI[i].InterruptLine,
+ PCI[i].InterruptPin,
+ PCI[i].Command);
+ for (index = 0; index < NumDevices; index++) {
+ if (DeviceIndex[index] == i)
+ break;
+ }
+ if (index < NumDevices)
+ printk("<- %d\n", index);
+ else
+ printk("\n");
+ }
+ printk("\n");
+ printk("DeviceID Stat Ifc Cch Lat Hdr BIST\n");
+ for (i = 0; i < NumPCI; i++) {
+ printk("%04X:%04X %04X %02X %02X %02X %02X %02X ",
+ PCI[i].VendorID,
+ PCI[i].DeviceID,
+ PCI[i].Status,
+ PCI[i].Interface,
+ PCI[i].CacheLineSize,
+ PCI[i].LatencyTimer,
+ PCI[i].HeaderType,
+ PCI[i].BIST);
+ for (index = 0; index < NumDevices; index++) {
+ if (DeviceIndex[index] == i)
+ break;
+ }
+ if (index < NumDevices)
+ printk("<- %d\n", index);
+ else
+ printk("\n");
+ }
+ printk("\n");
+ printk("DeviceID Base10h Base14h Base18h Base1Ch Base20h Base24h ROMBase\n");
+ for (i = 0; i < NumPCI; i++) {
+ printk("%04X:%04X %08X %08X %08X %08X %08X %08X %08X ",
+ PCI[i].VendorID,
+ PCI[i].DeviceID,
+ PCI[i].BaseAddress10,
+ PCI[i].BaseAddress14,
+ PCI[i].BaseAddress18,
+ PCI[i].BaseAddress1C,
+ PCI[i].BaseAddress20,
+ PCI[i].BaseAddress24,
+ PCI[i].ROMBaseAddress);
+ for (index = 0; index < NumDevices; index++) {
+ if (DeviceIndex[index] == i)
+ break;
+ }
+ if (index < NumDevices)
+ printk("<- %d\n", index);
+ else
+ printk("\n");
+ }
+ printk("\n");
+ printk("DeviceID BAR10Len BAR14Len BAR18Len BAR1CLen BAR20Len BAR24Len ROMLen\n");
+ for (i = 0; i < NumPCI; i++) {
+ printk("%04X:%04X %08X %08X %08X %08X %08X %08X %08X ",
+ PCI[i].VendorID,
+ PCI[i].DeviceID,
+ PCI[i].BaseAddress10Len,
+ PCI[i].BaseAddress14Len,
+ PCI[i].BaseAddress18Len,
+ PCI[i].BaseAddress1CLen,
+ PCI[i].BaseAddress20Len,
+ PCI[i].BaseAddress24Len,
+ PCI[i].ROMBaseAddressLen);
+ for (index = 0; index < NumDevices; index++) {
+ if (DeviceIndex[index] == i)
+ break;
+ }
+ if (index < NumDevices)
+ printk("<- %d\n", index);
+ else
+ printk("\n");
+ }
+ printk("\n");
+ printk("Displaying enumeration of %d bridge devices\n",NumBridges);
+ printk("\n");
+ printk("DeviceID P# S# B# IOB IOL MemBase MemLimit PreBase PreLimit Ctrl\n");
+ for (i = 0; i < NumBridges; i++) {
+ info = (PCIBridgeInfo*)&PCI[BridgeIndex[i]];
+ printk("%04X:%04X %02X %02X %02X %04X %04X %08X %08X %08X %08X %04X\n",
+ info->VendorID,
+ info->DeviceID,
+ info->PrimaryBusNumber,
+ info->SecondayBusNumber,
+ info->SubordinateBusNumber,
+ ((u16)info->IOBase << 8) & 0xF000,
+ info->IOLimit ?
+ ((u16)info->IOLimit << 8) | 0xFFF : 0,
+ ((u32)info->MemoryBase << 16) & 0xFFF00000,
+ info->MemoryLimit ?
+ ((u32)info->MemoryLimit << 16) | 0xFFFFF : 0,
+ ((u32)info->PrefetchableMemoryBase << 16) & 0xFFF00000,
+ info->PrefetchableMemoryLimit ?
+ ((u32)info->PrefetchableMemoryLimit << 16) | 0xFFFFF : 0,
+ info->BridgeControl);
+ }
+ printk("\n");
+}
+
+/****************************************************************************
+RETURNS:
+Number of display devices found.
+
+REMARKS:
+This function enumerates the number of available display devices on the
+PCI bus, and returns the number found.
+****************************************************************************/
+static int PCI_enumerateDevices(void)
+{
+ int i,j;
+ PCIBridgeInfo *info;
+
+ // If this is the first time we have been called, enumerate all
+ // devices on the PCI bus.
+ if (NumPCI == -1) {
+ for (i = 0; i < MAX_PCI_DEVICES; i++)
+ PCI[i].dwSize = sizeof(PCI[i]);
+ if ((NumPCI = PCI_enumerate(PCI,MAX_PCI_DEVICES)) == 0)
+ return -1;
+
+ // Build a list of all PCI bridge devices
+ for (i = 0,NumBridges = 0,BridgeIndex[0] = -1; i < NumPCI; i++) {
+ if (PCI[i].BaseClass == PCI_BRIDGE_CLASS) {
+ if (NumBridges < MAX_PCI_DEVICES)
+ BridgeIndex[NumBridges++] = i;
+ }
+ }
+
+ // Now build a list of all display class devices
+ for (i = 0,NumDevices = 1,DeviceIndex[0] = -1; i < NumPCI; i++) {
+ if (PCI_IS_DISPLAY_CLASS(&PCI[i])) {
+ if ((PCI[i].Command & 0x3) == 0x3) {
+ DeviceIndex[0] = i;
+ }
+ else {
+ if (NumDevices < MAX_PCI_DEVICES)
+ DeviceIndex[NumDevices++] = i;
+ }
+ if (PCI[i].slot.p.Bus != 0) {
+ // This device is on a different bus than the primary
+ // PCI bus, so it is probably an AGP device. Find the
+ // AGP bus device that controls that bus so we can
+ // control it.
+ for (j = 0; j < NumBridges; j++) {
+ info = (PCIBridgeInfo*)&PCI[BridgeIndex[j]];
+ if (info->SecondayBusNumber == PCI[i].slot.p.Bus) {
+ AGPBridge = info;
+ break;
+ }
+ }
+ }
+ }
+ }
+
+ // Enumerate all PCI and bridge devices to log file
+ EnumeratePCI();
+ }
+ return NumDevices;
+}
+
+FILE *logfile;
+
+void printk(const char *fmt, ...)
+{
+ va_list argptr;
+ va_start(argptr, fmt);
+ vfprintf(logfile, fmt, argptr);
+ fflush(logfile);
+ va_end(argptr);
+}
+
+int main(int argc,char *argv[])
+{
+ while (argc > 1) {
+ if (stricmp(argv[1],"-usev86") == 0) {
+ useV86 = true;
+ }
+ else if (stricmp(argv[1],"-force") == 0) {
+ forcePost = true;
+ }
+#ifdef DEBUG
+ else if (stricmp(argv[1],"-decode") == 0) {
+ debugFlags |= DEBUG_DECODE_F;
+ }
+ else if (stricmp(argv[1],"-iotrace") == 0) {
+ debugFlags |= DEBUG_IO_TRACE_F;
+ }
+#endif
+ else {
+ printf("Usage: warmboot [-usev86] [-force] [-decode] [-iotrace]\n");
+ exit(-1);
+ }
+ argc--;
+ argv++;
+ }
+ if ((logfile = fopen("warmboot.log","w")) == NULL)
+ exit(1);
+
+ PM_init();
+ if (!useV86) {
+ // Initialise the x86 BIOS emulator
+ BE_init(false,debugFlags,65536,&VGAInfo[0]);
+ }
+
+ // Enumerate all devices (which POST's them at the same time)
+ if (PCI_enumerateDevices() < 1) {
+ printk("No PCI display devices found!\n");
+ return -1;
+ }
+
+ // Post all the display controller BIOS'es
+ PCI_postControllers();
+
+ // Cleanup and exit the emulator
+ if (!useV86)
+ BE_exit();
+ fclose(logfile);
+ return 0;
+}
diff --git a/board/MAI/bios_emulator/scitech/src/common/_aa_imp.asm b/board/MAI/bios_emulator/scitech/src/common/_aa_imp.asm
new file mode 100644
index 00000000000..61a9024ab3d
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/common/_aa_imp.asm
@@ -0,0 +1,51 @@
+;****************************************************************************
+;*
+;* SciTech Nucleus Audio Architecture
+;*
+;* Copyright (C) 1991-1998 SciTech Software, Inc.
+;* All rights reserved.
+;*
+;* ======================================================================
+;* |REMOVAL OR MODIFICATION OF THIS HEADER IS STRICTLY PROHIBITED BY LAW|
+;* | |
+;* |This copyrighted computer code contains proprietary technology |
+;* |owned by SciTech Software, Inc., located at 505 Wall Street, |
+;* |Chico, CA 95928 USA (http://www.scitechsoft.com). |
+;* | |
+;* |The contents of this file are subject to the SciTech Nucleus |
+;* |License; you may *not* use this file or related software except in |
+;* |compliance with the License. You may obtain a copy of the License |
+;* |at http://www.scitechsoft.com/nucleus-license.txt |
+;* | |
+;* |Software distributed under the License is distributed on an |
+;* |"AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or |
+;* |implied. See the License for the specific language governing |
+;* |rights and limitations under the License. |
+;* | |
+;* |REMOVAL OR MODIFICATION OF THIS HEADER IS STRICTLY PROHIBITED BY LAW|
+;* ======================================================================
+;*
+;* Language: TASM 4.0 or NASM
+;* Environment: IBM PC 32 bit Protected Mode.
+;*
+;* Description: Module to implement the import stubs for all the Nucleus
+;* Audio API functions for Intel binary compatible drivers.
+;*
+;****************************************************************************
+
+ IDEAL
+
+include "scitech.mac" ; Memory model macros
+
+BEGIN_IMPORTS_DEF _AA_exports
+SKIP_IMP AA_status ; Implemented in C code
+SKIP_IMP AA_errorMsg ; Implemented in C code
+SKIP_IMP AA_getDaysLeft ; Implemented in C code
+SKIP_IMP AA_registerLicense ; Implemented in C code
+SKIP_IMP AA_enumerateDevices ; Implemented in C code
+SKIP_IMP AA_loadDriver ; Implemented in C code
+DECLARE_IMP AA_unloadDriver
+DECLARE_IMP AA_saveOptions
+END_IMPORTS_DEF
+
+ END
diff --git a/board/MAI/bios_emulator/scitech/src/common/_ga_imp.asm b/board/MAI/bios_emulator/scitech/src/common/_ga_imp.asm
new file mode 100644
index 00000000000..5317600438e
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/common/_ga_imp.asm
@@ -0,0 +1,136 @@
+;****************************************************************************
+;*
+;* SciTech Nucleus Graphics Architecture
+;*
+;* Copyright (C) 1991-1998 SciTech Software, Inc.
+;* All rights reserved.
+;*
+;* ======================================================================
+;* |REMOVAL OR MODIFICATION OF THIS HEADER IS STRICTLY PROHIBITED BY LAW|
+;* | |
+;* |This copyrighted computer code contains proprietary technology |
+;* |owned by SciTech Software, Inc., located at 505 Wall Street, |
+;* |Chico, CA 95928 USA (http://www.scitechsoft.com). |
+;* | |
+;* |The contents of this file are subject to the SciTech Nucleus |
+;* |License; you may *not* use this file or related software except in |
+;* |compliance with the License. You may obtain a copy of the License |
+;* |at http://www.scitechsoft.com/nucleus-license.txt |
+;* | |
+;* |Software distributed under the License is distributed on an |
+;* |"AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or |
+;* |implied. See the License for the specific language governing |
+;* |rights and limitations under the License. |
+;* | |
+;* |REMOVAL OR MODIFICATION OF THIS HEADER IS STRICTLY PROHIBITED BY LAW|
+;* ======================================================================
+;*
+;* Language: TASM 4.0 or NASM
+;* Environment: IBM PC 32 bit Protected Mode.
+;*
+;* Description: Module to implement the import stubs for all the Nucleus
+;* Graphics API functions for Intel binary compatible drivers.
+;*
+;****************************************************************************
+
+ IDEAL
+
+include "scitech.mac" ; Memory model macros
+
+BEGIN_IMPORTS_DEF __GA_exports
+SKIP_IMP GA_status,0 ; Implemented in C code
+SKIP_IMP GA_errorMsg,1 ; Implemented in C code
+SKIP_IMP GA_getDaysLeft,1 ; Implemented in C code
+SKIP_IMP GA_registerLicense,2 ; Implemented in C code
+SKIP_IMP GA_enumerateDevices,1 ; Implemented in C code
+SKIP_IMP GA_loadDriver,2 ; Implemented in C code
+DECLARE_IMP GA_setActiveDevice,1
+SKIP_IMP GA_reserved1,0 ; Implemented in C code
+DECLARE_IMP GA_unloadDriver,1
+DECLARE_IMP REF2D_loadDriver,6
+DECLARE_IMP REF2D_unloadDriver,2
+DECLARE_IMP GA_loadRef2d,5
+DECLARE_IMP GA_unloadRef2d,1
+DECLARE_IMP GA_softStereoInit,1
+DECLARE_IMP GA_softStereoOn,0
+DECLARE_IMP GA_softStereoScheduleFlip,2
+DECLARE_IMP GA_softStereoGetFlipStatus,0
+DECLARE_IMP GA_softStereoWaitTillFlipped,0
+DECLARE_IMP GA_softStereoOff,0
+DECLARE_IMP GA_softStereoExit,0
+DECLARE_IMP GA_saveModeProfile,2
+DECLARE_IMP GA_saveOptions,2
+DECLARE_IMP GA_saveCRTCTimings,1
+DECLARE_IMP GA_restoreCRTCTimings,1
+DECLARE_IMP DDC_init,1
+DECLARE_IMP DDC_readEDID,5
+DECLARE_IMP EDID_parse,3
+DECLARE_IMP MCS_begin,1
+DECLARE_IMP MCS_getCapabilitiesString,2
+DECLARE_IMP MCS_isControlSupported,1
+DECLARE_IMP MCS_enableControl,2
+DECLARE_IMP MCS_getControlMax,2
+DECLARE_IMP MCS_getControlValue,2
+DECLARE_IMP MCS_getControlValues,3
+DECLARE_IMP MCS_setControlValue,2
+DECLARE_IMP MCS_setControlValues,3
+DECLARE_IMP MCS_resetControl,1
+DECLARE_IMP MCS_saveCurrentSettings,0
+DECLARE_IMP MCS_getTimingReport,3
+DECLARE_IMP MCS_getSelfTestReport,3
+DECLARE_IMP MCS_end,0
+SKIP_IMP GA_loadInGUI,1 ; Implemented in C code
+DECLARE_IMP DDC_writeEDID,6
+DECLARE_IMP GA_useDoubleScan,1
+DECLARE_IMP GA_getMaxRefreshRate,4
+DECLARE_IMP GA_computeCRTCTimings,6
+DECLARE_IMP GA_addMode,5
+DECLARE_IMP GA_addRefresh,5
+DECLARE_IMP GA_delMode,5
+DECLARE_IMP N_getLogName,0
+SKIP_IMP2 N_log
+DECLARE_IMP MDBX_getErrCode,0
+DECLARE_IMP MDBX_getErrorMsg,0
+DECLARE_IMP MDBX_open,1
+DECLARE_IMP MDBX_close,0
+DECLARE_IMP MDBX_first,1
+DECLARE_IMP MDBX_last,1
+DECLARE_IMP MDBX_next,1
+DECLARE_IMP MDBX_prev,1
+DECLARE_IMP MDBX_insert,1
+DECLARE_IMP MDBX_update,1
+DECLARE_IMP MDBX_flush,0
+DECLARE_IMP MDBX_importINF,2
+SKIP_IMP GA_getGlobalOptions,2 ; Implemented in C code
+DECLARE_IMP GA_setGlobalOptions,1
+DECLARE_IMP GA_saveGlobalOptions,1
+DECLARE_IMP GA_getInternalName,1
+DECLARE_IMP GA_getNucleusConfigPath,0
+DECLARE_IMP GA_getFakePCIID,0
+SKIP_IMP GA_loadLibrary,3 ; Implemented in C code
+SKIP_IMP GA_isOEMVersion,1 ; Implemented in C code
+DECLARE_IMP GA_isLiteVersion,1
+DECLARE_IMP GA_getDisplaySerialNo,1
+DECLARE_IMP GA_getDisplayUserName,1
+SKIP_IMP GA_getCurrentDriver,1 ; Implemented in C code
+SKIP_IMP GA_getCurrentRef2d,1 ; Implemented in C code
+SKIP_IMP GA_getLicensedDevices,1 ; Implemented in C code
+DECLARE_IMP DDC_initExt,2
+DECLARE_IMP MCS_beginExt,2
+DECLARE_IMP GA_loadRegionMgr,3
+DECLARE_IMP GA_unloadRegionMgr,1
+DECLARE_IMP GA_getProcAddress,2
+DECLARE_IMP GA_enableVBEMode,5
+DECLARE_IMP GA_disableVBEMode,5
+DECLARE_IMP GA_loadModeProfile,2
+DECLARE_IMP GA_getCRTCTimings,4
+DECLARE_IMP GA_setCRTCTimings,4
+DECLARE_IMP GA_setDefaultRefresh,6
+DECLARE_IMP GA_saveMonitorInfo,2
+DECLARE_IMP GA_detectPnPMonitor,3
+SKIP_IMP3 GA_queryFunctions
+SKIP_IMP3 REF2D_queryFunctions
+END_IMPORTS_DEF
+
+ END
+
diff --git a/board/MAI/bios_emulator/scitech/src/common/_gatimer.asm b/board/MAI/bios_emulator/scitech/src/common/_gatimer.asm
new file mode 100644
index 00000000000..0194a62f98d
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/common/_gatimer.asm
@@ -0,0 +1,248 @@
+;****************************************************************************
+;*
+;* SciTech Nucleus Graphics Architecture
+;*
+;* Copyright (C) 1991-1998 SciTech Software, Inc.
+;* All rights reserved.
+;*
+;* ======================================================================
+;* |REMOVAL OR MODIFICATION OF THIS HEADER IS STRICTLY PROHIBITED BY LAW|
+;* | |
+;* |This copyrighted computer code contains proprietary technology |
+;* |owned by SciTech Software, Inc., located at 505 Wall Street, |
+;* |Chico, CA 95928 USA (http://www.scitechsoft.com). |
+;* | |
+;* |The contents of this file are subject to the SciTech Nucleus |
+;* |License; you may *not* use this file or related software except in |
+;* |compliance with the License. You may obtain a copy of the License |
+;* |at http://www.scitechsoft.com/nucleus-license.txt |
+;* | |
+;* |Software distributed under the License is distributed on an |
+;* |"AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or |
+;* |implied. See the License for the specific language governing |
+;* |rights and limitations under the License. |
+;* | |
+;* |REMOVAL OR MODIFICATION OF THIS HEADER IS STRICTLY PROHIBITED BY LAW|
+;* ======================================================================
+;*
+;* Language: 80386 Assembler, NASM or TASM
+;* Environment: IBM PC 32 bit Protected Mode.
+;*
+;* Description: Assembly support functions for the Nucleus library for
+;* the high resolution timing support functions provided by
+;* the Intel Pentium and compatible processors.
+;*
+;****************************************************************************
+
+ IDEAL
+
+include "scitech.mac" ; Memory model macros
+
+header _gatimer
+
+begcodeseg _gatimer
+
+ifdef USE_NASM
+%macro mCPU_ID 0
+db 00Fh,0A2h
+%endmacro
+else
+MACRO mCPU_ID
+db 00Fh,0A2h
+ENDM
+endif
+
+ifdef USE_NASM
+%macro mRDTSC 0
+db 00Fh,031h
+%endmacro
+else
+MACRO mRDTSC
+db 00Fh,031h
+ENDM
+endif
+
+;----------------------------------------------------------------------------
+; bool _GA_haveCPUID(void)
+;----------------------------------------------------------------------------
+; Determines if we have support for the CPUID instruction.
+;----------------------------------------------------------------------------
+cprocstart _GA_haveCPUID
+
+ enter_c
+ pushfd ; Get original EFLAGS
+ pop eax
+ mov ecx, eax
+ xor eax, 200000h ; Flip ID bit in EFLAGS
+ push eax ; Save new EFLAGS value on stack
+ popfd ; Replace current EFLAGS value
+ pushfd ; Get new EFLAGS
+ pop eax ; Store new EFLAGS in EAX
+ xor eax, ecx ; Can not toggle ID bit,
+ jnz @@1 ; Processor=80486
+ mov eax,0 ; We dont have CPUID support
+ jmp @@Done
+@@1: mov eax,1 ; We have CPUID support
+@@Done: leave_c
+ ret
+
+cprocend
+
+;----------------------------------------------------------------------------
+; uint _GA_getCPUIDFeatures(void)
+;----------------------------------------------------------------------------
+; Determines the CPU type using the CPUID instruction.
+;----------------------------------------------------------------------------
+cprocstart _GA_getCPUIDFeatures
+
+ enter_c
+
+ xor eax, eax ; Set up for CPUID instruction
+ mCPU_ID ; Get and save vendor ID
+ cmp eax, 1 ; Make sure 1 is valid input for CPUID
+ jl @@Fail ; We dont have the CPUID instruction
+ xor eax, eax
+ inc eax
+ mCPU_ID ; Get family/model/stepping/features
+ mov eax, edx
+@@Done: leave_c
+ ret
+
+@@Fail: xor eax,eax
+ jmp @@Done
+
+cprocend
+
+;----------------------------------------------------------------------------
+; void _GA_readTimeStamp(GA_largeInteger *time)
+;----------------------------------------------------------------------------
+; Reads the time stamp counter and returns the 64-bit result.
+;----------------------------------------------------------------------------
+cprocstart _GA_readTimeStamp
+
+ mRDTSC
+ mov ecx,[esp+4] ; Access directly without stack frame
+ mov [ecx],eax
+ mov [ecx+4],edx
+ ret
+
+cprocend
+
+;----------------------------------------------------------------------------
+; N_uint32 GA_TimerDifference(GA_largeInteger *a,GA_largeInteger *b)
+;----------------------------------------------------------------------------
+; Computes the difference between two 64-bit numbers (a-b)
+;----------------------------------------------------------------------------
+cprocstart GA_TimerDifference
+
+ ARG a:DPTR, b:DPTR, t:DPTR
+
+ enter_c
+
+ mov ecx,[a]
+ mov eax,[ecx] ; EAX := b.low
+ mov ecx,[b]
+ sub eax,[ecx]
+ mov edx,eax ; EDX := low difference
+ mov ecx,[a]
+ mov eax,[ecx+4] ; ECX := b.high
+ mov ecx,[b]
+ sbb eax,[ecx+4] ; EAX := high difference
+ mov eax,edx ; Return low part
+
+ leave_c
+ ret
+
+cprocend
+
+; Macro to delay briefly to ensure that enough time has elapsed between
+; successive I/O accesses so that the device being accessed can respond
+; to both accesses even on a very fast PC.
+
+ifdef USE_NASM
+%macro DELAY_TIMER 0
+ jmp short $+2
+ jmp short $+2
+ jmp short $+2
+%endmacro
+else
+macro DELAY_TIMER
+ jmp short $+2
+ jmp short $+2
+ jmp short $+2
+endm
+endif
+
+;----------------------------------------------------------------------------
+; void _OS_delay8253(N_uint32 microSeconds);
+;----------------------------------------------------------------------------
+; Delays for the specified number of microseconds, by directly programming
+; the 8253 timer chips.
+;----------------------------------------------------------------------------
+cprocstart _OS_delay8253
+
+ ARG microSec:UINT
+
+ enter_c
+
+; Start timer 2 counting
+
+ mov _ax,[microSec] ; EAX := count in microseconds
+ mov ecx,1196
+ mul ecx
+ mov ecx,1000
+ div ecx
+ mov ecx,eax ; ECX := count in timer ticks
+ in al,61h
+ or al,1
+ out 61h,al
+
+; Set the timer 2 count to 0 again to start the timing interval.
+
+ mov al,10110100b ; set up to load initial (timer 2)
+ out 43h,al ; timer count
+ DELAY_TIMER
+ sub al,al
+ out 42h,al ; load count lsb
+ DELAY_TIMER
+ out 42h,al ; load count msb
+ xor di,di ; Allow max 64K loop iterations
+
+@@LoopStart:
+ dec di ; This is a guard against the possibility that
+ jz @@LoopEnd ; someone eg. stopped the timer behind our back.
+ ; After 64K iterations we bail out no matter what
+ ; (and hope it wasn't too soon)
+ mov al,00000000b ; latch timer 0
+ out 43h,al
+ DELAY_TIMER
+ in al,42h ; least significant byte
+ DELAY_TIMER
+ mov ah,al
+ in al,42h ; most significant byte
+ xchg ah,al
+ neg ax ; Convert from countdown remaining
+ ; to elapsed count
+ cmp ax,cx ; Has delay expired?
+ jb @@LoopStart ; No, so loop till done
+
+; Stop timer 2 from counting
+@@LoopEnd:
+ in al,61H
+ and al,0FEh
+ out 61H,al
+
+; Some programs have a problem if we change the control port; better change it
+; to something they expect (mode 3 - square wave generator)...
+ mov al,0B6h
+ out 43h,al
+
+ leave_c
+ ret
+
+cprocend
+
+endcodeseg _gatimer
+
+ END
+
diff --git a/board/MAI/bios_emulator/scitech/src/common/_pm_imp.asm b/board/MAI/bios_emulator/scitech/src/common/_pm_imp.asm
new file mode 100644
index 00000000000..d4b11790afe
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/common/_pm_imp.asm
@@ -0,0 +1,195 @@
+;****************************************************************************
+;*
+;* SciTech OS Portability Manager Library
+;*
+;* Copyright (C) 1991-1998 SciTech Software, Inc.
+;* All rights reserved.
+;*
+;* ======================================================================
+;* |REMOVAL OR MODIFICATION OF THIS HEADER IS STRICTLY PROHIBITED BY LAW|
+;* | |
+;* |This copyrighted computer code contains proprietary technology |
+;* |owned by SciTech Software, Inc., located at 505 Wall Street, |
+;* |Chico, CA 95928 USA (http://www.scitechsoft.com). |
+;* | |
+;* |The contents of this file are subject to the SciTech Nucleus |
+;* |License; you may *not* use this file or related software except in |
+;* |compliance with the License. You may obtain a copy of the License |
+;* |at http://www.scitechsoft.com/nucleus-license.txt |
+;* | |
+;* |Software distributed under the License is distributed on an |
+;* |"AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or |
+;* |implied. See the License for the specific language governing |
+;* |rights and limitations under the License. |
+;* | |
+;* |REMOVAL OR MODIFICATION OF THIS HEADER IS STRICTLY PROHIBITED BY LAW|
+;* ======================================================================
+;*
+;* Language: TASM 4.0 or NASM
+;* Environment: IBM PC 32 bit Protected Mode.
+;*
+;* Description: Module to implement the import stubs for all the PM
+;* API functions for Intel binary portable drivers.
+;*
+;****************************************************************************
+
+ IDEAL
+
+include "scitech.mac" ; Memory model macros
+
+BEGIN_IMPORTS_DEF _PM_imports
+DECLARE_IMP PM_getModeType,0
+DECLARE_IMP PM_getBIOSPointer,0
+DECLARE_IMP PM_getA0000Pointer,0
+DECLARE_IMP PM_mapPhysicalAddr,0
+DECLARE_IMP PM_mallocShared,0
+SKIP_IMP _PM_reserved1,0
+DECLARE_IMP PM_freeShared,0
+DECLARE_IMP PM_mapToProcess,0
+DECLARE_IMP PM_mapRealPointer,0
+DECLARE_IMP PM_allocRealSeg,0
+DECLARE_IMP PM_freeRealSeg,0
+DECLARE_IMP PM_allocLockedMem,0
+DECLARE_IMP PM_freeLockedMem,0
+DECLARE_IMP PM_callRealMode,0
+DECLARE_IMP PM_int86,0
+DECLARE_IMP PM_int86x,0
+DECLARE_IMP DPMI_int86,0
+DECLARE_IMP PM_availableMemory,0
+DECLARE_IMP PM_getVESABuf,0
+DECLARE_IMP PM_getOSType,0
+DECLARE_IMP PM_fatalError,0
+DECLARE_IMP PM_setBankA,0
+DECLARE_IMP PM_setBankAB,0
+DECLARE_IMP PM_setCRTStart,0
+DECLARE_IMP PM_getCurrentPat,0
+DECLARE_IMP PM_getVBEAFPath,0
+DECLARE_IMP PM_getNucleusPath,0
+DECLARE_IMP PM_getNucleusConfigPath,0
+DECLARE_IMP PM_getUniqueID,0
+DECLARE_IMP PM_getMachineName,0
+DECLARE_IMP VF_available,0
+DECLARE_IMP VF_init,0
+DECLARE_IMP VF_exit,0
+DECLARE_IMP PM_openConsole,0
+DECLARE_IMP PM_getConsoleStateSize,0
+DECLARE_IMP PM_saveConsoleState,0
+DECLARE_IMP PM_restoreConsoleState,0
+DECLARE_IMP PM_closeConsole,0
+DECLARE_IMP PM_setOSCursorLocation,0
+DECLARE_IMP PM_setOSScreenWidth,0
+DECLARE_IMP PM_enableWriteCombine,0
+DECLARE_IMP PM_backslash,0
+DECLARE_IMP PM_lockDataPages,0
+DECLARE_IMP PM_unlockDataPages,0
+DECLARE_IMP PM_lockCodePages,0
+DECLARE_IMP PM_unlockCodePages,0
+DECLARE_IMP PM_setRealTimeClockHandler,0
+DECLARE_IMP PM_setRealTimeClockFrequency,0
+DECLARE_IMP PM_restoreRealTimeClockHandler,0
+DECLARE_IMP PM_doBIOSPOST,0
+DECLARE_IMP PM_getBootDrive,0
+DECLARE_IMP PM_freePhysicalAddr,0
+DECLARE_IMP PM_inpb,0
+DECLARE_IMP PM_inpw,0
+DECLARE_IMP PM_inpd,0
+DECLARE_IMP PM_outpb,0
+DECLARE_IMP PM_outpw,0
+DECLARE_IMP PM_outpd,0
+SKIP_IMP _PM_reserved2,0
+DECLARE_IMP PM_setSuspendAppCallback,0
+DECLARE_IMP PM_haveBIOSAccess,0
+DECLARE_IMP PM_kbhit,0
+DECLARE_IMP PM_getch,0
+DECLARE_IMP PM_findBPD,0
+DECLARE_IMP PM_getPhysicalAddr,0
+DECLARE_IMP PM_sleep,0
+DECLARE_IMP PM_getCOMPort,0
+DECLARE_IMP PM_getLPTPort,0
+DECLARE_IMP PM_loadLibrary,0
+DECLARE_IMP PM_getProcAddress,0
+DECLARE_IMP PM_freeLibrary,0
+DECLARE_IMP PCI_enumerate,0
+DECLARE_IMP PCI_accessReg,0
+DECLARE_IMP PCI_setHardwareIRQ,0
+DECLARE_IMP PCI_generateSpecialCyle,0
+SKIP_IMP _PM_reserved3,0
+DECLARE_IMP PCIBIOS_getEntry,0
+DECLARE_IMP CPU_getProcessorType,0
+DECLARE_IMP CPU_haveMMX,0
+DECLARE_IMP CPU_have3DNow,0
+DECLARE_IMP CPU_haveSSE,0
+DECLARE_IMP CPU_haveRDTSC,0
+DECLARE_IMP CPU_getProcessorSpeed,0
+DECLARE_IMP ZTimerInit,0
+DECLARE_IMP LZTimerOn,0
+DECLARE_IMP LZTimerLap,0
+DECLARE_IMP LZTimerOff,0
+DECLARE_IMP LZTimerCount,0
+DECLARE_IMP LZTimerOnExt,0
+DECLARE_IMP LZTimerLapExt,0
+DECLARE_IMP LZTimerOffExt,0
+DECLARE_IMP LZTimerCountExt,0
+DECLARE_IMP ULZTimerOn,0
+DECLARE_IMP ULZTimerLap,0
+DECLARE_IMP ULZTimerOff,0
+DECLARE_IMP ULZTimerCount,0
+DECLARE_IMP ULZReadTime,0
+DECLARE_IMP ULZElapsedTime,0
+DECLARE_IMP ULZTimerResolution,0
+DECLARE_IMP PM_findFirstFile,0
+DECLARE_IMP PM_findNextFile,0
+DECLARE_IMP PM_findClose,0
+DECLARE_IMP PM_makepath,0
+DECLARE_IMP PM_splitpath,0
+DECLARE_IMP PM_driveValid,0
+DECLARE_IMP PM_getdcwd,0
+DECLARE_IMP PM_setFileAttr,0
+DECLARE_IMP PM_mkdir,0
+DECLARE_IMP PM_rmdir,0
+DECLARE_IMP PM_getFileAttr,0
+DECLARE_IMP PM_getFileTime,0
+DECLARE_IMP PM_setFileTime,0
+DECLARE_IMP CPU_getProcessorName,0
+DECLARE_IMP PM_getVGAStateSize,0
+DECLARE_IMP PM_saveVGAState,0
+DECLARE_IMP PM_restoreVGAState,0
+DECLARE_IMP PM_vgaBlankDisplay,0
+DECLARE_IMP PM_vgaUnblankDisplay,0
+DECLARE_IMP PM_blockUntilTimeout,0
+DECLARE_IMP _PM_add64,0
+DECLARE_IMP _PM_sub64,0
+DECLARE_IMP _PM_mul64,0
+DECLARE_IMP _PM_div64,0
+DECLARE_IMP _PM_shr64,0
+DECLARE_IMP _PM_sar64,0
+DECLARE_IMP _PM_shl64,0
+DECLARE_IMP _PM_neg64,0
+DECLARE_IMP PCI_findBARSize,0
+DECLARE_IMP PCI_readRegBlock,0
+DECLARE_IMP PCI_writeRegBlock,0
+DECLARE_IMP PM_flushTLB,0
+DECLARE_IMP PM_useLocalMalloc,0
+DECLARE_IMP PM_malloc,0
+DECLARE_IMP PM_calloc,0
+DECLARE_IMP PM_realloc,0
+DECLARE_IMP PM_free,0
+DECLARE_IMP PM_getPhysicalAddrRange,0
+DECLARE_IMP PM_allocPage,0
+DECLARE_IMP PM_freePage,0
+DECLARE_IMP PM_agpInit,0
+DECLARE_IMP PM_agpExit,0
+DECLARE_IMP PM_agpReservePhysical,0
+DECLARE_IMP PM_agpReleasePhysical,0
+DECLARE_IMP PM_agpCommitPhysical,0
+DECLARE_IMP PM_agpFreePhysical,0
+DECLARE_IMP PCI_getNumDevices,0
+DECLARE_IMP PM_setLocalBPDPath,0
+DECLARE_IMP PM_loadDirectDraw,0
+DECLARE_IMP PM_unloadDirectDraw,0
+DECLARE_IMP PM_getDirectDrawWindow,0
+DECLARE_IMP PM_doSuspendApp,0
+END_IMPORTS_DEF
+
+ END
+
diff --git a/board/MAI/bios_emulator/scitech/src/common/aabeos.c b/board/MAI/bios_emulator/scitech/src/common/aabeos.c
new file mode 100644
index 00000000000..ba8645945be
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/common/aabeos.c
@@ -0,0 +1,92 @@
+/****************************************************************************
+*
+* SciTech Nucleus Graphics Architecture
+*
+* Copyright (C) 1991-1998 SciTech Software, Inc.
+* All rights reserved.
+*
+* ======================================================================
+* |REMOVAL OR MODIFICATION OF THIS HEADER IS STRICTLY PROHIBITED BY LAW|
+* | |
+* |This copyrighted computer code contains proprietary technology |
+* |owned by SciTech Software, Inc., located at 505 Wall Street, |
+* |Chico, CA 95928 USA (http://www.scitechsoft.com). |
+* | |
+* |The contents of this file are subject to the SciTech Nucleus |
+* |License; you may *not* use this file or related software except in |
+* |compliance with the License. You may obtain a copy of the License |
+* |at http://www.scitechsoft.com/nucleus-license.txt |
+* | |
+* |Software distributed under the License is distributed on an |
+* |"AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or |
+* |implied. See the License for the specific language governing |
+* |rights and limitations under the License. |
+* | |
+* |REMOVAL OR MODIFICATION OF THIS HEADER IS STRICTLY PROHIBITED BY LAW|
+* ======================================================================
+*
+* Language: ANSI C
+* Environment: Linux
+*
+* Description: OS specific Nucleus Graphics Architecture services for
+* the Linux operating system.
+*
+****************************************************************************/
+
+#include "nucleus/graphics.h"
+#include <sys/time.h>
+
+static ibool haveRDTSC;
+
+/*-------------------------- Implementation -------------------------------*/
+
+/****************************************************************************
+REMARKS:
+Nothing special for this OS.
+****************************************************************************/
+GA_sharedInfo * NAPI GA_getSharedInfo(
+ int device)
+{
+ (void)device;
+ return NULL;
+}
+
+/****************************************************************************
+REMARKS:
+Nothing special for this OS.
+****************************************************************************/
+ibool NAPI GA_getSharedExports(
+ GA_exports *gaExp)
+{
+ (void)gaExp;
+ return false;
+}
+
+/****************************************************************************
+REMARKS:
+This function initialises the high precision timing functions for the
+Nucleus loader library.
+****************************************************************************/
+ibool NAPI GA_TimerInit(void)
+{
+ if (_GA_haveCPUID() && (_GA_getCPUIDFeatures() & CPU_HaveRDTSC) != 0)
+ haveRDTSC = true;
+ return true;
+}
+
+/****************************************************************************
+REMARKS:
+This function reads the high resolution timer.
+****************************************************************************/
+void NAPI GA_TimerRead(
+ GA_largeInteger *value)
+{
+ if (haveRDTSC)
+ _GA_readTimeStamp(value);
+ else {
+ struct timeval t;
+ gettimeofday(&t, NULL);
+ value->low = t.tv_sec*1000000 + t.tv_usec;
+ value->high = 0;
+ }
+}
diff --git a/board/MAI/bios_emulator/scitech/src/common/aados.c b/board/MAI/bios_emulator/scitech/src/common/aados.c
new file mode 100644
index 00000000000..e994f938eb2
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/common/aados.c
@@ -0,0 +1,64 @@
+/****************************************************************************
+*
+* SciTech Nucleus Graphics Architecture
+*
+* Copyright (C) 1991-1998 SciTech Software, Inc.
+* All rights reserved.
+*
+* ======================================================================
+* |REMOVAL OR MODIFICATION OF THIS HEADER IS STRICTLY PROHIBITED BY LAW|
+* | |
+* |This copyrighted computer code contains proprietary technology |
+* |owned by SciTech Software, Inc., located at 505 Wall Street, |
+* |Chico, CA 95928 USA (http://www.scitechsoft.com). |
+* | |
+* |The contents of this file are subject to the SciTech Nucleus |
+* |License; you may *not* use this file or related software except in |
+* |compliance with the License. You may obtain a copy of the License |
+* |at http://www.scitechsoft.com/nucleus-license.txt |
+* | |
+* |Software distributed under the License is distributed on an |
+* |"AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or |
+* |implied. See the License for the specific language governing |
+* |rights and limitations under the License. |
+* | |
+* |REMOVAL OR MODIFICATION OF THIS HEADER IS STRICTLY PROHIBITED BY LAW|
+* ======================================================================
+*
+* Language: ANSI C
+* Environment: MSDOS
+*
+* Description: OS specific Nucleus Graphics Architecture services for
+* the MSDOS operating system.
+*
+****************************************************************************/
+
+#include "pm_help.h"
+#include "pmapi.h"
+#include <stdio.h>
+#include <stdlib.h>
+#include <string.h>
+
+/*-------------------------- Implementation -------------------------------*/
+
+/****************************************************************************
+REMARKS:
+This function initialises the high precision timing functions for the DOS
+Nucleus loader library.
+****************************************************************************/
+ibool NAPI GA_TimerInit(void)
+{
+ if (_GA_haveCPUID() && (_GA_getCPUIDFeatures() & CPU_HaveRDTSC) != 0)
+ return true;
+ return false;
+}
+
+/****************************************************************************
+REMARKS:
+This function reads the high resolution timer.
+****************************************************************************/
+void NAPI GA_TimerRead(
+ GA_largeInteger *value)
+{
+ _GA_readTimeStamp(value);
+}
diff --git a/board/MAI/bios_emulator/scitech/src/common/aalib.c b/board/MAI/bios_emulator/scitech/src/common/aalib.c
new file mode 100644
index 00000000000..84bf7b3d8f7
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/common/aalib.c
@@ -0,0 +1,225 @@
+/****************************************************************************
+*
+* SciTech Nucleus Audio Architecture
+*
+* Copyright (C) 1991-1998 SciTech Software, Inc.
+* All rights reserved.
+*
+* ======================================================================
+* |REMOVAL OR MODIFICATION OF THIS HEADER IS STRICTLY PROHIBITED BY LAW|
+* | |
+* |This copyrighted computer code contains proprietary technology |
+* |owned by SciTech Software, Inc., located at 505 Wall Street, |
+* |Chico, CA 95928 USA (http://www.scitechsoft.com). |
+* | |
+* |The contents of this file are subject to the SciTech Nucleus |
+* |License; you may *not* use this file or related software except in |
+* |compliance with the License. You may obtain a copy of the License |
+* |at http://www.scitechsoft.com/nucleus-license.txt |
+* | |
+* |Software distributed under the License is distributed on an |
+* |"AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or |
+* |implied. See the License for the specific language governing |
+* |rights and limitations under the License. |
+* | |
+* |REMOVAL OR MODIFICATION OF THIS HEADER IS STRICTLY PROHIBITED BY LAW|
+* ======================================================================
+*
+* Language: ANSI C
+* Environment: Any 32-bit protected mode environment
+*
+* Description: C module for the Graphics Accelerator Driver API. Uses
+* the SciTech PM library for interfacing with DOS
+* extender specific functions.
+*
+****************************************************************************/
+
+#include "nucleus/audio.h"
+#ifdef __WIN32_VXD__
+#include "sdd/sddhelp.h"
+#else
+#include <stdio.h>
+#include <stdlib.h>
+#endif
+
+/*---------------------------- Global Variables ---------------------------*/
+
+#ifdef TEST_HARNESS
+extern PM_imports _VARAPI _PM_imports;
+#else
+AA_exports _VARAPI _AA_exports;
+static int loaded = false;
+static PE_MODULE *hModBPD = NULL;
+
+#ifdef __DRIVER__
+extern PM_imports _PM_imports;
+#else
+#include "pmimp.h"
+#endif
+
+static N_imports _N_imports = {
+ sizeof(N_imports),
+ _OS_delay,
+ };
+
+#ifdef __DRIVER__
+extern AA_imports _AA_imports;
+#else
+static AA_imports _AA_imports = {
+ sizeof(AA_imports),
+ };
+#endif
+#endif
+
+/*----------------------------- Implementation ----------------------------*/
+
+#define DLL_NAME "audio.bpd"
+
+#ifndef TEST_HARNESS
+/****************************************************************************
+REMARKS:
+Fatal error handler for non-exported AA_exports.
+****************************************************************************/
+static void _AA_fatalErrorHandler(void)
+{
+ PM_fatalError("Unsupported Nucleus export function called! Please upgrade your copy of Nucleus!\n");
+}
+
+/****************************************************************************
+REMARKS:
+Loads the Nucleus binary portable DLL into memory and initilises it.
+****************************************************************************/
+static ibool LoadDriver(void)
+{
+ AA_initLibrary_t AA_initLibrary;
+ AA_exports *aaExp;
+ char filename[PM_MAX_PATH];
+ char bpdpath[PM_MAX_PATH];
+ int i,max;
+ ulong *p;
+
+ /* Check if we have already loaded the driver */
+ if (loaded)
+ return true;
+ PM_init();
+ _AA_exports.dwSize = sizeof(_AA_exports);
+
+ /* Open the BPD file */
+ if (!PM_findBPD(DLL_NAME,bpdpath))
+ return false;
+ strcpy(filename,bpdpath);
+ strcat(filename,DLL_NAME);
+ if ((hModBPD = PE_loadLibrary(filename,false)) == NULL)
+ return false;
+ if ((AA_initLibrary = (AA_initLibrary_t)PE_getProcAddress(hModBPD,"_AA_initLibrary")) == NULL)
+ return false;
+ bpdpath[strlen(bpdpath)-1] = 0;
+ if (strcmp(bpdpath,PM_getNucleusPath()) == 0)
+ strcpy(bpdpath,PM_getNucleusConfigPath());
+ else {
+ PM_backslash(bpdpath);
+ strcat(bpdpath,"config");
+ }
+ if ((aaExp = AA_initLibrary(bpdpath,filename,&_PM_imports,&_N_imports,&_AA_imports)) == NULL)
+ PM_fatalError("AA_initLibrary failed!\n");
+
+ /* Initialize all default imports to point to fatal error handler
+ * for upwards compatibility, and copy the exported functions.
+ */
+ max = sizeof(_AA_exports)/sizeof(AA_initLibrary_t);
+ for (i = 0,p = (ulong*)&_AA_exports; i < max; i++)
+ *p++ = (ulong)_AA_fatalErrorHandler;
+ memcpy(&_AA_exports,aaExp,MIN(sizeof(_AA_exports),aaExp->dwSize));
+ loaded = true;
+ return true;
+}
+
+/* The following are stub entry points that the application calls to
+ * initialise the Nucleus loader library, and we use this to load our
+ * driver DLL from disk and initialise the library using it.
+ */
+
+/* {secret} */
+int NAPI AA_status(void)
+{
+ if (!loaded)
+ return nDriverNotFound;
+ return _AA_exports.AA_status();
+}
+
+/* {secret} */
+const char * NAPI AA_errorMsg(
+ N_int32 status)
+{
+ if (!loaded)
+ return "Unable to load Nucleus device driver!";
+ return _AA_exports.AA_errorMsg(status);
+}
+
+/* {secret} */
+int NAPI AA_getDaysLeft(void)
+{
+ if (!LoadDriver())
+ return -1;
+ return _AA_exports.AA_getDaysLeft();
+}
+
+/* {secret} */
+int NAPI AA_registerLicense(uchar *license)
+{
+ if (!LoadDriver())
+ return 0;
+ return _AA_exports.AA_registerLicense(license);
+}
+
+/* {secret} */
+int NAPI AA_enumerateDevices(void)
+{
+ if (!LoadDriver())
+ return 0;
+ return _AA_exports.AA_enumerateDevices();
+}
+
+/* {secret} */
+AA_devCtx * NAPI AA_loadDriver(N_int32 deviceIndex)
+{
+ if (!LoadDriver())
+ return NULL;
+ return _AA_exports.AA_loadDriver(deviceIndex);
+}
+#endif
+
+typedef struct {
+ N_uint32 low;
+ N_uint32 high;
+ } AA_largeInteger;
+
+void NAPI _OS_delay8253(N_uint32 microSeconds);
+ibool NAPI _GA_haveCPUID(void);
+uint NAPI _GA_getCPUIDFeatures(void);
+void NAPI _GA_readTimeStamp(AA_largeInteger *time);
+#define CPU_HaveRDTSC 0x00000010
+
+/****************************************************************************
+REMARKS:
+This function delays for the specified number of microseconds
+****************************************************************************/
+void NAPI _OS_delay(
+ N_uint32 microSeconds)
+{
+ static ibool inited = false;
+ LZTimerObject tm;
+
+ if (_GA_haveCPUID() && (_GA_getCPUIDFeatures() & CPU_HaveRDTSC) != 0) {
+ if (!inited) {
+ ZTimerInit();
+ inited = true;
+ }
+ LZTimerOnExt(&tm);
+ while (LZTimerLapExt(&tm) < microSeconds)
+ ;
+ LZTimerOnExt(&tm);
+ }
+ else
+ _OS_delay8253(microSeconds);
+}
diff --git a/board/MAI/bios_emulator/scitech/src/common/aalinux.c b/board/MAI/bios_emulator/scitech/src/common/aalinux.c
new file mode 100644
index 00000000000..4385b23e4f6
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/common/aalinux.c
@@ -0,0 +1,94 @@
+/****************************************************************************
+*
+* SciTech Nucleus Graphics Architecture
+*
+* Copyright (C) 1991-1998 SciTech Software, Inc.
+* All rights reserved.
+*
+* ======================================================================
+* |REMOVAL OR MODIFICATION OF THIS HEADER IS STRICTLY PROHIBITED BY LAW|
+* | |
+* |This copyrighted computer code contains proprietary technology |
+* |owned by SciTech Software, Inc., located at 505 Wall Street, |
+* |Chico, CA 95928 USA (http://www.scitechsoft.com). |
+* | |
+* |The contents of this file are subject to the SciTech Nucleus |
+* |License; you may *not* use this file or related software except in |
+* |compliance with the License. You may obtain a copy of the License |
+* |at http://www.scitechsoft.com/nucleus-license.txt |
+* | |
+* |Software distributed under the License is distributed on an |
+* |"AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or |
+* |implied. See the License for the specific language governing |
+* |rights and limitations under the License. |
+* | |
+* |REMOVAL OR MODIFICATION OF THIS HEADER IS STRICTLY PROHIBITED BY LAW|
+* ======================================================================
+*
+* Language: ANSI C
+* Environment: Linux
+*
+* Description: OS specific Nucleus Graphics Architecture services for
+* the Linux operating system.
+*
+****************************************************************************/
+
+#include "nucleus/graphics.h"
+#include <sys/time.h>
+
+/*---------------------------- Global Variables ---------------------------*/
+
+static ibool haveRDTSC;
+
+/*-------------------------- Implementation -------------------------------*/
+
+/****************************************************************************
+REMARKS:
+Nothing special for this OS.
+****************************************************************************/
+GA_sharedInfo * NAPI GA_getSharedInfo(
+ int device)
+{
+ (void)device;
+ return NULL;
+}
+
+/****************************************************************************
+REMARKS:
+Nothing special for this OS.
+****************************************************************************/
+ibool NAPI GA_getSharedExports(
+ GA_exports *gaExp)
+{
+ (void)gaExp;
+ return false;
+}
+
+/****************************************************************************
+REMARKS:
+This function initialises the high precision timing functions for the
+Nucleus loader library.
+****************************************************************************/
+ibool NAPI GA_TimerInit(void)
+{
+ if (_GA_haveCPUID() && (_GA_getCPUIDFeatures() & CPU_HaveRDTSC) != 0)
+ haveRDTSC = true;
+ return true;
+}
+
+/****************************************************************************
+REMARKS:
+This function reads the high resolution timer.
+****************************************************************************/
+void NAPI GA_TimerRead(
+ GA_largeInteger *value)
+{
+ if (haveRDTSC)
+ _GA_readTimeStamp(value);
+ else {
+ struct timeval t;
+ gettimeofday(&t, NULL);
+ value->low = t.tv_sec*1000000 + t.tv_usec;
+ value->high = 0;
+ }
+}
diff --git a/board/MAI/bios_emulator/scitech/src/common/aaos2.c b/board/MAI/bios_emulator/scitech/src/common/aaos2.c
new file mode 100644
index 00000000000..486b96a9c09
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/common/aaos2.c
@@ -0,0 +1,124 @@
+/****************************************************************************
+*
+* SciTech Nucleus Graphics Architecture
+*
+* Copyright (C) 1991-1998 SciTech Software, Inc.
+* All rights reserved.
+*
+* ======================================================================
+* |REMOVAL OR MODIFICATION OF THIS HEADER IS STRICTLY PROHIBITED BY LAW|
+* | |
+* |This copyrighted computer code contains proprietary technology |
+* |owned by SciTech Software, Inc., located at 505 Wall Street, |
+* |Chico, CA 95928 USA (http://www.scitechsoft.com). |
+* | |
+* |The contents of this file are subject to the SciTech Nucleus |
+* |License; you may *not* use this file or related software except in |
+* |compliance with the License. You may obtain a copy of the License |
+* |at http://www.scitechsoft.com/nucleus-license.txt |
+* | |
+* |Software distributed under the License is distributed on an |
+* |"AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or |
+* |implied. See the License for the specific language governing |
+* |rights and limitations under the License. |
+* | |
+* |REMOVAL OR MODIFICATION OF THIS HEADER IS STRICTLY PROHIBITED BY LAW|
+* ======================================================================
+*
+* Language: ANSI C
+* Environment: OS/2 32-bit
+*
+* Description: OS specific Nucleus Graphics Architecture services for
+* the OS/2 operating system environments.
+*
+****************************************************************************/
+
+#include "pm_help.h"
+#define INCL_DOSERRORS
+#define INCL_DOS
+#define INCL_SUB
+#define INCL_VIO
+#define INCL_KBD
+#include <os2.h>
+
+/*---------------------------- Global Variables ---------------------------*/
+
+static HFILE hSDDHelp;
+static ulong outLen; /* Must not cross 64Kb boundary! */
+static ulong result; /* Must not cross 64Kb boundary! */
+static ibool haveRDTSC;
+
+/*-------------------------- Implementation -------------------------------*/
+
+/****************************************************************************
+REMARKS:
+This function returns a pointer to the common graphics driver loaded in the
+helper VxD. The memory for the VxD is shared between all processes via
+the VxD, so that the VxD, 16-bit code and 32-bit code all see the same
+state when accessing the graphics binary portable driver.
+****************************************************************************/
+GA_sharedInfo * NAPI GA_getSharedInfo(
+ int device)
+{
+ /* Initialise the PM library and connect to our runtime DLL's */
+ PM_init();
+
+ /* Open our helper device driver */
+ if (DosOpen(PMHELP_NAME,&hSDDHelp,&result,0,0,
+ FILE_OPEN, OPEN_SHARE_DENYNONE | OPEN_ACCESS_READWRITE,
+ NULL))
+ PM_fatalError("Unable to open SDDHELP$ helper device driver!");
+ outLen = sizeof(result);
+ DosDevIOCtl(hSDDHelp,PMHELP_IOCTL,PMHELP_GETSHAREDINFO,
+ NULL, 0, NULL,
+ &result, outLen, &outLen);
+ DosClose(hSDDHelp);
+ if (result) {
+ /* We have found the shared Nucleus packet. Because not all processes
+ * map to SDDPMI.DLL, we need to ensure that we connect to this
+ * DLL so that it gets mapped into our address space (that is
+ * where the shared Nucleus packet is located). Simply doing a
+ * DosLoadModule on it is enough for this.
+ */
+ HMODULE hModSDDPMI;
+ char buf[80];
+ DosLoadModule((PSZ)buf,sizeof(buf),(PSZ)"SDDPMI.DLL",&hModSDDPMI);
+ }
+ return (GA_sharedInfo*)result;
+}
+
+/****************************************************************************
+REMARKS:
+Nothing special for this OS.
+****************************************************************************/
+ibool NAPI GA_getSharedExports(
+ GA_exports *gaExp)
+{
+ (void)gaExp;
+ return false;
+}
+
+/****************************************************************************
+REMARKS:
+This function initialises the high precision timing functions for the
+Nucleus loader library.
+****************************************************************************/
+ibool NAPI GA_TimerInit(void)
+{
+ if (_GA_haveCPUID() && (_GA_getCPUIDFeatures() & CPU_HaveRDTSC) != 0)
+ haveRDTSC = true;
+ return true;
+}
+
+/****************************************************************************
+REMARKS:
+This function reads the high resolution timer.
+****************************************************************************/
+void NAPI GA_TimerRead(
+ GA_largeInteger *value)
+{
+ if (haveRDTSC)
+ _GA_readTimeStamp(value);
+ else
+ DosTmrQueryTime((QWORD*)value);
+}
diff --git a/board/MAI/bios_emulator/scitech/src/common/aaqnx.c b/board/MAI/bios_emulator/scitech/src/common/aaqnx.c
new file mode 100644
index 00000000000..2e26c9afa6f
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/common/aaqnx.c
@@ -0,0 +1,95 @@
+/****************************************************************************
+*
+* SciTech Nucleus Graphics Architecture
+*
+* Copyright (C) 1991-1998 SciTech Software, Inc.
+* All rights reserved.
+*
+* ======================================================================
+* |REMOVAL OR MODIFICATION OF THIS HEADER IS STRICTLY PROHIBITED BY LAW|
+* | |
+* |This copyrighted computer code contains proprietary technology |
+* |owned by SciTech Software, Inc., located at 505 Wall Street, |
+* |Chico, CA 95928 USA (http://www.scitechsoft.com). |
+* | |
+* |The contents of this file are subject to the SciTech Nucleus |
+* |License; you may *not* use this file or related software except in |
+* |compliance with the License. You may obtain a copy of the License |
+* |at http://www.scitechsoft.com/nucleus-license.txt |
+* | |
+* |Software distributed under the License is distributed on an |
+* |"AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or |
+* |implied. See the License for the specific language governing |
+* |rights and limitations under the License. |
+* | |
+* |REMOVAL OR MODIFICATION OF THIS HEADER IS STRICTLY PROHIBITED BY LAW|
+* ======================================================================
+*
+* Language: ANSI C
+* Environment: QNX
+*
+* Description: OS specific Nucleus Graphics Architecture services for
+* the QNX operating system.
+*
+****************************************************************************/
+
+#include "nucleus/graphics.h"
+#include <time.h>
+
+/*---------------------------- Global Variables ---------------------------*/
+
+static ibool haveRDTSC;
+
+/*-------------------------- Implementation -------------------------------*/
+
+/****************************************************************************
+REMARKS:
+Nothing special for this OS.
+****************************************************************************/
+GA_sharedInfo * NAPI GA_getSharedInfo(
+ int device)
+{
+ (void)device;
+ return NULL;
+}
+
+/****************************************************************************
+REMARKS:
+Nothing special for this OS.
+****************************************************************************/
+ibool NAPI GA_getSharedExports(
+ GA_exports *gaExp)
+{
+ (void)gaExp;
+ return false;
+}
+
+/****************************************************************************
+REMARKS:
+This function initialises the high precision timing functions for the
+Nucleus loader library.
+****************************************************************************/
+ibool NAPI GA_TimerInit(void)
+{
+ if (_GA_haveCPUID() && (_GA_getCPUIDFeatures() & CPU_HaveRDTSC) != 0)
+ haveRDTSC = true;
+ return true;
+}
+
+/****************************************************************************
+REMARKS:
+This function reads the high resolution timer.
+****************************************************************************/
+void NAPI GA_TimerRead(
+ GA_largeInteger *value)
+{
+ if (haveRDTSC)
+ _GA_readTimeStamp(value);
+ else {
+ struct timespec ts;
+
+ clock_gettime(CLOCK_REALTIME, &ts);
+ value->low = (ts.tv_nsec / 1000 + ts.tv_sec * 1000000);
+ value->high = 0;
+ }
+}
diff --git a/board/MAI/bios_emulator/scitech/src/common/aartt.c b/board/MAI/bios_emulator/scitech/src/common/aartt.c
new file mode 100644
index 00000000000..17a06b531c7
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/common/aartt.c
@@ -0,0 +1,89 @@
+/****************************************************************************
+*
+* SciTech Nucleus Graphics Architecture
+*
+* Copyright (C) 1991-1998 SciTech Software, Inc.
+* All rights reserved.
+*
+* ======================================================================
+* |REMOVAL OR MODIFICATION OF THIS HEADER IS STRICTLY PROHIBITED BY LAW|
+* | |
+* |This copyrighted computer code contains proprietary technology |
+* |owned by SciTech Software, Inc., located at 505 Wall Street, |
+* |Chico, CA 95928 USA (http://www.scitechsoft.com). |
+* | |
+* |The contents of this file are subject to the SciTech Nucleus |
+* |License; you may *not* use this file or related software except in |
+* |compliance with the License. You may obtain a copy of the License |
+* |at http://www.scitechsoft.com/nucleus-license.txt |
+* | |
+* |Software distributed under the License is distributed on an |
+* |"AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or |
+* |implied. See the License for the specific language governing |
+* |rights and limitations under the License. |
+* | |
+* |REMOVAL OR MODIFICATION OF THIS HEADER IS STRICTLY PROHIBITED BY LAW|
+* ======================================================================
+*
+* Language: ANSI C
+* Environment: RTTarget-32
+*
+* Description: OS specific Nucleus Graphics Architecture services for
+* the RTTarget-32 operating system environments.
+*
+****************************************************************************/
+
+#include "nucleus/graphics.h"
+
+/*------------------------- Global Variables ------------------------------*/
+
+static ibool haveRDTSC;
+
+/*-------------------------- Implementation -------------------------------*/
+
+/****************************************************************************
+REMARKS:
+Nothing special for this OS.
+****************************************************************************/
+GA_sharedInfo * NAPI GA_getSharedInfo(
+ int device)
+{
+ (void)device;
+ return NULL;
+}
+
+/****************************************************************************
+REMARKS:
+Nothing special for this OS.
+****************************************************************************/
+ibool NAPI GA_getSharedExports(
+ GA_exports *gaExp)
+{
+ (void)gaExp;
+ return false;
+}
+
+/****************************************************************************
+REMARKS:
+This function initialises the high precision timing functions for the
+Nucleus loader library.
+****************************************************************************/
+ibool NAPI GA_TimerInit(void)
+{
+ if (_GA_haveCPUID() && (_GA_getCPUIDFeatures() & CPU_HaveRDTSC) != 0) {
+ haveRDTSC = true;
+ return true;
+ }
+ return false;
+}
+
+/****************************************************************************
+REMARKS:
+This function reads the high resolution timer.
+****************************************************************************/
+void NAPI GA_TimerRead(
+ GA_largeInteger *value)
+{
+ if (haveRDTSC)
+ _GA_readTimeStamp(value);
+}
diff --git a/board/MAI/bios_emulator/scitech/src/common/aasmx.c b/board/MAI/bios_emulator/scitech/src/common/aasmx.c
new file mode 100644
index 00000000000..56cbd5b888e
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/common/aasmx.c
@@ -0,0 +1,83 @@
+/****************************************************************************
+*
+* SciTech Nucleus Graphics Architecture
+*
+* Copyright (C) 1991-1998 SciTech Software, Inc.
+* All rights reserved.
+*
+* ======================================================================
+* |REMOVAL OR MODIFICATION OF THIS HEADER IS STRICTLY PROHIBITED BY LAW|
+* | |
+* |This copyrighted computer code contains proprietary technology |
+* |owned by SciTech Software, Inc., located at 505 Wall Street, |
+* |Chico, CA 95928 USA (http://www.scitechsoft.com). |
+* | |
+* |The contents of this file are subject to the SciTech Nucleus |
+* |License; you may *not* use this file or related software except in |
+* |compliance with the License. You may obtain a copy of the License |
+* |at http://www.scitechsoft.com/nucleus-license.txt |
+* | |
+* |Software distributed under the License is distributed on an |
+* |"AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or |
+* |implied. See the License for the specific language governing |
+* |rights and limitations under the License. |
+* | |
+* |REMOVAL OR MODIFICATION OF THIS HEADER IS STRICTLY PROHIBITED BY LAW|
+* ======================================================================
+*
+* Language: ANSI C
+* Environment: smx32
+*
+* Description: OS specific Nucleus Graphics Architecture services for
+* the smx32 platform -- no vxD support.
+*
+****************************************************************************/
+
+#include "pmapi.h"
+#include "nucleus/graphics.h"
+
+/*-------------------------- Implementation -------------------------------*/
+
+/****************************************************************************
+REMARKS:
+Nothing special for this OS.
+****************************************************************************/
+GA_sharedInfo * NAPI GA_getSharedInfo(
+ int device)
+{
+ (void)device;
+ return NULL;
+}
+
+/****************************************************************************
+REMARKS:
+Nothing special for this OS.
+****************************************************************************/
+ibool NAPI GA_getSharedExports(
+ GA_exports *gaExp)
+{
+ (void)gaExp;
+ return false;
+}
+
+/****************************************************************************
+REMARKS:
+This function initialises the high precision timing functions for the
+Nucleus loader library.
+****************************************************************************/
+ibool NAPI GA_TimerInit(void)
+{
+ if (_GA_haveCPUID() && (_GA_getCPUIDFeatures() & CPU_HaveRDTSC) != 0)
+ return true;
+ return false;
+}
+
+/****************************************************************************
+REMARKS:
+This function reads the high resolution timer.
+****************************************************************************/
+void NAPI GA_TimerRead(
+ GA_largeInteger *value)
+{
+ _GA_readTimeStamp(value);
+}
diff --git a/board/MAI/bios_emulator/scitech/src/common/aavxd.c b/board/MAI/bios_emulator/scitech/src/common/aavxd.c
new file mode 100644
index 00000000000..295533db39c
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/common/aavxd.c
@@ -0,0 +1,90 @@
+/****************************************************************************
+*
+* SciTech Nucleus Graphics Architecture
+*
+* Copyright (C) 1991-1998 SciTech Software, Inc.
+* All rights reserved.
+*
+* ======================================================================
+* |REMOVAL OR MODIFICATION OF THIS HEADER IS STRICTLY PROHIBITED BY LAW|
+* | |
+* |This copyrighted computer code contains proprietary technology |
+* |owned by SciTech Software, Inc., located at 505 Wall Street, |
+* |Chico, CA 95928 USA (http://www.scitechsoft.com). |
+* | |
+* |The contents of this file are subject to the SciTech Nucleus |
+* |License; you may *not* use this file or related software except in |
+* |compliance with the License. You may obtain a copy of the License |
+* |at http://www.scitechsoft.com/nucleus-license.txt |
+* | |
+* |Software distributed under the License is distributed on an |
+* |"AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or |
+* |implied. See the License for the specific language governing |
+* |rights and limitations under the License. |
+* | |
+* |REMOVAL OR MODIFICATION OF THIS HEADER IS STRICTLY PROHIBITED BY LAW|
+* ======================================================================
+*
+* Language: ANSI C
+* Environment: Win32 VxD
+*
+* Description: OS specific Nucleus Graphics Architecture services for
+* the Win32 VxD's.
+*
+****************************************************************************/
+
+#include "sdd/sddhelp.h"
+
+/*------------------------- Global Variables ------------------------------*/
+
+static ibool haveRDTSC;
+
+/*-------------------------- Implementation -------------------------------*/
+
+/****************************************************************************
+REMARKS:
+Return the internal shared info structure.
+****************************************************************************/
+GA_sharedInfo * NAPI GA_getSharedInfo(
+ int device)
+{
+ static GA_sharedInfo shared = {0,-1};
+ return &shared;
+}
+
+/****************************************************************************
+REMARKS:
+Nothing special for this OS.
+****************************************************************************/
+ibool NAPI GA_getSharedExports(
+ GA_exports *gaExp)
+{
+ (void)gaExp;
+ return false;
+}
+
+/****************************************************************************
+REMARKS:
+This function initialises the high precision timing functions for the
+Nucleus loader library.
+****************************************************************************/
+ibool NAPI GA_TimerInit(void)
+{
+ if (_GA_haveCPUID() && (_GA_getCPUIDFeatures() & CPU_HaveRDTSC) != 0) {
+ haveRDTSC = true;
+ }
+ return true;
+}
+
+/****************************************************************************
+REMARKS:
+This function reads the high resolution timer.
+****************************************************************************/
+void NAPI GA_TimerRead(
+ GA_largeInteger *value)
+{
+ if (haveRDTSC)
+ _GA_readTimeStamp(value);
+ else
+ VTD_Get_Real_Time(&value->high,&value->low);
+}
diff --git a/board/MAI/bios_emulator/scitech/src/common/aawin32.c b/board/MAI/bios_emulator/scitech/src/common/aawin32.c
new file mode 100644
index 00000000000..f63f004f99d
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/common/aawin32.c
@@ -0,0 +1,264 @@
+/****************************************************************************
+*
+* SciTech Nucleus Graphics Architecture
+*
+* Copyright (C) 1991-1998 SciTech Software, Inc.
+* All rights reserved.
+*
+* ======================================================================
+* |REMOVAL OR MODIFICATION OF THIS HEADER IS STRICTLY PROHIBITED BY LAW|
+* | |
+* |This copyrighted computer code contains proprietary technology |
+* |owned by SciTech Software, Inc., located at 505 Wall Street, |
+* |Chico, CA 95928 USA (http://www.scitechsoft.com). |
+* | |
+* |The contents of this file are subject to the SciTech Nucleus |
+* |License; you may *not* use this file or related software except in |
+* |compliance with the License. You may obtain a copy of the License |
+* |at http://www.scitechsoft.com/nucleus-license.txt |
+* | |
+* |Software distributed under the License is distributed on an |
+* |"AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or |
+* |implied. See the License for the specific language governing |
+* |rights and limitations under the License. |
+* | |
+* |REMOVAL OR MODIFICATION OF THIS HEADER IS STRICTLY PROHIBITED BY LAW|
+* ======================================================================
+*
+* Language: ANSI C
+* Environment: Win32
+*
+* Description: OS specific Nucleus Graphics Architecture services for
+* the Win32 operating system environments.
+*
+****************************************************************************/
+
+#include "pm_help.h"
+#include "pmapi.h"
+#include <stdio.h>
+#include <stdlib.h>
+#include <string.h>
+#define STRICT
+#define WIN32_LEAN_AND_MEAN
+#include <windows.h>
+
+/*------------------------- Global Variables ------------------------------*/
+
+#if GA_MAX_DEVICES > 4
+#error GA_MAX_DEVICES has changed!
+#endif
+
+static ibool haveRDTSC;
+static GA_largeInteger countFreq;
+static GA_loadDriver_t ORG_GA_loadDriver;
+extern HANDLE _PM_hDevice;
+
+/*-------------------------- Implementation -------------------------------*/
+
+/****************************************************************************
+DESCRIPTION:
+Get the current graphics driver imports from the VxD
+
+REMARKS:
+This function returns a pointer to the common graphics driver loaded in the
+helper VxD. The memory for the VxD is shared between all processes via
+the VxD, so that the VxD, 16-bit code and 32-bit code all see the same
+state when accessing the graphics binary portable driver.
+****************************************************************************/
+GA_sharedInfo * NAPI GA_getSharedInfo(
+ int device)
+{
+ DWORD inBuf[1]; /* Buffer to send data to VxD */
+ DWORD outBuf[2]; /* Buffer to receive data from VxD */
+ DWORD count; /* Count of bytes returned from VxD */
+
+ PM_init();
+ inBuf[0] = device;
+ if (DeviceIoControl(_PM_hDevice, PMHELP_GETSHAREDINFO32, inBuf, sizeof(inBuf),
+ outBuf, sizeof(outBuf), &count, NULL)) {
+ return (GA_sharedInfo*)outBuf[0];
+ }
+ return NULL;
+}
+
+/****************************************************************************
+REMARKS:
+Nothing special for this OS.
+****************************************************************************/
+ibool NAPI GA_getSharedExports(
+ GA_exports *gaExp)
+{
+ (void)gaExp;
+ return false;
+}
+
+/****************************************************************************
+REMARKS:
+This function initialises the software stereo module by either calling
+the Nucleus libraries directly, or calling into the VxD if we are running
+on the shared Nucleus libraries loaded by the Windows VxD.
+****************************************************************************/
+static ibool NAPI _GA_softStereoInit(
+ GA_devCtx *dc)
+{
+ if (_PM_hDevice) {
+ DWORD inBuf[1]; /* Buffer to send data to VxD */
+ DWORD outBuf[1]; /* Buffer to receive data from VxD */
+ DWORD count; /* Count of bytes returned from VxD */
+
+ inBuf[0] = (ulong)dc;
+ if (DeviceIoControl(_PM_hDevice, PMHELP_GASTEREOINIT32, inBuf, sizeof(inBuf),
+ outBuf, sizeof(outBuf), &count, NULL)) {
+ return outBuf[0];
+ }
+ }
+ return false;
+}
+
+/****************************************************************************
+REMARKS:
+This function turns on software stereo mode, either directly or via the VxD.
+****************************************************************************/
+static void NAPI _GA_softStereoOn(void)
+{
+ if (_PM_hDevice) {
+ DeviceIoControl(_PM_hDevice, PMHELP_GASTEREOON32, NULL, 0,
+ NULL, 0, NULL, NULL);
+ }
+}
+
+/****************************************************************************
+REMARKS:
+This function schedules a software stereo mode page flip, either directly
+or via the VxD.
+****************************************************************************/
+static void NAPI _GA_softStereoScheduleFlip(
+ N_uint32 leftAddr,
+ N_uint32 rightAddr)
+{
+ if (_PM_hDevice) {
+ DWORD inBuf[2]; /* Buffer to send data to VxD */
+ DWORD count; /* Count of bytes returned from VxD */
+
+ inBuf[0] = (ulong)leftAddr;
+ inBuf[1] = (ulong)rightAddr;
+ DeviceIoControl(_PM_hDevice, PMHELP_GASTEREOFLIP32, inBuf, sizeof(inBuf),
+ NULL, 0, &count, NULL);
+ }
+}
+
+/****************************************************************************
+REMARKS:
+This function turns off software stereo mode, either directly or via the VxD.
+****************************************************************************/
+static N_int32 NAPI _GA_softStereoGetFlipStatus(void)
+{
+ if (_PM_hDevice) {
+ DWORD outBuf[1]; /* Buffer to receive data from VxD */
+ DWORD count; /* Count of bytes returned from VxD */
+
+ if (DeviceIoControl(_PM_hDevice, PMHELP_GASTEREOFLIPSTATUS32, NULL, 0,
+ outBuf, sizeof(outBuf), &count, NULL)) {
+ return outBuf[0];
+ }
+ }
+ return 0;
+}
+
+/****************************************************************************
+REMARKS:
+This function turns off software stereo mode, either directly or via the VxD.
+****************************************************************************/
+static void NAPI _GA_softStereoWaitTillFlipped(void)
+{
+ while (!_GA_softStereoGetFlipStatus())
+ ;
+}
+
+/****************************************************************************
+REMARKS:
+This function turns off software stereo mode, either directly or via the VxD.
+****************************************************************************/
+static void NAPI _GA_softStereoOff(void)
+{
+ if (_PM_hDevice) {
+ DeviceIoControl(_PM_hDevice, PMHELP_GASTEREOOFF32, NULL, 0,
+ NULL, 0, NULL, NULL);
+ }
+}
+
+/****************************************************************************
+REMARKS:
+This function disable the software stereo handler, either directly or via
+the VxD.
+****************************************************************************/
+static void NAPI _GA_softStereoExit(void)
+{
+ if (_PM_hDevice) {
+ DeviceIoControl(_PM_hDevice, PMHELP_GASTEREOEXIT32, NULL, 0,
+ NULL, 0, NULL, NULL);
+ }
+}
+
+/****************************************************************************
+REMARKS:
+We hook this function in here so that we can avoid the memory detect and
+other destructive sequences in the drivers if we are loading the driver
+from a Win32 application (our display drivers in contrast load them inside
+the VxD directly, but the control panel applets use this function).
+****************************************************************************/
+static GA_devCtx * NAPI _GA_loadDriver(
+ N_int32 deviceIndex,
+ N_int32 shared)
+{
+ GA_devCtx *dc;
+ DWORD inBuf[1];
+ DWORD outBuf[1];
+ N_int32 totalMemory = 0,oldIOPL;
+
+ if (deviceIndex >= GA_MAX_DEVICES)
+ PM_fatalError("DeviceIndex too large in GA_loadDriver!");
+ PM_init();
+ inBuf[0] = deviceIndex;
+ if (DeviceIoControl(_PM_hDevice, PMHELP_GETMEMSIZE32,
+ inBuf, sizeof(inBuf), outBuf, sizeof(outBuf), NULL, NULL))
+ totalMemory = outBuf[0];
+ if (totalMemory == 0)
+ totalMemory = 8192;
+ _GA_exports.GA_forceMemSize(totalMemory,shared);
+ oldIOPL = PM_setIOPL(3);
+ dc = ORG_GA_loadDriver(deviceIndex,shared);
+ PM_setIOPL(oldIOPL);
+ return dc;
+}
+
+/****************************************************************************
+REMARKS:
+This function initialises the high precision timing functions for the
+Nucleus loader library.
+****************************************************************************/
+ibool NAPI GA_TimerInit(void)
+{
+ if (_GA_haveCPUID() && (_GA_getCPUIDFeatures() & CPU_HaveRDTSC) != 0) {
+ haveRDTSC = true;
+ return true;
+ }
+ else if (QueryPerformanceFrequency((LARGE_INTEGER*)&countFreq)) {
+ haveRDTSC = false;
+ return true;
+ }
+ return false;
+}
+
+/****************************************************************************
+REMARKS:
+This function reads the high resolution timer.
+****************************************************************************/
+void NAPI GA_TimerRead(
+ GA_largeInteger *value)
+{
+ if (haveRDTSC)
+ _GA_readTimeStamp(value);
+ else
+ QueryPerformanceCounter((LARGE_INTEGER*)value);
+}
diff --git a/board/MAI/bios_emulator/scitech/src/common/agplib.c b/board/MAI/bios_emulator/scitech/src/common/agplib.c
new file mode 100644
index 00000000000..df8f932fb16
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/common/agplib.c
@@ -0,0 +1,220 @@
+/****************************************************************************
+*
+* SciTech Nucleus Graphics Architecture
+*
+* Copyright (C) 1991-1998 SciTech Software, Inc.
+* All rights reserved.
+*
+* ======================================================================
+* |REMOVAL OR MODIFICATION OF THIS HEADER IS STRICTLY PROHIBITED BY LAW|
+* | |
+* |This copyrighted computer code contains proprietary technology |
+* |owned by SciTech Software, Inc., located at 505 Wall Street, |
+* |Chico, CA 95928 USA (http://www.scitechsoft.com). |
+* | |
+* |The contents of this file are subject to the SciTech Nucleus |
+* |License; you may *not* use this file or related software except in |
+* |compliance with the License. You may obtain a copy of the License |
+* |at http://www.scitechsoft.com/nucleus-license.txt |
+* | |
+* |Software distributed under the License is distributed on an |
+* |"AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or |
+* |implied. See the License for the specific language governing |
+* |rights and limitations under the License. |
+* | |
+* |REMOVAL OR MODIFICATION OF THIS HEADER IS STRICTLY PROHIBITED BY LAW|
+* ======================================================================
+*
+* Language: ANSI C
+* Environment: Any 32-bit protected mode environment
+*
+* Description: C module for the Graphics Accelerator Driver API. Uses
+* the SciTech PM library for interfacing with DOS
+* extender specific functions.
+*
+****************************************************************************/
+
+#include "nucleus/graphics.h"
+#include "nucleus/agp.h"
+
+/*---------------------------- Global Variables ---------------------------*/
+
+#ifndef DEBUG_AGP_DRIVER
+static AGP_exports _AGP_exports;
+static int loaded = false;
+static PE_MODULE *hModBPD = NULL;
+
+static N_imports _N_imports = {
+ sizeof(N_imports),
+ _OS_delay,
+ };
+
+static AGP_imports _AGP_imports = {
+ sizeof(AGP_imports),
+ };
+#endif
+
+#include "pmimp.h"
+
+/*----------------------------- Implementation ----------------------------*/
+
+#define DLL_NAME "agp.bpd"
+
+#ifndef DEBUG_AGP_DRIVER
+/****************************************************************************
+REMARKS:
+Fatal error handler for non-exported GA_exports.
+****************************************************************************/
+static void _AGP_fatalErrorHandler(void)
+{
+ PM_fatalError("Unsupported AGP export function called! Please upgrade your copy of AGP!\n");
+}
+
+/****************************************************************************
+PARAMETERS:
+shared - True to load the driver into shared memory.
+
+REMARKS:
+Loads the Nucleus binary portable DLL into memory and initilises it.
+****************************************************************************/
+static ibool LoadDriver(void)
+{
+ AGP_initLibrary_t AGP_initLibrary;
+ AGP_exports *agpExp;
+ char filename[PM_MAX_PATH];
+ char bpdpath[PM_MAX_PATH];
+ int i,max;
+ ulong *p;
+
+ /* Check if we have already loaded the driver */
+ if (loaded)
+ return true;
+ PM_init();
+
+ /* Open the BPD file */
+ if (!PM_findBPD(DLL_NAME,bpdpath))
+ return false;
+ strcpy(filename,bpdpath);
+ strcat(filename,DLL_NAME);
+ if ((hModBPD = PE_loadLibrary(filename,false)) == NULL)
+ return false;
+ if ((AGP_initLibrary = (AGP_initLibrary_t)PE_getProcAddress(hModBPD,"_AGP_initLibrary")) == NULL)
+ return false;
+ bpdpath[strlen(bpdpath)-1] = 0;
+ if (strcmp(bpdpath,PM_getNucleusPath()) == 0)
+ strcpy(bpdpath,PM_getNucleusConfigPath());
+ else {
+ PM_backslash(bpdpath);
+ strcat(bpdpath,"config");
+ }
+ if ((agpExp = AGP_initLibrary(bpdpath,filename,GA_getSystemPMImports(),&_N_imports,&_AGP_imports)) == NULL)
+ PM_fatalError("AGP_initLibrary failed!\n");
+ _AGP_exports.dwSize = sizeof(_AGP_exports);
+ max = sizeof(_AGP_exports)/sizeof(AGP_initLibrary_t);
+ for (i = 0,p = (ulong*)&_AGP_exports; i < max; i++)
+ *p++ = (ulong)_AGP_fatalErrorHandler;
+ memcpy(&_AGP_exports,agpExp,MIN(sizeof(_AGP_exports),agpExp->dwSize));
+ loaded = true;
+ return true;
+}
+
+/* The following are stub entry points that the application calls to
+ * initialise the Nucleus loader library, and we use this to load our
+ * driver DLL from disk and initialise the library using it.
+ */
+
+/* {secret} */
+int NAPI AGP_status(void)
+{
+ if (!loaded)
+ return nDriverNotFound;
+ return _AGP_exports.AGP_status();
+}
+
+/* {secret} */
+const char * NAPI AGP_errorMsg(
+ N_int32 status)
+{
+ if (!loaded)
+ return "Unable to load Nucleus device driver!";
+ return _AGP_exports.AGP_errorMsg(status);
+}
+
+/* {secret} */
+AGP_devCtx * NAPI AGP_loadDriver(N_int32 deviceIndex)
+{
+ if (!LoadDriver())
+ return NULL;
+ return _AGP_exports.AGP_loadDriver(deviceIndex);
+}
+
+/* {secret} */
+void NAPI AGP_unloadDriver(
+ AGP_devCtx *dc)
+{
+ if (loaded)
+ _AGP_exports.AGP_unloadDriver(dc);
+}
+
+/* {secret} */
+void NAPI AGP_getGlobalOptions(
+ AGP_globalOptions *options)
+{
+ if (LoadDriver())
+ _AGP_exports.AGP_getGlobalOptions(options);
+}
+
+/* {secret} */
+void NAPI AGP_setGlobalOptions(
+ AGP_globalOptions *options)
+{
+ if (LoadDriver())
+ _AGP_exports.AGP_setGlobalOptions(options);
+}
+
+/* {secret} */
+void NAPI AGP_saveGlobalOptions(
+ AGP_globalOptions *options)
+{
+ if (loaded)
+ _AGP_exports.AGP_saveGlobalOptions(options);
+}
+#endif
+
+/* {secret} */
+void NAPI _OS_delay8253(N_uint32 microSeconds);
+
+/****************************************************************************
+REMARKS:
+This function delays for the specified number of microseconds
+****************************************************************************/
+void NAPI _OS_delay(
+ N_uint32 microSeconds)
+{
+ static ibool inited = false;
+ static ibool haveRDTSC;
+ LZTimerObject tm;
+
+ if (!inited) {
+#ifndef __WIN32_VXD__
+ // This has been causing problems in VxD's for some reason, so for now
+ // we avoid using it.
+ if (_GA_haveCPUID() && (_GA_getCPUIDFeatures() & CPU_HaveRDTSC) != 0) {
+ ZTimerInit();
+ haveRDTSC = true;
+ }
+ else
+#endif
+ haveRDTSC = false;
+ inited = true;
+ }
+ if (haveRDTSC) {
+ LZTimerOnExt(&tm);
+ while (LZTimerLapExt(&tm) < microSeconds)
+ ;
+ LZTimerOnExt(&tm);
+ }
+ else
+ _OS_delay8253(microSeconds);
+}
+
diff --git a/board/MAI/bios_emulator/scitech/src/common/center.c b/board/MAI/bios_emulator/scitech/src/common/center.c
new file mode 100644
index 00000000000..7eb368fd3aa
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/common/center.c
@@ -0,0 +1,123 @@
+/****************************************************************************
+*
+* Display Doctor Windows Interface Code
+*
+* ======================================================================
+* |REMOVAL OR MODIFICATION OF THIS HEADER IS STRICTLY PROHIBITED BY LAW|
+* | |
+* |This copyrighted computer code is a proprietary trade secret of |
+* |SciTech Software, Inc., located at 505 Wall Street, Chico, CA 95928 |
+* |USA (www.scitechsoft.com). ANY UNAUTHORIZED POSSESSION, USE, |
+* |VIEWING, COPYING, MODIFICATION OR DISSEMINATION OF THIS CODE IS |
+* |STRICTLY PROHIBITED BY LAW. Unless you have current, express |
+* |written authorization from SciTech to possess or use this code, you |
+* |may be subject to civil and/or criminal penalties. |
+* | |
+* |If you received this code in error or you would like to report |
+* |improper use, please immediately contact SciTech Software, Inc. at |
+* |530-894-8400. |
+* | |
+* |REMOVAL OR MODIFICATION OF THIS HEADER IS STRICTLY PROHIBITED BY LAW|
+* ======================================================================
+*
+* Language: C++ 3.0
+* Environment: Win16
+*
+* Description: Dialog driven configuration program for UniVBE and
+* WinDirect Professional products.
+*
+****************************************************************************/
+
+#include "center.h"
+
+/*------------------------------ Implementation ---------------------------*/
+
+void _EXPORT CenterWindow(HWND hWndCenter, HWND parent, BOOL repaint)
+/****************************************************************************
+*
+* Function: CenterWindow
+* Parameters: hWndCenter - Window to center
+* parent - Handle for parent window
+* repaint - true if window should be re-painted
+*
+* Description: Centers the specified window within the bounds of the
+* specified parent window. If the parent window is NULL, then
+* we center it using the Desktop window.
+*
+****************************************************************************/
+{
+ HWND hWndParent = (parent ? parent : GetDesktopWindow());
+ RECT RectParent;
+ RECT RectCenter;
+ int CenterX,CenterY,Height,Width;
+
+ GetWindowRect(hWndParent, &RectParent);
+ GetWindowRect(hWndCenter, &RectCenter);
+
+ Width = (RectCenter.right - RectCenter.left);
+ Height = (RectCenter.bottom - RectCenter.top);
+ CenterX = ((RectParent.right - RectParent.left) - Width) / 2;
+ CenterY = ((RectParent.bottom - RectParent.top) - Height) / 2;
+
+ if ((CenterX < 0) || (CenterY < 0)) {
+ /* The Center Window is smaller than the parent window. */
+ if (hWndParent != GetDesktopWindow()) {
+ /* If the parent window is not the desktop use the desktop size. */
+ CenterX = (GetSystemMetrics(SM_CXSCREEN) - Width) / 2;
+ CenterY = (GetSystemMetrics(SM_CYSCREEN) - Height) / 2;
+ }
+ CenterX = (CenterX < 0) ? 0: CenterX;
+ CenterY = (CenterY < 0) ? 0: CenterY;
+ }
+ else {
+ CenterX += RectParent.left;
+ CenterY += RectParent.top;
+ }
+
+ /* Copy the values into RectCenter */
+ RectCenter.left = CenterX;
+ RectCenter.right = CenterX + Width;
+ RectCenter.top = CenterY;
+ RectCenter.bottom = CenterY + Height;
+
+ /* Move the window to the new location */
+ MoveWindow(hWndCenter, RectCenter.left, RectCenter.top,
+ (RectCenter.right - RectCenter.left),
+ (RectCenter.bottom - RectCenter.top), repaint);
+}
+
+void _EXPORT CenterLogo(HWND hWndLogo, HWND hWndParent, int CenterY)
+/****************************************************************************
+*
+* Function: CenterLogo
+* Parameters: hWndLogo - Window to center
+* hWndParent - Handle for parent window
+* CenterY - Top coordinate for logo
+*
+* Description: Centers the specified window within the bounds of the
+* specified parent window in the horizontal direction only.
+*
+****************************************************************************/
+{
+ RECT RectParent;
+ RECT RectCenter;
+ int CenterX,Height,Width;
+
+ GetWindowRect(hWndParent, &RectParent);
+ GetWindowRect(hWndLogo, &RectCenter);
+ Width = (RectCenter.right - RectCenter.left);
+ Height = (RectCenter.bottom - RectCenter.top);
+ CenterX = ((RectParent.right - RectParent.left) - Width) / 2;
+
+ /* Copy the values into RectCenter */
+ RectCenter.left = CenterX;
+ RectCenter.right = CenterX + Width;
+ RectCenter.top = CenterY;
+ RectCenter.bottom = CenterY + Height;
+
+ /* Move the window to the new location */
+ MoveWindow(hWndLogo, RectCenter.left, RectCenter.top,
+ (RectCenter.right - RectCenter.left),
+ (RectCenter.bottom - RectCenter.top), false);
+}
+
diff --git a/board/MAI/bios_emulator/scitech/src/common/cmdline.c b/board/MAI/bios_emulator/scitech/src/common/cmdline.c
new file mode 100644
index 00000000000..872fae9194f
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/common/cmdline.c
@@ -0,0 +1,428 @@
+/****************************************************************************
+*
+* ========================================================================
+*
+* The contents of this file are subject to the SciTech MGL Public
+* License Version 1.0 (the "License"); you may not use this file
+* except in compliance with the License. You may obtain a copy of
+* the License at http://www.scitechsoft.com/mgl-license.txt
+*
+* Software distributed under the License is distributed on an
+* "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+* implied. See the License for the specific language governing
+* rights and limitations under the License.
+*
+* The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+*
+* The Initial Developer of the Original Code is SciTech Software, Inc.
+* All Rights Reserved.
+*
+* ========================================================================
+*
+* Language: ANSI C
+* Environment: any
+*
+* Description: This module contains code to parse the command line,
+* extracting options and parameters in standard System V
+* style.
+*
+****************************************************************************/
+
+#include <stdio.h>
+#include <string.h>
+#include <ctype.h>
+#include "cmdline.h"
+
+/*------------------------- Global variables ------------------------------*/
+
+int nextargv = 1; /* Index into argv array */
+char *nextchar = NULL; /* Pointer to next character */
+
+/*-------------------------- Implementation -------------------------------*/
+
+#define IS_SWITCH_CHAR(c) ((c) == '-')
+#define IS_NOT_SWITCH_CHAR(c) ((c) != '-')
+
+/****************************************************************************
+DESCRIPTION:
+Parse the command line for specific options
+
+HEADER:
+cmdline.h
+
+PARAMETERS:
+argc - Value passed to program through argc variable
+argv - Pointer to the argv array passed to the program
+format - A string representing the expected format of the command line
+argument - Pointer to optional argument on command line
+
+RETURNS:
+Character code representing the next option parsed from the command line by
+getcmdopt. Returns ALLDONE (-1) when there are no more parameters to be parsed
+on the command line, PARAMETER (-2) when the argument being parsed is a
+parameter and not an option switch and lastly INVALID (-3) if an error
+occured while parsing the command line.
+
+REMARKS:
+Function to parse the command line option switches in UNIX System V style.
+When getcmdopt is called, it returns the character code of the next valid
+option that is parsed from the command line as specified by the Format
+string. The format string should be in the following form:
+
+ "abcd:e:f:"
+
+where a,b and c represent single switch style options and the character
+code returned by getcmdopt is the only value returned. Also d, e and f
+represent options that expect arguments immediately after them on the
+command line. The argument that follows the option on the command line is
+returned via a reference in the pointer argument. Thus a valid command line
+for this format string might be:
+
+ myprogram -adlines -b -f format infile outfile
+
+where a and b will be returned as single character options with no argument,
+while d is returned with the argument lines and f is returned with the
+argument format.
+
+When getcmdopt returns with PARAMETER (we attempted to parse a paramter, not
+an option), the global variable NextArgv will hold an index in the argv
+array to the argument on the command line AFTER the options, ie in the
+above example the string 'infile'. If the parameter is successfully used,
+NextArgv should be incremented and getcmdopt can be called again to parse any
+more options. Thus you can also have options interspersed throught the
+command line. eg:
+
+ myprogram -adlines infile -b outfile -f format
+
+can be made to be a valid form of the above command line.
+****************************************************************************/
+int getcmdopt(
+ int argc,
+ char **argv,
+ char *format,
+ char **argument)
+{
+ char ch;
+ char *formatchar;
+
+ if (argc > nextargv) {
+ if (nextchar == NULL) {
+ nextchar = argv[nextargv]; /* Index next argument */
+ if (nextchar == NULL) {
+ nextargv++;
+ return ALLDONE; /* No more options */
+ }
+ if (IS_NOT_SWITCH_CHAR(*nextchar)) {
+ nextchar = NULL;
+ return PARAMETER; /* We have a parameter */
+ }
+ nextchar++; /* Move past switch operator */
+ if (IS_SWITCH_CHAR(*nextchar)) {
+ nextchar = NULL;
+ return INVALID; /* Ignore rest of line */
+ }
+ }
+ if ((ch = *(nextchar++)) == 0) {
+ nextchar = NULL;
+ return INVALID; /* No options on line */
+ }
+
+ if (ch == ':' || (formatchar = strchr(format, ch)) == NULL)
+ return INVALID;
+
+ if (*(++formatchar) == ':') { /* Expect an argument after option */
+ nextargv++;
+ if (*nextchar == 0) {
+ if (argc <= nextargv)
+ return INVALID;
+ nextchar = argv[nextargv++];
+ }
+ *argument = nextchar;
+ nextchar = NULL;
+ }
+ else { /* We have a switch style option */
+ if (*nextchar == 0) {
+ nextargv++;
+ nextchar = NULL;
+ }
+ *argument = NULL;
+ }
+ return ch; /* return the option specifier */
+ }
+ nextchar = NULL;
+ nextargv++;
+ return ALLDONE; /* no arguments on command line */
+}
+
+/****************************************************************************
+PARAMETERS:
+optarr - Description for the option we are parsing
+argument - String to parse
+
+RETURNS:
+INVALID on error, ALLDONE on success.
+
+REMARKS:
+Parses the argument string depending on the type of argument that is
+expected, filling in the argument for that option. Note that to parse a
+string, we simply return a pointer to argument.
+****************************************************************************/
+static int parse_option(
+ Option *optarr,
+ char *argument)
+{
+ int num_read;
+
+ switch ((int)(optarr->type)) {
+ case OPT_INTEGER:
+ num_read = sscanf(argument,"%d",(int*)optarr->arg);
+ break;
+ case OPT_HEX:
+ num_read = sscanf(argument,"%x",(int*)optarr->arg);
+ break;
+ case OPT_OCTAL:
+ num_read = sscanf(argument,"%o",(int*)optarr->arg);
+ break;
+ case OPT_UNSIGNED:
+ num_read = sscanf(argument,"%u",(uint*)optarr->arg);
+ break;
+ case OPT_LINTEGER:
+ num_read = sscanf(argument,"%ld",(long*)optarr->arg);
+ break;
+ case OPT_LHEX:
+ num_read = sscanf(argument,"%lx",(long*)optarr->arg);
+ break;
+ case OPT_LOCTAL:
+ num_read = sscanf(argument,"%lo",(long*)optarr->arg);
+ break;
+ case OPT_LUNSIGNED:
+ num_read = sscanf(argument,"%lu",(ulong*)optarr->arg);
+ break;
+ case OPT_FLOAT:
+ num_read = sscanf(argument,"%f",(float*)optarr->arg);
+ break;
+ case OPT_DOUBLE:
+ num_read = sscanf(argument,"%lf",(double*)optarr->arg);
+ break;
+ case OPT_LDOUBLE:
+ num_read = sscanf(argument,"%Lf",(long double*)optarr->arg);
+ break;
+ case OPT_STRING:
+ num_read = 1; /* This always works */
+ *((char**)optarr->arg) = argument;
+ break;
+ default:
+ return INVALID;
+ }
+
+ if (num_read == 0)
+ return INVALID;
+ else
+ return ALLDONE;
+}
+
+/****************************************************************************
+HEADER:
+cmdline.h
+
+PARAMETERS:
+argc - Number of arguments on command line
+argv - Array of command line arguments
+num_opt - Number of options in option array
+optarr - Array to specify how to parse the command line
+do_param - Routine to handle a command line parameter
+
+RETURNS:
+ALLDONE, INVALID or HELP
+
+REMARKS:
+Function to parse the command line according to a table of options. This
+routine calls getcmdopt above to parse each individual option and attempts
+to parse each option into a variable of the specified type. The routine
+can parse integers and long integers in either decimal, octal, hexadecimal
+notation, unsigned integers and unsigned longs, strings and option switches.
+Option switches are simply boolean variables that get turned on if the
+switch was parsed.
+
+Parameters are extracted from the command line by calling a user supplied
+routine do_param() to handle each parameter as it is encountered. The
+routine do_param() should accept a pointer to the parameter on the command
+line and an integer representing how many parameters have been encountered
+(ie: 1 if this is the first parameter, 10 if it is the 10th etc), and return
+ALLDONE upon successfully parsing it or INVALID if the parameter was invalid.
+
+We return either ALLDONE if all the options were successfully parsed,
+INVALID if an invalid option was encountered or HELP if any of -h, -H or
+-? were present on the command line.
+****************************************************************************/
+int getargs(
+ int argc,
+ char *argv[],
+ int num_opt,
+ Option optarr[],
+ int (*do_param)(
+ char *param,
+ int num))
+{
+ int i,opt;
+ char *argument;
+ int param_num = 1;
+ char cmdstr[MAXARG*2 + 4];
+
+ /* Build the command string from the array of options */
+
+ strcpy(cmdstr,"hH?");
+ for (i = 0,opt = 3; i < num_opt; i++,opt++) {
+ cmdstr[opt] = optarr[i].opt;
+ if (optarr[i].type != OPT_SWITCH) {
+ cmdstr[++opt] = ':';
+ }
+ }
+ cmdstr[opt] = '\0';
+
+ for (;;) {
+ opt = getcmdopt(argc,argv,cmdstr,&argument);
+ switch (opt) {
+ case 'H':
+ case 'h':
+ case '?':
+ return HELP;
+ case ALLDONE:
+ return ALLDONE;
+ case INVALID:
+ return INVALID;
+ case PARAMETER:
+ if (do_param == NULL)
+ return INVALID;
+ if (do_param(argv[nextargv],param_num) == INVALID)
+ return INVALID;
+ nextargv++;
+ param_num++;
+ break;
+ default:
+
+ /* Search for the option in the option array. We are
+ * guaranteed to find it.
+ */
+
+ for (i = 0; i < num_opt; i++) {
+ if (optarr[i].opt == opt)
+ break;
+ }
+ if (optarr[i].type == OPT_SWITCH)
+ *((ibool*)optarr[i].arg) = true;
+ else {
+ if (parse_option(&optarr[i],argument) == INVALID)
+ return INVALID;
+ }
+ break;
+ }
+ }
+}
+
+/****************************************************************************
+HEADER:
+cmdline.h
+
+PARAMETERS:
+num_opt - Number of options in the table
+optarr - Table of option descriptions
+
+REMARKS:
+Prints the description of each option in a standard format to the standard
+output device. The description for each option is obtained from the table
+of options.
+****************************************************************************/
+void print_desc(
+ int num_opt,
+ Option optarr[])
+{
+ int i;
+
+ for (i = 0; i < num_opt; i++) {
+ if (optarr[i].type == OPT_SWITCH)
+ printf(" -%c %s\n",optarr[i].opt,optarr[i].desc);
+ else
+ printf(" -%c<arg> %s\n",optarr[i].opt,optarr[i].desc);
+ }
+}
+
+/****************************************************************************
+HEADER:
+cmdline.h
+
+PARAMETERS:
+moduleName - Module name for program
+cmdLine - Command line to parse
+pargc - Pointer to 'argc' parameter
+pargv - Pointer to 'argv' parameter
+maxArgc - Maximum argv array index
+
+REMARKS:
+Parses a command line from a single string into the C style 'argc' and
+'argv' format. Most useful for Windows programs where the command line
+is passed in verbatim.
+****************************************************************************/
+int parse_commandline(
+ char *moduleName,
+ char *cmdLine,
+ int *pargc,
+ char *argv[],
+ int maxArgv)
+{
+ static char str[512];
+ static char filename[260];
+ char *prevWord = NULL;
+ ibool inQuote = FALSE;
+ ibool noStrip = FALSE;
+ int argc;
+
+ argc = 0;
+ strcpy(filename,moduleName);
+ argv[argc++] = filename;
+ cmdLine = strncpy(str, cmdLine, sizeof(str)-1);
+ while (*cmdLine) {
+ switch (*cmdLine) {
+ case '"' :
+ if (prevWord != NULL) {
+ if (inQuote) {
+ if (!noStrip)
+ *cmdLine = '\0';
+ argv [argc++] = prevWord;
+ prevWord = NULL;
+ }
+ else
+ noStrip = TRUE;
+ }
+ inQuote = !inQuote;
+ break;
+ case ' ' :
+ case '\t' :
+ if (!inQuote) {
+ if (prevWord != NULL) {
+ *cmdLine = '\0';
+ argv [argc++] = prevWord;
+ prevWord = NULL;
+ noStrip = FALSE;
+ }
+ }
+ break;
+ default :
+ if (prevWord == NULL)
+ prevWord = cmdLine;
+ break;
+ }
+ if (argc >= maxArgv - 1)
+ break;
+ cmdLine++;
+ }
+
+ if ((prevWord != NULL || (inQuote && prevWord != NULL)) && argc < maxArgv - 1) {
+ *cmdLine = '\0';
+ argv [argc++] = prevWord;
+ }
+ argv[argc] = NULL;
+
+ /* Return updated parameters */
+ return (*pargc = argc);
+}
diff --git a/board/MAI/bios_emulator/scitech/src/common/gabeos.c b/board/MAI/bios_emulator/scitech/src/common/gabeos.c
new file mode 100644
index 00000000000..1d8a5432169
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/common/gabeos.c
@@ -0,0 +1,146 @@
+/****************************************************************************
+*
+* SciTech Nucleus Graphics Architecture
+*
+* Copyright (C) 1991-1998 SciTech Software, Inc.
+* All rights reserved.
+*
+* ======================================================================
+* |REMOVAL OR MODIFICATION OF THIS HEADER IS STRICTLY PROHIBITED BY LAW|
+* | |
+* |This copyrighted computer code contains proprietary technology |
+* |owned by SciTech Software, Inc., located at 505 Wall Street, |
+* |Chico, CA 95928 USA (http://www.scitechsoft.com). |
+* | |
+* |The contents of this file are subject to the SciTech Nucleus |
+* |License; you may *not* use this file or related software except in |
+* |compliance with the License. You may obtain a copy of the License |
+* |at http://www.scitechsoft.com/nucleus-license.txt |
+* | |
+* |Software distributed under the License is distributed on an |
+* |"AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or |
+* |implied. See the License for the specific language governing |
+* |rights and limitations under the License. |
+* | |
+* |REMOVAL OR MODIFICATION OF THIS HEADER IS STRICTLY PROHIBITED BY LAW|
+* ======================================================================
+*
+* Language: ANSI C
+* Environment: Linux
+*
+* Description: OS specific Nucleus Graphics Architecture services for
+* the Linux operating system.
+*
+****************************************************************************/
+
+#include "nucleus/graphics.h"
+#include <sys/time.h>
+
+static ibool haveRDTSC;
+
+/*-------------------------- Implementation -------------------------------*/
+
+/****************************************************************************
+PARAMETERS:
+path - Local path to the Nucleus driver files.
+
+REMARKS:
+This function is used by the application program to override the location
+of the Nucleus driver files that are loaded. Normally the loader code
+will look in the system Nucleus directories first, then in the 'drivers'
+directory relative to the current working directory, and finally relative
+to the MGL_ROOT environment variable.
+****************************************************************************/
+void NAPI GA_setLocalPath(
+ const char *path)
+{
+ PM_setLocalBPDPath(path);
+}
+
+/****************************************************************************
+RETURNS:
+Pointer to the system wide PM library imports, or the internal version if none
+
+REMARKS:
+In order to support deploying new Nucleus drivers that may require updated
+PM library functions, we check here to see if there is a system wide version
+of the PM functions available. If so we return those functions for use with
+the system wide Nucleus drivers, otherwise the compiled in version of the PM
+library is used with the application local version of Nucleus.
+****************************************************************************/
+PM_imports * NAPI GA_getSystemPMImports(void)
+{
+ // TODO: We may very well want to provide a system shared library
+ // that eports the PM functions required by the Nucleus library
+ // for BeOS here. That will eliminate fatal errors loading new
+ // drivers on BeOS!
+ return &_PM_imports;
+}
+
+/****************************************************************************
+REMARKS:
+Nothing special for this OS.
+****************************************************************************/
+ibool NAPI GA_getSharedExports(
+ GA_exports *gaExp,
+ ibool shared)
+{
+ (void)gaExp;
+ (void)shared;
+ return false;
+}
+
+#ifndef TEST_HARNESS
+/****************************************************************************
+REMARKS:
+Nothing special for this OS
+****************************************************************************/
+ibool NAPI GA_queryFunctions(
+ GA_devCtx *dc,
+ N_uint32 id,
+ void _FAR_ *funcs)
+{
+ return __GA_exports.GA_queryFunctions(dc,id,funcs);
+}
+
+/****************************************************************************
+REMARKS:
+Nothing special for this OS
+****************************************************************************/
+ibool NAPI REF2D_queryFunctions(
+ REF2D_driver *ref2d,
+ N_uint32 id,
+ void _FAR_ *funcs)
+{
+ return __GA_exports.REF2D_queryFunctions(ref2d,id,funcs);
+}
+#endif
+
+/****************************************************************************
+REMARKS:
+This function initialises the high precision timing functions for the
+Nucleus loader library.
+****************************************************************************/
+ibool NAPI GA_TimerInit(void)
+{
+ if (_GA_haveCPUID() && (_GA_getCPUIDFeatures() & CPU_HaveRDTSC) != 0)
+ haveRDTSC = true;
+ return true;
+}
+
+/****************************************************************************
+REMARKS:
+This function reads the high resolution timer.
+****************************************************************************/
+void NAPI GA_TimerRead(
+ GA_largeInteger *value)
+{
+ if (haveRDTSC)
+ _GA_readTimeStamp(value);
+ else {
+ struct timeval t;
+ gettimeofday(&t, NULL);
+ value->low = t.tv_sec*1000000 + t.tv_usec;
+ value->high = 0;
+ }
+}
diff --git a/board/MAI/bios_emulator/scitech/src/common/gados.c b/board/MAI/bios_emulator/scitech/src/common/gados.c
new file mode 100644
index 00000000000..4c90e805d73
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/common/gados.c
@@ -0,0 +1,136 @@
+/****************************************************************************
+*
+* SciTech Nucleus Graphics Architecture
+*
+* Copyright (C) 1991-1998 SciTech Software, Inc.
+* All rights reserved.
+*
+* ======================================================================
+* |REMOVAL OR MODIFICATION OF THIS HEADER IS STRICTLY PROHIBITED BY LAW|
+* | |
+* |This copyrighted computer code contains proprietary technology |
+* |owned by SciTech Software, Inc., located at 505 Wall Street, |
+* |Chico, CA 95928 USA (http://www.scitechsoft.com). |
+* | |
+* |The contents of this file are subject to the SciTech Nucleus |
+* |License; you may *not* use this file or related software except in |
+* |compliance with the License. You may obtain a copy of the License |
+* |at http://www.scitechsoft.com/nucleus-license.txt |
+* | |
+* |Software distributed under the License is distributed on an |
+* |"AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or |
+* |implied. See the License for the specific language governing |
+* |rights and limitations under the License. |
+* | |
+* |REMOVAL OR MODIFICATION OF THIS HEADER IS STRICTLY PROHIBITED BY LAW|
+* ======================================================================
+*
+* Language: ANSI C
+* Environment: MSDOS
+*
+* Description: OS specific Nucleus Graphics Architecture services for
+* the MSDOS operating system.
+*
+****************************************************************************/
+
+#include "pm_help.h"
+#include "pmapi.h"
+#include <stdio.h>
+#include <stdlib.h>
+#include <string.h>
+
+/*-------------------------- Implementation -------------------------------*/
+
+/****************************************************************************
+PARAMETERS:
+path - Local path to the Nucleus driver files.
+
+REMARKS:
+This function is used by the application program to override the location
+of the Nucleus driver files that are loaded. Normally the loader code
+will look in the system Nucleus directories first, then in the 'drivers'
+directory relative to the current working directory, and finally relative
+to the MGL_ROOT environment variable.
+****************************************************************************/
+void NAPI GA_setLocalPath(
+ const char *path)
+{
+ PM_setLocalBPDPath(path);
+}
+
+/****************************************************************************
+RETURNS:
+Pointer to the system wide PM library imports, or the internal version if none
+
+REMARKS:
+Nothing to do here for DOS. Basically since DOS has no system wide shared
+library mechanism we are essentially screwed if the binary API changes.
+By default for 32-bit DOS apps the local Nucleus drivers should always be
+used in preference to the system wide Nucleus drivers.
+****************************************************************************/
+PM_imports * NAPI GA_getSystemPMImports(void)
+{
+ return &_PM_imports;
+}
+
+/****************************************************************************
+REMARKS:
+Nothing special for this OS.
+****************************************************************************/
+ibool NAPI GA_getSharedExports(
+ GA_exports *gaExp,
+ ibool shared)
+{
+ (void)gaExp;
+ (void)shared;
+ return false;
+}
+
+#if !defined(TEST_HARNESS) && !defined(VBETEST)
+/****************************************************************************
+REMARKS:
+Nothing special for this OS
+****************************************************************************/
+ibool NAPI GA_queryFunctions(
+ GA_devCtx *dc,
+ N_uint32 id,
+ void _FAR_ *funcs)
+{
+ return __GA_exports.GA_queryFunctions(dc,id,funcs);
+}
+
+/****************************************************************************
+REMARKS:
+Nothing special for this OS
+****************************************************************************/
+ibool NAPI REF2D_queryFunctions(
+ REF2D_driver *ref2d,
+ N_uint32 id,
+ void _FAR_ *funcs)
+{
+ return __GA_exports.REF2D_queryFunctions(ref2d,id,funcs);
+}
+#endif
+
+/****************************************************************************
+REMARKS:
+This function initialises the high precision timing functions for the DOS
+Nucleus loader library.
+****************************************************************************/
+ibool NAPI GA_TimerInit(void)
+{
+ if (_GA_haveCPUID() && (_GA_getCPUIDFeatures() & CPU_HaveRDTSC) != 0)
+ return true;
+ return false;
+}
+
+/****************************************************************************
+REMARKS:
+This function reads the high resolution timer.
+****************************************************************************/
+void NAPI GA_TimerRead(
+ GA_largeInteger *value)
+{
+ _GA_readTimeStamp(value);
+}
+
diff --git a/board/MAI/bios_emulator/scitech/src/common/galib.c b/board/MAI/bios_emulator/scitech/src/common/galib.c
new file mode 100644
index 00000000000..7c1fbe312d4
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/common/galib.c
@@ -0,0 +1,269 @@
+/****************************************************************************
+*
+* SciTech Nucleus Graphics Architecture
+*
+* Copyright (C) 1991-1998 SciTech Software, Inc.
+* All rights reserved.
+*
+* ======================================================================
+* |REMOVAL OR MODIFICATION OF THIS HEADER IS STRICTLY PROHIBITED BY LAW|
+* | |
+* |This copyrighted computer code contains proprietary technology |
+* |owned by SciTech Software, Inc., located at 505 Wall Street, |
+* |Chico, CA 95928 USA (http://www.scitechsoft.com). |
+* | |
+* |The contents of this file are subject to the SciTech Nucleus |
+* |License; you may *not* use this file or related software except in |
+* |compliance with the License. You may obtain a copy of the License |
+* |at http://www.scitechsoft.com/nucleus-license.txt |
+* | |
+* |Software distributed under the License is distributed on an |
+* |"AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or |
+* |implied. See the License for the specific language governing |
+* |rights and limitations under the License. |
+* | |
+* |REMOVAL OR MODIFICATION OF THIS HEADER IS STRICTLY PROHIBITED BY LAW|
+* ======================================================================
+*
+* Language: ANSI C
+* Environment: Any 32-bit protected mode environment
+*
+* Description: C module for the Graphics Accelerator Driver API. Uses
+* the SciTech PM library for interfacing with DOS
+* extender specific functions.
+*
+****************************************************************************/
+
+#include "nucleus/graphics.h"
+#if defined(__WIN32_VXD__) || defined(__NT_DRIVER__)
+#include "sdd/sddhelp.h"
+#else
+#include <stdio.h>
+#include <stdlib.h>
+#endif
+
+/*---------------------------- Global Variables ---------------------------*/
+
+#ifndef TEST_HARNESS
+GA_exports _VARAPI __GA_exports;
+static int loaded = false;
+static PE_MODULE *hModBPD = NULL;
+
+static N_imports _N_imports = {
+ sizeof(N_imports),
+ _OS_delay,
+ };
+
+static GA_imports _GA_imports = {
+ sizeof(GA_imports),
+ GA_getSharedInfo,
+ GA_TimerInit,
+ GA_TimerRead,
+ GA_TimerDifference,
+ };
+#endif
+
+/*----------------------------- Implementation ----------------------------*/
+
+#define DLL_NAME "graphics.bpd"
+
+/****************************************************************************
+REMARKS:
+This function is no longer used but we must implement it and return NULL
+for compatibility with older binary drivers.
+****************************************************************************/
+GA_sharedInfo * NAPI GA_getSharedInfo(
+ int device)
+{
+ return NULL;
+}
+
+#ifndef TEST_HARNESS
+/****************************************************************************
+REMARKS:
+Fatal error handler for non-exported GA_exports.
+****************************************************************************/
+static void _GA_fatalErrorHandler(void)
+{
+ PM_fatalError("Unsupported Nucleus export function called! Please upgrade your copy of Nucleus!\n");
+}
+
+/****************************************************************************
+PARAMETERS:
+shared - True to load the driver into shared memory.
+
+REMARKS:
+Loads the Nucleus binary portable DLL into memory and initilises it.
+****************************************************************************/
+static ibool LoadDriver(
+ ibool shared)
+{
+ GA_initLibrary_t GA_initLibrary;
+ GA_exports *gaExp;
+ char filename[PM_MAX_PATH];
+ char bpdpath[PM_MAX_PATH];
+ int i,max;
+ ulong *p;
+
+ /* Check if we have already loaded the driver */
+ if (loaded)
+ return true;
+ PM_init();
+
+ /* First try to see if we can find the system wide shared exports
+ * if they are available. Under OS/2 this connects to our global
+ * shared Nucleus loader in SDDPMI.DLL.
+ */
+ __GA_exports.dwSize = sizeof(__GA_exports);
+ if (GA_getSharedExports(&__GA_exports,shared))
+ return loaded = true;
+
+ /* Open the BPD file */
+ if (!PM_findBPD(DLL_NAME,bpdpath))
+ return false;
+ strcpy(filename,bpdpath);
+ strcat(filename,DLL_NAME);
+ if ((hModBPD = PE_loadLibrary(filename,shared)) == NULL)
+ return false;
+ if ((GA_initLibrary = (GA_initLibrary_t)PE_getProcAddress(hModBPD,"_GA_initLibrary")) == NULL)
+ return false;
+ bpdpath[strlen(bpdpath)-1] = 0;
+ if (strcmp(bpdpath,PM_getNucleusPath()) == 0)
+ strcpy(bpdpath,PM_getNucleusConfigPath());
+ else {
+ PM_backslash(bpdpath);
+ strcat(bpdpath,"config");
+ }
+ if ((gaExp = GA_initLibrary(shared,bpdpath,filename,GA_getSystemPMImports(),&_N_imports,&_GA_imports)) == NULL)
+ PM_fatalError("GA_initLibrary failed!\n");
+
+ /* Initialize all default imports to point to fatal error handler
+ * for upwards compatibility, and copy the exported functions.
+ */
+ max = sizeof(__GA_exports)/sizeof(GA_initLibrary_t);
+ for (i = 0,p = (ulong*)&__GA_exports; i < max; i++)
+ *p++ = (ulong)_GA_fatalErrorHandler;
+ memcpy(&__GA_exports,gaExp,MIN(sizeof(__GA_exports),gaExp->dwSize));
+ loaded = true;
+ return true;
+}
+
+/* The following are stub entry points that the application calls to
+ * initialise the Nucleus loader library, and we use this to load our
+ * driver DLL from disk and initialise the library using it.
+ */
+
+/* {secret} */
+int NAPI GA_status(void)
+{
+ if (!loaded)
+ return nDriverNotFound;
+ return __GA_exports.GA_status();
+}
+
+/* {secret} */
+const char * NAPI GA_errorMsg(
+ N_int32 status)
+{
+ if (!loaded)
+ return "Unable to load Nucleus device driver!";
+ return __GA_exports.GA_errorMsg(status);
+}
+
+/* {secret} */
+int NAPI GA_getDaysLeft(N_int32 shared)
+{
+ if (!LoadDriver(shared))
+ return -1;
+ return __GA_exports.GA_getDaysLeft(shared);
+}
+
+/* {secret} */
+int NAPI GA_registerLicense(uchar *license,N_int32 shared)
+{
+ if (!LoadDriver(shared))
+ return 0;
+ return __GA_exports.GA_registerLicense(license,shared);
+}
+
+/* {secret} */
+ibool NAPI GA_loadInGUI(N_int32 shared)
+{
+ if (!LoadDriver(shared))
+ return false;
+ return __GA_exports.GA_loadInGUI(shared);
+}
+
+/* {secret} */
+int NAPI GA_enumerateDevices(N_int32 shared)
+{
+ if (!LoadDriver(shared))
+ return 0;
+ return __GA_exports.GA_enumerateDevices(shared);
+}
+
+/* {secret} */
+GA_devCtx * NAPI GA_loadDriver(N_int32 deviceIndex,N_int32 shared)
+{
+ if (!LoadDriver(shared))
+ return NULL;
+ return __GA_exports.GA_loadDriver(deviceIndex,shared);
+}
+
+/* {secret} */
+void NAPI GA_getGlobalOptions(
+ GA_globalOptions *options,
+ ibool shared)
+{
+ if (LoadDriver(shared))
+ __GA_exports.GA_getGlobalOptions(options,shared);
+}
+
+/* {secret} */
+PE_MODULE * NAPI GA_loadLibrary(
+ const char *szBPDName,
+ ulong *size,
+ ibool shared)
+{
+ if (!LoadDriver(shared))
+ return NULL;
+ return __GA_exports.GA_loadLibrary(szBPDName,size,shared);
+}
+
+/* {secret} */
+GA_devCtx * NAPI GA_getCurrentDriver(
+ N_int32 deviceIndex)
+{
+ /* Bail for older drivers that didn't export this function! */
+ if (!__GA_exports.GA_getCurrentDriver)
+ return NULL;
+ return __GA_exports.GA_getCurrentDriver(deviceIndex);
+}
+
+/* {secret} */
+REF2D_driver * NAPI GA_getCurrentRef2d(
+ N_int32 deviceIndex)
+{
+ /* Bail for older drivers that didn't export this function! */
+ if (!__GA_exports.GA_getCurrentRef2d)
+ return NULL;
+ return __GA_exports.GA_getCurrentRef2d(deviceIndex);
+}
+
+/* {secret} */
+int NAPI GA_isOEMVersion(ibool shared)
+{
+ if (!LoadDriver(shared))
+ return 0;
+ return __GA_exports.GA_isOEMVersion(shared);
+}
+
+/* {secret} */
+N_uint32 * NAPI GA_getLicensedDevices(ibool shared)
+{
+ if (!LoadDriver(shared))
+ return 0;
+ return __GA_exports.GA_getLicensedDevices(shared);
+}
+#endif
+
diff --git a/board/MAI/bios_emulator/scitech/src/common/galinux.c b/board/MAI/bios_emulator/scitech/src/common/galinux.c
new file mode 100644
index 00000000000..cbd9d7f4e56
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/common/galinux.c
@@ -0,0 +1,148 @@
+/****************************************************************************
+*
+* SciTech Nucleus Graphics Architecture
+*
+* Copyright (C) 1991-1998 SciTech Software, Inc.
+* All rights reserved.
+*
+* ======================================================================
+* |REMOVAL OR MODIFICATION OF THIS HEADER IS STRICTLY PROHIBITED BY LAW|
+* | |
+* |This copyrighted computer code contains proprietary technology |
+* |owned by SciTech Software, Inc., located at 505 Wall Street, |
+* |Chico, CA 95928 USA (http://www.scitechsoft.com). |
+* | |
+* |The contents of this file are subject to the SciTech Nucleus |
+* |License; you may *not* use this file or related software except in |
+* |compliance with the License. You may obtain a copy of the License |
+* |at http://www.scitechsoft.com/nucleus-license.txt |
+* | |
+* |Software distributed under the License is distributed on an |
+* |"AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or |
+* |implied. See the License for the specific language governing |
+* |rights and limitations under the License. |
+* | |
+* |REMOVAL OR MODIFICATION OF THIS HEADER IS STRICTLY PROHIBITED BY LAW|
+* ======================================================================
+*
+* Language: ANSI C
+* Environment: Linux
+*
+* Description: OS specific Nucleus Graphics Architecture services for
+* the Linux operating system.
+*
+****************************************************************************/
+
+#include "nucleus/graphics.h"
+#include <sys/time.h>
+
+/*---------------------------- Global Variables ---------------------------*/
+
+static ibool haveRDTSC;
+
+/*-------------------------- Implementation -------------------------------*/
+
+/****************************************************************************
+PARAMETERS:
+path - Local path to the Nucleus driver files.
+
+REMARKS:
+This function is used by the application program to override the location
+of the Nucleus driver files that are loaded. Normally the loader code
+will look in the system Nucleus directories first, then in the 'drivers'
+directory relative to the current working directory, and finally relative
+to the MGL_ROOT environment variable.
+****************************************************************************/
+void NAPI GA_setLocalPath(
+ const char *path)
+{
+ PM_setLocalBPDPath(path);
+}
+
+/****************************************************************************
+RETURNS:
+Pointer to the system wide PM library imports, or the internal version if none
+
+REMARKS:
+In order to support deploying new Nucleus drivers that may require updated
+PM library functions, we check here to see if there is a system wide version
+of the PM functions available. If so we return those functions for use with
+the system wide Nucleus drivers, otherwise the compiled in version of the PM
+library is used with the application local version of Nucleus.
+****************************************************************************/
+PM_imports * NAPI GA_getSystemPMImports(void)
+{
+ // TODO: We may very well want to provide a system shared library
+ // that eports the PM functions required by the Nucleus library
+ // for Linux here. That will eliminate fatal errors loading new
+ // drivers on Linux!
+ return &_PM_imports;
+}
+
+/****************************************************************************
+REMARKS:
+Nothing special for this OS.
+****************************************************************************/
+ibool NAPI GA_getSharedExports(
+ GA_exports *gaExp,
+ ibool shared)
+{
+ (void)gaExp;
+ (void)shared;
+ return false;
+}
+
+#ifndef TEST_HARNESS
+/****************************************************************************
+REMARKS:
+Nothing special for this OS
+****************************************************************************/
+ibool NAPI GA_queryFunctions(
+ GA_devCtx *dc,
+ N_uint32 id,
+ void _FAR_ *funcs)
+{
+ return __GA_exports.GA_queryFunctions(dc,id,funcs);
+}
+
+/****************************************************************************
+REMARKS:
+Nothing special for this OS
+****************************************************************************/
+ibool NAPI REF2D_queryFunctions(
+ REF2D_driver *ref2d,
+ N_uint32 id,
+ void _FAR_ *funcs)
+{
+ return __GA_exports.REF2D_queryFunctions(ref2d,id,funcs);
+}
+#endif
+
+/****************************************************************************
+REMARKS:
+This function initialises the high precision timing functions for the
+Nucleus loader library.
+****************************************************************************/
+ibool NAPI GA_TimerInit(void)
+{
+ if (_GA_haveCPUID() && (_GA_getCPUIDFeatures() & CPU_HaveRDTSC) != 0)
+ haveRDTSC = true;
+ return true;
+}
+
+/****************************************************************************
+REMARKS:
+This function reads the high resolution timer.
+****************************************************************************/
+void NAPI GA_TimerRead(
+ GA_largeInteger *value)
+{
+ if (haveRDTSC)
+ _GA_readTimeStamp(value);
+ else {
+ struct timeval t;
+ gettimeofday(&t, NULL);
+ value->low = t.tv_sec*1000000 + t.tv_usec;
+ value->high = 0;
+ }
+}
diff --git a/board/MAI/bios_emulator/scitech/src/common/gantdrv.c b/board/MAI/bios_emulator/scitech/src/common/gantdrv.c
new file mode 100644
index 00000000000..d9944c56ae5
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/common/gantdrv.c
@@ -0,0 +1,137 @@
+/****************************************************************************
+*
+* SciTech Nucleus Graphics Architecture
+*
+* Copyright (C) 1991-1998 SciTech Software, Inc.
+* All rights reserved.
+*
+* ======================================================================
+* |REMOVAL OR MODIFICATION OF THIS HEADER IS STRICTLY PROHIBITED BY LAW|
+* | |
+* |This copyrighted computer code contains proprietary technology |
+* |owned by SciTech Software, Inc., located at 505 Wall Street, |
+* |Chico, CA 95928 USA (http://www.scitechsoft.com). |
+* | |
+* |The contents of this file are subject to the SciTech Nucleus |
+* |License; you may *not* use this file or related software except in |
+* |compliance with the License. You may obtain a copy of the License |
+* |at http://www.scitechsoft.com/nucleus-license.txt |
+* | |
+* |Software distributed under the License is distributed on an |
+* |"AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or |
+* |implied. See the License for the specific language governing |
+* |rights and limitations under the License. |
+* | |
+* |REMOVAL OR MODIFICATION OF THIS HEADER IS STRICTLY PROHIBITED BY LAW|
+* ======================================================================
+*
+* Language: ANSI C
+* Environment: NT device driver
+*
+* Description: OS specific Nucleus Graphics Architecture services for
+* the NT device drivers.
+*
+****************************************************************************/
+
+#include "sdd/sddhelp.h"
+
+/*------------------------- Global Variables ------------------------------*/
+
+static ibool haveRDTSC;
+
+/*-------------------------- Implementation -------------------------------*/
+
+/****************************************************************************
+PARAMETERS:
+path - Local path to the Nucleus driver files.
+
+REMARKS:
+This function is used by the application program to override the location
+of the Nucleus driver files that are loaded. Normally the loader code
+will look in the system Nucleus directories first, then in the 'drivers'
+directory relative to the current working directory, and finally relative
+to the MGL_ROOT environment variable.
+****************************************************************************/
+void NAPI GA_setLocalPath(
+ const char *path)
+{
+ PM_setLocalBPDPath(path);
+}
+
+/****************************************************************************
+RETURNS:
+Pointer to the system wide PM library imports, or the internal version if none
+
+REMARKS:
+Nothing special for this OS.
+****************************************************************************/
+PM_imports * NAPI GA_getSystemPMImports(void)
+{
+ return &_PM_imports;
+}
+
+/****************************************************************************
+REMARKS:
+Nothing special for this OS.
+****************************************************************************/
+ibool NAPI GA_getSharedExports(
+ GA_exports *gaExp,
+ ibool shared)
+{
+ (void)gaExp;
+ (void)shared;
+ return false;
+}
+
+#ifndef TEST_HARNESS
+/****************************************************************************
+REMARKS:
+Nothing special for this OS
+****************************************************************************/
+ibool NAPI GA_queryFunctions(
+ GA_devCtx *dc,
+ N_uint32 id,
+ void _FAR_ *funcs)
+{
+ return __GA_exports.GA_queryFunctions(dc,id,funcs);
+}
+
+/****************************************************************************
+REMARKS:
+Nothing special for this OS
+****************************************************************************/
+ibool NAPI REF2D_queryFunctions(
+ REF2D_driver *ref2d,
+ N_uint32 id,
+ void _FAR_ *funcs)
+{
+ return __GA_exports.REF2D_queryFunctions(ref2d,id,funcs);
+}
+#endif
+
+/****************************************************************************
+REMARKS:
+This function initialises the high precision timing functions for the
+Nucleus loader library.
+****************************************************************************/
+ibool NAPI GA_TimerInit(void)
+{
+ if (_GA_haveCPUID() && (_GA_getCPUIDFeatures() & CPU_HaveRDTSC) != 0) {
+ haveRDTSC = true;
+ }
+ return true;
+}
+
+/****************************************************************************
+REMARKS:
+This function reads the high resolution timer.
+****************************************************************************/
+void NAPI GA_TimerRead(
+ GA_largeInteger *value)
+{
+ if (haveRDTSC)
+ _GA_readTimeStamp(value);
+ else
+ KeQuerySystemTime((LARGE_INTEGER*)value);
+}
+
diff --git a/board/MAI/bios_emulator/scitech/src/common/gaos2.c b/board/MAI/bios_emulator/scitech/src/common/gaos2.c
new file mode 100644
index 00000000000..822e93ca612
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/common/gaos2.c
@@ -0,0 +1,248 @@
+/****************************************************************************
+*
+* SciTech Nucleus Graphics Architecture
+*
+* Copyright (C) 1991-1998 SciTech Software, Inc.
+* All rights reserved.
+*
+* ======================================================================
+* |REMOVAL OR MODIFICATION OF THIS HEADER IS STRICTLY PROHIBITED BY LAW|
+* | |
+* |This copyrighted computer code contains proprietary technology |
+* |owned by SciTech Software, Inc., located at 505 Wall Street, |
+* |Chico, CA 95928 USA (http://www.scitechsoft.com). |
+* | |
+* |The contents of this file are subject to the SciTech Nucleus |
+* |License; you may *not* use this file or related software except in |
+* |compliance with the License. You may obtain a copy of the License |
+* |at http://www.scitechsoft.com/nucleus-license.txt |
+* | |
+* |Software distributed under the License is distributed on an |
+* |"AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or |
+* |implied. See the License for the specific language governing |
+* |rights and limitations under the License. |
+* | |
+* |REMOVAL OR MODIFICATION OF THIS HEADER IS STRICTLY PROHIBITED BY LAW|
+* ======================================================================
+*
+* Language: ANSI C
+* Environment: OS/2 32-bit
+*
+* Description: OS specific Nucleus Graphics Architecture services for
+* the OS/2 operating system environments.
+*
+****************************************************************************/
+
+#include "pm_help.h"
+#define INCL_DOSERRORS
+#define INCL_DOS
+#define INCL_SUB
+#define INCL_VIO
+#define INCL_KBD
+#include <os2.h>
+
+/*--------------------------- Global variables ----------------------------*/
+
+static ibool haveRDTSC = false;
+static ulong parms[3]; /* Must not cross 64Kb boundary! */
+static ulong result[4]; /* Must not cross 64Kb boundary! */
+
+/*-------------------------- Implementation -------------------------------*/
+
+/****************************************************************************
+PARAMETERS:
+func - Helper device driver function to call
+
+RETURNS:
+First return value from the device driver in parmsOut[0]
+
+REMARKS:
+Function to open our helper device driver, call it and close the file
+handle. Note that we have to open the device driver for every call because
+of two problems:
+
+ 1. We cannot open a single file handle in a DLL that is shared amongst
+ programs, since every process must have it's own open file handle.
+
+ 2. For some reason there appears to be a limit of about 12 open file
+ handles on a device driver in the system. Hence when we open more
+ than about 12 file handles things start to go very strange.
+
+Hence we simply open the file handle every time that we need to call the
+device driver to work around these problems.
+****************************************************************************/
+static ulong CallSDDHelp(
+ int func)
+{
+ static ulong inLen; /* Must not cross 64Kb boundary! */
+ static ulong outLen; /* Must not cross 64Kb boundary! */
+ HFILE hSDDHelp;
+
+ /* If this code in here fails, we are screwed! Many of our drivers
+ * use this code and don't have a C library, so we simply assume we
+ * can't fail here.
+ */
+ DosOpen(PMHELP_NAME,&hSDDHelp,&result[0],0,0,
+ FILE_OPEN, OPEN_SHARE_DENYNONE | OPEN_ACCESS_READWRITE,
+ NULL);
+ DosDevIOCtl(hSDDHelp,PMHELP_IOCTL,func,
+ &parms, inLen = sizeof(parms), &inLen,
+ &result, outLen = sizeof(result), &outLen);
+ DosClose(hSDDHelp);
+ return result[0];
+}
+
+/****************************************************************************
+PARAMETERS:
+path - Local path to the Nucleus driver files.
+
+REMARKS:
+This function is used by the application program to override the location
+of the Nucleus driver files that are loaded. Normally the loader code
+will look in the system Nucleus directories first, then in the 'drivers'
+directory relative to the current working directory, and finally relative
+to the MGL_ROOT environment variable.
+****************************************************************************/
+void NAPI GA_setLocalPath(
+ const char *path)
+{
+ PM_setLocalBPDPath(path);
+}
+
+/****************************************************************************
+RETURNS:
+Pointer to the system wide PM library imports, or the internal version if none
+
+REMARKS:
+For OS/2 we don't need to do anything special because Nucleus is always
+loaded via the shared SDDPMI driver when SDD is loaded so we don't need
+a system wide PM library imports function.
+****************************************************************************/
+PM_imports * NAPI GA_getSystemPMImports(void)
+{
+ return &_PM_imports;
+}
+
+/****************************************************************************
+PARAMETERS:
+gaExp - Place to store the exported functions
+shared - True if connecting to the shared, global Nucleus driver
+
+REMARKS:
+For OS/2 if SDD is loaded we *always* connect to the shared Nucleus functions
+contained within the SDDPMI driver. This allows the Nucleus functions contained
+within this driver to be utilised by all Nucleus apps in the system and
+maintains a consistent state between versions.
+****************************************************************************/
+ibool NAPI GA_getSharedExports(
+ GA_exports *gaExp,
+ ibool shared)
+{
+ /* In test harness mode, we need to load a local copy of Nucleus */
+#if !defined (TEST_HARNESS) || defined (DEBUG_SDDPMI)
+ HMODULE hModSDDPMI;
+ char buf[80];
+ GA_exports *exp;
+
+ /* Initialise the PM library and connect to our runtime DLL's */
+ PM_init();
+ if (CallSDDHelp(PMHELP_GETSHAREDEXP) != 0) {
+ /* We have found the shared Nucleus exports. Because not all processes
+ * map to SDDPMI.DLL, we need to ensure that we connect to this
+ * DLL so that it gets mapped into our address space (that is
+ * where the shared Nucleus loader code is located). Simply doing a
+ * DosLoadModule on it is enough for this.
+ */
+ DosLoadModule((PSZ)buf,sizeof(buf),(PSZ)"SDDPMI.DLL",&hModSDDPMI);
+ exp = (GA_exports*)result[0];
+ memcpy(gaExp,exp,MIN(gaExp->dwSize,exp->dwSize));
+ return true;
+ }
+#endif
+ (void)shared;
+ return false;
+}
+
+#ifndef TEST_HARNESS
+/****************************************************************************
+REMARKS:
+Nothing special for this OS
+****************************************************************************/
+ibool NAPI GA_queryFunctions(
+ GA_devCtx *dc,
+ N_uint32 id,
+ void _FAR_ *funcs)
+{
+ return __GA_exports.GA_queryFunctions(dc,id,funcs);
+}
+
+/****************************************************************************
+REMARKS:
+Nothing special for this OS
+****************************************************************************/
+ibool NAPI REF2D_queryFunctions(
+ REF2D_driver *ref2d,
+ N_uint32 id,
+ void _FAR_ *funcs)
+{
+ return __GA_exports.REF2D_queryFunctions(ref2d,id,funcs);
+}
+#endif
+
+/****************************************************************************
+REMARKS:
+This function initialises the high precision timing functions for the
+Nucleus loader library.
+****************************************************************************/
+ibool NAPI GA_TimerInit(void)
+{
+ if (_GA_haveCPUID() && (_GA_getCPUIDFeatures() & CPU_HaveRDTSC) != 0)
+ haveRDTSC = true;
+ return true;
+}
+
+/****************************************************************************
+REMARKS:
+This function reads the high resolution timer.
+****************************************************************************/
+void NAPI GA_TimerRead(
+ GA_largeInteger *value)
+{
+ if (haveRDTSC)
+ _GA_readTimeStamp(value);
+ else
+ DosTmrQueryTime((QWORD*)value);
+}
+
+/****************************************************************************
+REMARKS:
+On OS/2, we need special memory allocation functions if we build SDDPMI in
+test harness mode. But if we build GATest etc. in test mode, we want to use
+the normal C runtime functions, so route them back here.
+****************************************************************************/
+
+#if defined (TEST_HARNESS) && !defined (DEBUG_SDDPMI)
+
+/* Undefine these macros first or we'll recurse to hell! */
+#undef malloc
+#undef calloc
+#undef realloc
+#undef free
+
+void *SDDPMI_malloc(size_t size) {
+ return malloc(size);
+}
+
+void *SDDPMI_calloc(size_t num, size_t size) {
+ return calloc(num, size);
+}
+
+void SDDPMI_free(void *ptr) {
+ free(ptr);
+}
+
+void *SDDPMI_realloc(void *ptr, size_t size) {
+ return realloc(ptr, size);
+}
+
+#endif
diff --git a/board/MAI/bios_emulator/scitech/src/common/gaqnx.c b/board/MAI/bios_emulator/scitech/src/common/gaqnx.c
new file mode 100644
index 00000000000..0846cccef08
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/common/gaqnx.c
@@ -0,0 +1,149 @@
+/****************************************************************************
+*
+* SciTech Nucleus Graphics Architecture
+*
+* Copyright (C) 1991-1998 SciTech Software, Inc.
+* All rights reserved.
+*
+* ======================================================================
+* |REMOVAL OR MODIFICATION OF THIS HEADER IS STRICTLY PROHIBITED BY LAW|
+* | |
+* |This copyrighted computer code contains proprietary technology |
+* |owned by SciTech Software, Inc., located at 505 Wall Street, |
+* |Chico, CA 95928 USA (http://www.scitechsoft.com). |
+* | |
+* |The contents of this file are subject to the SciTech Nucleus |
+* |License; you may *not* use this file or related software except in |
+* |compliance with the License. You may obtain a copy of the License |
+* |at http://www.scitechsoft.com/nucleus-license.txt |
+* | |
+* |Software distributed under the License is distributed on an |
+* |"AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or |
+* |implied. See the License for the specific language governing |
+* |rights and limitations under the License. |
+* | |
+* |REMOVAL OR MODIFICATION OF THIS HEADER IS STRICTLY PROHIBITED BY LAW|
+* ======================================================================
+*
+* Language: ANSI C
+* Environment: QNX
+*
+* Description: OS specific Nucleus Graphics Architecture services for
+* the QNX operating system.
+*
+****************************************************************************/
+
+#include "nucleus/graphics.h"
+#include <time.h>
+
+/*---------------------------- Global Variables ---------------------------*/
+
+static ibool haveRDTSC;
+
+/*-------------------------- Implementation -------------------------------*/
+
+/****************************************************************************
+PARAMETERS:
+path - Local path to the Nucleus driver files.
+
+REMARKS:
+This function is used by the application program to override the location
+of the Nucleus driver files that are loaded. Normally the loader code
+will look in the system Nucleus directories first, then in the 'drivers'
+directory relative to the current working directory, and finally relative
+to the MGL_ROOT environment variable.
+****************************************************************************/
+void NAPI GA_setLocalPath(
+ const char *path)
+{
+ PM_setLocalBPDPath(path);
+}
+
+/****************************************************************************
+RETURNS:
+Pointer to the system wide PM library imports, or the internal version if none
+
+REMARKS:
+In order to support deploying new Nucleus drivers that may require updated
+PM library functions, we check here to see if there is a system wide version
+of the PM functions available. If so we return those functions for use with
+the system wide Nucleus drivers, otherwise the compiled in version of the PM
+library is used with the application local version of Nucleus.
+****************************************************************************/
+PM_imports * NAPI GA_getSystemPMImports(void)
+{
+ // TODO: We may very well want to provide a system shared library
+ // that eports the PM functions required by the Nucleus library
+ // for QNX here. That will eliminate fatal errors loading new
+ // drivers on QNX!
+ return &_PM_imports;
+}
+
+/****************************************************************************
+REMARKS:
+Nothing special for this OS.
+****************************************************************************/
+ibool NAPI GA_getSharedExports(
+ GA_exports *gaExp,
+ ibool shared)
+{
+ (void)gaExp;
+ (void)shared;
+ return false;
+}
+
+#ifndef TEST_HARNESS
+/****************************************************************************
+REMARKS:
+Nothing special for this OS
+****************************************************************************/
+ibool NAPI GA_queryFunctions(
+ GA_devCtx *dc,
+ N_uint32 id,
+ void _FAR_ *funcs)
+{
+ return __GA_exports.GA_queryFunctions(dc,id,funcs);
+}
+
+/****************************************************************************
+REMARKS:
+Nothing special for this OS
+****************************************************************************/
+ibool NAPI REF2D_queryFunctions(
+ REF2D_driver *ref2d,
+ N_uint32 id,
+ void _FAR_ *funcs)
+{
+ return __GA_exports.REF2D_queryFunctions(ref2d,id,funcs);
+}
+#endif
+
+/****************************************************************************
+REMARKS:
+This function initialises the high precision timing functions for the
+Nucleus loader library.
+****************************************************************************/
+ibool NAPI GA_TimerInit(void)
+{
+ if (_GA_haveCPUID() && (_GA_getCPUIDFeatures() & CPU_HaveRDTSC) != 0)
+ haveRDTSC = true;
+ return true;
+}
+
+/****************************************************************************
+REMARKS:
+This function reads the high resolution timer.
+****************************************************************************/
+void NAPI GA_TimerRead(
+ GA_largeInteger *value)
+{
+ if (haveRDTSC)
+ _GA_readTimeStamp(value);
+ else {
+ struct timespec ts;
+
+ clock_gettime(CLOCK_REALTIME, &ts);
+ value->low = (ts.tv_nsec / 1000 + ts.tv_sec * 1000000);
+ value->high = 0;
+ }
+}
diff --git a/board/MAI/bios_emulator/scitech/src/common/gartt.c b/board/MAI/bios_emulator/scitech/src/common/gartt.c
new file mode 100644
index 00000000000..003e1e7dbe7
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/common/gartt.c
@@ -0,0 +1,139 @@
+/****************************************************************************
+*
+* SciTech Nucleus Graphics Architecture
+*
+* Copyright (C) 1991-1998 SciTech Software, Inc.
+* All rights reserved.
+*
+* ======================================================================
+* |REMOVAL OR MODIFICATION OF THIS HEADER IS STRICTLY PROHIBITED BY LAW|
+* | |
+* |This copyrighted computer code contains proprietary technology |
+* |owned by SciTech Software, Inc., located at 505 Wall Street, |
+* |Chico, CA 95928 USA (http://www.scitechsoft.com). |
+* | |
+* |The contents of this file are subject to the SciTech Nucleus |
+* |License; you may *not* use this file or related software except in |
+* |compliance with the License. You may obtain a copy of the License |
+* |at http://www.scitechsoft.com/nucleus-license.txt |
+* | |
+* |Software distributed under the License is distributed on an |
+* |"AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or |
+* |implied. See the License for the specific language governing |
+* |rights and limitations under the License. |
+* | |
+* |REMOVAL OR MODIFICATION OF THIS HEADER IS STRICTLY PROHIBITED BY LAW|
+* ======================================================================
+*
+* Language: ANSI C
+* Environment: RTTarget-32
+*
+* Description: OS specific Nucleus Graphics Architecture services for
+* the RTTarget-32 operating system environments.
+*
+****************************************************************************/
+
+#include "nucleus/graphics.h"
+
+/*------------------------- Global Variables ------------------------------*/
+
+static ibool haveRDTSC;
+
+/*-------------------------- Implementation -------------------------------*/
+
+/****************************************************************************
+PARAMETERS:
+path - Local path to the Nucleus driver files.
+
+REMARKS:
+This function is used by the application program to override the location
+of the Nucleus driver files that are loaded. Normally the loader code
+will look in the system Nucleus directories first, then in the 'drivers'
+directory relative to the current working directory, and finally relative
+to the MGL_ROOT environment variable.
+****************************************************************************/
+void NAPI GA_setLocalPath(
+ const char *path)
+{
+ PM_setLocalBPDPath(path);
+}
+
+/****************************************************************************
+RETURNS:
+Pointer to the system wide PM library imports, or the internal version if none
+
+REMARKS:
+In order to support deploying new Nucleus drivers that may require updated
+PM library functions, we check here to see if there is a system wide version
+of the PM functions available. If so we return those functions for use with
+the system wide Nucleus drivers, otherwise the compiled in version of the PM
+library is used with the application local version of Nucleus.
+****************************************************************************/
+PM_imports * NAPI GA_getSystemPMImports(void)
+{
+ return &_PM_imports;
+}
+
+/****************************************************************************
+REMARKS:
+Nothing special for this OS.
+****************************************************************************/
+ibool NAPI GA_getSharedExports(
+ GA_exports *gaExp,
+ ibool shared)
+{
+ (void)gaExp;
+ (void)shared;
+ return false;
+}
+
+#ifndef TEST_HARNESS
+/****************************************************************************
+REMARKS:
+Nothing special for this OS
+****************************************************************************/
+ibool NAPI GA_queryFunctions(
+ GA_devCtx *dc,
+ N_uint32 id,
+ void _FAR_ *funcs)
+{
+ return __GA_exports.GA_queryFunctions(dc,id,funcs);
+}
+
+/****************************************************************************
+REMARKS:
+Nothing special for this OS
+****************************************************************************/
+ibool NAPI REF2D_queryFunctions(
+ REF2D_driver *ref2d,
+ N_uint32 id,
+ void _FAR_ *funcs)
+{
+ return __GA_exports.REF2D_queryFunctions(ref2d,id,funcs);
+}
+#endif
+
+/****************************************************************************
+REMARKS:
+This function initialises the high precision timing functions for the
+Nucleus loader library.
+****************************************************************************/
+ibool NAPI GA_TimerInit(void)
+{
+ if (_GA_haveCPUID() && (_GA_getCPUIDFeatures() & CPU_HaveRDTSC) != 0) {
+ haveRDTSC = true;
+ return true;
+ }
+ return false;
+}
+
+/****************************************************************************
+REMARKS:
+This function reads the high resolution timer.
+****************************************************************************/
+void NAPI GA_TimerRead(
+ GA_largeInteger *value)
+{
+ if (haveRDTSC)
+ _GA_readTimeStamp(value);
+}
diff --git a/board/MAI/bios_emulator/scitech/src/common/gasmx.c b/board/MAI/bios_emulator/scitech/src/common/gasmx.c
new file mode 100644
index 00000000000..62e68dc13e1
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/common/gasmx.c
@@ -0,0 +1,133 @@
+/****************************************************************************
+*
+* SciTech Nucleus Graphics Architecture
+*
+* Copyright (C) 1991-1998 SciTech Software, Inc.
+* All rights reserved.
+*
+* ======================================================================
+* |REMOVAL OR MODIFICATION OF THIS HEADER IS STRICTLY PROHIBITED BY LAW|
+* | |
+* |This copyrighted computer code contains proprietary technology |
+* |owned by SciTech Software, Inc., located at 505 Wall Street, |
+* |Chico, CA 95928 USA (http://www.scitechsoft.com). |
+* | |
+* |The contents of this file are subject to the SciTech Nucleus |
+* |License; you may *not* use this file or related software except in |
+* |compliance with the License. You may obtain a copy of the License |
+* |at http://www.scitechsoft.com/nucleus-license.txt |
+* | |
+* |Software distributed under the License is distributed on an |
+* |"AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or |
+* |implied. See the License for the specific language governing |
+* |rights and limitations under the License. |
+* | |
+* |REMOVAL OR MODIFICATION OF THIS HEADER IS STRICTLY PROHIBITED BY LAW|
+* ======================================================================
+*
+* Language: ANSI C
+* Environment: smx32
+*
+* Description: OS specific Nucleus Graphics Architecture services for
+* the smx32 platform -- no vxD support.
+*
+****************************************************************************/
+
+#include "pmapi.h"
+#include "nucleus/graphics.h"
+
+/*-------------------------- Implementation -------------------------------*/
+
+/****************************************************************************
+PARAMETERS:
+path - Local path to the Nucleus driver files.
+
+REMARKS:
+This function is used by the application program to override the location
+of the Nucleus driver files that are loaded. Normally the loader code
+will look in the system Nucleus directories first, then in the 'drivers'
+directory relative to the current working directory, and finally relative
+to the MGL_ROOT environment variable.
+****************************************************************************/
+void NAPI GA_setLocalPath(
+ const char *path)
+{
+ PM_setLocalBPDPath(path);
+}
+
+/****************************************************************************
+RETURNS:
+Pointer to the system wide PM library imports, or the internal version if none
+
+REMARKS:
+In order to support deploying new Nucleus drivers that may require updated
+PM library functions, we check here to see if there is a system wide version
+of the PM functions available. If so we return those functions for use with
+the system wide Nucleus drivers, otherwise the compiled in version of the PM
+library is used with the application local version of Nucleus.
+****************************************************************************/
+PM_imports * NAPI GA_getSystemPMImports(void)
+{
+ return &_PM_imports;
+}
+
+/****************************************************************************
+REMARKS:
+Nothing special for this OS.
+****************************************************************************/
+ibool NAPI GA_getSharedExports(
+ GA_exports *gaExp,
+ ibool shared)
+{
+ (void)gaExp;
+ (void)shared;
+ return false;
+}
+
+#ifndef TEST_HARNESS
+/****************************************************************************
+REMARKS:
+Nothing special for this OS
+****************************************************************************/
+ibool NAPI GA_queryFunctions(
+ GA_devCtx *dc,
+ N_uint32 id,
+ void _FAR_ *funcs)
+{
+ return __GA_exports.GA_queryFunctions(dc,id,funcs);
+}
+
+/****************************************************************************
+REMARKS:
+Nothing special for this OS
+****************************************************************************/
+ibool NAPI REF2D_queryFunctions(
+ REF2D_driver *ref2d,
+ N_uint32 id,
+ void _FAR_ *funcs)
+{
+ return __GA_exports.REF2D_queryFunctions(ref2d,id,funcs);
+}
+#endif
+
+/****************************************************************************
+REMARKS:
+This function initialises the high precision timing functions for the
+Nucleus loader library.
+****************************************************************************/
+ibool NAPI GA_TimerInit(void)
+{
+ if (_GA_haveCPUID() && (_GA_getCPUIDFeatures() & CPU_HaveRDTSC) != 0)
+ return true;
+ return false;
+}
+
+/****************************************************************************
+REMARKS:
+This function reads the high resolution timer.
+****************************************************************************/
+void NAPI GA_TimerRead(
+ GA_largeInteger *value)
+{
+ _GA_readTimeStamp(value);
+}
diff --git a/board/MAI/bios_emulator/scitech/src/common/gavxd.c b/board/MAI/bios_emulator/scitech/src/common/gavxd.c
new file mode 100644
index 00000000000..62173cc8d07
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/common/gavxd.c
@@ -0,0 +1,137 @@
+/****************************************************************************
+*
+* SciTech Nucleus Graphics Architecture
+*
+* Copyright (C) 1991-1998 SciTech Software, Inc.
+* All rights reserved.
+*
+* ======================================================================
+* |REMOVAL OR MODIFICATION OF THIS HEADER IS STRICTLY PROHIBITED BY LAW|
+* | |
+* |This copyrighted computer code contains proprietary technology |
+* |owned by SciTech Software, Inc., located at 505 Wall Street, |
+* |Chico, CA 95928 USA (http://www.scitechsoft.com). |
+* | |
+* |The contents of this file are subject to the SciTech Nucleus |
+* |License; you may *not* use this file or related software except in |
+* |compliance with the License. You may obtain a copy of the License |
+* |at http://www.scitechsoft.com/nucleus-license.txt |
+* | |
+* |Software distributed under the License is distributed on an |
+* |"AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or |
+* |implied. See the License for the specific language governing |
+* |rights and limitations under the License. |
+* | |
+* |REMOVAL OR MODIFICATION OF THIS HEADER IS STRICTLY PROHIBITED BY LAW|
+* ======================================================================
+*
+* Language: ANSI C
+* Environment: Win32 VxD
+*
+* Description: OS specific Nucleus Graphics Architecture services for
+* the Win32 VxD's.
+*
+****************************************************************************/
+
+#include "sdd/sddhelp.h"
+
+/*------------------------- Global Variables ------------------------------*/
+
+static ibool haveRDTSC;
+
+/*-------------------------- Implementation -------------------------------*/
+
+/****************************************************************************
+PARAMETERS:
+path - Local path to the Nucleus driver files.
+
+REMARKS:
+This function is used by the application program to override the location
+of the Nucleus driver files that are loaded. Normally the loader code
+will look in the system Nucleus directories first, then in the 'drivers'
+directory relative to the current working directory, and finally relative
+to the MGL_ROOT environment variable.
+****************************************************************************/
+void NAPI GA_setLocalPath(
+ const char *path)
+{
+ PM_setLocalBPDPath(path);
+}
+
+/****************************************************************************
+RETURNS:
+Pointer to the system wide PM library imports, or the internal version if none
+
+REMARKS:
+Nothing special for this OS.
+****************************************************************************/
+PM_imports * NAPI GA_getSystemPMImports(void)
+{
+ return &_PM_imports;
+}
+
+/****************************************************************************
+REMARKS:
+Nothing special for this OS.
+****************************************************************************/
+ibool NAPI GA_getSharedExports(
+ GA_exports *gaExp,
+ ibool shared)
+{
+ (void)gaExp;
+ (void)shared;
+ return false;
+}
+
+#ifndef TEST_HARNESS
+/****************************************************************************
+REMARKS:
+Nothing special for this OS
+****************************************************************************/
+ibool NAPI GA_queryFunctions(
+ GA_devCtx *dc,
+ N_uint32 id,
+ void _FAR_ *funcs)
+{
+ return __GA_exports.GA_queryFunctions(dc,id,funcs);
+}
+
+/****************************************************************************
+REMARKS:
+Nothing special for this OS
+****************************************************************************/
+ibool NAPI REF2D_queryFunctions(
+ REF2D_driver *ref2d,
+ N_uint32 id,
+ void _FAR_ *funcs)
+{
+ return __GA_exports.REF2D_queryFunctions(ref2d,id,funcs);
+}
+#endif
+
+/****************************************************************************
+REMARKS:
+This function initialises the high precision timing functions for the
+Nucleus loader library.
+****************************************************************************/
+ibool NAPI GA_TimerInit(void)
+{
+ if (_GA_haveCPUID() && (_GA_getCPUIDFeatures() & CPU_HaveRDTSC) != 0) {
+ haveRDTSC = true;
+ }
+ return true;
+}
+
+/****************************************************************************
+REMARKS:
+This function reads the high resolution timer.
+****************************************************************************/
+void NAPI GA_TimerRead(
+ GA_largeInteger *value)
+{
+ if (haveRDTSC)
+ _GA_readTimeStamp(value);
+ else
+ VTD_Get_Real_Time(&value->high,&value->low);
+}
+
diff --git a/board/MAI/bios_emulator/scitech/src/common/gawin32.c b/board/MAI/bios_emulator/scitech/src/common/gawin32.c
new file mode 100644
index 00000000000..a2a4150953b
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/common/gawin32.c
@@ -0,0 +1,256 @@
+/****************************************************************************
+*
+* SciTech Nucleus Graphics Architecture
+*
+* Copyright (C) 1991-1998 SciTech Software, Inc.
+* All rights reserved.
+*
+* ======================================================================
+* |REMOVAL OR MODIFICATION OF THIS HEADER IS STRICTLY PROHIBITED BY LAW|
+* | |
+* |This copyrighted computer code contains proprietary technology |
+* |owned by SciTech Software, Inc., located at 505 Wall Street, |
+* |Chico, CA 95928 USA (http://www.scitechsoft.com). |
+* | |
+* |The contents of this file are subject to the SciTech Nucleus |
+* |License; you may *not* use this file or related software except in |
+* |compliance with the License. You may obtain a copy of the License |
+* |at http://www.scitechsoft.com/nucleus-license.txt |
+* | |
+* |Software distributed under the License is distributed on an |
+* |"AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or |
+* |implied. See the License for the specific language governing |
+* |rights and limitations under the License. |
+* | |
+* |REMOVAL OR MODIFICATION OF THIS HEADER IS STRICTLY PROHIBITED BY LAW|
+* ======================================================================
+*
+* Language: ANSI C
+* Environment: Win32
+*
+* Description: OS specific Nucleus Graphics Architecture services for
+* the Win32 operating system environments.
+*
+****************************************************************************/
+
+#include "pm_help.h"
+#include "pmapi.h"
+#include <stdio.h>
+#include <stdlib.h>
+#include <string.h>
+#define STRICT
+#define WIN32_LEAN_AND_MEAN
+#include <windows.h>
+
+/*------------------------- Global Variables ------------------------------*/
+
+#define DLL_NAME "nga_w32.dll"
+
+extern HANDLE _PM_hDevice;
+static HMODULE hModDLL = NULL;
+static ibool useRing0Driver = false;
+static ibool haveRDTSC;
+static GA_largeInteger countFreq;
+
+/*-------------------------- Implementation -------------------------------*/
+
+/****************************************************************************
+REMARKS:
+Loads the shared "nga_w32.dll" library from disk and connects to it. This
+library is *always* located in the same directory as the Nucleus
+graphics.bpd file.
+****************************************************************************/
+static ibool LoadSharedDLL(void)
+{
+ char filename[PM_MAX_PATH];
+ char bpdpath[PM_MAX_PATH];
+
+ /* Check if we have already loaded the DLL */
+ if (hModDLL)
+ return true;
+ PM_init();
+
+ /* Open the DLL file */
+ if (!PM_findBPD(DLL_NAME,bpdpath))
+ return false;
+ strcpy(filename,bpdpath);
+ strcat(filename,DLL_NAME);
+ if ((hModDLL = LoadLibrary(filename)) == NULL)
+ return false;
+ return true;
+}
+
+/****************************************************************************
+PARAMETERS:
+path - Local path to the Nucleus driver files.
+
+REMARKS:
+This function is used by the application program to override the location
+of the Nucleus driver files that are loaded. Normally the loader code
+will look in the system Nucleus directories first, then in the 'drivers'
+directory relative to the current working directory, and finally relative
+to the MGL_ROOT environment variable.
+
+Note that for Win32 we also call into the loaded PMHELP device driver
+as necessary to change the local Nucleus path for system wide Nucleus
+drivers.
+****************************************************************************/
+void NAPI GA_setLocalPath(
+ const char *path)
+{
+ DWORD inBuf[1];
+ DWORD outBuf[1],outCnt;
+
+ PM_setLocalBPDPath(path);
+ if (_PM_hDevice != INVALID_HANDLE_VALUE) {
+ inBuf[0] = (DWORD)path;
+ DeviceIoControl(_PM_hDevice, PMHELP_GASETLOCALPATH32,
+ inBuf, sizeof(inBuf), outBuf, sizeof(outBuf), &outCnt, NULL);
+ }
+}
+
+/****************************************************************************
+RETURNS:
+Pointer to the system wide PM library imports, or the internal version if none
+
+REMARKS:
+In order to support deploying new Nucleus drivers that may require updated
+PM library functions, we check here to see if there is a system wide version
+of the PM functions available. If so we return those functions for use with
+the system wide Nucleus drivers, otherwise the compiled in version of the PM
+library is used with the application local version of Nucleus.
+****************************************************************************/
+PM_imports * NAPI GA_getSystemPMImports(void)
+{
+ PM_imports * pmImp;
+ PM_imports * (NAPIP _GA_getSystemPMImports)(void);
+
+ if (LoadSharedDLL()) {
+ /* Note that Visual C++ build DLL's with only a single underscore in front
+ * of the exported name while Watcom C provides two of them. We check for
+ * both to allow working with either compiled DLL.
+ */
+ if ((_GA_getSystemPMImports = (void*)GetProcAddress(hModDLL,"_GA_getSystemPMImports")) != NULL) {
+ if ((_GA_getSystemPMImports = (void*)GetProcAddress(hModDLL,"__GA_getSystemPMImports")) != NULL) {
+ pmImp = _GA_getSystemPMImports();
+ memcpy(&_PM_imports,pmImp,MIN(_PM_imports.dwSize,pmImp->dwSize));
+ return pmImp;
+ }
+ }
+ }
+ return &_PM_imports;
+}
+
+/****************************************************************************
+PARAMETERS:
+gaExp - Place to store the exported functions
+shared - True if connecting to the shared, global Nucleus driver
+
+REMARKS:
+For Win32 if we are connecting to the shared, global Nucleus driver (loaded
+at ring 0) then we need to load a special nga_w32.dll library which contains
+thunks to call down into the Ring 0 device driver as necessary. If we are
+connecting to the application local Nucleus drivers (ie: Nucleus on DirectDraw
+emulation layer) then we do nothing here.
+****************************************************************************/
+ibool NAPI GA_getSharedExports(
+ GA_exports *gaExp,
+ ibool shared)
+{
+ GA_exports * exp;
+ GA_exports * (NAPIP _GA_getSystemGAExports)(void);
+
+ useRing0Driver = false;
+ if (shared) {
+ if (!LoadSharedDLL())
+ PM_fatalError("Unable to load " DLL_NAME "!");
+ if ((_GA_getSystemGAExports = (void*)GetProcAddress(hModDLL,"_GA_getSystemGAExports")) == NULL)
+ if ((_GA_getSystemGAExports = (void*)GetProcAddress(hModDLL,"__GA_getSystemGAExports")) == NULL)
+ PM_fatalError("Unable to load " DLL_NAME "!");
+ exp = _GA_getSystemGAExports();
+ memcpy(gaExp,exp,MIN(gaExp->dwSize,exp->dwSize));
+ useRing0Driver = true;
+ return true;
+ }
+ return false;
+}
+
+#ifndef TEST_HARNESS
+/****************************************************************************
+REMARKS:
+Nothing special for this OS
+****************************************************************************/
+ibool NAPI GA_queryFunctions(
+ GA_devCtx *dc,
+ N_uint32 id,
+ void _FAR_ *funcs)
+{
+ static ibool (NAPIP _GA_queryFunctions)(GA_devCtx *dc,N_uint32 id,void _FAR_ *funcs) = NULL;
+
+ if (useRing0Driver) {
+ // Call the version in nga_w32.dll if it is loaded
+ if (!_GA_queryFunctions) {
+ if ((_GA_queryFunctions = (void*)GetProcAddress(hModDLL,"_GA_queryFunctions")) == NULL)
+ if ((_GA_queryFunctions = (void*)GetProcAddress(hModDLL,"__GA_queryFunctions")) == NULL)
+ PM_fatalError("Unable to get exports from " DLL_NAME "!");
+ }
+ return _GA_queryFunctions(dc,id,funcs);
+ }
+ return __GA_exports.GA_queryFunctions(dc,id,funcs);
+}
+
+/****************************************************************************
+REMARKS:
+Nothing special for this OS
+****************************************************************************/
+ibool NAPI REF2D_queryFunctions(
+ REF2D_driver *ref2d,
+ N_uint32 id,
+ void _FAR_ *funcs)
+{
+ static ibool (NAPIP _REF2D_queryFunctions)(REF2D_driver *ref2d,N_uint32 id,void _FAR_ *funcs) = NULL;
+
+ if (useRing0Driver) {
+ // Call the version in nga_w32.dll if it is loaded
+ if (!_REF2D_queryFunctions) {
+ if ((_REF2D_queryFunctions = (void*)GetProcAddress(hModDLL,"_REF2D_queryFunctions")) == NULL)
+ if ((_REF2D_queryFunctions = (void*)GetProcAddress(hModDLL,"__REF2D_queryFunctions")) == NULL)
+ PM_fatalError("Unable to get exports from " DLL_NAME "!");
+ }
+ return _REF2D_queryFunctions(ref2d,id,funcs);
+ }
+ return __GA_exports.REF2D_queryFunctions(ref2d,id,funcs);
+}
+#endif
+
+/****************************************************************************
+REMARKS:
+This function initialises the high precision timing functions for the
+Nucleus loader library.
+****************************************************************************/
+ibool NAPI GA_TimerInit(void)
+{
+ if (_GA_haveCPUID() && (_GA_getCPUIDFeatures() & CPU_HaveRDTSC) != 0) {
+ haveRDTSC = true;
+ return true;
+ }
+ else if (QueryPerformanceFrequency((LARGE_INTEGER*)&countFreq)) {
+ haveRDTSC = false;
+ return true;
+ }
+ return false;
+}
+
+/****************************************************************************
+REMARKS:
+This function reads the high resolution timer.
+****************************************************************************/
+void NAPI GA_TimerRead(
+ GA_largeInteger *value)
+{
+ if (haveRDTSC)
+ _GA_readTimeStamp(value);
+ else
+ QueryPerformanceCounter((LARGE_INTEGER*)value);
+}
+
diff --git a/board/MAI/bios_emulator/scitech/src/common/gtfcalc.c b/board/MAI/bios_emulator/scitech/src/common/gtfcalc.c
new file mode 100644
index 00000000000..5a03ac58855
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/common/gtfcalc.c
@@ -0,0 +1,436 @@
+/****************************************************************************
+*
+* VESA Generalized Timing Formula (GTF)
+* Version 1.1
+*
+* ========================================================================
+*
+* The contents of this file are subject to the SciTech MGL Public
+* License Version 1.0 (the "License"); you may not use this file
+* except in compliance with the License. You may obtain a copy of
+* the License at http://www.scitechsoft.com/mgl-license.txt
+*
+* Software distributed under the License is distributed on an
+* "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+* implied. See the License for the specific language governing
+* rights and limitations under the License.
+*
+* The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+*
+* The Initial Developer of the Original Code is SciTech Software, Inc.
+* All Rights Reserved.
+*
+* ========================================================================
+*
+* Developed by: SciTech Software, Inc.
+*
+* Language: ANSI C
+* Environment: Any.
+*
+* Description: C module for generating GTF compatible timings given a set
+* of input requirements. Translated from the original GTF
+* 1.14 spreadsheet definition.
+*
+* Compile with #define TESTING to build a command line test
+* program.
+*
+* NOTE: The code in here has been written for clarity and
+* to follow the original GTF spec as closely as
+* possible.
+*
+****************************************************************************/
+
+#include "gtf.h"
+#ifndef __WIN32_VXD__
+#include <stdio.h>
+#include <stdlib.h>
+#include <string.h>
+#include <ctype.h>
+#include <math.h>
+#endif
+
+/*------------------------- Global Variables ------------------------------*/
+
+static GTF_constants GC = {
+ 1.8, /* Margin size as percentage of display */
+ 8, /* Character cell granularity */
+ 1, /* Minimum front porch in lines/chars */
+ 3, /* Width of V sync in lines */
+ 8, /* Width of H sync as percent of total */
+ 550, /* Minimum vertical sync + back porch (us) */
+ 600, /* Blanking formula gradient */
+ 40, /* Blanking formula offset */
+ 128, /* Blanking formula scaling factor */
+ 20, /* Blanking formula scaling factor weight */
+ };
+
+/*-------------------------- Implementation -------------------------------*/
+
+#ifdef __WIN32_VXD__
+/* These functions are not supported in a VxD, so we stub them out so this
+ * module will at least compile. Calling the functions in here will do
+ * something wierd!
+ */
+double sqrt(double x)
+{ return x; }
+
+double floor(double x)
+{ return x; }
+
+double pow(double x,double y)
+{ return x*y; }
+#endif
+
+static double round(double v)
+{
+ return floor(v + 0.5);
+}
+
+static void GetInternalConstants(GTF_constants *c)
+/****************************************************************************
+*
+* Function: GetInternalConstants
+* Parameters: c - Place to store the internal constants
+*
+* Description: Calculates the rounded, internal set of GTF constants.
+* These constants are different to the real GTF constants
+* that can be set up for the monitor. The calculations to
+* get these real constants are defined in the 'Work Area'
+* after the constants are defined in the Excel spreadsheet.
+*
+****************************************************************************/
+{
+ c->margin = GC.margin;
+ c->cellGran = round(GC.cellGran);
+ c->minPorch = round(GC.minPorch);
+ c->vSyncRqd = round(GC.vSyncRqd);
+ c->hSync = GC.hSync;
+ c->minVSyncBP = GC.minVSyncBP;
+ if (GC.k == 0)
+ c->k = 0.001;
+ else
+ c->k = GC.k;
+ c->m = (c->k / 256) * GC.m;
+ c->c = (GC.c - GC.j) * (c->k / 256) + GC.j;
+ c->j = GC.j;
+}
+
+void GTF_calcTimings(double hPixels,double vLines,double freq,
+ int type,ibool wantMargins,ibool wantInterlace,GTF_timings *t)
+/****************************************************************************
+*
+* Function: GTF_calcTimings
+* Parameters: hPixels - X resolution
+* vLines - Y resolution
+* freq - Frequency (Hz, KHz or MHz depending on type)
+* type - 1 - vertical, 2 - horizontal, 3 - dot clock
+* margins - True if margins should be generated
+* interlace - True if interlaced timings to be generated
+* t - Place to store the resulting timings
+*
+* Description: Calculates a set of GTF timing parameters given a specified
+* resolution and vertical frequency. The horizontal frequency
+* and dot clock will be automatically generated by this
+* routines.
+*
+* For interlaced modes the CRTC parameters are calculated for
+* a single field, so will be half what would be used in
+* a non-interlaced mode.
+*
+****************************************************************************/
+{
+ double interlace,vFieldRate,hPeriod;
+ double topMarginLines,botMarginLines;
+ double leftMarginPixels,rightMarginPixels;
+ double hPeriodEst,vSyncBP,vBackPorch;
+ double vTotalLines,vFieldRateEst;
+ double hTotalPixels,hTotalActivePixels,hBlankPixels;
+ double idealDutyCycle,hSyncWidth,hSyncBP,hBackPorch;
+ double idealHPeriod;
+ double vFreq,hFreq,dotClock;
+ GTF_constants c;
+
+ /* Get rounded GTF constants used for internal calculations */
+ GetInternalConstants(&c);
+
+ /* Move input parameters into appropriate variables */
+ vFreq = hFreq = dotClock = freq;
+
+ /* Round pixels to character cell granularity */
+ hPixels = round(hPixels / c.cellGran) * c.cellGran;
+
+ /* For interlaced mode halve the vertical parameters, and double
+ * the required field refresh rate.
+ */
+ vFieldRate = vFreq;
+ interlace = 0;
+ if (wantInterlace)
+ dotClock *= 2;
+
+ /* Determine the lines for margins */
+ if (wantMargins) {
+ topMarginLines = round(c.margin / 100 * vLines);
+ botMarginLines = round(c.margin / 100 * vLines);
+ }
+ else {
+ topMarginLines = 0;
+ botMarginLines = 0;
+ }
+
+ if (type != GTF_lockPF) {
+ if (type == GTF_lockVF) {
+ /* Estimate the horizontal period */
+ hPeriodEst = ((1/vFieldRate) - (c.minVSyncBP/1000000)) /
+ (vLines + (2*topMarginLines) + c.minPorch + interlace) * 1000000;
+
+ /* Find the number of lines in vSync + back porch */
+ vSyncBP = round(c.minVSyncBP / hPeriodEst);
+ }
+ else if (type == GTF_lockHF) {
+ /* Find the number of lines in vSync + back porch */
+ vSyncBP = round((c.minVSyncBP * hFreq) / 1000);
+ }
+
+ /* Find the number of lines in the V back porch alone */
+ vBackPorch = vSyncBP - c.vSyncRqd;
+
+ /* Find the total number of lines in the vertical period */
+ vTotalLines = vLines + topMarginLines + botMarginLines + vSyncBP
+ + interlace + c.minPorch;
+
+ if (type == GTF_lockVF) {
+ /* Estimate the vertical frequency */
+ vFieldRateEst = 1000000 / (hPeriodEst * vTotalLines);
+
+ /* Find the actual horizontal period */
+ hPeriod = (hPeriodEst * vFieldRateEst) / vFieldRate;
+
+ /* Find the actual vertical field frequency */
+ vFieldRate = 1000000 / (hPeriod * vTotalLines);
+ }
+ else if (type == GTF_lockHF) {
+ /* Find the actual vertical field frequency */
+ vFieldRate = (hFreq / vTotalLines) * 1000;
+ }
+ }
+
+ /* Find the number of pixels in the left and right margins */
+ if (wantMargins) {
+ leftMarginPixels = round(hPixels * c.margin) / (100 * c.cellGran);
+ rightMarginPixels = round(hPixels * c.margin) / (100 * c.cellGran);
+ }
+ else {
+ leftMarginPixels = 0;
+ rightMarginPixels = 0;
+ }
+
+ /* Find the total number of active pixels in image + margins */
+ hTotalActivePixels = hPixels + leftMarginPixels + rightMarginPixels;
+
+ if (type == GTF_lockVF) {
+ /* Find the ideal blanking duty cycle */
+ idealDutyCycle = c.c - ((c.m * hPeriod) / 1000);
+ }
+ else if (type == GTF_lockHF) {
+ /* Find the ideal blanking duty cycle */
+ idealDutyCycle = c.c - (c.m / hFreq);
+ }
+ else if (type == GTF_lockPF) {
+ /* Find ideal horizontal period from blanking duty cycle formula */
+ idealHPeriod = (((c.c - 100) + (sqrt((pow(100-c.c,2)) +
+ (0.4 * c.m * (hTotalActivePixels + rightMarginPixels +
+ leftMarginPixels) / dotClock)))) / (2 * c.m)) * 1000;
+
+ /* Find the ideal blanking duty cycle */
+ idealDutyCycle = c.c - ((c.m * idealHPeriod) / 1000);
+ }
+
+ /* Find the number of pixels in blanking time */
+ hBlankPixels = round((hTotalActivePixels * idealDutyCycle) /
+ ((100 - idealDutyCycle) * c.cellGran)) * c.cellGran;
+
+ /* Find the total number of pixels */
+ hTotalPixels = hTotalActivePixels + hBlankPixels;
+
+ /* Find the horizontal back porch */
+ hBackPorch = round((hBlankPixels / 2) / c.cellGran) * c.cellGran;
+
+ /* Find the horizontal sync width */
+ hSyncWidth = round(((c.hSync/100) * hTotalPixels) / c.cellGran) * c.cellGran;
+
+ /* Find the horizontal sync + back porch */
+ hSyncBP = hBackPorch + hSyncWidth;
+
+ if (type == GTF_lockPF) {
+ /* Find the horizontal frequency */
+ hFreq = (dotClock / hTotalPixels) * 1000;
+
+ /* Find the number of lines in vSync + back porch */
+ vSyncBP = round((c.minVSyncBP * hFreq) / 1000);
+
+ /* Find the number of lines in the V back porch alone */
+ vBackPorch = vSyncBP - c.vSyncRqd;
+
+ /* Find the total number of lines in the vertical period */
+ vTotalLines = vLines + topMarginLines + botMarginLines + vSyncBP
+ + interlace + c.minPorch;
+
+ /* Find the actual vertical field frequency */
+ vFieldRate = (hFreq / vTotalLines) * 1000;
+ }
+ else {
+ if (type == GTF_lockVF) {
+ /* Find the horizontal frequency */
+ hFreq = 1000 / hPeriod;
+ }
+ else if (type == GTF_lockHF) {
+ /* Find the horizontal frequency */
+ hPeriod = 1000 / hFreq;
+ }
+
+ /* Find the pixel clock frequency */
+ dotClock = hTotalPixels / hPeriod;
+ }
+
+ /* Return the computed frequencies */
+ t->vFreq = vFieldRate;
+ t->hFreq = hFreq;
+ t->dotClock = dotClock;
+
+ /* Determine the vertical timing parameters */
+ t->h.hTotal = (int)hTotalPixels;
+ t->h.hDisp = (int)hTotalActivePixels;
+ t->h.hSyncStart = t->h.hTotal - (int)hSyncBP;
+ t->h.hSyncEnd = t->h.hTotal - (int)hBackPorch;
+ t->h.hFrontPorch = t->h.hSyncStart - t->h.hDisp;
+ t->h.hSyncWidth = (int)hSyncWidth;
+ t->h.hBackPorch = (int)hBackPorch;
+
+ /* Determine the vertical timing parameters */
+ t->v.vTotal = (int)vTotalLines;
+ t->v.vDisp = (int)vLines;
+ t->v.vSyncStart = t->v.vTotal - (int)vSyncBP;
+ t->v.vSyncEnd = t->v.vTotal - (int)vBackPorch;
+ t->v.vFrontPorch = t->v.vSyncStart - t->v.vDisp;
+ t->v.vSyncWidth = (int)c.vSyncRqd;
+ t->v.vBackPorch = (int)vBackPorch;
+ if (wantInterlace) {
+ /* Halve the timings for interlaced modes */
+ t->v.vTotal /= 2;
+ t->v.vDisp /= 2;
+ t->v.vSyncStart /= 2;
+ t->v.vSyncEnd /= 2;
+ t->v.vFrontPorch /= 2;
+ t->v.vSyncWidth /= 2;
+ t->v.vBackPorch /= 2;
+ t->dotClock /= 2;
+ }
+
+ /* Mark as GTF timing using the sync polarities */
+ t->interlace = (wantInterlace) ? 'I' : 'N';
+ t->hSyncPol = '-';
+ t->vSyncPol = '+';
+}
+
+void GTF_getConstants(GTF_constants *constants)
+{ *constants = GC; }
+
+void GTF_setConstants(GTF_constants *constants)
+{ GC = *constants; }
+
+#ifdef TESTING_GTF
+
+void main(int argc,char *argv[])
+{
+ FILE *f;
+ double xPixels,yPixels,freq;
+ ibool interlace;
+ GTF_timings t;
+
+ if (argc != 5 && argc != 6) {
+ printf("Usage: GTFCALC <xPixels> <yPixels> <freq> [[Hz] [KHz] [MHz]] [I]\n");
+ printf("\n");
+ printf("where <xPixels> is the horizontal resolution of the mode, <yPixels> is the\n");
+ printf("vertical resolution of the mode. The <freq> value will be the frequency to\n");
+ printf("drive the calculations, and will be either the vertical frequency (in Hz)\n");
+ printf("the horizontal frequency (in KHz) or the dot clock (in MHz). To generate\n");
+ printf("timings for an interlaced mode, add 'I' to the end of the command line.\n");
+ printf("\n");
+ printf("For example to generate timings for 640x480 at 60Hz vertical:\n");
+ printf("\n");
+ printf(" GTFCALC 640 480 60 Hz\n");
+ printf("\n");
+ printf("For example to generate timings for 640x480 at 31.5KHz horizontal:\n");
+ printf("\n");
+ printf(" GTFCALC 640 480 31.5 KHz\n");
+ printf("\n");
+ printf("For example to generate timings for 640x480 with a 25.175Mhz dot clock:\n");
+ printf("\n");
+ printf(" GTFCALC 640 480 25.175 MHz\n");
+ printf("\n");
+ printf("GTFCALC will print a summary of the results found, and dump the CRTC\n");
+ printf("values to the UVCONFIG.CRT file in the format used by SciTech Display Doctor.\n");
+ exit(1);
+ }
+
+ /* Get values from command line */
+ xPixels = atof(argv[1]);
+ yPixels = atof(argv[2]);
+ freq = atof(argv[3]);
+ interlace = ((argc == 6) && (argv[5][0] == 'I'));
+
+ /* Compute the CRTC timings */
+ if (toupper(argv[4][0]) == 'H')
+ GTF_calcTimings(xPixels,yPixels,freq,GTF_lockVF,false,interlace,&t);
+ else if (toupper(argv[4][0]) == 'K')
+ GTF_calcTimings(xPixels,yPixels,freq,GTF_lockHF,false,interlace,&t);
+ else if (toupper(argv[4][0]) == 'M')
+ GTF_calcTimings(xPixels,yPixels,freq,GTF_lockPF,false,interlace,&t);
+ else {
+ printf("Unknown command line!\n");
+ exit(1);
+ }
+
+ /* Dump summary info to standard output */
+ printf("CRTC values for %.0fx%.0f @ %.2f %s\n", xPixels, yPixels, freq, argv[4]);
+ printf("\n");
+ printf(" hTotal = %-4d vTotal = %-4d\n",
+ t.h.hTotal, t.v.vTotal);
+ printf(" hDisp = %-4d vDisp = %-4d\n",
+ t.h.hDisp, t.v.vDisp);
+ printf(" hSyncStart = %-4d vSyncStart = %-4d\n",
+ t.h.hSyncStart, t.v.vSyncStart);
+ printf(" hSyncEnd = %-4d vSyncEnd = %-4d\n",
+ t.h.hSyncEnd, t.v.vSyncEnd);
+ printf(" hFrontPorch = %-4d vFrontPorch = %-4d\n",
+ t.h.hFrontPorch, t.v.vFrontPorch);
+ printf(" hSyncWidth = %-4d vSyncWidth = %-4d\n",
+ t.h.hSyncWidth, t.v.vSyncWidth);
+ printf(" hBackPorch = %-4d vBackPorch = %-4d\n",
+ t.h.hBackPorch, t.v.vBackPorch);
+ printf("\n");
+ printf(" Interlaced = %s\n", (t.interlace == 'I') ? "Yes" : "No");
+ printf(" H sync pol = %c\n", t.hSyncPol);
+ printf(" V sync pol = %c\n", t.vSyncPol);
+ printf("\n");
+ printf(" Vert freq = %.2f Hz\n", t.vFreq);
+ printf(" Horiz freq = %.2f KHz\n", t.hFreq);
+ printf(" Dot Clock = %.2f Mhz\n", t.dotClock);
+
+ /* Dump to file in format used by SciTech Display Doctor */
+ if ((f = fopen("UVCONFIG.CRT","w")) != NULL) {
+ fprintf(f, "[%.0f %.0f]\n", xPixels, yPixels);
+ fprintf(f, "%d %d %d %d '%c' %s\n",
+ t.h.hTotal, t.h.hDisp,
+ t.h.hSyncStart, t.h.hSyncEnd,
+ t.hSyncPol, (t.interlace == 'I') ? "I" : "NI");
+ fprintf(f, "%d %d %d %d '%c'\n",
+ t.v.vTotal, t.v.vDisp,
+ t.v.vSyncStart, t.v.vSyncEnd,
+ t.vSyncPol);
+ fprintf(f, "%.2f\n", t.dotClock);
+ fclose(f);
+ }
+}
+
+#endif /* TESTING */
diff --git a/board/MAI/bios_emulator/scitech/src/common/libcimp.c b/board/MAI/bios_emulator/scitech/src/common/libcimp.c
new file mode 100644
index 00000000000..0eacd120bf2
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/common/libcimp.c
@@ -0,0 +1,828 @@
+/****************************************************************************
+*
+* SciTech MGL Graphics Library
+*
+* ========================================================================
+*
+* The contents of this file are subject to the SciTech MGL Public
+* License Version 1.0 (the "License"); you may not use this file
+* except in compliance with the License. You may obtain a copy of
+* the License at http://www.scitechsoft.com/mgl-license.txt
+*
+* Software distributed under the License is distributed on an
+* "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+* implied. See the License for the specific language governing
+* rights and limitations under the License.
+*
+* The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+*
+* The Initial Developer of the Original Code is SciTech Software, Inc.
+* All Rights Reserved.
+*
+* ========================================================================
+*
+* Language: ANSI C
+* Environment: Any
+*
+* Description: Module to implement a the OS specific side of the Binary
+* Portable DLL C runtime library. The functions in here
+* are imported into the Binary Portable DLL's to implement
+* OS specific services.
+*
+****************************************************************************/
+
+#include "pmapi.h"
+#if defined(__WIN32_VXD__) || defined(__NT_DRIVER__)
+#include "drvlib/peloader.h"
+#include "drvlib/attrib.h"
+#include "drvlib/libc/init.h"
+#define __BUILDING_PE_LOADER__
+#include "drvlib/libc/file.h"
+#if defined(__WIN32_VXD__)
+#include "vxdfile.h"
+#endif
+#else
+#include <stdio.h>
+#include <stdlib.h>
+#include <string.h>
+#include <malloc.h>
+#include <time.h>
+#include <signal.h>
+#include <fcntl.h>
+#if defined(__GNUC__) || defined(__UNIX__)
+#include <unistd.h>
+#include <sys/types.h>
+#include <sys/stat.h>
+#else
+#include <io.h>
+#endif
+#include "drvlib/attrib.h"
+#include "drvlib/libc/init.h"
+#define __BUILDING_PE_LOADER__
+#include "drvlib/libc/file.h"
+#if defined(__WINDOWS__) || defined(TNT) || defined(__RTTARGET__)
+#define WIN32_LEAN_AND_MEAN
+#define STRICT
+#include <windows.h>
+#endif
+#ifdef __MSDOS__
+#include <dos.h>
+#endif
+#ifdef __OS2__
+#define INCL_DOS
+#define INCL_DOSERRORS
+#define INCL_SUB
+#include <os2.h>
+#endif
+#endif
+
+/* No text or binary modes for Unix */
+
+#ifndef O_BINARY
+#define O_BINARY 0
+#define O_TEXT 0
+#endif
+
+/*--------------------------- Global variables ----------------------------*/
+
+#if defined(__WIN32_VXD__) || defined(__NT_DRIVER__)
+#define MAX_FILES 16
+static FILE *openHandles[MAX_FILES] = {NULL};
+#endif
+
+/* <stdlib.h> stub functions */
+void _CDECL stub_abort(void);
+int _CDECL stub_atexit(void (*)(void));
+void * _CDECL stub_calloc(size_t _nelem, size_t _size);
+void _CDECL stub_exit(int _status);
+void _CDECL stub_free(void *_ptr);
+char * _CDECL stub_getenv(const char *_name);
+void * _CDECL stub_malloc(size_t _size);
+void * _CDECL stub_realloc(void *_ptr, size_t _size);
+int _CDECL stub_system(const char *_s);
+int _CDECL stub_putenv(const char *_val);
+
+/* <libc/file.h> stub functions */
+int _CDECL stub_open(const char *_path, int _oflag, unsigned _mode);
+int _CDECL stub_access(const char *_path, int _amode);
+int _CDECL stub_close(int _fildes);
+off_t _CDECL stub_lseek(int _fildes, off_t _offset, int _whence);
+size_t _CDECL stub_read(int _fildes, void *_buf, size_t _nbyte);
+int _CDECL stub_unlink(const char *_path);
+size_t _CDECL stub_write(int _fildes, const void *_buf, size_t _nbyte);
+int _CDECL stub_isatty(int _fildes);
+
+/* <stdio.h> stub functions */
+int _CDECL stub_remove(const char *_filename);
+int _CDECL stub_rename(const char *_old, const char *_new);
+
+/* <time.h> stub functions */
+time_t _CDECL stub_time(time_t *_tod);
+
+/* <signal.h> stub functions */
+int _CDECL stub_raise(int);
+void * _CDECL stub_signal(int, void *);
+
+/* <drvlib/attrib.h> functions */
+#define stub_OS_setfileattr _OS_setfileattr
+#define stub_OS_getcurrentdate _OS_getcurrentdate
+
+LIBC_imports _VARAPI ___imports = {
+ sizeof(LIBC_imports),
+
+ /* <stdlib.h> exports */
+ stub_abort,
+ stub_atexit,
+ stub_calloc,
+ stub_exit,
+ stub_free,
+ stub_getenv,
+ stub_malloc,
+ stub_realloc,
+ stub_system,
+ stub_putenv,
+
+ /* <libc/file.h> exports */
+ stub_open,
+ stub_access,
+ stub_close,
+ stub_lseek,
+ stub_read,
+ stub_unlink,
+ stub_write,
+ stub_isatty,
+
+ /* <stdio.h> exports */
+ stub_remove,
+ stub_rename,
+
+ /* <signal.h> functions */
+ stub_raise,
+ stub_signal,
+
+ /* <time.h> exports */
+ stub_time,
+
+ /* <drvlib/attrib.h> exports */
+ stub_OS_setfileattr,
+ stub_OS_getcurrentdate,
+ };
+
+/*---------------------- Stub function implementation ---------------------*/
+
+/* <stdlib.h> stub functions */
+void _CDECL stub_abort(void)
+{
+#if !defined( __WIN32_VXD__) && !defined(__NT_DRIVER__)
+ abort();
+#endif
+}
+
+int _CDECL stub_atexit(void (*func)(void))
+{
+#if !defined( __WIN32_VXD__) && !defined(__NT_DRIVER__)
+ return atexit((void(*)(void))func);
+#else
+ return -1;
+#endif
+}
+
+void * _CDECL stub_calloc(size_t _nelem, size_t _size)
+{ return __PM_calloc(_nelem,_size); }
+
+void _CDECL stub_exit(int _status)
+{
+#if !defined( __WIN32_VXD__) && !defined(__NT_DRIVER__)
+ exit(_status);
+#endif
+}
+
+void _CDECL stub_free(void *_ptr)
+{ __PM_free(_ptr); }
+
+char * _CDECL stub_getenv(const char *_name)
+{
+#if defined( __WIN32_VXD__) || defined(__NT_DRIVER__)
+ return NULL;
+#else
+ return getenv(_name);
+#endif
+}
+
+void * _CDECL stub_malloc(size_t _size)
+{ return __PM_malloc(_size); }
+
+void * _CDECL stub_realloc(void *_ptr, size_t _size)
+{ return __PM_realloc(_ptr,_size); }
+
+int _CDECL stub_system(const char *_s)
+{
+#if defined(__WINDOWS__) || defined(__WIN32_VXD__) || defined(__NT_DRIVER__) || defined(__SMX32__) || defined(__RTTARGET__)
+ (void)_s;
+ return -1;
+#else
+ return system(_s);
+#endif
+}
+
+int _CDECL stub_putenv(const char *_val)
+{
+#if defined( __WIN32_VXD__) || defined(__NT_DRIVER__)
+ return -1;
+#else
+ return putenv((char*)_val);
+#endif
+}
+
+time_t _CDECL stub_time(time_t *_tod)
+{
+#if defined( __WIN32_VXD__) || defined(__NT_DRIVER__)
+ return 0;
+#else
+ return time(_tod);
+#endif
+}
+
+#if defined(__MSDOS__)
+
+#if defined(TNT) && defined(_MSC_VER)
+
+void _CDECL _OS_setfileattr(const char *filename,unsigned attrib)
+{ SetFileAttributes((LPSTR)filename, (DWORD)attrib); }
+
+#else
+
+void _CDECL _OS_setfileattr(const char *filename,unsigned attrib)
+{ _dos_setfileattr(filename,attrib); }
+
+#endif
+
+#elif defined(__WIN32_VXD__)
+
+#define USE_LOCAL_FILEIO
+#define USE_LOCAL_GETDATE
+
+/* <libc/file.h> stub functions */
+int _CDECL stub_open(const char *_path, int _oflag, unsigned _mode)
+{
+ char mode[10];
+ int i;
+
+ /* Find an empty file handle to use */
+ for (i = 3; i < MAX_FILES; i++) {
+ if (!openHandles[i])
+ break;
+ }
+ if (openHandles[i])
+ return -1;
+
+ /* Find the open flags to use */
+ if (_oflag & ___O_TRUNC)
+ strcpy(mode,"w");
+ else if (_oflag & ___O_CREAT)
+ strcpy(mode,"a");
+ else
+ strcpy(mode,"r");
+ if (_oflag & ___O_BINARY)
+ strcat(mode,"b");
+ if (_oflag & ___O_TEXT)
+ strcat(mode,"t");
+
+ /* Open the file and store the file handle */
+ if ((openHandles[i] = fopen(_path,mode)) == NULL)
+ return -1;
+ return i;
+}
+
+int _CDECL stub_access(const char *_path, int _amode)
+{ return -1; }
+
+int _CDECL stub_close(int _fildes)
+{
+ if (_fildes >= 3 && openHandles[_fildes]) {
+ fclose(openHandles[_fildes]);
+ openHandles[_fildes] = NULL;
+ }
+ return 0;
+}
+
+off_t _CDECL stub_lseek(int _fildes, off_t _offset, int _whence)
+{
+ if (_fildes >= 3) {
+ fseek(openHandles[_fildes],_offset,_whence);
+ return ftell(openHandles[_fildes]);
+ }
+ return 0;
+}
+
+size_t _CDECL stub_read(int _fildes, void *_buf, size_t _nbyte)
+{
+ if (_fildes >= 3)
+ return fread(_buf,1,_nbyte,openHandles[_fildes]);
+ return 0;
+}
+
+int _CDECL stub_unlink(const char *_path)
+{
+ WORD error;
+
+ if (initComplete) {
+ if (R0_DeleteFile((char*)_path,0,&error))
+ return 0;
+ return -1;
+ }
+ else
+ return i_remove(_path);
+}
+
+size_t _CDECL stub_write(int _fildes, const void *_buf, size_t _nbyte)
+{
+ if (_fildes >= 3)
+ return fwrite(_buf,1,_nbyte,openHandles[_fildes]);
+ return _nbyte;
+}
+
+int _CDECL stub_isatty(int _fildes)
+{ return 0; }
+
+/* <stdio.h> stub functions */
+int _CDECL stub_remove(const char *_filename)
+{ return stub_unlink(_filename); }
+
+int _CDECL stub_rename(const char *_old, const char *_new)
+{ return -1; }
+
+void _CDECL _OS_setfileattr(const char *filename,unsigned attrib)
+{
+ WORD error;
+ if (initComplete)
+ R0_SetFileAttributes((char*)filename,attrib,&error);
+}
+
+/* Return the current date in days since 1/1/1980 */
+ulong _CDECL _OS_getcurrentdate(void)
+{
+ DWORD date;
+ VTD_Get_Date_And_Time(&date);
+ return date;
+}
+
+#elif defined(__NT_DRIVER__)
+
+#define USE_LOCAL_FILEIO
+#define USE_LOCAL_GETDATE
+
+/* <libc/file.h> stub functions */
+int _CDECL stub_open(const char *_path, int _oflag, unsigned _mode)
+{
+ char mode[10];
+ int i;
+
+ /* Find an empty file handle to use */
+ for (i = 3; i < MAX_FILES; i++) {
+ if (!openHandles[i])
+ break;
+ }
+ if (openHandles[i])
+ return -1;
+
+ /* Find the open flags to use */
+ if (_oflag & ___O_TRUNC)
+ strcpy(mode,"w");
+ else if (_oflag & ___O_CREAT)
+ strcpy(mode,"a");
+ else
+ strcpy(mode,"r");
+ if (_oflag & ___O_BINARY)
+ strcat(mode,"b");
+ if (_oflag & ___O_TEXT)
+ strcat(mode,"t");
+
+ /* Open the file and store the file handle */
+ if ((openHandles[i] = fopen(_path,mode)) == NULL)
+ return -1;
+ return i;
+}
+
+int _CDECL stub_close(int _fildes)
+{
+ if (_fildes >= 3 && openHandles[_fildes]) {
+ fclose(openHandles[_fildes]);
+ openHandles[_fildes] = NULL;
+ }
+ return 0;
+}
+
+off_t _CDECL stub_lseek(int _fildes, off_t _offset, int _whence)
+{
+ if (_fildes >= 3) {
+ fseek(openHandles[_fildes],_offset,_whence);
+ return ftell(openHandles[_fildes]);
+ }
+ return 0;
+}
+
+size_t _CDECL stub_read(int _fildes, void *_buf, size_t _nbyte)
+{
+ if (_fildes >= 3)
+ return fread(_buf,1,_nbyte,openHandles[_fildes]);
+ return 0;
+}
+
+size_t _CDECL stub_write(int _fildes, const void *_buf, size_t _nbyte)
+{
+ if (_fildes >= 3)
+ return fwrite(_buf,1,_nbyte,openHandles[_fildes]);
+ return _nbyte;
+}
+
+int _CDECL stub_access(const char *_path, int _amode)
+{ return -1; }
+
+int _CDECL stub_isatty(int _fildes)
+{ return 0; }
+
+int _CDECL stub_unlink(const char *_path)
+{
+ // TODO: Implement this!
+ return -1;
+}
+
+/* <stdio.h> stub functions */
+int _CDECL stub_remove(const char *_filename)
+{ return stub_unlink(_filename); }
+
+int _CDECL stub_rename(const char *_old, const char *_new)
+{
+ // TODO: Implement this!
+ return -1;
+}
+
+void _CDECL _OS_setfileattr(const char *filename,unsigned attrib)
+{
+ uint _attr = 0;
+ if (attrib & __A_RDONLY)
+ _attr |= FILE_ATTRIBUTE_READONLY;
+ if (attrib & __A_HIDDEN)
+ _attr |= FILE_ATTRIBUTE_HIDDEN;
+ if (attrib & __A_SYSTEM)
+ _attr |= FILE_ATTRIBUTE_SYSTEM;
+ PM_setFileAttr(filename,_attr);
+}
+
+/* Return the current date in days since 1/1/1980 */
+ulong _CDECL _OS_getcurrentdate(void)
+{
+ TIME_FIELDS tm;
+ _int64 count,count_1_1_1980;
+
+ tm.Year = 1980;
+ tm.Month = 1;
+ tm.Day = 1;
+ tm.Hour = 0;
+ tm.Minute = 0;
+ tm.Second = 0;
+ tm.Milliseconds = 0;
+ tm.Weekday = 0;
+ RtlTimeFieldsToTime(&tm,(PLARGE_INTEGER)&count_1_1_1980);
+ KeQuerySystemTime((PLARGE_INTEGER)&count);
+ return (ulong)( (count - count_1_1_1980) / ((_int64)24 * (_int64)3600 * (_int64)10000000) );
+}
+
+#elif defined(__WINDOWS32__) || defined(__RTTARGET__)
+
+void _CDECL _OS_setfileattr(const char *filename,unsigned attrib)
+{ SetFileAttributes((LPSTR)filename, (DWORD)attrib); }
+
+#elif defined(__OS2__)
+
+#define USE_LOCAL_FILEIO
+
+#ifndef W_OK
+#define W_OK 0x02
+#endif
+
+void _CDECL _OS_setfileattr(const char *filename,unsigned attrib)
+{
+ FILESTATUS3 s;
+ if (DosQueryPathInfo((PSZ)filename,FIL_STANDARD,(PVOID)&s,sizeof(s)))
+ return;
+ s.attrFile = attrib;
+ DosSetPathInfo((PSZ)filename,FIL_STANDARD,(PVOID)&s,sizeof(s),0L);
+}
+
+/* <libc/file.h> stub functions */
+
+#define BUF_SIZE 4096
+
+/* Note: the implementation of the standard Unix-ish handle-based I/O isn't
+ * complete - but that wasn't the intent either. Note also that we
+ * don't presently support text file I/O, so all text files end
+ * up in Unix format (and are not translated!).
+ */
+int _CDECL stub_open(const char *_path, int _oflag, unsigned _mode)
+{
+ HFILE handle;
+ ULONG error, actiontaken, openflag, openmode;
+ char path[PM_MAX_PATH];
+
+ /* Determine open flags */
+ if (_oflag & ___O_CREAT) {
+ if (_oflag & ___O_EXCL)
+ openflag = OPEN_ACTION_FAIL_IF_EXISTS | OPEN_ACTION_CREATE_IF_NEW;
+ else if (_oflag & ___O_TRUNC)
+ openflag = OPEN_ACTION_REPLACE_IF_EXISTS | OPEN_ACTION_CREATE_IF_NEW;
+ else
+ openflag = OPEN_ACTION_OPEN_IF_EXISTS | OPEN_ACTION_CREATE_IF_NEW;
+ }
+ else if (_oflag & ___O_TRUNC)
+ openflag = OPEN_ACTION_REPLACE_IF_EXISTS;
+ else
+ openflag = OPEN_ACTION_OPEN_IF_EXISTS;
+
+ /* Determine open mode flags */
+ if (_oflag & ___O_RDONLY)
+ openmode = OPEN_ACCESS_READONLY | OPEN_SHARE_DENYNONE;
+ else if (_oflag & ___O_WRONLY)
+ openmode = OPEN_ACCESS_WRITEONLY | OPEN_SHARE_DENYWRITE;
+ else
+ openmode = OPEN_ACCESS_READWRITE | OPEN_SHARE_DENYWRITE;
+
+ /* Copy the path to a variable on the stack. We need to do this
+ * for OS/2 as when the drivers are loaded into shared kernel
+ * memory, we can't pass an address from that memory range to
+ * this function.
+ */
+ strcpy(path,_path);
+ if (DosOpen(path, &handle, &actiontaken, 0, FILE_NORMAL,
+ openflag, openmode, NULL) != NO_ERROR)
+ return -1;
+
+ /* Handle append mode of operation */
+ if (_oflag & ___O_APPEND) {
+ if (DosSetFilePtr(handle, 0, FILE_END, &error) != NO_ERROR)
+ return -1;
+ }
+ return handle;
+}
+
+int _CDECL stub_access(const char *_path, int _amode)
+{
+ char path[PM_MAX_PATH];
+ FILESTATUS fs;
+
+ /* Copy the path to a variable on the stack. We need to do this
+ * for OS/2 as when the drivers are loaded into shared kernel
+ * memory, we can't pass an address from that memory range to
+ * this function.
+ */
+ strcpy(path,_path);
+ if (DosQueryPathInfo(path, FIL_STANDARD, &fs, sizeof(fs)) != NO_ERROR)
+ return -1;
+ if ((_amode & W_OK) && (fs.attrFile & FILE_READONLY))
+ return -1;
+ return 0;
+}
+
+int _CDECL stub_close(int _fildes)
+{
+ if (DosClose(_fildes) != NO_ERROR)
+ return -1;
+ return 0;
+}
+
+off_t _CDECL stub_lseek(int _fildes, off_t _offset, int _whence)
+{
+ ULONG cbActual, origin;
+
+ switch (_whence) {
+ case SEEK_CUR:
+ origin = FILE_CURRENT;
+ break;
+ case SEEK_END:
+ origin = FILE_END;
+ break;
+ default:
+ origin = FILE_BEGIN;
+ }
+ if (DosSetFilePtr(_fildes, _offset, origin, &cbActual) != NO_ERROR)
+ return -1;
+ return cbActual;
+}
+
+size_t _CDECL stub_read(int _fildes, void *_buf, size_t _nbyte)
+{
+ ULONG cbActual = 0,cbRead;
+ uchar *p = _buf;
+ uchar file_io_buf[BUF_SIZE];
+
+ /* We need to perform the physical read in chunks into a
+ * a temporary static buffer, since the buffer passed in may be
+ * in kernel space and will cause DosRead to bail internally.
+ */
+ while (_nbyte > BUF_SIZE) {
+ if (DosRead(_fildes, file_io_buf, BUF_SIZE, &cbRead) != NO_ERROR)
+ return -1;
+ cbActual += cbRead;
+ memcpy(p,file_io_buf,BUF_SIZE);
+ p += BUF_SIZE;
+ _nbyte -= BUF_SIZE;
+ }
+ if (_nbyte) {
+ if (DosRead(_fildes, file_io_buf, _nbyte, &cbRead) != NO_ERROR)
+ return -1;
+ cbActual += cbRead;
+ memcpy(p,file_io_buf,_nbyte);
+ }
+ return cbActual;
+}
+
+size_t _CDECL stub_write(int _fildes, const void *_buf, size_t _nbyte)
+{
+ ULONG cbActual = 0,cbWrite;
+ uchar *p = (PVOID)_buf;
+ uchar file_io_buf[BUF_SIZE];
+
+ /* We need to perform the physical write in chunks from a
+ * a temporary static buffer, since the buffer passed in may be
+ * in kernel space and will cause DosWrite to bail internally.
+ */
+ while (_nbyte > BUF_SIZE) {
+ memcpy(file_io_buf,p,BUF_SIZE);
+ if (DosWrite(_fildes, file_io_buf, BUF_SIZE, &cbWrite) != NO_ERROR)
+ return -1;
+ cbActual += cbWrite;
+ p += BUF_SIZE;
+ _nbyte -= BUF_SIZE;
+ }
+ if (_nbyte) {
+ memcpy(file_io_buf,p,_nbyte);
+ if (DosWrite(_fildes, file_io_buf, _nbyte, &cbWrite) != NO_ERROR)
+ return -1;
+ cbActual += cbWrite;
+ }
+ return cbActual;
+}
+
+int _CDECL stub_unlink(const char *_path)
+{
+ char path[PM_MAX_PATH];
+
+ /* Copy the path to a variable on the stack. We need to do this
+ * for OS/2 as when the drivers are loaded into shared kernel
+ * memory, we can't pass an address from that memory range to
+ * this function.
+ */
+ strcpy(path,_path);
+ if (DosDelete(path) != NO_ERROR)
+ return -1;
+ return 0;
+}
+
+int _CDECL stub_isatty(int _fildes)
+{
+ ULONG htype, flags;
+
+ if (DosQueryHType(_fildes, &htype, &flags) != NO_ERROR)
+ return 0;
+ return ((htype & 0xFF) == HANDTYPE_DEVICE);
+}
+
+/* <stdio.h> stub functions */
+int _CDECL stub_remove(const char *_path)
+{
+ char path[PM_MAX_PATH];
+
+ /* Copy the path to a variable on the stack. We need to do this
+ * for OS/2 as when the drivers are loaded into shared kernel
+ * memory, we can't pass an address from that memory range to
+ * this function.
+ */
+ strcpy(path,_path);
+ if (DosDelete(path) != NO_ERROR)
+ return -1;
+ return 0;
+}
+
+int _CDECL stub_rename(const char *_old, const char *_new)
+{
+ char old[PM_MAX_PATH];
+ char new[PM_MAX_PATH];
+
+ /* Copy the path to a variable on the stack. We need to do this
+ * for OS/2 as when the drivers are loaded into shared kernel
+ * memory, we can't pass an address from that memory range to
+ * this function.
+ */
+ strcpy(old,_old);
+ strcpy(new,_new);
+ if (DosMove(old, new) != NO_ERROR)
+ return -1;
+ return 0;
+}
+
+#else
+
+void _CDECL _OS_setfileattr(const char *filename,unsigned attrib)
+{ /* Unable to set hidden, system attributes on Unix. */ }
+
+#endif
+
+#ifndef USE_LOCAL_FILEIO
+
+/* <libc/file.h> stub functions */
+int _CDECL stub_open(const char *_path, int _oflag, unsigned _mode)
+{
+ int oflag_tab[] = {
+ ___O_RDONLY, O_RDONLY,
+ ___O_WRONLY, O_WRONLY,
+ ___O_RDWR, O_RDWR,
+ ___O_BINARY, O_BINARY,
+ ___O_TEXT, O_TEXT,
+ ___O_CREAT, O_CREAT,
+ ___O_EXCL, O_EXCL,
+ ___O_TRUNC, O_TRUNC,
+ ___O_APPEND, O_APPEND,
+ };
+ int i,oflag = 0;
+
+ /* Translate the oflag's to the OS dependent versions */
+ for (i = 0; i < sizeof(oflag_tab) / sizeof(int); i += 2) {
+ if (_oflag & oflag_tab[i])
+ oflag |= oflag_tab[i+1];
+ }
+ return open(_path,oflag,_mode);
+}
+
+int _CDECL stub_access(const char *_path, int _amode)
+{ return access(_path,_amode); }
+
+int _CDECL stub_close(int _fildes)
+{ return close(_fildes); }
+
+off_t _CDECL stub_lseek(int _fildes, off_t _offset, int _whence)
+{ return lseek(_fildes,_offset,_whence); }
+
+size_t _CDECL stub_read(int _fildes, void *_buf, size_t _nbyte)
+{ return read(_fildes,_buf,_nbyte); }
+
+int _CDECL stub_unlink(const char *_path)
+{ return unlink(_path); }
+
+size_t _CDECL stub_write(int _fildes, const void *_buf, size_t _nbyte)
+{ return write(_fildes,_buf,_nbyte); }
+
+int _CDECL stub_isatty(int _fildes)
+{ return isatty(_fildes); }
+
+/* <stdio.h> stub functions */
+int _CDECL stub_remove(const char *_filename)
+{ return remove(_filename); }
+
+int _CDECL stub_rename(const char *_old, const char *_new)
+{ return rename(_old,_new); }
+
+#endif
+
+#ifndef USE_LOCAL_GETDATE
+
+/* Return the current date in days since 1/1/1980 */
+ulong _CDECL _OS_getcurrentdate(void)
+{
+ struct tm refTime;
+ refTime.tm_year = 80;
+ refTime.tm_mon = 0;
+ refTime.tm_mday = 1;
+ refTime.tm_hour = 0;
+ refTime.tm_min = 0;
+ refTime.tm_sec = 0;
+ refTime.tm_isdst = -1;
+ return (time(NULL) - mktime(&refTime)) / (24 * 3600L);
+}
+
+#endif
+
+int _CDECL stub_raise(int sig)
+{
+#if defined(__WIN32_VXD__) || defined(__NT_DRIVER__) || defined(__SMX32__)
+ return -1;
+#else
+ return raise(sig);
+#endif
+}
+
+#ifdef __WINDOWS32__
+typedef void (*__code_ptr)(int);
+#else
+typedef void (*__code_ptr)();
+#endif
+
+void * _CDECL stub_signal(int sig, void *handler)
+{
+#if defined(__WIN32_VXD__) || defined(__NT_DRIVER__) || defined(__SMX32__)
+ return NULL;
+#else
+ return (void*)signal(sig,(__code_ptr)handler);
+#endif
+}
+
diff --git a/board/MAI/bios_emulator/scitech/src/common/makefile b/board/MAI/bios_emulator/scitech/src/common/makefile
new file mode 100644
index 00000000000..5aac0381b33
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/common/makefile
@@ -0,0 +1,18 @@
+#############################################################################
+#
+# Copyright (C) 1996 SciTech Software.
+# All rights reserved.
+#
+# Descripton: Makefile for UniVBE(tm), UniPOWER(tm), UVBELib(tm) and
+# DPMSLib library files. Requires Borland C++ 4.52 to build
+# some components.
+#
+# $Date: 2002/10/02 15:35:20 $ $Author: hfrieden $
+#
+#############################################################################
+
+CFLAGS += -DTESTING_GTF
+
+gtfcalc$E: gtfcalc$O
+
+.INCLUDE: "$(SCITECH)/makedefs/common.mk"
diff --git a/board/MAI/bios_emulator/scitech/src/common/peloader.c b/board/MAI/bios_emulator/scitech/src/common/peloader.c
new file mode 100644
index 00000000000..b9bec4aebbc
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/common/peloader.c
@@ -0,0 +1,587 @@
+/****************************************************************************
+*
+* SciTech MGL Graphics Library
+*
+* ========================================================================
+*
+* The contents of this file are subject to the SciTech MGL Public
+* License Version 1.0 (the "License"); you may not use this file
+* except in compliance with the License. You may obtain a copy of
+* the License at http://www.scitechsoft.com/mgl-license.txt
+*
+* Software distributed under the License is distributed on an
+* "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+* implied. See the License for the specific language governing
+* rights and limitations under the License.
+*
+* The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+*
+* The Initial Developer of the Original Code is SciTech Software, Inc.
+* All Rights Reserved.
+*
+* ========================================================================
+*
+* Language: ANSI C
+* Environment: Any
+*
+* Description: Module to implement a simple Portable Binary DLL loader
+* library. This library can be used to load PE DLL's under
+* any Intel based OS, provided the DLL's do not have any
+* imports in the import table.
+*
+* NOTE: This loader module expects the DLL's to be built with
+* Watcom C++ and may produce unexpected results with
+* DLL's linked by another compiler.
+*
+****************************************************************************/
+
+#include "drvlib/peloader.h"
+#include "pmapi.h"
+#include "drvlib/os/os.h"
+#include "drvlib/libc/init.h"
+#if (defined(__WINDOWS32__) || defined(__DRIVER__)) && defined(CHECKED)
+#define WIN32_LEAN_AND_MEAN
+#define STRICT
+#include <windows.h>
+#endif
+#include "drvlib/pe.h"
+
+/*--------------------------- Global variables ----------------------------*/
+
+static int result = PE_ok;
+
+/*------------------------- Implementation --------------------------------*/
+
+/****************************************************************************
+PARAMETERS:
+f - Handle to open file to read driver from
+startOffset - Offset to the start of the driver within the file
+
+RETURNS:
+Handle to loaded PE DLL, or NULL on failure.
+
+REMARKS:
+This function loads a Portable Binary DLL library from disk, relocates
+the code and returns a handle to the loaded library. This function is the
+same as the regular PE_loadLibrary except that it take a handle to an
+open file and an offset within that file for the DLL to load.
+****************************************************************************/
+static int PE_readHeader(
+ FILE *f,
+ long startOffset,
+ FILE_HDR *filehdr,
+ OPTIONAL_HDR *opthdr)
+{
+ EXE_HDR exehdr;
+ ulong offset,signature;
+
+ /* Read the EXE header and check for valid header signature */
+ result = PE_invalidDLLImage;
+ fseek(f, startOffset, SEEK_SET);
+ if (fread(&exehdr, 1, sizeof(exehdr), f) != sizeof(exehdr))
+ return false;
+ if (exehdr.signature != 0x5A4D)
+ return false;
+
+ /* Now seek to the start of the PE header defined at offset 0x3C
+ * in the MS-DOS EXE header, and read the signature and check it.
+ */
+ fseek(f, startOffset+0x3C, SEEK_SET);
+ if (fread(&offset, 1, sizeof(offset), f) != sizeof(offset))
+ return false;
+ fseek(f, startOffset+offset, SEEK_SET);
+ if (fread(&signature, 1, sizeof(signature), f) != sizeof(signature))
+ return false;
+ if (signature != 0x00004550)
+ return false;
+
+ /* Now read the PE file header and check that it is correct */
+ if (fread(filehdr, 1, sizeof(*filehdr), f) != sizeof(*filehdr))
+ return false;
+ if (filehdr->Machine != IMAGE_FILE_MACHINE_I386)
+ return false;
+ if (!(filehdr->Characteristics & IMAGE_FILE_32BIT_MACHINE))
+ return false;
+ if (!(filehdr->Characteristics & IMAGE_FILE_DLL))
+ return false;
+ if (fread(opthdr, 1, sizeof(*opthdr), f) != sizeof(*opthdr))
+ return false;
+ if (opthdr->Magic != 0x10B)
+ return false;
+
+ /* Success, so return true! */
+ return true;
+}
+
+/****************************************************************************
+PARAMETERS:
+f - Handle to open file to read driver from
+startOffset - Offset to the start of the driver within the file
+
+RETURNS:
+Size of the DLL file on disk, or -1 on error
+
+REMARKS:
+This function scans the headers for a Portable Binary DLL to determine the
+length of the DLL file on disk.
+{secret}
+****************************************************************************/
+ulong PEAPI PE_getFileSize(
+ FILE *f,
+ ulong startOffset)
+{
+ FILE_HDR filehdr;
+ OPTIONAL_HDR opthdr;
+ SECTION_HDR secthdr;
+ ulong size;
+ int i;
+
+ /* Read the PE file headers from disk */
+ if (!PE_readHeader(f,startOffset,&filehdr,&opthdr))
+ return 0xFFFFFFFF;
+
+ /* Scan all the section headers summing up the total size */
+ size = opthdr.SizeOfHeaders;
+ for (i = 0; i < filehdr.NumberOfSections; i++) {
+ if (fread(§hdr, 1, sizeof(secthdr), f) != sizeof(secthdr))
+ return 0xFFFFFFFF;
+ size += secthdr.SizeOfRawData;
+ }
+ return size;
+}
+
+/****************************************************************************
+DESCRIPTION:
+Loads a Portable Binary DLL into memory from an open file
+
+HEADER:
+peloader.h
+
+PARAMETERS:
+f - Handle to open file to read driver from
+startOffset - Offset to the start of the driver within the file
+size - Place to store the size of the driver loaded
+shared - True to load module into shared memory
+
+RETURNS:
+Handle to loaded PE DLL, or NULL on failure.
+
+REMARKS:
+This function loads a Portable Binary DLL library from disk, relocates
+the code and returns a handle to the loaded library. This function is the
+same as the regular PE_loadLibrary except that it take a handle to an
+open file and an offset within that file for the DLL to load.
+
+SEE ALSO:
+PE_loadLibrary, PE_getProcAddress, PE_freeLibrary
+****************************************************************************/
+PE_MODULE * PEAPI PE_loadLibraryExt(
+ FILE *f,
+ ulong startOffset,
+ ulong *size,
+ ibool shared)
+{
+ FILE_HDR filehdr;
+ OPTIONAL_HDR opthdr;
+ SECTION_HDR secthdr;
+ ulong offset,pageOffset;
+ ulong text_off,text_addr,text_size;
+ ulong data_off,data_addr,data_size,data_end;
+ ulong export_off,export_addr,export_size,export_end;
+ ulong reloc_off,reloc_size;
+ ulong image_size;
+ int i,delta,numFixups;
+ ushort relocType,*fixup;
+ PE_MODULE *hMod = NULL;
+ void *reloc = NULL;
+ BASE_RELOCATION *baseReloc;
+ InitLibC_t InitLibC;
+
+ /* Read the PE file headers from disk */
+ if (!PE_readHeader(f,startOffset,&filehdr,&opthdr))
+ return NULL;
+
+ /* Scan all the section headers and find the necessary sections */
+ text_off = data_off = reloc_off = export_off = 0;
+ text_addr = text_size = 0;
+ data_addr = data_size = data_end = 0;
+ export_addr = export_size = export_end = 0;
+ reloc_size = 0;
+ for (i = 0; i < filehdr.NumberOfSections; i++) {
+ if (fread(§hdr, 1, sizeof(secthdr), f) != sizeof(secthdr))
+ goto Error;
+ if (strcmp(secthdr.Name, ".edata") == 0 || strcmp(secthdr.Name, ".rdata") == 0) {
+ /* Exports section */
+ export_off = secthdr.PointerToRawData;
+ export_addr = secthdr.VirtualAddress;
+ export_size = secthdr.SizeOfRawData;
+ export_end = export_addr + export_size;
+ }
+ else if (strcmp(secthdr.Name, ".idata") == 0) {
+ /* Imports section, ignore */
+ }
+ else if (strcmp(secthdr.Name, ".reloc") == 0) {
+ /* Relocations section */
+ reloc_off = secthdr.PointerToRawData;
+ reloc_size = secthdr.SizeOfRawData;
+ }
+ else if (!text_off && secthdr.Characteristics & IMAGE_SCN_CNT_CODE) {
+ /* Code section */
+ text_off = secthdr.PointerToRawData;
+ text_addr = secthdr.VirtualAddress;
+ text_size = secthdr.SizeOfRawData;
+ }
+ else if (!data_off && secthdr.Characteristics & IMAGE_SCN_CNT_INITIALIZED_DATA) {
+ /* Data section */
+ data_off = secthdr.PointerToRawData;
+ data_addr = secthdr.VirtualAddress;
+ data_size = secthdr.SizeOfRawData;
+ data_end = data_addr + data_size;
+ }
+ }
+
+ /* Check to make sure that we have all the sections we need */
+ if (!text_off || !data_off || !export_off || !reloc_off) {
+ result = PE_invalidDLLImage;
+ goto Error;
+ }
+
+ /* Find the size of the image to load allocate memory for it */
+ image_size = MAX(export_end,data_end) - text_addr;
+ *size = sizeof(PE_MODULE) + image_size + 4096;
+ if (shared)
+ hMod = PM_mallocShared(*size);
+ else
+ hMod = PM_malloc(*size);
+ reloc = PM_malloc(reloc_size);
+ if (!hMod || !reloc) {
+ result = PE_outOfMemory;
+ goto Error;
+ }
+
+ hMod->text = (uchar*)ROUND_4K((ulong)hMod + sizeof(PE_MODULE));
+ hMod->data = (uchar*)((ulong)hMod->text + (data_addr - text_addr));
+ hMod->export = (uchar*)((ulong)hMod->text + (export_addr - text_addr));
+ hMod->textBase = text_addr;
+ hMod->dataBase = data_addr;
+ hMod->exportBase = export_addr;
+ hMod->exportDir = opthdr.DataDirectory[0].RelVirtualAddress - export_addr;
+ hMod->shared = shared;
+
+ /* Now read the section images from disk */
+ result = PE_invalidDLLImage;
+ fseek(f, startOffset+text_off, SEEK_SET);
+ if (fread(hMod->text, 1, text_size, f) != text_size)
+ goto Error;
+ fseek(f, startOffset+data_off, SEEK_SET);
+ if (fread(hMod->data, 1, data_size, f) != data_size)
+ goto Error;
+ fseek(f, startOffset+export_off, SEEK_SET);
+ if (fread(hMod->export, 1, export_size, f) != export_size)
+ goto Error;
+ fseek(f, startOffset+reloc_off, SEEK_SET);
+ if (fread(reloc, 1, reloc_size, f) != reloc_size)
+ goto Error;
+
+ /* Now perform relocations on all sections in the image */
+ delta = (ulong)hMod->text - opthdr.ImageBase - text_addr;
+ baseReloc = (BASE_RELOCATION*)reloc;
+ for (;;) {
+ /* Check for termination condition */
+ if (!baseReloc->PageRVA || !baseReloc->BlockSize)
+ break;
+
+ /* Do fixups */
+ pageOffset = baseReloc->PageRVA - hMod->textBase;
+ numFixups = (baseReloc->BlockSize - sizeof(BASE_RELOCATION)) / sizeof(ushort);
+ fixup = (ushort*)(baseReloc + 1);
+ for (i = 0; i < numFixups; i++) {
+ relocType = *fixup >> 12;
+ if (relocType) {
+ offset = pageOffset + (*fixup & 0x0FFF);
+ *(ulong*)(hMod->text + offset) += delta;
+ }
+ fixup++;
+ }
+
+ /* Move to next relocation block */
+ baseReloc = (BASE_RELOCATION*)((ulong)baseReloc + baseReloc->BlockSize);
+ }
+
+ /* Initialise the C runtime library for the loaded DLL */
+ result = PE_unableToInitLibC;
+ if ((InitLibC = (InitLibC_t)PE_getProcAddress(hMod,"_InitLibC")) == NULL)
+ goto Error;
+ if (!InitLibC(&___imports,PM_getOSType()))
+ goto Error;
+
+ /* Clean up, close the file and return the loaded module handle */
+ PM_free(reloc);
+ result = PE_ok;
+ return hMod;
+
+Error:
+ if (shared)
+ PM_freeShared(hMod);
+ else
+ PM_free(hMod);
+ PM_free(reloc);
+ return NULL;
+}
+
+/****************************************************************************
+DESCRIPTION:
+Loads a Portable Binary DLL into memory
+
+HEADER:
+peloader.h
+
+PARAMETERS:
+szDLLName - Name of the PE DLL library to load
+shared - True to load module into shared memory
+
+RETURNS:
+Handle to loaded PE DLL, or NULL on failure.
+
+REMARKS:
+This function loads a Portable Binary DLL library from disk, relocates
+the code and returns a handle to the loaded library. This function
+will only work on DLL's that do not have any imports, since we don't
+resolve import dependencies in this function.
+
+SEE ALSO:
+PE_getProcAddress, PE_freeLibrary
+****************************************************************************/
+PE_MODULE * PEAPI PE_loadLibrary(
+ const char *szDLLName,
+ ibool shared)
+{
+ PE_MODULE *hMod;
+
+#if (defined(__WINDOWS32__) || defined(__DRIVER__)) && defined(CHECKED)
+ if (!shared) {
+ PM_MODULE hInst;
+ InitLibC_t InitLibC;
+
+ /* For Win32 if are building checked libraries for debugging, we use
+ * the real Win32 DLL functions so that we can debug the resulting DLL
+ * files with the Win32 debuggers. Note that we can't do this if
+ * we need to load the files into a shared memory context.
+ */
+ if ((hInst = PM_loadLibrary(szDLLName)) == NULL) {
+ result = PE_fileNotFound;
+ return NULL;
+ }
+
+ /* Initialise the C runtime library for the loaded DLL */
+ result = PE_unableToInitLibC;
+ if ((InitLibC = (void*)PM_getProcAddress(hInst,"_InitLibC")) == NULL)
+ return NULL;
+ if (!InitLibC(&___imports,PM_getOSType()))
+ return NULL;
+
+ /* Allocate the PE_MODULE structure */
+ if ((hMod = PM_malloc(sizeof(*hMod))) == NULL)
+ return NULL;
+ hMod->text = (void*)hInst;
+ hMod->shared = -1;
+
+ /* DLL loaded successfully so return module handle */
+ result = PE_ok;
+ return hMod;
+ }
+ else
+#endif
+ {
+ FILE *f;
+ ulong size;
+
+ /* Attempt to open the file on disk */
+ if (shared < 0)
+ shared = 0;
+ if ((f = fopen(szDLLName,"rb")) == NULL) {
+ result = PE_fileNotFound;
+ return NULL;
+ }
+ hMod = PE_loadLibraryExt(f,0,&size,shared);
+ fclose(f);
+ return hMod;
+ }
+}
+
+/****************************************************************************
+DESCRIPTION:
+Loads a Portable Binary DLL into memory
+
+HEADER:
+peloader.h
+
+PARAMETERS:
+szDLLName - Name of the PE DLL library to load
+shared - True to load module into shared memory
+
+RETURNS:
+Handle to loaded PE DLL, or NULL on failure.
+
+REMARKS:
+This function is the same as the regular PE_loadLibrary function, except
+that it looks for the drivers in the MGL_ROOT/drivers directory or a
+/drivers directory relative to the current directory.
+
+SEE ALSO:
+PE_loadLibraryMGL, PE_getProcAddress, PE_freeLibrary
+****************************************************************************/
+PE_MODULE * PEAPI PE_loadLibraryMGL(
+ const char *szDLLName,
+ ibool shared)
+{
+#if !defined(__WIN32_VXD__) && !defined(__NT_DRIVER__)
+ PE_MODULE *hMod;
+#endif
+ char path[256] = "";
+
+ /* We look in the 'drivers' directory, optionally under the MGL_ROOT
+ * environment variable directory.
+ */
+#if !defined(__WIN32_VXD__) && !defined(__NT_DRIVER__)
+ if (getenv("MGL_ROOT")) {
+ strcpy(path,getenv("MGL_ROOT"));
+ PM_backslash(path);
+ }
+ strcat(path,"drivers");
+ PM_backslash(path);
+ strcat(path,szDLLName);
+ if ((hMod = PE_loadLibrary(path,shared)) != NULL)
+ return hMod;
+#endif
+ strcpy(path,"drivers");
+ PM_backslash(path);
+ strcat(path,szDLLName);
+ return PE_loadLibrary(path,shared);
+}
+
+/****************************************************************************
+DESCRIPTION:
+Gets a function address from a Portable Binary DLL
+
+HEADER:
+peloader.h
+
+PARAMETERS:
+hModule - Handle to a loaded PE DLL library
+szProcName - Name of the function to get the address of
+
+RETURNS:
+Pointer to the function, or NULL on failure.
+
+REMARKS:
+This function searches for the named, exported function in a loaded PE
+DLL library, and returns the address of the function. If the function is
+not found in the library, this function return NULL.
+
+SEE ALSO:
+PE_loadLibrary, PE_freeLibrary
+****************************************************************************/
+void * PEAPI PE_getProcAddress(
+ PE_MODULE *hModule,
+ const char *szProcName)
+{
+#if (defined(__WINDOWS32__) || defined(__DRIVER__)) && defined(CHECKED)
+ if (hModule->shared == -1)
+ return (void*)PM_getProcAddress(hModule->text,szProcName);
+ else
+#endif
+ {
+ uint i;
+ EXPORT_DIRECTORY *exports;
+ ulong funcOffset;
+ ulong *AddressTable;
+ ulong *NameTable;
+ ushort *OrdinalTable;
+ char *name;
+
+ /* Find the address of the export tables from the export section */
+ if (!hModule)
+ return NULL;
+ exports = (EXPORT_DIRECTORY*)(hModule->export + hModule->exportDir);
+ AddressTable = (ulong*)(hModule->export + exports->AddressTableRVA - hModule->exportBase);
+ NameTable = (ulong*)(hModule->export + exports->NameTableRVA - hModule->exportBase);
+ OrdinalTable = (ushort*)(hModule->export + exports->OrdinalTableRVA - hModule->exportBase);
+
+ /* Search the export name table to find the function name */
+ for (i = 0; i < exports->NumberOfNamePointers; i++) {
+ name = (char*)(hModule->export + NameTable[i] - hModule->exportBase);
+ if (strcmp(name,szProcName) == 0)
+ break;
+ }
+ if (i == exports->NumberOfNamePointers)
+ return NULL;
+ funcOffset = AddressTable[OrdinalTable[i]];
+ if (!funcOffset)
+ return NULL;
+ return (void*)(hModule->text + funcOffset - hModule->textBase);
+ }
+}
+
+/****************************************************************************
+DESCRIPTION:
+Frees a loaded Portable Binary DLL
+
+HEADER:
+peloader.h
+
+PARAMETERS:
+hModule - Handle to a loaded PE DLL library to free
+
+REMARKS:
+This function frees a loaded PE DLL library from memory.
+
+SEE ALSO:
+PE_getProcAddress, PE_loadLibrary
+****************************************************************************/
+void PEAPI PE_freeLibrary(
+ PE_MODULE *hModule)
+{
+ TerminateLibC_t TerminateLibC;
+
+#if (defined(__WINDOWS32__) || defined(__DRIVER__)) && defined(CHECKED)
+ if (hModule->shared == -1) {
+ /* Run the C runtime library exit code on module unload */
+ if ((TerminateLibC = (TerminateLibC_t)PM_getProcAddress(hModule->text,"_TerminateLibC")) != NULL)
+ TerminateLibC();
+ PM_freeLibrary(hModule->text);
+ PM_free(hModule);
+ }
+ else
+#endif
+ {
+ if (hModule) {
+ /* Run the C runtime library exit code on module unload */
+ if ((TerminateLibC = (TerminateLibC_t)PE_getProcAddress(hModule,"_TerminateLibC")) != NULL)
+ TerminateLibC();
+ if (hModule->shared)
+ PM_freeShared(hModule);
+ else
+ PM_free(hModule);
+ }
+ }
+}
+
+/****************************************************************************
+DESCRIPTION:
+Returns the error code for the last operation
+
+HEADER:
+peloader.h
+
+RETURNS:
+Error code for the last operation.
+
+SEE ALSO:
+PE_getProcAddress, PE_loadLibrary
+****************************************************************************/
+int PEAPI PE_getError(void)
+{
+ return result;
+}
+
diff --git a/board/MAI/bios_emulator/scitech/src/common/vesavbe.c b/board/MAI/bios_emulator/scitech/src/common/vesavbe.c
new file mode 100644
index 00000000000..2be57e2bd34
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/common/vesavbe.c
@@ -0,0 +1,1214 @@
+/****************************************************************************
+*
+* The SuperVGA Kit - UniVBE Software Development Kit
+*
+* ========================================================================
+*
+* The contents of this file are subject to the SciTech MGL Public
+* License Version 1.0 (the "License"); you may not use this file
+* except in compliance with the License. You may obtain a copy of
+* the License at http://www.scitechsoft.com/mgl-license.txt
+*
+* Software distributed under the License is distributed on an
+* "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+* implied. See the License for the specific language governing
+* rights and limitations under the License.
+*
+* The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+*
+* The Initial Developer of the Original Code is SciTech Software, Inc.
+* All Rights Reserved.
+*
+* ========================================================================
+*
+* Language: ANSI C
+* Environment: IBM PC Real Mode and 16/32 bit Protected Mode.
+*
+* Description: Module to implement a C callable interface to the standard
+* VESA VBE routines. You should rip out this module and use it
+* directly in your own applications, or you can use the
+* high level SDK functions.
+*
+* MUST be compiled in the LARGE or FLAT models.
+*
+****************************************************************************/
+
+#include <stdio.h>
+#include <stdlib.h>
+#include <string.h>
+#include "vesavbe.h"
+#include "pmapi.h"
+#include "drvlib/os/os.h"
+
+/*---------------------------- Global Variables ---------------------------*/
+
+#define VBE_SUCCESS 0x004F
+#define MAX_LIN_PTRS 10
+
+static uint VESABuf_len = 1024;/* Length of the VESABuf buffer */
+static ibool haveRiva128; /* True if we have a Riva128 */
+static VBE_state defState = {0}; /* Default state buffer */
+static VBE_state *state = &defState; /* Pointer to current buffer */
+static int VBE_shared = 0;
+#ifndef REALMODE
+static char localBuf[512]; /* Global PM string translate buf */
+#define MAX_LOCAL_BUF &localBuf[511]
+#endif
+
+/*----------------------------- Implementation ----------------------------*/
+
+/* static function in WinDirect for passing 32-bit registers to BIOS */
+int PMAPI WD_int386(int intno, RMREGS *in, RMREGS *out);
+
+void VBEAPI VBE_init(void)
+/****************************************************************************
+*
+* Function: VBE_init
+*
+* Description: Initialises the VBE transfer buffer in real mode DC.memory.
+* This routine is called by the VESAVBE module every time
+* it needs to use the transfer buffer, so we simply allocate
+* it once and then return.
+*
+****************************************************************************/
+{
+ if (!state->VESABuf_ptr) {
+ /* Allocate a global buffer for communicating with the VESA VBE */
+ if ((state->VESABuf_ptr = PM_getVESABuf(&VESABuf_len, &state->VESABuf_rseg, &state->VESABuf_roff)) == NULL)
+ PM_fatalError("VESAVBE.C: Real mode memory allocation failed!");
+ }
+}
+
+void * VBEAPI VBE_getRMBuf(uint *len,uint *rseg,uint *roff)
+/****************************************************************************
+*
+* Function: VBE_getRMBuf
+*
+* Description: This function returns the location and length of the real
+* mode memory buffer for calling real mode functions.
+*
+****************************************************************************/
+{
+ *len = VESABuf_len;
+ *rseg = state->VESABuf_rseg;
+ *roff = state->VESABuf_roff;
+ return state->VESABuf_ptr;
+}
+
+void VBEAPI VBE_setStateBuffer(VBE_state *s)
+/****************************************************************************
+*
+* Function: VBE_setStateBuffer
+*
+* Description: This functions sets the internal state buffer for the
+* VBE module to the passed in buffer. By default the internal
+* global buffer is used, but you must use separate buffers
+* for each device in a multi-controller environment.
+*
+****************************************************************************/
+{
+ state = s;
+}
+
+void VBEAPI VBE_callESDI(RMREGS *regs, void *buffer, int size)
+/****************************************************************************
+*
+* Function: VBE_callESDI
+* Parameters: regs - Registers to load when calling VBE
+* buffer - Buffer to copy VBE info block to
+* size - Size of buffer to fill
+*
+* Description: Calls the VESA VBE and passes in a buffer for the VBE to
+* store information in, which is then copied into the users
+* buffer space. This works in protected mode as the buffer
+* passed to the VESA VBE is allocated in conventional
+* memory, and is then copied into the users memory block.
+*
+****************************************************************************/
+{
+ RMSREGS sregs;
+
+ if (!state->VESABuf_ptr)
+ PM_fatalError("You *MUST* call VBE_init() before you can call the VESAVBE.C module!");
+ sregs.es = (ushort)state->VESABuf_rseg;
+ regs->x.di = (ushort)state->VESABuf_roff;
+ memcpy(state->VESABuf_ptr, buffer, size);
+ PM_int86x(0x10, regs, regs, &sregs);
+ memcpy(buffer, state->VESABuf_ptr, size);
+}
+
+#ifndef REALMODE
+static char *VBE_copyStrToLocal(char *p,char *realPtr,char *max)
+/****************************************************************************
+*
+* Function: VBE_copyStrToLocal
+* Parameters: p - Flat model buffer to copy to
+* realPtr - Real mode pointer to copy
+* Returns: Pointer to the next byte after string
+*
+* Description: Copies the string from the real mode location pointed to
+* by 'realPtr' into the flat model buffer pointed to by
+* 'p'. We return a pointer to the next byte past the copied
+* string.
+*
+****************************************************************************/
+{
+ uchar *v;
+
+ v = PM_mapRealPointer((uint)((ulong)realPtr >> 16), (uint)((ulong)realPtr & 0xFFFF));
+ while (*v != 0 && p < max)
+ *p++ = *v++;
+ *p++ = 0;
+ return p;
+}
+
+static void VBE_copyShortToLocal(ushort *p,ushort *realPtr)
+/****************************************************************************
+*
+* Function: VBE_copyShortToLocal
+* Parameters: p - Flat model buffer to copy to
+* realPtr - Real mode pointer to copy
+*
+* Description: Copies the mode table from real mode memory to the flat
+* model buffer.
+*
+****************************************************************************/
+{
+ ushort *v;
+
+ v = PM_mapRealPointer((uint)((ulong)realPtr >> 16),(uint)((ulong)realPtr & 0xFFFF));
+ while (*v != 0xFFFF)
+ *p++ = *v++;
+ *p = 0xFFFF;
+}
+#endif
+
+int VBEAPI VBE_detectEXT(VBE_vgaInfo *vgaInfo,ibool forceUniVBE)
+/****************************************************************************
+*
+* Function: VBE_detect
+* Parameters: vgaInfo - Place to store the VGA information block
+* Returns: VBE version number, or 0 if not detected.
+*
+* Description: Detects if a VESA VBE is out there and functioning
+* correctly. If we detect a VBE interface we return the
+* VGAInfoBlock returned by the VBE and the VBE version number.
+*
+****************************************************************************/
+{
+ RMREGS regs;
+
+ regs.x.ax = 0x4F00; /* Get SuperVGA information */
+ if (forceUniVBE) {
+ regs.x.bx = 0x1234;
+ regs.x.cx = 0x4321;
+ }
+ else {
+ regs.x.bx = 0;
+ regs.x.cx = 0;
+ }
+ strncpy(vgaInfo->VESASignature,"VBE2",4);
+ VBE_callESDI(®s, vgaInfo, sizeof(*vgaInfo));
+ if (regs.x.ax != VBE_SUCCESS)
+ return 0;
+ if (strncmp(vgaInfo->VESASignature,"VESA",4) != 0)
+ return 0;
+
+ /* Check for bogus BIOSes that return a VBE version number that is
+ * not correct, and fix it up. We also check the OemVendorNamePtr for a
+ * valid value, and if it is invalid then we also reset to VBE 1.2.
+ */
+ if (vgaInfo->VESAVersion >= 0x200 && vgaInfo->OemVendorNamePtr == 0)
+ vgaInfo->VESAVersion = 0x102;
+#ifndef REALMODE
+ /* Relocate all the indirect information (mode tables, OEM strings
+ * etc) from the low 1Mb memory region into a static buffer in
+ * our default data segment. We do this to insulate the application
+ * from mapping the strings from real mode to protected mode.
+ */
+ {
+ char *p,*p2;
+ p2 = VBE_copyStrToLocal(localBuf,vgaInfo->OemStringPtr,MAX_LOCAL_BUF);
+ vgaInfo->OemStringPtr = localBuf;
+ if (vgaInfo->VESAVersion >= 0x200) {
+ p = VBE_copyStrToLocal(p2,vgaInfo->OemVendorNamePtr,MAX_LOCAL_BUF);
+ vgaInfo->OemVendorNamePtr = p2;
+ p2 = VBE_copyStrToLocal(p,vgaInfo->OemProductNamePtr,MAX_LOCAL_BUF);
+ vgaInfo->OemProductNamePtr = p;
+ p = VBE_copyStrToLocal(p2,vgaInfo->OemProductRevPtr,MAX_LOCAL_BUF);
+ vgaInfo->OemProductRevPtr = p2;
+ VBE_copyShortToLocal((ushort*)p,vgaInfo->VideoModePtr);
+ vgaInfo->VideoModePtr = (ushort*)p;
+ }
+ else {
+ VBE_copyShortToLocal((ushort*)p2,vgaInfo->VideoModePtr);
+ vgaInfo->VideoModePtr = (ushort*)p2;
+ }
+ }
+#endif
+ state->VBEMemory = vgaInfo->TotalMemory * 64;
+
+ /* Check for Riva128 based cards since they have broken triple buffering
+ * and stereo support.
+ */
+ haveRiva128 = false;
+ if (vgaInfo->VESAVersion >= 0x300 &&
+ (strstr(vgaInfo->OemStringPtr,"NVidia") != NULL ||
+ strstr(vgaInfo->OemStringPtr,"Riva") != NULL)) {
+ haveRiva128 = true;
+ }
+
+ /* Check for Matrox G400 cards which claim to be VBE 3.0
+ * compliant yet they don't implement the refresh rate control
+ * functions.
+ */
+ if (vgaInfo->VESAVersion >= 0x300 && (strcmp(vgaInfo->OemProductNamePtr,"Matrox G400") == 0))
+ vgaInfo->VESAVersion = 0x200;
+ return (state->VBEVersion = vgaInfo->VESAVersion);
+}
+
+int VBEAPI VBE_detect(VBE_vgaInfo *vgaInfo)
+/****************************************************************************
+*
+* Function: VBE_detect
+* Parameters: vgaInfo - Place to store the VGA information block
+* Returns: VBE version number, or 0 if not detected.
+*
+* Description: Detects if a VESA VBE is out there and functioning
+* correctly. If we detect a VBE interface we return the
+* VGAInfoBlock returned by the VBE and the VBE version number.
+*
+****************************************************************************/
+{
+ return VBE_detectEXT(vgaInfo,false);
+}
+
+ibool VBEAPI VBE_getModeInfo(int mode,VBE_modeInfo *modeInfo)
+/****************************************************************************
+*
+* Function: VBE_getModeInfo
+* Parameters: mode - VBE mode to get information for
+* modeInfo - Place to store VBE mode information
+* Returns: True on success, false if function failed.
+*
+* Description: Obtains information about a specific video mode from the
+* VBE. You should use this function to find the video mode
+* you wish to set, as the new VBE 2.0 mode numbers may be
+* completely arbitrary.
+*
+****************************************************************************/
+{
+ RMREGS regs;
+ int bits;
+
+ regs.x.ax = 0x4F01; /* Get mode information */
+ regs.x.cx = (ushort)mode;
+ VBE_callESDI(®s, modeInfo, sizeof(*modeInfo));
+ if (regs.x.ax != VBE_SUCCESS)
+ return false;
+ if ((modeInfo->ModeAttributes & vbeMdAvailable) == 0)
+ return false;
+
+ /* Map out triple buffer and stereo flags for NVidia Riva128
+ * chips.
+ */
+ if (haveRiva128) {
+ modeInfo->ModeAttributes &= ~vbeMdTripleBuf;
+ modeInfo->ModeAttributes &= ~vbeMdStereo;
+ }
+
+ /* Support old style RGB definitions for VBE 1.1 BIOSes */
+ bits = modeInfo->BitsPerPixel;
+ if (modeInfo->MemoryModel == vbeMemPK && bits > 8) {
+ modeInfo->MemoryModel = vbeMemRGB;
+ switch (bits) {
+ case 15:
+ modeInfo->RedMaskSize = 5;
+ modeInfo->RedFieldPosition = 10;
+ modeInfo->GreenMaskSize = 5;
+ modeInfo->GreenFieldPosition = 5;
+ modeInfo->BlueMaskSize = 5;
+ modeInfo->BlueFieldPosition = 0;
+ modeInfo->RsvdMaskSize = 1;
+ modeInfo->RsvdFieldPosition = 15;
+ break;
+ case 16:
+ modeInfo->RedMaskSize = 5;
+ modeInfo->RedFieldPosition = 11;
+ modeInfo->GreenMaskSize = 5;
+ modeInfo->GreenFieldPosition = 5;
+ modeInfo->BlueMaskSize = 5;
+ modeInfo->BlueFieldPosition = 0;
+ modeInfo->RsvdMaskSize = 0;
+ modeInfo->RsvdFieldPosition = 0;
+ break;
+ case 24:
+ modeInfo->RedMaskSize = 8;
+ modeInfo->RedFieldPosition = 16;
+ modeInfo->GreenMaskSize = 8;
+ modeInfo->GreenFieldPosition = 8;
+ modeInfo->BlueMaskSize = 8;
+ modeInfo->BlueFieldPosition = 0;
+ modeInfo->RsvdMaskSize = 0;
+ modeInfo->RsvdFieldPosition = 0;
+ break;
+ }
+ }
+
+ /* Convert the 32k direct color modes of VBE 1.2+ BIOSes to
+ * be recognised as 15 bits per pixel modes.
+ */
+ if (bits == 16 && modeInfo->RsvdMaskSize == 1)
+ modeInfo->BitsPerPixel = 15;
+
+ /* Fix up bogus BIOS'es that report incorrect reserved pixel masks
+ * for 32K color modes. Quite a number of BIOS'es have this problem,
+ * and this affects our OS/2 drivers in VBE fallback mode.
+ */
+ if (bits == 15 && (modeInfo->RsvdMaskSize != 1 || modeInfo->RsvdFieldPosition != 15)) {
+ modeInfo->RsvdMaskSize = 1;
+ modeInfo->RsvdFieldPosition = 15;
+ }
+ return true;
+}
+
+long VBEAPI VBE_getPageSize(VBE_modeInfo *mi)
+/****************************************************************************
+*
+* Function: VBE_getPageSize
+* Parameters: mi - Pointer to mode information block
+* Returns: Caculated page size in bytes rounded to correct boundary
+*
+* Description: Computes the page size in bytes for the specified mode
+* information block, rounded up to the appropriate boundary
+* (8k, 16k, 32k or 64k). Pages >= 64k in size are always
+* rounded to the nearest 64k boundary (so the start of a
+* page is always bank aligned).
+*
+****************************************************************************/
+{
+ long size;
+
+ size = (long)mi->BytesPerScanLine * (long)mi->YResolution;
+ if (mi->BitsPerPixel == 4) {
+ /* We have a 16 color video mode, so round up the page size to
+ * 8k, 16k, 32k or 64k boundaries depending on how large it is.
+ */
+
+ size = (size + 0x1FFFL) & 0xFFFFE000L;
+ if (size != 0x2000) {
+ size = (size + 0x3FFFL) & 0xFFFFC000L;
+ if (size != 0x4000) {
+ size = (size + 0x7FFFL) & 0xFFFF8000L;
+ if (size != 0x8000)
+ size = (size + 0xFFFFL) & 0xFFFF0000L;
+ }
+ }
+ }
+ else size = (size + 0xFFFFL) & 0xFFFF0000L;
+ return size;
+}
+
+ibool VBEAPI VBE_setVideoModeExt(int mode,VBE_CRTCInfo *crtc)
+/****************************************************************************
+*
+* Function: VBE_setVideoModeExt
+* Parameters: mode - SuperVGA video mode to set.
+* Returns: True if the mode was set, false if not.
+*
+* Description: Attempts to set the specified video mode. This version
+* includes support for the VBE/Core 3.0 refresh rate control
+* mechanism.
+*
+****************************************************************************/
+{
+ RMREGS regs;
+
+ if (state->VBEVersion < 0x200 && mode < 0x100) {
+ /* Some VBE implementations barf terribly if you try to set non-VBE
+ * video modes with the VBE set mode call. VBE 2.0 implementations
+ * must be able to handle this.
+ */
+ regs.h.al = (ushort)mode;
+ regs.h.ah = 0;
+ PM_int86(0x10,®s,®s);
+ }
+ else {
+ if (state->VBEVersion < 0x300 && (mode & vbeRefreshCtrl))
+ return false;
+ regs.x.ax = 0x4F02;
+ regs.x.bx = (ushort)mode;
+ if ((mode & vbeRefreshCtrl) && crtc)
+ VBE_callESDI(®s, crtc, sizeof(*crtc));
+ else
+ PM_int86(0x10,®s,®s);
+ if (regs.x.ax != VBE_SUCCESS)
+ return false;
+ }
+ return true;
+}
+
+ibool VBEAPI VBE_setVideoMode(int mode)
+/****************************************************************************
+*
+* Function: VBE_setVideoMode
+* Parameters: mode - SuperVGA video mode to set.
+* Returns: True if the mode was set, false if not.
+*
+* Description: Attempts to set the specified video mode.
+*
+****************************************************************************/
+{
+ return VBE_setVideoModeExt(mode,NULL);
+}
+
+int VBEAPI VBE_getVideoMode(void)
+/****************************************************************************
+*
+* Function: VBE_getVideoMode
+* Returns: Current video mode
+*
+****************************************************************************/
+{
+ RMREGS regs;
+
+ regs.x.ax = 0x4F03;
+ PM_int86(0x10,®s,®s);
+ if (regs.x.ax != VBE_SUCCESS)
+ return -1;
+ return regs.x.bx;
+}
+
+ibool VBEAPI VBE_setBank(int window,int bank)
+/****************************************************************************
+*
+* Function: VBE_setBank
+* Parameters: window - Window to set
+* bank - Bank number to set window to
+* Returns: True on success, false on failure.
+*
+****************************************************************************/
+{
+ RMREGS regs;
+
+ regs.x.ax = 0x4F05;
+ regs.h.bh = 0;
+ regs.h.bl = window;
+ regs.x.dx = bank;
+ PM_int86(0x10,®s,®s);
+ return regs.x.ax == VBE_SUCCESS;
+}
+
+int VBEAPI VBE_getBank(int window)
+/****************************************************************************
+*
+* Function: VBE_setBank
+* Parameters: window - Window to read
+* Returns: Bank number for the window (-1 on failure)
+*
+****************************************************************************/
+{
+ RMREGS regs;
+
+ regs.x.ax = 0x4F05;
+ regs.h.bh = 1;
+ regs.h.bl = window;
+ PM_int86(0x10,®s,®s);
+ if (regs.x.ax != VBE_SUCCESS)
+ return -1;
+ return regs.x.dx;
+}
+
+ibool VBEAPI VBE_setPixelsPerLine(int pixelsPerLine,int *newBytes,
+ int *newPixels,int *maxScanlines)
+/****************************************************************************
+*
+* Function: VBE_setPixelsPerLine
+* Parameters: pixelsPerLine - Pixels per scanline
+* newBytes - Storage for bytes per line value set
+* newPixels - Storage for pixels per line value set
+* maxScanLines - Storage for maximum number of scanlines
+* Returns: True on success, false on failure
+*
+* Description: Sets the scanline length for the video mode to the specified
+* number of pixels per scanline. If you need more granularity
+* in TrueColor modes, use the VBE_setBytesPerLine routine
+* (only valid for VBE 2.0).
+*
+****************************************************************************/
+{
+ RMREGS regs;
+
+ regs.x.ax = 0x4F06;
+ regs.h.bl = 0;
+ regs.x.cx = pixelsPerLine;
+ PM_int86(0x10,®s,®s);
+ *newBytes = regs.x.bx;
+ *newPixels = regs.x.cx;
+ *maxScanlines = regs.x.dx;
+ return regs.x.ax == VBE_SUCCESS;
+}
+
+ibool VBEAPI VBE_setBytesPerLine(int bytesPerLine,int *newBytes,
+ int *newPixels,int *maxScanlines)
+/****************************************************************************
+*
+* Function: VBE_setBytesPerLine
+* Parameters: pixelsPerLine - Pixels per scanline
+* newBytes - Storage for bytes per line value set
+* newPixels - Storage for pixels per line value set
+* maxScanLines - Storage for maximum number of scanlines
+* Returns: True on success, false on failure
+*
+* Description: Sets the scanline length for the video mode to the specified
+* number of bytes per scanline (valid for VBE 2.0 only).
+*
+****************************************************************************/
+{
+ RMREGS regs;
+
+ regs.x.ax = 0x4F06;
+ regs.h.bl = 2;
+ regs.x.cx = bytesPerLine;
+ PM_int86(0x10,®s,®s);
+ *newBytes = regs.x.bx;
+ *newPixels = regs.x.cx;
+ *maxScanlines = regs.x.dx;
+ return regs.x.ax == VBE_SUCCESS;
+}
+
+ibool VBEAPI VBE_getScanlineLength(int *bytesPerLine,int *pixelsPerLine,
+ int *maxScanlines)
+/****************************************************************************
+*
+* Function: VBE_getScanlineLength
+* Parameters: bytesPerLine - Storage for bytes per scanline
+* pixelsPerLine - Storage for pixels per scanline
+* maxScanLines - Storage for maximum number of scanlines
+* Returns: True on success, false on failure
+*
+****************************************************************************/
+{
+ RMREGS regs;
+
+ regs.x.ax = 0x4F06;
+ regs.h.bl = 1;
+ PM_int86(0x10,®s,®s);
+ *bytesPerLine = regs.x.bx;
+ *pixelsPerLine = regs.x.cx;
+ *maxScanlines = regs.x.dx;
+ return regs.x.ax == VBE_SUCCESS;
+}
+
+ibool VBEAPI VBE_getMaxScanlineLength(int *maxBytes,int *maxPixels)
+/****************************************************************************
+*
+* Function: VBE_getMaxScanlineLength
+* Parameters: maxBytes - Maximum scanline width in bytes
+* maxPixels - Maximum scanline width in pixels
+* Returns: True if successful, false if function failed
+*
+****************************************************************************/
+{
+ RMREGS regs;
+
+ regs.x.ax = 0x4F06;
+ regs.h.bl = 3;
+ PM_int86(0x10,®s,®s);
+ *maxBytes = regs.x.bx;
+ *maxPixels = regs.x.cx;
+ return regs.x.ax == VBE_SUCCESS;
+}
+
+ibool VBEAPI VBE_setDisplayStart(int x,int y,ibool waitVRT)
+/****************************************************************************
+*
+* Function: VBE_setDisplayStart
+* Parameters: x,y - Position of the first pixel to display
+* waitVRT - True to wait for retrace, false if not
+* Returns: True if function was successful.
+*
+* Description: Sets the new starting display position to implement
+* hardware scrolling.
+*
+****************************************************************************/
+{
+ RMREGS regs;
+
+ regs.x.ax = 0x4F07;
+ if (waitVRT)
+ regs.x.bx = 0x80;
+ else regs.x.bx = 0x00;
+ regs.x.cx = x;
+ regs.x.dx = y;
+ PM_int86(0x10,®s,®s);
+ return regs.x.ax == VBE_SUCCESS;
+}
+
+ibool VBEAPI VBE_getDisplayStart(int *x,int *y)
+/****************************************************************************
+*
+* Function: VBE_getDisplayStart
+* Parameters: x,y - Place to store starting address value
+* Returns: True if function was successful.
+*
+****************************************************************************/
+{
+ RMREGS regs;
+
+ regs.x.ax = 0x4F07;
+ regs.x.bx = 0x01;
+ PM_int86(0x10,®s,®s);
+ *x = regs.x.cx;
+ *y = regs.x.dx;
+ return regs.x.ax == VBE_SUCCESS;
+}
+
+ibool VBEAPI VBE_setDisplayStartAlt(ulong startAddr,ibool waitVRT)
+/****************************************************************************
+*
+* Function: VBE_setDisplayStartAlt
+* Parameters: startAddr - 32-bit starting address in display memory
+* waitVRT - True to wait for vertical retrace, false if not
+* Returns: True if function was successful, false if not supported.
+*
+* Description: Sets the new starting display position to the specified
+* 32-bit display start address. Note that this function is
+* different the the version above, since it takes a 32-bit
+* byte offset in video memory as the starting address which
+* gives the programmer maximum control over the stat address.
+*
+* NOTE: Requires VBE/Core 3.0
+*
+****************************************************************************/
+{
+ RMREGS regs;
+
+ if (state->VBEVersion >= 0x300) {
+ regs.x.ax = 0x4F07;
+ regs.x.bx = waitVRT ? 0x82 : 0x02;
+ regs.e.ecx = startAddr;
+ PM_int86(0x10,®s,®s);
+ return regs.x.ax == VBE_SUCCESS;
+ }
+ return false;
+}
+
+int VBEAPI VBE_getDisplayStartStatus(void)
+/****************************************************************************
+*
+* Function: VBE_getDisplayStartStatus
+* Returns: 0 if last flip not occurred, 1 if already flipped
+* -1 if not supported
+*
+* Description: Returns the status of the previous display start request.
+* If this function is supported the programmer can implement
+* hardware triple buffering using this function.
+*
+* NOTE: Requires VBE/Core 3.0
+*
+****************************************************************************/
+{
+ RMREGS regs;
+
+ if (state->VBEVersion >= 0x300) {
+ regs.x.ax = 0x4F07;
+ regs.x.bx = 0x0004;
+ PM_int86(0x10,®s,®s);
+ if (regs.x.ax == VBE_SUCCESS)
+ return (regs.x.cx != 0);
+ }
+ return -1;
+}
+
+ibool VBEAPI VBE_enableStereoMode(void)
+/****************************************************************************
+*
+* Function: VBE_enableStereoMode
+* Returns: True if stereo mode enabled, false if not supported.
+*
+* Description: Puts the system into hardware stereo mode for LC shutter
+* glasses, where the display swaps between two display start
+* addresses every vertical retrace.
+*
+* NOTE: Requires VBE/Core 3.0
+*
+****************************************************************************/
+{
+ RMREGS regs;
+
+ if (state->VBEVersion >= 0x300) {
+ regs.x.ax = 0x4F07;
+ regs.x.bx = 0x0005;
+ PM_int86(0x10,®s,®s);
+ return regs.x.ax == VBE_SUCCESS;
+ }
+ return false;
+}
+
+ibool VBEAPI VBE_disableStereoMode(void)
+/****************************************************************************
+*
+* Function: VBE_disableStereoMode
+* Returns: True if stereo mode disabled, false if not supported.
+*
+* Description: Puts the system back into normal, non-stereo display mode
+* after having stereo mode enabled.
+*
+* NOTE: Requires VBE/Core 3.0
+*
+****************************************************************************/
+{
+ RMREGS regs;
+
+ if (state->VBEVersion >= 0x300) {
+ regs.x.ax = 0x4F07;
+ regs.x.bx = 0x0006;
+ PM_int86(0x10,®s,®s);
+ return regs.x.ax == VBE_SUCCESS;
+ }
+ return false;
+}
+
+ibool VBEAPI VBE_setStereoDisplayStart(ulong leftAddr,ulong rightAddr,
+ ibool waitVRT)
+/****************************************************************************
+*
+* Function: VBE_setStereoDisplayStart
+* Parameters: leftAddr - 32-bit start address for left image
+* rightAddr - 32-bit start address for right image
+* waitVRT - True to wait for vertical retrace, false if not
+* Returns: True if function was successful, false if not supported.
+*
+* Description: Sets the new starting display position to the specified
+* 32-bit display start address. Note that this function is
+* different the the version above, since it takes a 32-bit
+* byte offset in video memory as the starting address which
+* gives the programmer maximum control over the stat address.
+*
+* NOTE: Requires VBE/Core 3.0
+*
+****************************************************************************/
+{
+ RMREGS regs;
+
+ if (state->VBEVersion >= 0x300) {
+ regs.x.ax = 0x4F07;
+ regs.x.bx = waitVRT ? 0x83 : 0x03;
+ regs.e.ecx = leftAddr;
+ regs.e.edx = rightAddr;
+ PM_int86(0x10,®s,®s);
+ return regs.x.ax == VBE_SUCCESS;
+ }
+ return false;
+}
+
+ulong VBEAPI VBE_getClosestClock(ushort mode,ulong pixelClock)
+/****************************************************************************
+*
+* Function: VBE_getClosestClock
+* Parameters: mode - VBE mode to be used (include vbeLinearBuffer)
+* pixelClock - Desired pixel clock
+* Returns: Closest pixel clock to desired clock (-1 if not supported)
+*
+* Description: Calls the VBE/Core 3.0 interface to determine the closest
+* pixel clock to the requested value. The BIOS will always
+* search for a pixel clock that is no more than 1% below the
+* requested clock or somewhere higher than the clock. If the
+* clock is higher note that it may well be many Mhz higher
+* that requested and the application will have to check that
+* the returned value is suitable for it's needs. This function
+* returns the actual pixel clock that will be programmed by
+* the hardware.
+*
+* Note that if the pixel clock will be used with a linear
+* framebuffer mode, make sure you pass in the linear
+* framebuffer flag to this function.
+*
+* NOTE: Requires VBE/Core 3.0
+*
+****************************************************************************/
+{
+ RMREGS regs;
+
+ if (state->VBEVersion >= 0x300) {
+ regs.x.ax = 0x4F0B;
+ regs.h.bl = 0x00;
+ regs.e.ecx = pixelClock;
+ regs.x.dx = mode;
+ PM_int86(0x10,®s,®s);
+ if (regs.x.ax == VBE_SUCCESS)
+ return regs.e.ecx;
+ }
+ return -1;
+}
+
+ibool VBEAPI VBE_setDACWidth(int width)
+/****************************************************************************
+*
+* Function: VBE_setDACWidth
+* Parameters: width - Width to set the DAC to
+* Returns: True on success, false on failure
+*
+****************************************************************************/
+{
+ RMREGS regs;
+
+ regs.x.ax = 0x4F08;
+ regs.h.bl = 0x00;
+ regs.h.bh = width;
+ PM_int86(0x10,®s,®s);
+ return regs.x.ax == VBE_SUCCESS;
+}
+
+int VBEAPI VBE_getDACWidth(void)
+/****************************************************************************
+*
+* Function: VBE_getDACWidth
+* Returns: Current width of the palette DAC
+*
+****************************************************************************/
+{
+ RMREGS regs;
+
+ regs.x.ax = 0x4F08;
+ regs.h.bl = 0x01;
+ PM_int86(0x10,®s,®s);
+ if (regs.x.ax != VBE_SUCCESS)
+ return -1;
+ return regs.h.bh;
+}
+
+ibool VBEAPI VBE_setPalette(int start,int num,VBE_palette *pal,ibool waitVRT)
+/****************************************************************************
+*
+* Function: VBE_setPalette
+* Parameters: start - Starting palette index to program
+* num - Number of palette indexes to program
+* pal - Palette buffer containing values
+* waitVRT - Wait for vertical retrace flag
+* Returns: True on success, false on failure
+*
+* Description: Sets a block of palette registers by calling the VBE 2.0
+* BIOS. This function will fail on VBE 1.2 implementations.
+*
+****************************************************************************/
+{
+ RMREGS regs;
+
+ regs.x.ax = 0x4F09;
+ regs.h.bl = waitVRT ? 0x80 : 0x00;
+ regs.x.cx = num;
+ regs.x.dx = start;
+ VBE_callESDI(®s, pal, sizeof(VBE_palette) * num);
+ return regs.x.ax == VBE_SUCCESS;
+}
+
+void * VBEAPI VBE_getBankedPointer(VBE_modeInfo *modeInfo)
+/****************************************************************************
+*
+* Function: VBE_getBankedPointer
+* Parameters: modeInfo - Mode info block for video mode
+* Returns: Selector to the linear framebuffer (0 on failure)
+*
+* Description: Returns a near pointer to the VGA framebuffer area.
+*
+****************************************************************************/
+{
+ /* We just map the pointer every time, since the pointer will always
+ * be in real mode memory, so we wont actually be mapping any real
+ * memory.
+ *
+ * NOTE: We cannot currently map a near pointer to the banked frame
+ * buffer for Watcom Win386, so we create a 16:16 far pointer to
+ * the video memory. All the assembler code will render to the
+ * video memory by loading the selector rather than using a
+ * near pointer.
+ */
+ ulong seg = (ushort)modeInfo->WinASegment;
+ if (seg != 0) {
+ if (seg == 0xA000)
+ return (void*)PM_getA0000Pointer();
+ else
+ return (void*)PM_mapPhysicalAddr(seg << 4,0xFFFF,true);
+ }
+ return NULL;
+}
+
+#ifndef REALMODE
+
+void * VBEAPI VBE_getLinearPointer(VBE_modeInfo *modeInfo)
+/****************************************************************************
+*
+* Function: VBE_getLinearPointer
+* Parameters: modeInfo - Mode info block for video mode
+* Returns: Selector to the linear framebuffer (0 on failure)
+*
+* Description: Returns a near pointer to the linear framebuffer for the video
+* mode.
+*
+****************************************************************************/
+{
+ static ulong physPtr[MAX_LIN_PTRS] = {0};
+ static void *linPtr[MAX_LIN_PTRS] = {0};
+ static int numPtrs = 0;
+ int i;
+
+ /* Search for an already mapped pointer */
+ for (i = 0; i < numPtrs; i++) {
+ if (physPtr[i] == modeInfo->PhysBasePtr)
+ return linPtr[i];
+ }
+ if (numPtrs < MAX_LIN_PTRS) {
+ physPtr[numPtrs] = modeInfo->PhysBasePtr;
+ linPtr[numPtrs] = PM_mapPhysicalAddr(modeInfo->PhysBasePtr,(state->VBEMemory * 1024L)-1,true);
+ return linPtr[numPtrs++];
+ }
+ return NULL;
+}
+
+static void InitPMCode(void)
+/****************************************************************************
+*
+* Function: InitPMCode - 32 bit protected mode version
+*
+* Description: Finds the address of and relocates the protected mode
+* code block from the VBE 2.0 into a local memory block. The
+* memory block is allocated with malloc() and must be freed
+* with VBE_freePMCode() after graphics processing is complete.
+*
+* Note that this buffer _must_ be recopied after each mode set,
+* as the routines will change depending on the underlying
+* video mode.
+*
+****************************************************************************/
+{
+ RMREGS regs;
+ RMSREGS sregs;
+ uchar *code;
+ int pmLen;
+
+ if (!state->pmInfo && state->VBEVersion >= 0x200) {
+ regs.x.ax = 0x4F0A;
+ regs.x.bx = 0;
+ PM_int86x(0x10,®s,®s,&sregs);
+ if (regs.x.ax != VBE_SUCCESS)
+ return;
+ if (VBE_shared)
+ state->pmInfo = PM_mallocShared(regs.x.cx);
+ else
+ state->pmInfo = PM_malloc(regs.x.cx);
+ if (state->pmInfo == NULL)
+ return;
+ state->pmInfo32 = state->pmInfo;
+ pmLen = regs.x.cx;
+
+ /* Relocate the block into our local data segment */
+ code = PM_mapRealPointer(sregs.es,regs.x.di);
+ memcpy(state->pmInfo,code,pmLen);
+
+ /* Now do a sanity check on the information we recieve to ensure
+ * that is is correct. Some BIOS return totally bogus information
+ * in here (Matrox is one)! Under DOS this works OK, but under OS/2
+ * we are screwed.
+ */
+ if (state->pmInfo->setWindow >= pmLen ||
+ state->pmInfo->setDisplayStart >= pmLen ||
+ state->pmInfo->setPalette >= pmLen ||
+ state->pmInfo->IOPrivInfo >= pmLen) {
+ if (VBE_shared)
+ PM_freeShared(state->pmInfo);
+ else
+ PM_free(state->pmInfo);
+ state->pmInfo32 = state->pmInfo = NULL;
+ return;
+ }
+
+ /* Read the IO priveledge info and determine if we need to
+ * pass a selector to MMIO registers to the bank switch code.
+ * Since we no longer support selector allocation, we no longer
+ * support this mechanism so we disable the protected mode
+ * interface in this case.
+ */
+ if (state->pmInfo->IOPrivInfo && !state->MMIOSel) {
+ ushort *p = (ushort*)((uchar*)state->pmInfo + state->pmInfo->IOPrivInfo);
+ while (*p != 0xFFFF)
+ p++;
+ p++;
+ if (*p != 0xFFFF)
+ VBE_freePMCode();
+ }
+ }
+}
+
+void * VBEAPI VBE_getSetBank(void)
+/****************************************************************************
+*
+* Function: VBE_getSetBank
+* Returns: Pointer to the 32 VBE 2.0 bit bank switching routine.
+*
+****************************************************************************/
+{
+ if (state->VBEVersion >= 0x200) {
+ InitPMCode();
+ if (state->pmInfo)
+ return (uchar*)state->pmInfo + state->pmInfo->setWindow;
+ }
+ return NULL;
+}
+
+void * VBEAPI VBE_getSetDisplayStart(void)
+/****************************************************************************
+*
+* Function: VBE_getSetDisplayStart
+* Returns: Pointer to the 32 VBE 2.0 bit CRT start address routine.
+*
+****************************************************************************/
+{
+ if (state->VBEVersion >= 0x200) {
+ InitPMCode();
+ if (state->pmInfo)
+ return (uchar*)state->pmInfo + state->pmInfo->setDisplayStart;
+ }
+ return NULL;
+}
+
+void * VBEAPI VBE_getSetPalette(void)
+/****************************************************************************
+*
+* Function: VBE_getSetPalette
+* Returns: Pointer to the 32 VBE 2.0 bit palette programming routine.
+*
+****************************************************************************/
+{
+ if (state->VBEVersion >= 0x200) {
+ InitPMCode();
+ if (state->pmInfo)
+ return (uchar*)state->pmInfo + state->pmInfo->setPalette;
+ }
+ return NULL;
+}
+
+void VBEAPI VBE_freePMCode(void)
+/****************************************************************************
+*
+* Function: VBE_freePMCode
+*
+* Description: This routine frees the protected mode code blocks that
+* we copied from the VBE 2.0 interface. This routine must
+* be after you have finished graphics processing to free up
+* the memory occupied by the routines. This is necessary
+* because the PM info memory block must be re-copied after
+* every video mode set from the VBE 2.0 implementation.
+*
+****************************************************************************/
+{
+ if (state->pmInfo) {
+ if (VBE_shared)
+ PM_freeShared(state->pmInfo);
+ else
+ PM_free(state->pmInfo);
+ state->pmInfo = NULL;
+ state->pmInfo32 = NULL;
+ }
+}
+
+void VBEAPI VBE_sharePMCode(void)
+/****************************************************************************
+*
+* Function: VBE_sharePMCode
+*
+* Description: Enables internal sharing of the PM code buffer for OS/2.
+*
+****************************************************************************/
+{
+ VBE_shared = true;
+}
+
+/* Set of code stubs used to build the final bank switch code */
+
+#define VBE20_adjustOffset 7
+
+static uchar VBE20A_bankFunc32_Start[] = {
+ 0x53,0x51, /* push ebx,ecx */
+ 0x8B,0xD0, /* mov edx,eax */
+ 0x33,0xDB, /* xor ebx,ebx */
+ 0xB1,0x00, /* mov cl,0 */
+ 0xD2,0xE2, /* shl dl,cl */
+ };
+
+static uchar VBE20_bankFunc32_End[] = {
+ 0x59,0x5B, /* pop ecx,ebx */
+ };
+
+static uchar bankFunc32[100];
+
+#define copy(p,b,a) memcpy(b,a,sizeof(a)); (p) = (b) + sizeof(a)
+
+ibool VBEAPI VBE_getBankFunc32(int *codeLen,void **bankFunc,int dualBanks,
+ int bankAdjust)
+/****************************************************************************
+*
+* Function: VBE_getBankFunc32
+* Parameters: codeLen - Place to store length of code
+* bankFunc - Place to store pointer to bank switch code
+* dualBanks - True if dual banks are in effect
+* bankAdjust - Bank shift adjustment factor
+* Returns: True on success, false if not compatible.
+*
+* Description: Creates a local 32 bit bank switch function from the
+* VBE 2.0 bank switch code that is compatible with the
+* virtual flat framebuffer devices (does not have a return
+* instruction at the end and takes the bank number in EAX
+* not EDX). Note that this 32 bit code cannot include int 10h
+* instructions, so we can only do this if we have VBE 2.0
+* or later.
+*
+* Note that we need to know the length of the 32 bit
+* bank switch function, which the standard VBE 2.0 spec
+* does not provide. In order to support this we have
+* extended the VBE 2.0 state->pmInfo structure in UniVBE 5.2 in a
+* way to support this, and we hope that this will become
+* a VBE 2.0 ammendment.
+*
+* Note also that we cannot run the linear framebuffer
+* emulation code with bank switching routines that require
+* a selector to the memory mapped registers passed in ES.
+*
+****************************************************************************/
+{
+ int len;
+ uchar *code;
+ uchar *p;
+
+ InitPMCode();
+ if (state->VBEVersion >= 0x200 && state->pmInfo32 && !state->MMIOSel) {
+ code = (uchar*)state->pmInfo32 + state->pmInfo32->setWindow;
+ if (state->pmInfo32->extensionSig == VBE20_EXT_SIG)
+ len = state->pmInfo32->setWindowLen-1;
+ else {
+ /* We are running on a system without the UniVBE 5.2 extension.
+ * We do as best we can by scanning through the code for the
+ * ret function to determine the length. This is not foolproof,
+ * but is the best we can do.
+ */
+ p = code;
+ while (*p != 0xC3)
+ p++;
+ len = p - code;
+ }
+ if ((len + sizeof(VBE20A_bankFunc32_Start) + sizeof(VBE20_bankFunc32_End)) > sizeof(bankFunc32))
+ PM_fatalError("32-bit bank switch function too long!");
+ copy(p,bankFunc32,VBE20A_bankFunc32_Start);
+ memcpy(p,code,len);
+ p += len;
+ copy(p,p,VBE20_bankFunc32_End);
+ *codeLen = p - bankFunc32;
+ bankFunc32[VBE20_adjustOffset] = (uchar)bankAdjust;
+ *bankFunc = bankFunc32;
+ return true;
+ }
+ return false;
+}
+
+#endif
diff --git a/board/MAI/bios_emulator/scitech/src/pm/beos/cpuinfo.c b/board/MAI/bios_emulator/scitech/src/pm/beos/cpuinfo.c
new file mode 100644
index 00000000000..c8f825e25ba
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/pm/beos/cpuinfo.c
@@ -0,0 +1,80 @@
+/****************************************************************************
+*
+* Ultra Long Period Timer
+*
+* ========================================================================
+*
+* The contents of this file are subject to the SciTech MGL Public
+* License Version 1.0 (the "License"); you may not use this file
+* except in compliance with the License. You may obtain a copy of
+* the License at http://www.scitechsoft.com/mgl-license.txt
+*
+* Software distributed under the License is distributed on an
+* "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+* implied. See the License for the specific language governing
+* rights and limitations under the License.
+*
+* The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+*
+* The Initial Developer of the Original Code is SciTech Software, Inc.
+* All Rights Reserved.
+*
+* ========================================================================
+*
+* Language: ANSI C
+* Environment: *** TODO: ADD YOUR OS ENVIRONMENT NAME HERE ***
+*
+* Description: Module to implement OS specific services to measure the
+* CPU frequency.
+*
+****************************************************************************/
+
+#include <OS.h>
+
+/*----------------------------- Implementation ----------------------------*/
+
+/****************************************************************************
+REMARKS:
+Increase the thread priority to maximum, if possible.
+****************************************************************************/
+static int SetMaxThreadPriority(void)
+{
+ thread_id thid = find_thread(NULL);
+ thread_info tinfo;
+ get_thread_info(thid, &tinfo);
+ set_thread_priority(thid, B_REAL_TIME_PRIORITY);
+ return tinfo.priority;
+}
+
+/****************************************************************************
+REMARKS:
+Restore the original thread priority.
+****************************************************************************/
+static void RestoreThreadPriority(
+ int priority)
+{
+ thread_id thid = find_thread(NULL);
+ set_thread_priority(thid, priority);
+}
+
+/****************************************************************************
+REMARKS:
+Initialise the counter and return the frequency of the counter.
+****************************************************************************/
+static void GetCounterFrequency(
+ CPU_largeInteger *freq)
+{
+ // TODO: Return the frequency of the counter in here. You should try to
+ // normalise this value to be around 100,000 ticks per second.
+ freq->low = 1000000;
+ freq->high = 0;
+}
+
+/****************************************************************************
+REMARKS:
+Read the counter and return the counter value.
+
+TODO: Implement this to read the counter. It should be done as a macro
+ for accuracy.
+****************************************************************************/
+#define GetCounter(t) { *((bigtime_t*) t) = system_time(); }
diff --git a/board/MAI/bios_emulator/scitech/src/pm/beos/event.c b/board/MAI/bios_emulator/scitech/src/pm/beos/event.c
new file mode 100644
index 00000000000..4c32ce7434d
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/pm/beos/event.c
@@ -0,0 +1,199 @@
+/****************************************************************************
+*
+* SciTech OS Portability Manager Library
+*
+* ========================================================================
+*
+* The contents of this file are subject to the SciTech MGL Public
+* License Version 1.0 (the "License"); you may not use this file
+* except in compliance with the License. You may obtain a copy of
+* the License at http://www.scitechsoft.com/mgl-license.txt
+*
+* Software distributed under the License is distributed on an
+* "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+* implied. See the License for the specific language governing
+* rights and limitations under the License.
+*
+* The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+*
+* The Initial Developer of the Original Code is SciTech Software, Inc.
+* All Rights Reserved.
+*
+* ========================================================================
+*
+* Language: ANSI C
+* Environment: BeOS
+*
+* Description: BeOS implementation for the SciTech cross platform
+* event library.
+*
+****************************************************************************/
+
+/*---------------------------- Global Variables ---------------------------*/
+
+static ushort keyUpMsg[256] = {0};/* Table of key up messages */
+static int rangeX,rangeY; /* Range of mouse coordinates */
+
+/*---------------------------- Implementation -----------------------------*/
+
+/* These are not used under non-DOS systems */
+#define _EVT_disableInt() 1
+#define _EVT_restoreInt(flags)
+
+/****************************************************************************
+PARAMETERS:
+scanCode - Scan code to test
+
+REMARKS:
+This macro determines if a specified key is currently down at the
+time that the call is made.
+****************************************************************************/
+#define _EVT_isKeyDown(scanCode) (keyUpMsg[scanCode] != 0)
+
+/****************************************************************************
+REMARKS:
+This function is used to return the number of ticks since system
+startup in milliseconds. This should be the same value that is placed into
+the time stamp fields of events, and is used to implement auto mouse down
+events.
+****************************************************************************/
+ulong _EVT_getTicks(void)
+{
+ // TODO: Implement this for your OS!
+}
+
+/****************************************************************************
+REMARKS:
+Pumps all messages in the application message queue into our event queue.
+****************************************************************************/
+static void _EVT_pumpMessages(void)
+{
+ // TODO: The purpose of this function is to read all keyboard and mouse
+ // events from the OS specific event queue, translate them and post
+ // them into the SciTech event queue.
+ //
+ // NOTE: There are a couple of important things that this function must
+ // take care of:
+ //
+ // 1. Support for KEYDOWN, KEYREPEAT and KEYUP is required.
+ //
+ // 2. Support for reading hardware scan code as well as ASCII
+ // translated values is required. Games use the scan codes rather
+ // than ASCII values. Scan codes go into the high order byte of the
+ // keyboard message field.
+ //
+ // 3. Support for at least reading mouse motion data (mickeys) from the
+ // mouse is required. Using the mickey values, we can then translate
+ // to mouse cursor coordinates scaled to the range of the current
+ // graphics display mode. Mouse values are scaled based on the
+ // global 'rangeX' and 'rangeY'.
+ //
+ // 4. Support for a timestamp for the events is required, which is
+ // defined as the number of milliseconds since some event (usually
+ // system startup). This is the timestamp when the event occurred
+ // (ie: at interrupt time) not when it was stuff into the SciTech
+ // event queue.
+ //
+ // 5. Support for mouse double click events. If the OS has a native
+ // mechanism to determine this, it should be used. Otherwise the
+ // time stamp information will be used by the generic event code
+ // to generate double click events.
+}
+
+/****************************************************************************
+REMARKS:
+This macro/function is used to converts the scan codes reported by the
+keyboard to our event libraries normalised format. We only have one scan
+code for the 'A' key, and use shift modifiers to determine if it is a
+Ctrl-F1, Alt-F1 etc. The raw scan codes from the keyboard work this way,
+but the OS gives us 'cooked' scan codes, we have to translate them back
+to the raw format.
+****************************************************************************/
+#define _EVT_maskKeyCode(evt)
+
+/****************************************************************************
+REMARKS:
+Safely abort the event module upon catching a fatal error.
+****************************************************************************/
+void _EVT_abort()
+{
+ EVT_exit();
+ PM_fatalError("Unhandled exception!");
+}
+
+/****************************************************************************
+PARAMETERS:
+mouseMove - Callback function to call wheneve the mouse needs to be moved
+
+REMARKS:
+Initiliase the event handling module. Here we install our mouse handling ISR
+to be called whenever any button's are pressed or released. We also build
+the free list of events in the event queue.
+
+We use handler number 2 of the mouse libraries interrupt handlers for our
+event handling routines.
+****************************************************************************/
+void EVTAPI EVT_init(
+ _EVT_mouseMoveHandler mouseMove)
+{
+ /* Initialise the event queue */
+ _mouseMove = mouseMove;
+ initEventQueue();
+ memset(keyUpMsg,0,sizeof(keyUpMsg));
+
+ // TODO: Do any OS specific initialisation here
+
+ /* Catch program termination signals so we can clean up properly */
+ signal(SIGABRT, _EVT_abort);
+ signal(SIGFPE, _EVT_abort);
+ signal(SIGINT, _EVT_abort);
+}
+
+/****************************************************************************
+REMARKS
+Changes the range of coordinates returned by the mouse functions to the
+specified range of values. This is used when changing between graphics
+modes set the range of mouse coordinates for the new display mode.
+****************************************************************************/
+void EVTAPI EVT_setMouseRange(
+ int xRes,
+ int yRes)
+{
+ rangeX = xRes;
+ rangeY = yRes;
+}
+
+/****************************************************************************
+REMARKS:
+Initiailises the internal event handling modules. The EVT_suspend function
+can be called to suspend event handling (such as when shelling out to DOS),
+and this function can be used to resume it again later.
+****************************************************************************/
+void EVT_resume(void)
+{
+ // Do nothing for non DOS systems
+}
+
+/****************************************************************************
+REMARKS
+Suspends all of our event handling operations. This is also used to
+de-install the event handling code.
+****************************************************************************/
+void EVT_suspend(void)
+{
+ // Do nothing for non DOS systems
+}
+
+/****************************************************************************
+REMARKS
+Exits the event module for program terminatation.
+****************************************************************************/
+void EVT_exit(void)
+{
+ /* Restore signal handlers */
+ signal(SIGABRT, SIG_DFL);
+ signal(SIGFPE, SIG_DFL);
+ signal(SIGINT, SIG_DFL);
+
+ // TODO: Do any OS specific cleanup in here
+}
diff --git a/board/MAI/bios_emulator/scitech/src/pm/beos/oshdr.h b/board/MAI/bios_emulator/scitech/src/pm/beos/oshdr.h
new file mode 100644
index 00000000000..ab423d4be6d
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/pm/beos/oshdr.h
@@ -0,0 +1,32 @@
+/****************************************************************************
+*
+* SciTech OS Portability Manager Library
+*
+* ========================================================================
+*
+* The contents of this file are subject to the SciTech MGL Public
+* License Version 1.0 (the "License"); you may not use this file
+* except in compliance with the License. You may obtain a copy of
+* the License at http://www.scitechsoft.com/mgl-license.txt
+*
+* Software distributed under the License is distributed on an
+* "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+* implied. See the License for the specific language governing
+* rights and limitations under the License.
+*
+* The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+*
+* The Initial Developer of the Original Code is SciTech Software, Inc.
+* All Rights Reserved.
+*
+* ========================================================================
+*
+* Language: ANSI C
+* Environment: BeOS
+*
+* Description: Include file to include all OS specific header files.
+*
+****************************************************************************/
+
+// This is where you include OS specific headers for the event handling
+// library.
diff --git a/board/MAI/bios_emulator/scitech/src/pm/beos/pm.c b/board/MAI/bios_emulator/scitech/src/pm/beos/pm.c
new file mode 100644
index 00000000000..c57d82ab688
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/pm/beos/pm.c
@@ -0,0 +1,539 @@
+/****************************************************************************
+*
+* SciTech OS Portability Manager Library
+*
+* ========================================================================
+*
+* The contents of this file are subject to the SciTech MGL Public
+* License Version 1.0 (the "License"); you may not use this file
+* except in compliance with the License. You may obtain a copy of
+* the License at http://www.scitechsoft.com/mgl-license.txt
+*
+* Software distributed under the License is distributed on an
+* "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+* implied. See the License for the specific language governing
+* rights and limitations under the License.
+*
+* The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+*
+* The Initial Developer of the Original Code is SciTech Software, Inc.
+* All Rights Reserved.
+*
+* ========================================================================
+*
+* Language: ANSI C
+* Environment: BeOS
+*
+* Description: Implementation for the OS Portability Manager Library, which
+* contains functions to implement OS specific services in a
+* generic, cross platform API. Porting the OS Portability
+* Manager library is the first step to porting any SciTech
+* products to a new platform.
+*
+****************************************************************************/
+
+#include "pmapi.h"
+#include "drvlib/os/os.h"
+#include <stdio.h>
+#include <stdlib.h>
+#include <string.h>
+
+// TODO: Include any BeOS specific headers here!
+
+/*--------------------------- Global variables ----------------------------*/
+
+static void (PMAPIP fatalErrorCleanup)(void) = NULL;
+
+/*----------------------------- Implementation ----------------------------*/
+
+void PMAPI PM_init(void)
+{
+ // TODO: Do any initialisation in here. This includes getting IOPL
+ // access for the process calling PM_init. This will get called
+ // more than once.
+
+ // TODO: If you support the supplied MTRR register stuff (you need to
+ // be at ring 0 for this!), you should initialise it in here.
+
+/* MTRR_init(); */
+}
+
+long PMAPI PM_getOSType(void)
+{ return _OS_BEOS; }
+
+int PMAPI PM_getModeType(void)
+{ return PM_386; }
+
+void PMAPI PM_backslash(char *s)
+{
+ uint pos = strlen(s);
+ if (s[pos-1] != '/') {
+ s[pos] = '/';
+ s[pos+1] = '\0';
+ }
+}
+
+void PMAPI PM_setFatalErrorCleanup(
+ void (PMAPIP cleanup)(void))
+{
+ fatalErrorCleanup = cleanup;
+}
+
+void PMAPI PM_fatalError(const char *msg)
+{
+ // TODO: If you are running in a GUI environment without a console,
+ // this needs to be changed to bring up a fatal error message
+ // box and terminate the program.
+ if (fatalErrorCleanup)
+ fatalErrorCleanup();
+ fprintf(stderr,"%s\n", msg);
+ exit(1);
+}
+
+void * PMAPI PM_getVESABuf(uint *len,uint *rseg,uint *roff)
+{
+ // No BIOS access for the BeOS
+ return NULL;
+}
+
+int PMAPI PM_kbhit(void)
+{
+ // TODO: This function checks if a key is available to be read. This
+ // should be implemented, but is mostly used by the test programs
+ // these days.
+ return true;
+}
+
+int PMAPI PM_getch(void)
+{
+ // TODO: This returns the ASCII code of the key pressed. This
+ // should be implemented, but is mostly used by the test programs
+ // these days.
+ return 0xD;
+}
+
+int PMAPI PM_openConsole(void)
+{
+ // TODO: Opens up a fullscreen console for graphics output. If your
+ // console does not have graphics/text modes, this can be left
+ // empty. The main purpose of this is to disable console switching
+ // when in graphics modes if you can switch away from fullscreen
+ // consoles (if you want to allow switching, this can be done
+ // elsewhere with a full save/restore state of the graphics mode).
+ return 0;
+}
+
+int PMAPI PM_getConsoleStateSize(void)
+{
+ // TODO: Returns the size of the console state buffer used to save the
+ // state of the console before going into graphics mode. This is
+ // used to restore the console back to normal when we are done.
+ return 1;
+}
+
+void PMAPI PM_saveConsoleState(void *stateBuf,int console_id)
+{
+ // TODO: Saves the state of the console into the state buffer. This is
+ // used to restore the console back to normal when we are done.
+ // We will always restore 80x25 text mode after being in graphics
+ // mode, so if restoring text mode is all you need to do this can
+ // be left empty.
+}
+
+void PMAPI PM_restoreConsoleState(const void *stateBuf,int console_id)
+{
+ // TODO: Restore the state of the console from the state buffer. This is
+ // used to restore the console back to normal when we are done.
+ // We will always restore 80x25 text mode after being in graphics
+ // mode, so if restoring text mode is all you need to do this can
+ // be left empty.
+}
+
+void PMAPI PM_closeConsole(int console_id)
+{
+ // TODO: Close the console when we are done, going back to text mode.
+}
+
+void PM_setOSCursorLocation(int x,int y)
+{
+ // TODO: Set the OS console cursor location to the new value. This is
+ // generally used for new OS ports (used mostly for DOS).
+}
+
+void PM_setOSScreenWidth(int width,int height)
+{
+ // TODO: Set the OS console screen width. This is generally unused for
+ // new OS ports.
+}
+
+ibool PMAPI PM_setRealTimeClockHandler(PM_intHandler ih, int frequency)
+{
+ // TODO: Install a real time clock interrupt handler. Normally this
+ // will not be supported from most OS'es in user land, so an
+ // alternative mechanism is needed to enable software stereo.
+ // Hence leave this unimplemented unless you have a high priority
+ // mechanism to call the 32-bit callback when the real time clock
+ // interrupt fires.
+ return false;
+}
+
+void PMAPI PM_setRealTimeClockFrequency(int frequency)
+{
+ // TODO: Set the real time clock interrupt frequency. Used for stereo
+ // LC shutter glasses when doing software stereo. Usually sets
+ // the frequency to around 2048 Hz.
+}
+
+void PMAPI PM_restoreRealTimeClockHandler(void)
+{
+ // TODO: Restores the real time clock handler.
+}
+
+char * PMAPI PM_getCurrentPath(
+ char *path,
+ int maxLen)
+{
+ return getcwd(path,maxLen);
+}
+
+char PMAPI PM_getBootDrive(void)
+{ return '/'; }
+
+const char * PMAPI PM_getVBEAFPath(void)
+{ return PM_getNucleusConfigPath(); }
+
+const char * PMAPI PM_getNucleusPath(void)
+{
+ char *env = getenv("NUCLEUS_PATH");
+ return env ? env : "/usr/lib/nucleus";
+}
+
+const char * PMAPI PM_getNucleusConfigPath(void)
+{
+ static char path[256];
+ strcpy(path,PM_getNucleusPath());
+ PM_backslash(path);
+ strcat(path,"config");
+ return path;
+}
+
+const char * PMAPI PM_getUniqueID(void)
+{
+ // TODO: Return a unique ID for the machine. If a unique ID is not
+ // available, return the machine name.
+ static char buf[128];
+ gethostname(buf, 128);
+ return buf;
+}
+
+const char * PMAPI PM_getMachineName(void)
+{
+ // TODO: Return the network machine name for the machine.
+ static char buf[128];
+ gethostname(buf, 128);
+ return buf;
+}
+
+void * PMAPI PM_getBIOSPointer(void)
+{
+ // No BIOS access on the BeOS
+ return NULL;
+}
+
+void * PMAPI PM_getA0000Pointer(void)
+{
+ static void *bankPtr;
+ if (!bankPtr)
+ bankPtr = PM_mapPhysicalAddr(0xA0000,0xFFFF,true);
+ return bankPtr;
+}
+
+void * PMAPI PM_mapPhysicalAddr(ulong base,ulong limit,ibool isCached)
+{
+ // TODO: This function maps a physical memory address to a linear
+ // address in the address space of the calling process.
+
+ // NOTE: This function *must* be able to handle any phsyical base
+ // address, and hence you will have to handle rounding of
+ // the physical base address to a page boundary (ie: 4Kb on
+ // x86 CPU's) to be able to properly map in the memory
+ // region.
+
+ // NOTE: If possible the isCached bit should be used to ensure that
+ // the PCD (Page Cache Disable) and PWT (Page Write Through)
+ // bits are set to disable caching for a memory mapping used
+ // for MMIO register access. We also disable caching using
+ // the MTRR registers for Pentium Pro and later chipsets so if
+ // MTRR support is enabled for your OS then you can safely ignore
+ // the isCached flag and always enable caching in the page
+ // tables.
+ return NULL;
+}
+
+void PMAPI PM_freePhysicalAddr(void *ptr,ulong limit)
+{
+ // TODO: This function will free a physical memory mapping previously
+ // allocated with PM_mapPhysicalAddr() if at all possible. If
+ // you can't free physical memory mappings, simply do nothing.
+}
+
+ulong PMAPI PM_getPhysicalAddr(void *p)
+{
+ // TODO: This function should find the physical address of a linear
+ // address.
+ return 0xFFFFFFFFUL;
+}
+
+void PMAPI PM_sleep(ulong milliseconds)
+{
+ // TODO: Put the process to sleep for milliseconds
+}
+
+int PMAPI PM_getCOMPort(int port)
+{
+ // TODO: Re-code this to determine real values using the Plug and Play
+ // manager for the OS.
+ switch (port) {
+ case 0: return 0x3F8;
+ case 1: return 0x2F8;
+ }
+ return 0;
+}
+
+int PMAPI PM_getLPTPort(int port)
+{
+ // TODO: Re-code this to determine real values using the Plug and Play
+ // manager for the OS.
+ switch (port) {
+ case 0: return 0x3BC;
+ case 1: return 0x378;
+ case 2: return 0x278;
+ }
+ return 0;
+}
+
+void * PMAPI PM_mallocShared(long size)
+{
+ // TODO: This is used to allocate memory that is shared between process
+ // that all access the common Nucleus drivers via a common display
+ // driver DLL. If your OS does not support shared memory (or if
+ // the display driver does not need to allocate shared memory
+ // for each process address space), this should just call PM_malloc.
+ return PM_malloc(size);
+}
+
+void PMAPI PM_freeShared(void *ptr)
+{
+ // TODO: Free the shared memory block. This will be called in the context
+ // of the original calling process that allocated the shared
+ // memory with PM_mallocShared. Simply call free if you do not
+ // need this.
+ PM_free(ptr);
+}
+
+void * PMAPI PM_mapToProcess(void *base,ulong limit)
+{
+ // TODO: This function is used to map a physical memory mapping
+ // previously allocated with PM_mapPhysicalAddr into the
+ // address space of the calling process. If the memory mapping
+ // allocated by PM_mapPhysicalAddr is global to all processes,
+ // simply return the pointer.
+ return base;
+}
+
+void * PMAPI PM_mapRealPointer(uint r_seg,uint r_off)
+{
+ // No BIOS access on the BeOS
+ return NULL;
+}
+
+void * PMAPI PM_allocRealSeg(uint size,uint *r_seg,uint *r_off)
+{
+ // No BIOS access on the BeOS
+ return NULL;
+}
+
+void PMAPI PM_freeRealSeg(void *mem)
+{
+ // No BIOS access on the BeOS
+}
+
+void PMAPI DPMI_int86(int intno, DPMI_regs *regs)
+{
+ // No BIOS access on the BeOS
+}
+
+int PMAPI PM_int86(int intno, RMREGS *in, RMREGS *out)
+{
+ // No BIOS access on the BeOS
+ return 0;
+}
+
+int PMAPI PM_int86x(int intno, RMREGS *in, RMREGS *out,
+ RMSREGS *sregs)
+{
+ // No BIOS access on the BeOS
+ return 0;
+}
+
+void PMAPI PM_callRealMode(uint seg,uint off, RMREGS *in,
+ RMSREGS *sregs)
+{
+ // No BIOS access on the BeOS
+}
+
+void PMAPI PM_availableMemory(ulong *physical,ulong *total)
+{
+ // TODO: Report the amount of available memory, both the amount of
+ // physical memory left and the amount of virtual memory left.
+ // If the OS does not provide these services, report 0's.
+ *physical = *total = 0;
+}
+
+void * PMAPI PM_allocLockedMem(uint size,ulong *physAddr,ibool contiguous,ibool below16Meg)
+{
+ // TODO: Allocate a block of locked, physical memory of the specified
+ // size. This is used for bus master operations. If this is not
+ // supported by the OS, return NULL and bus mastering will not
+ // be used.
+ return NULL;
+}
+
+void PMAPI PM_freeLockedMem(void *p,uint size,ibool contiguous)
+{
+ // TODO: Free a memory block allocated with PM_allocLockedMem.
+}
+
+void PMAPI PM_setBankA(int bank)
+{
+ // No BIOS access on the BeOS
+}
+
+void PMAPI PM_setBankAB(int bank)
+{
+ // No BIOS access on the BeOS
+}
+
+void PMAPI PM_setCRTStart(int x,int y,int waitVRT)
+{
+ // No BIOS access on the BeOS
+}
+
+ibool PMAPI PM_enableWriteCombine(ulong base,ulong length,uint type)
+{
+ // TODO: This function should enable Pentium Pro and Pentium II MTRR
+ // write combining for the passed in physical memory base address
+ // and length. Normally this is done via calls to an OS specific
+ // device driver as this can only be done at ring 0.
+ //
+ // NOTE: This is a *very* important function to implement! If you do
+ // not implement, graphics performance on the latest Intel chips
+ // will be severly impaired. For sample code that can be used
+ // directly in a ring 0 device driver, see the MSDOS implementation
+ // which includes assembler code to do this directly (if the
+ // program is running at ring 0).
+ return false;
+}
+
+ibool PMAPI PM_doBIOSPOST(ushort axVal,ulong BIOSPhysAddr,void *mappedBIOS)
+{
+ // TODO: This function is used to run the BIOS POST code on a secondary
+ // controller to initialise it for use. This is not necessary
+ // for multi-controller operation, but it will make it a lot
+ // more convenicent for end users (otherwise they have to boot
+ // the system once with the secondary controller as primary, and
+ // then boot with both controllers installed).
+ //
+ // Even if you don't support full BIOS access, it would be
+ // adviseable to be able to POST the secondary controllers in the
+ // system using this function as a minimum requirement. Some
+ // graphics hardware has registers that contain values that only
+ // the BIOS knows about, which makes bring up a card from cold
+ // reset difficult if the BIOS has not POST'ed it.
+ return false;
+}
+
+/****************************************************************************
+REMARKS:
+Function to find the first file matching a search criteria in a directory.
+****************************************************************************/
+ulong PMAPI PM_findFirstFile(
+ const char *filename,
+ PM_findData *findData)
+{
+ (void)filename;
+ (void)findData;
+ return PM_FILE_INVALID;
+}
+
+/****************************************************************************
+REMARKS:
+Function to find the next file matching a search criteria in a directory.
+****************************************************************************/
+ibool PMAPI PM_findNextFile(
+ ulong handle,
+ PM_findData *findData)
+{
+ (void)handle;
+ (void)findData;
+ return false;
+}
+
+/****************************************************************************
+REMARKS:
+Function to close the find process
+****************************************************************************/
+void PMAPI PM_findClose(
+ ulong handle)
+{
+ (void)handle;
+}
+
+/****************************************************************************
+REMARKS:
+Function to determine if a drive is a valid drive or not. Under Unix this
+function will return false for anything except a value of 3 (considered
+the root drive, and equivalent to C: for non-Unix systems). The drive
+numbering is:
+
+ 1 - Drive A:
+ 2 - Drive B:
+ 3 - Drive C:
+ etc
+
+****************************************************************************/
+ibool PMAPI PM_driveValid(
+ char drive)
+{
+ if (drive == 3)
+ return true;
+ return false;
+}
+
+/****************************************************************************
+REMARKS:
+Function to get the current working directory for the specififed drive.
+Under Unix this will always return the current working directory regardless
+of what the value of 'drive' is.
+****************************************************************************/
+void PMAPI PM_getdcwd(
+ int drive,
+ char *dir,
+ int len)
+{
+ (void)drive;
+ getcwd(dir,len);
+}
+
+/****************************************************************************
+REMARKS:
+Function to change the file attributes for a specific file.
+****************************************************************************/
+void PMAPI PM_setFileAttr(
+ const char *filename,
+ uint attrib)
+{
+ // TODO: Set the file attributes for a file
+ (void)filename;
+ (void)attrib;
+}
diff --git a/board/MAI/bios_emulator/scitech/src/pm/beos/vflat.c b/board/MAI/bios_emulator/scitech/src/pm/beos/vflat.c
new file mode 100644
index 00000000000..579ef2c95c4
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/pm/beos/vflat.c
@@ -0,0 +1,49 @@
+/****************************************************************************
+*
+* SciTech OS Portability Manager Library
+*
+* ========================================================================
+*
+* The contents of this file are subject to the SciTech MGL Public
+* License Version 1.0 (the "License"); you may not use this file
+* except in compliance with the License. You may obtain a copy of
+* the License at http://www.scitechsoft.com/mgl-license.txt
+*
+* Software distributed under the License is distributed on an
+* "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+* implied. See the License for the specific language governing
+* rights and limitations under the License.
+*
+* The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+*
+* The Initial Developer of the Original Code is SciTech Software, Inc.
+* All Rights Reserved.
+*
+* ========================================================================
+*
+* Language: ANSI C
+* Environment: Any
+*
+* Description: Dummy module; no virtual framebuffer for this OS
+*
+****************************************************************************/
+
+#include "pmapi.h"
+
+ibool PMAPI VF_available(void)
+{
+ return false;
+}
+
+void * PMAPI VF_init(ulong baseAddr,int bankSize,int codeLen,void *bankFunc)
+{
+ baseAddr = baseAddr;
+ bankSize = bankSize;
+ codeLen = codeLen;
+ bankFunc = bankFunc;
+ return NULL;
+}
+
+void PMAPI VF_exit(void)
+{
+}
diff --git a/board/MAI/bios_emulator/scitech/src/pm/beos/ztimer.c b/board/MAI/bios_emulator/scitech/src/pm/beos/ztimer.c
new file mode 100644
index 00000000000..a5637a5ecf6
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/pm/beos/ztimer.c
@@ -0,0 +1,111 @@
+/****************************************************************************
+*
+* Ultra Long Period Timer
+*
+* ========================================================================
+*
+* The contents of this file are subject to the SciTech MGL Public
+* License Version 1.0 (the "License"); you may not use this file
+* except in compliance with the License. You may obtain a copy of
+* the License at http://www.scitechsoft.com/mgl-license.txt
+*
+* Software distributed under the License is distributed on an
+* "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+* implied. See the License for the specific language governing
+* rights and limitations under the License.
+*
+* The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+*
+* The Initial Developer of the Original Code is SciTech Software, Inc.
+* All Rights Reserved.
+*
+* ========================================================================
+*
+* Language: ANSI C
+* Environment: *** TODO: ADD YOUR OS ENVIRONMENT NAME HERE ***
+*
+* Description: OS specific implementation for the Zen Timer functions.
+*
+****************************************************************************/
+
+/*----------------------------- Implementation ----------------------------*/
+
+/****************************************************************************
+REMARKS:
+Initialise the Zen Timer module internals.
+****************************************************************************/
+void _ZTimerInit(void)
+{
+ // TODO: Do any specific internal initialisation in here
+}
+
+/****************************************************************************
+REMARKS:
+Start the Zen Timer counting.
+****************************************************************************/
+static void _LZTimerOn(
+ LZTimerObject *tm)
+{
+ // TODO: Start the Zen Timer counting. This should be a macro if
+ // possible.
+}
+
+/****************************************************************************
+REMARKS:
+Compute the lap time since the timer was started.
+****************************************************************************/
+static ulong _LZTimerLap(
+ LZTimerObject *tm)
+{
+ // TODO: Compute the lap time between the current time and when the
+ // timer was started.
+ return 0;
+}
+
+/****************************************************************************
+REMARKS:
+Stop the Zen Timer counting.
+****************************************************************************/
+static void _LZTimerOff(
+ LZTimerObject *tm)
+{
+ // TODO: Stop the timer counting. Should be a macro if possible.
+}
+
+/****************************************************************************
+REMARKS:
+Compute the elapsed time in microseconds between start and end timings.
+****************************************************************************/
+static ulong _LZTimerCount(
+ LZTimerObject *tm)
+{
+ // TODO: Compute the elapsed time and return it. Always microseconds.
+ return 0;
+}
+
+/****************************************************************************
+REMARKS:
+Define the resolution of the long period timer as microseconds per timer tick.
+****************************************************************************/
+#define ULZTIMER_RESOLUTION 1
+
+/****************************************************************************
+REMARKS:
+Read the Long Period timer from the OS
+****************************************************************************/
+static ulong _ULZReadTime(void)
+{
+ // TODO: Read the long period timer from the OS. The resolution of this
+ // timer should be around 1/20 of a second for timing long
+ // periods if possible.
+}
+
+/****************************************************************************
+REMARKS:
+Compute the elapsed time from the BIOS timer tick. Note that we check to see
+whether a midnight boundary has passed, and if so adjust the finish time to
+account for this. We cannot detect if more that one midnight boundary has
+passed, so if this happens we will be generating erronous results.
+****************************************************************************/
+ulong _ULZElapsedTime(ulong start,ulong finish)
+{ return finish - start; }
diff --git a/board/MAI/bios_emulator/scitech/src/pm/codepage/us_eng.c b/board/MAI/bios_emulator/scitech/src/pm/codepage/us_eng.c
new file mode 100644
index 00000000000..9aa871423e9
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/pm/codepage/us_eng.c
@@ -0,0 +1,285 @@
+/****************************************************************************
+*
+* SciTech OS Portability Manager Library
+*
+* ========================================================================
+*
+* The contents of this file are subject to the SciTech MGL Public
+* License Version 1.0 (the "License"); you may not use this file
+* except in compliance with the License. You may obtain a copy of
+* the License at http://www.scitechsoft.com/mgl-license.txt
+*
+* Software distributed under the License is distributed on an
+* "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+* implied. See the License for the specific language governing
+* rights and limitations under the License.
+*
+* The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+*
+* The Initial Developer of the Original Code is SciTech Software, Inc.
+* All Rights Reserved.
+*
+* ========================================================================
+*
+* Language: ANSI C
+* Environment: Any
+*
+* Description: Keyboard translation code pages for US English keyboards.
+*
+****************************************************************************/
+
+#include "event.h"
+
+/*--------------------------- Global variables ----------------------------*/
+
+/* This table is used for all normal key translations, and is the fallback
+ * table if the key is not found in any of the other translation tables.
+ * If the code is not found in this table, the ASCII code is set to 0 to
+ * indicate that there is no ASCII code equivalent for this key.
+ */
+static codepage_entry_t US_normal[] = {
+ {0x01, 0x1B},
+ {0x02, '1'},
+ {0x03, '2'},
+ {0x04, '3'},
+ {0x05, '4'},
+ {0x06, '5'},
+ {0x07, '6'},
+ {0x08, '7'},
+ {0x09, '8'},
+ {0x0A, '9'},
+ {0x0B, '0'},
+ {0x0C, '-'},
+ {0x0D, '='},
+ {0x0E, 0x08},
+ {0x0F, 0x09},
+ {0x10, 'q'},
+ {0x11, 'w'},
+ {0x12, 'e'},
+ {0x13, 'r'},
+ {0x14, 't'},
+ {0x15, 'y'},
+ {0x16, 'u'},
+ {0x17, 'i'},
+ {0x18, 'o'},
+ {0x19, 'p'},
+ {0x1A, '['},
+ {0x1B, ']'},
+ {0x1C, 0x0D},
+ {0x1E, 'a'},
+ {0x1F, 's'},
+ {0x20, 'd'},
+ {0x21, 'f'},
+ {0x22, 'g'},
+ {0x23, 'h'},
+ {0x24, 'j'},
+ {0x25, 'k'},
+ {0x26, 'l'},
+ {0x27, ';'},
+ {0x28, '\''},
+ {0x29, '`'},
+ {0x2B, '\\'},
+ {0x2C, 'z'},
+ {0x2D, 'x'},
+ {0x2E, 'c'},
+ {0x2F, 'v'},
+ {0x30, 'b'},
+ {0x31, 'n'},
+ {0x32, 'm'},
+ {0x33, ','},
+ {0x34, '.'},
+ {0x35, '/'},
+ {0x37, '*'}, /* Keypad */
+ {0x39, ' '},
+ {0x4A, '-'}, /* Keypad */
+ {0x4E, '+'}, /* Keypad */
+ {0x60, 0x0D}, /* Keypad */
+ {0x61, '/'}, /* Keypad */
+ };
+
+/* This table is used for when CAPSLOCK is active and the shift or ctrl
+ * keys are not down. If the code is not found in this table, the normal
+ * table above is then searched.
+ */
+static codepage_entry_t US_caps[] = {
+ {0x10, 'Q'},
+ {0x11, 'W'},
+ {0x12, 'E'},
+ {0x13, 'R'},
+ {0x14, 'T'},
+ {0x15, 'Y'},
+ {0x16, 'U'},
+ {0x17, 'I'},
+ {0x18, 'O'},
+ {0x19, 'P'},
+ {0x1E, 'A'},
+ {0x1F, 'S'},
+ {0x20, 'D'},
+ {0x21, 'F'},
+ {0x22, 'G'},
+ {0x23, 'H'},
+ {0x24, 'J'},
+ {0x25, 'K'},
+ {0x26, 'L'},
+ {0x2C, 'Z'},
+ {0x2D, 'X'},
+ {0x2E, 'C'},
+ {0x2F, 'V'},
+ {0x30, 'B'},
+ {0x31, 'N'},
+ {0x32, 'M'},
+ };
+
+/* This table is used for when shift key is down, but the ctrl key is not
+ * down and CAPSLOCK is not active. If the code is not found in this table,
+ * the normal table above is then searched.
+ */
+static codepage_entry_t US_shift[] = {
+ {0x02, '!'},
+ {0x03, '@'},
+ {0x04, '#'},
+ {0x05, '$'},
+ {0x06, '%'},
+ {0x07, '^'},
+ {0x08, '&'},
+ {0x09, '*'},
+ {0x0A, '('},
+ {0x0B, ')'},
+ {0x0C, '_'},
+ {0x0D, '+'},
+ {0x10, 'Q'},
+ {0x11, 'W'},
+ {0x12, 'E'},
+ {0x13, 'R'},
+ {0x14, 'T'},
+ {0x15, 'Y'},
+ {0x16, 'U'},
+ {0x17, 'I'},
+ {0x18, 'O'},
+ {0x19, 'P'},
+ {0x1A, '{'},
+ {0x1B, '}'},
+ {0x1E, 'A'},
+ {0x1F, 'S'},
+ {0x20, 'D'},
+ {0x21, 'F'},
+ {0x22, 'G'},
+ {0x23, 'H'},
+ {0x24, 'J'},
+ {0x25, 'K'},
+ {0x26, 'L'},
+ {0x27, ':'},
+ {0x28, '"'},
+ {0x29, '~'},
+ {0x2B, '|'},
+ {0x2C, 'Z'},
+ {0x2D, 'X'},
+ {0x2E, 'C'},
+ {0x2F, 'V'},
+ {0x30, 'B'},
+ {0x31, 'N'},
+ {0x32, 'M'},
+ {0x33, '<'},
+ {0x34, '>'},
+ {0x35, '?'},
+ };
+
+/* This table is used for when CAPSLOCK is active and the shift key is
+ * down, but the ctrl key is not. If the code is not found in this table,
+ * the shift table above is then searched.
+ */
+static codepage_entry_t US_shiftCaps[] = {
+ {0x10, 'q'},
+ {0x11, 'w'},
+ {0x12, 'e'},
+ {0x13, 'r'},
+ {0x14, 't'},
+ {0x15, 'y'},
+ {0x16, 'u'},
+ {0x17, 'i'},
+ {0x18, 'o'},
+ {0x19, 'p'},
+ {0x1E, 'a'},
+ {0x1F, 's'},
+ {0x20, 'd'},
+ {0x21, 'f'},
+ {0x22, 'g'},
+ {0x23, 'h'},
+ {0x24, 'j'},
+ {0x25, 'k'},
+ {0x26, 'l'},
+ {0x2C, 'z'},
+ {0x2D, 'x'},
+ {0x2E, 'c'},
+ {0x2F, 'v'},
+ {0x30, 'b'},
+ {0x31, 'n'},
+ {0x32, 'm'},
+ };
+
+/* This table is used for all key translations when the ctrl key is down,
+ * regardless of the state of the shift key and CAPSLOCK. If the code is
+ * not found in this table, the ASCII code is set to 0 to indicate that
+ * there is no ASCII code equivalent for this key.
+ */
+static codepage_entry_t US_ctrl[] = {
+ {0x01, 0x1B},
+ {0x06, 0x1E},
+ {0x0C, 0x1F},
+ {0x0E, 0x7F},
+ {0x10, 0x11},
+ {0x11, 0x17},
+ {0x12, 0x05},
+ {0x13, 0x12},
+ {0x14, 0x14},
+ {0x15, 0x19},
+ {0x16, 0x16},
+ {0x17, 0x09},
+ {0x18, 0x0F},
+ {0x19, 0x10},
+ {0x1A, 0x1B},
+ {0x1B, 0x1D},
+ {0x1C, 0x0A},
+ {0x1E, 0x01},
+ {0x1F, 0x13},
+ {0x20, 0x04},
+ {0x21, 0x06},
+ {0x22, 0x07},
+ {0x23, 0x08},
+ {0x24, 0x0A},
+ {0x25, 0x0B},
+ {0x26, 0x0C},
+ {0x2B, 0x1C},
+ {0x2C, 0x1A},
+ {0x2D, 0x18},
+ {0x2E, 0x03},
+ {0x2F, 0x16},
+ {0x30, 0x02},
+ {0x31, 0x0E},
+ {0x32, 0x0D},
+ {0x39, ' '},
+ };
+
+static codepage_entry_t US_numPad[] = {
+ {0x4C, '5'},
+ {0x62, '4'},
+ {0x63, '6'},
+ {0x64, '8'},
+ {0x65, '2'},
+ {0x66, '0'},
+ {0x67, '.'},
+ {0x68, '7'},
+ {0x69, '1'},
+ {0x6A, '9'},
+ {0x6B, '3'},
+ };
+
+codepage_t _CP_US_English = {
+ "US English",
+ US_normal, EVT_ARR_SIZE(US_normal),
+ US_caps, EVT_ARR_SIZE(US_caps),
+ US_shift, EVT_ARR_SIZE(US_shift),
+ US_shiftCaps, EVT_ARR_SIZE(US_shiftCaps),
+ US_ctrl, EVT_ARR_SIZE(US_ctrl),
+ US_numPad, EVT_ARR_SIZE(US_numPad),
+ };
diff --git a/board/MAI/bios_emulator/scitech/src/pm/common.c b/board/MAI/bios_emulator/scitech/src/pm/common.c
new file mode 100644
index 00000000000..b100b8ad42e
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/pm/common.c
@@ -0,0 +1,480 @@
+/****************************************************************************
+*
+* SciTech OS Portability Manager Library
+*
+* ========================================================================
+*
+* The contents of this file are subject to the SciTech MGL Public
+* License Version 1.0 (the "License"); you may not use this file
+* except in compliance with the License. You may obtain a copy of
+* the License at http://www.scitechsoft.com/mgl-license.txt
+*
+* Software distributed under the License is distributed on an
+* "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+* implied. See the License for the specific language governing
+* rights and limitations under the License.
+*
+* The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+*
+* The Initial Developer of the Original Code is SciTech Software, Inc.
+* All Rights Reserved.
+*
+* ========================================================================
+*
+* Language: ANSI C
+* Environment: Any
+*
+* Description: Module containing code common to all platforms.
+*
+****************************************************************************/
+
+#include "pmapi.h"
+#include "drvlib/os/os.h"
+#if defined(__WIN32_VXD__) || defined(__OS2_VDD__) || defined(__NT_DRIVER__)
+#include "sdd/sddhelp.h"
+#else
+#include <stdio.h>
+#include <stdlib.h>
+#include <string.h>
+#endif
+
+/*---------------------------- Global variables ---------------------------*/
+
+/* {secret} */
+long _VARAPI ___drv_os_type = _OS_UNSUPPORTED;
+static char localBPDPath[PM_MAX_PATH] = "";
+
+/*----------------------------- Implementation ----------------------------*/
+
+/****************************************************************************
+PARAMETERS:
+path - Local path to the Nucleus BPD driver files.
+
+REMARKS:
+This function is used by the application program to override the location
+of the Nucleus driver files that are loaded. Normally the loader code
+will look in the system Nucleus directories first, then in the 'drivers'
+directory relative to the current working directory, and finally relative
+to the MGL_ROOT environment variable. By default the local BPD path is
+always set to the current directory if not initialised.
+****************************************************************************/
+void PMAPI PM_setLocalBPDPath(
+ const char *path)
+{
+ PM_init();
+ strncpy(localBPDPath,path,sizeof(localBPDPath));
+ localBPDPath[sizeof(localBPDPath)-1] = 0;
+}
+
+/****************************************************************************
+PARAMETERS:
+bpdpath - Place to store the actual path to the file
+cachedpath - Place to store the cached BPD driver path
+trypath - Path to try to find the BPD file in
+subpath - Optional sub path to append to trypath
+dllname - Name of the Binary Portable DLL to load
+
+RETURNS:
+True if found, false if not.
+
+REMARKS:
+Trys the specified path to see if the BPD file can be found or not. If so,
+the path used is returned in bpdpath and cachedpath.
+****************************************************************************/
+static ibool TryPath(
+ char *bpdpath,
+ char *cachedpath,
+ const char *trypath,
+ const char *subpath,
+ const char *dllname)
+{
+ char filename[256];
+ FILE *f;
+
+ strcpy(bpdpath, trypath);
+ PM_backslash(bpdpath);
+ strcat(bpdpath,subpath);
+ PM_backslash(bpdpath);
+ strcpy(filename,bpdpath);
+ strcat(filename,dllname);
+ if ((f = fopen(filename,"rb")) == NULL)
+ return false;
+ if (cachedpath)
+ strcpy(cachedpath,bpdpath);
+ fclose(f);
+ return true;
+}
+
+/****************************************************************************
+RETURNS:
+True if local override enabled, false if not.
+
+REMARKS:
+Tests to see if the local override option is enabled, and if so it will
+look for the Nucleus drivers in the local application directories in
+preference to the Nucleus system directories.
+****************************************************************************/
+static ibool GetLocalOverride(void)
+{
+ char filename[256];
+ FILE *f;
+ static ibool local_override = -1;
+
+ if (local_override == -1) {
+ local_override = false;
+ strcpy(filename,PM_getNucleusPath());
+ PM_backslash(filename);
+ strcat(filename,"graphics.ini");
+ if ((f = fopen(filename,"r")) != NULL) {
+ while (!feof(f) && fgets(filename,sizeof(filename),f)) {
+ if (strnicmp(filename,"uselocal",8) == 0) {
+ local_override = ((*(filename+9) - '0') == 1);
+ break;
+ }
+ }
+ fclose(f);
+ }
+ }
+ return local_override;
+}
+
+/****************************************************************************
+DESCRIPTION:
+Sets the location of the debug log file.
+
+HEADER:
+pmapi.h
+
+PARAMETERS:
+dllname - Name of the Binary Portable DLL to load
+bpdpath - Place to store the actual path to the file
+
+RETURNS:
+True if found, false if not.
+
+REMARKS:
+Finds the location of a specific Binary Portable DLL, by searching all
+the standard SciTech Nucleus driver locations.
+****************************************************************************/
+ibool PMAPI PM_findBPD(
+ const char *dllname,
+ char *bpdpath)
+{
+ static char cachedpath[PM_MAX_PATH] = "";
+
+ /* On the first call determine the path to the Nucleus drivers */
+ if (cachedpath[0] == 0) {
+ /* First try in the global system Nucleus driver path if
+ * the local override setting is not enabled.
+ */
+ PM_init();
+ if (!GetLocalOverride()) {
+ if (TryPath(bpdpath,cachedpath,PM_getNucleusPath(),"",dllname))
+ return true;
+ }
+
+ /* Next try in the local application directory if available */
+ if (localBPDPath[0] != 0) {
+ if (TryPath(bpdpath,cachedpath,localBPDPath,"",dllname))
+ return true;
+ }
+ else {
+#if !defined(__WIN32_VXD__) && !defined(__NT_DRIVER__)
+ char *mgl_root;
+ if ((mgl_root = getenv("MGL_ROOT")) != NULL) {
+ if (TryPath(bpdpath,cachedpath,mgl_root,"drivers",dllname))
+ return true;
+ }
+#endif
+ PM_getCurrentPath(bpdpath,PM_MAX_PATH);
+ if (TryPath(bpdpath,cachedpath,bpdpath,"drivers",dllname))
+ return true;
+ }
+
+ /* Finally try in the global system path again so that we
+ * will still find the drivers in the global system path if
+ * the local override option is on, but the application does
+ * not have any local override drivers.
+ */
+ if (TryPath(bpdpath,cachedpath,PM_getNucleusPath(),"",dllname))
+ return true;
+
+ /* Whoops, we can't find the BPD file! */
+ return false;
+ }
+
+ /* Always try in the previously discovered path */
+ return TryPath(bpdpath,NULL,cachedpath,"",dllname);
+}
+
+/****************************************************************************
+REMARKS:
+Copies a string into another, and returns dest + strlen(src).
+****************************************************************************/
+static char *_stpcpy(
+ char *_dest,
+ const char *_src)
+{
+ if (!_dest || !_src)
+ return 0;
+ while ((*_dest++ = *_src++) != 0)
+ ;
+ return --_dest;
+}
+
+/****************************************************************************
+REMARKS:
+Copies a string into another, stopping at the maximum length. The string
+is properly terminated (unlike strncpy).
+****************************************************************************/
+static void safe_strncpy(
+ char *dst,
+ const char *src,
+ unsigned maxlen)
+{
+ if (dst) {
+ if(strlen(src) >= maxlen) {
+ strncpy(dst, src, maxlen);
+ dst[maxlen] = 0;
+ }
+ else
+ strcpy(dst, src);
+ }
+}
+
+/****************************************************************************
+REMARKS:
+Determins if the dot separator is present in the string.
+****************************************************************************/
+static int findDot(
+ char *p)
+{
+ if (*(p-1) == '.')
+ p--;
+ switch (*--p) {
+ case ':':
+ if (*(p-2) != '\0')
+ break;
+ case '/':
+ case '\\':
+ case '\0':
+ return true;
+ }
+ return false;
+}
+
+/****************************************************************************
+DESCRIPTION:
+Make a full pathname from split components.
+
+HEADER:
+pmapi.h
+
+PARAMETERS:
+path - Place to store full path
+drive - Drive component for path
+dir - Directory component for path
+name - Filename component for path
+ext - Extension component for path
+
+REMARKS:
+Function to make a full pathname from split components. Under Unix the
+drive component will usually be empty. If the drive, dir, name, or ext
+parameters are null or empty, they are not inserted in the path string.
+Otherwise, if the drive doesn't end with a colon, one is inserted in the
+path. If the dir doesn't end in a slash, one is inserted in the path.
+If the ext doesn't start with a dot, one is inserted in the path.
+
+The maximum sizes for the path string is given by the constant PM_MAX_PATH,
+which includes space for the null-terminator.
+
+SEE ALSO:
+PM_splitPath
+****************************************************************************/
+void PMAPI PM_makepath(
+ char *path,
+ const char *drive,
+ const char *dir,
+ const char *name,
+ const char *ext)
+{
+ if (drive && *drive) {
+ *path++ = *drive;
+ *path++ = ':';
+ }
+ if (dir && *dir) {
+ path = _stpcpy(path,dir);
+ if (*(path-1) != '\\' && *(path-1) != '/')
+#ifdef __UNIX__
+ *path++ = '/';
+#else
+ *path++ = '\\';
+#endif
+ }
+ if (name)
+ path = _stpcpy(path,name);
+ if (ext && *ext) {
+ if (*ext != '.')
+ *path++ = '.';
+ path = _stpcpy(path,ext);
+ }
+ *path = 0;
+}
+
+/****************************************************************************
+DESCRIPTION:
+Split a full pathname into components.
+
+HEADER:
+pmapi.h
+
+PARAMETERS:
+path - Full path to split
+drive - Drive component for path
+dir - Directory component for path
+name - Filename component for path
+ext - Extension component for path
+
+RETURNS:
+Flags indicating what components were parsed.
+
+REMARKS:
+Function to split a full pathmame into separate components in the form
+
+ X:\DIR\SUBDIR\NAME.EXT
+
+and splits path into its four components. It then stores those components
+in the strings pointed to by drive, dir, name and ext. (Each component is
+required but can be a NULL, which means the corresponding component will be
+parsed but not stored).
+
+The maximum sizes for these strings are given by the constants PM_MAX_DRIVE
+and PM_MAX_PATH. PM_MAX_DRIVE is always 4, and PM_MAX_PATH is usually at
+least 256 characters. Under Unix the dir, name and ext components may be
+up to the full path in length.
+
+SEE ALSO:
+PM_makePath
+****************************************************************************/
+int PMAPI PM_splitpath(
+ const char *path,
+ char *drive,
+ char *dir,
+ char *name,
+ char *ext)
+{
+ char *p;
+ int temp,ret;
+ char buf[PM_MAX_PATH+2];
+
+ /* Set all string to default value zero */
+ ret = 0;
+ if (drive) *drive = 0;
+ if (dir) *dir = 0;
+ if (name) *name = 0;
+ if (ext) *ext = 0;
+
+ /* Copy filename into template up to PM_MAX_PATH characters */
+ p = buf;
+ if ((temp = strlen(path)) > PM_MAX_PATH)
+ temp = PM_MAX_PATH;
+ *p++ = 0;
+ strncpy(p, path, temp);
+ *(p += temp) = 0;
+
+ /* Split the filename and fill corresponding nonzero pointers */
+ temp = 0;
+ for (;;) {
+ switch (*--p) {
+ case '.':
+ if (!temp && (*(p+1) == '\0'))
+ temp = findDot(p);
+ if ((!temp) && ((ret & PM_HAS_EXTENSION) == 0)) {
+ ret |= PM_HAS_EXTENSION;
+ safe_strncpy(ext, p, PM_MAX_PATH - 1);
+ *p = 0;
+ }
+ continue;
+ case ':':
+ if (p != &buf[2])
+ continue;
+ case '\0':
+ if (temp) {
+ if (*++p)
+ ret |= PM_HAS_DIRECTORY;
+ safe_strncpy(dir, p, PM_MAX_PATH - 1);
+ *p-- = 0;
+ break;
+ }
+ case '/':
+ case '\\':
+ if (!temp) {
+ temp++;
+ if (*++p)
+ ret |= PM_HAS_FILENAME;
+ safe_strncpy(name, p, PM_MAX_PATH - 1);
+ *p-- = 0;
+ if (*p == 0 || (*p == ':' && p == &buf[2]))
+ break;
+ }
+ continue;
+ case '*':
+ case '?':
+ if (!temp)
+ ret |= PM_HAS_WILDCARDS;
+ default:
+ continue;
+ }
+ break;
+ }
+ if (*p == ':') {
+ if (buf[1])
+ ret |= PM_HAS_DRIVE;
+ safe_strncpy(drive, &buf[1], PM_MAX_DRIVE - 1);
+ }
+ return ret;
+}
+
+/****************************************************************************
+DESCRIPTION:
+Block until a specific time has elapsed since the last call
+
+HEADER:
+pmapi.h
+
+PARAMETERS:
+milliseconds - Number of milliseconds for delay
+
+REMARKS:
+This function will block the calling thread or process until the specified
+number of milliseconds have passed since the /last/ call to this function.
+The first time this function is called, it will return immediately. On
+subsquent calls it will block until the specified time has elapsed, or it
+will return immediately if the time has already elapsed.
+
+This function is useful to provide constant time functionality in a
+program, such as a frame rate limiter for graphics applications etc.
+
+SEE ALSO:
+PM_sleep
+****************************************************************************/
+void PMAPI PM_blockUntilTimeout(
+ ulong milliseconds)
+{
+ ulong microseconds = milliseconds * 1000L,msDelay;
+ static LZTimerObject tm;
+ static ibool firstTime = true;
+
+ if (firstTime) {
+ firstTime = false;
+ LZTimerOnExt(&tm);
+ }
+ else {
+ if ((msDelay = (microseconds - LZTimerLapExt(&tm)) / 1000L) > 0)
+ PM_sleep(msDelay);
+ while (LZTimerLapExt(&tm) < microseconds)
+ ;
+ LZTimerOffExt(&tm);
+ LZTimerOnExt(&tm);
+ }
+}
diff --git a/board/MAI/bios_emulator/scitech/src/pm/common/_cpuinfo.asm b/board/MAI/bios_emulator/scitech/src/pm/common/_cpuinfo.asm
new file mode 100644
index 00000000000..60ebed713ff
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/pm/common/_cpuinfo.asm
@@ -0,0 +1,600 @@
+;****************************************************************************
+;*
+;* SciTech OS Portability Manager Library
+;*
+;* ========================================================================
+;*
+;* The contents of this file are subject to the SciTech MGL Public
+;* License Version 1.0 (the "License"); you may not use this file
+;* except in compliance with the License. You may obtain a copy of
+;* the License at http://www.scitechsoft.com/mgl-license.txt
+;*
+;* Software distributed under the License is distributed on an
+;* "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+;* implied. See the License for the specific language governing
+;* rights and limitations under the License.
+;*
+;* The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+;*
+;* The Initial Developer of the Original Code is SciTech Software, Inc.
+;* All Rights Reserved.
+;*
+;* ========================================================================
+;*
+;* Language: NASM or TASM Assembler
+;* Environment: Intel 32 bit Protected Mode.
+;*
+;* Description: Code to determine the Intel processor type.
+;*
+;****************************************************************************
+
+ IDEAL
+
+include "scitech.mac"
+
+header _cpuinfo
+
+begdataseg _cpuinfo ; Start of data segment
+
+cache_id db "01234567890123456"
+intel_id db "GenuineIntel" ; Intel vendor ID
+cyrix_id db "CyrixInstead" ; Cyrix vendor ID
+amd_id db "AuthenticAMD" ; AMD vendor ID
+idt_id db "CentaurHauls" ; IDT vendor ID
+
+CPU_IDT EQU 01000h ; Flag for IDT processors
+CPU_Cyrix EQU 02000h ; Flag for Cyrix processors
+CPU_AMD EQU 04000h ; Flag for AMD processors
+CPU_Intel EQU 08000h ; Flag for Intel processors
+
+enddataseg _cpuinfo
+
+begcodeseg _cpuinfo ; Start of code segment
+
+ifdef USE_NASM
+%macro mCPU_ID 0
+db 00Fh,0A2h
+%endmacro
+else
+MACRO mCPU_ID
+db 00Fh,0A2h
+ENDM
+endif
+
+ifdef USE_NASM
+%macro mRDTSC 0
+db 00Fh,031h
+%endmacro
+else
+MACRO mRDTSC
+db 00Fh,031h
+ENDM
+endif
+
+;----------------------------------------------------------------------------
+; bool _CPU_check80386(void)
+;----------------------------------------------------------------------------
+; Determines if we have an i386 processor.
+;----------------------------------------------------------------------------
+cprocstart _CPU_check80386
+
+ enter_c
+
+ xor edx,edx ; EDX = 0, not an 80386
+ mov bx, sp
+ifdef USE_NASM
+ and sp, ~3
+else
+ and sp, not 3
+endif
+ pushfd ; Push original EFLAGS
+ pop eax ; Get original EFLAGS
+ mov ecx, eax ; Save original EFLAGS
+ xor eax, 40000h ; Flip AC bit in EFLAGS
+ push eax ; Save new EFLAGS value on
+ ; stack
+ popfd ; Replace current EFLAGS value
+ pushfd ; Get new EFLAGS
+ pop eax ; Store new EFLAGS in EAX
+ xor eax, ecx ; Can't toggle AC bit,
+ ; processor=80386
+ jnz @@Done ; Jump if not an 80386 processor
+ inc edx ; We have an 80386
+
+@@Done: push ecx
+ popfd
+ mov sp, bx
+ mov eax, edx
+ leave_c
+ ret
+
+cprocend
+
+;----------------------------------------------------------------------------
+; bool _CPU_check80486(void)
+;----------------------------------------------------------------------------
+; Determines if we have an i486 processor.
+;----------------------------------------------------------------------------
+cprocstart _CPU_check80486
+
+ enter_c
+
+; Distinguish between the i486 and Pentium by the ability to set the ID flag
+; in the EFLAGS register. If the ID flag is set, then we can use the CPUID
+; instruction to determine the final version of the chip. Otherwise we
+; simply have an 80486.
+
+; Distinguish between the i486 and Pentium by the ability to set the ID flag
+; in the EFLAGS register. If the ID flag is set, then we can use the CPUID
+; instruction to determine the final version of the chip. Otherwise we
+; simply have an 80486.
+
+ pushfd ; Get original EFLAGS
+ pop eax
+ mov ecx, eax
+ xor eax, 200000h ; Flip ID bit in EFLAGS
+ push eax ; Save new EFLAGS value on stack
+ popfd ; Replace current EFLAGS value
+ pushfd ; Get new EFLAGS
+ pop eax ; Store new EFLAGS in EAX
+ xor eax, ecx ; Can not toggle ID bit,
+ jnz @@1 ; Processor=80486
+ mov eax,1 ; We dont have a Pentium
+ jmp @@Done
+@@1: mov eax,0 ; We have Pentium or later
+@@Done: leave_c
+ ret
+
+cprocend
+
+;----------------------------------------------------------------------------
+; bool _CPU_checkClone(void)
+;----------------------------------------------------------------------------
+; Checks if the i386 or i486 processor is a clone or genuine Intel.
+;----------------------------------------------------------------------------
+cprocstart _CPU_checkClone
+
+ enter_c
+
+ mov ax,5555h ; Check to make sure this is a 32-bit processor
+ xor dx,dx
+ mov cx,2h
+ div cx ; Perform Division
+ clc
+ jnz @@NoClone
+ jmp @@Clone
+@@NoClone:
+ stc
+@@Clone:
+ pushfd
+ pop eax ; Get the flags
+ and eax,1
+ xor eax,1 ; EAX=0 is probably Intel, EAX=1 is a Clone
+
+ leave_c
+ ret
+
+cprocend
+
+;----------------------------------------------------------------------------
+; bool _CPU_haveCPUID(void)
+;----------------------------------------------------------------------------
+; Determines if we have support for the CPUID instruction.
+;----------------------------------------------------------------------------
+cprocstart _CPU_haveCPUID
+
+ enter_c
+
+ifdef flatmodel
+ pushfd ; Get original EFLAGS
+ pop eax
+ mov ecx, eax
+ xor eax, 200000h ; Flip ID bit in EFLAGS
+ push eax ; Save new EFLAGS value on stack
+ popfd ; Replace current EFLAGS value
+ pushfd ; Get new EFLAGS
+ pop eax ; Store new EFLAGS in EAX
+ xor eax, ecx ; Can not toggle ID bit,
+ jnz @@1 ; Processor=80486
+ mov eax,0 ; We dont have CPUID support
+ jmp @@Done
+@@1: mov eax,1 ; We have CPUID support
+else
+ mov eax,0 ; CPUID requires 32-bit pmode
+endif
+@@Done: leave_c
+ ret
+
+cprocend
+
+;----------------------------------------------------------------------------
+; uint _CPU_checkCPUID(void)
+;----------------------------------------------------------------------------
+; Determines the CPU type using the CPUID instruction.
+;----------------------------------------------------------------------------
+cprocstart _CPU_checkCPUID
+
+ enter_c
+
+ xor eax, eax ; Set up for CPUID instruction
+ mCPU_ID ; Get and save vendor ID
+ cmp eax, 1 ; Make sure 1 is valid input for CPUID
+ jl @@Fail ; We dont have the CPUID instruction
+ xor eax,eax ; Assume vendor is unknown
+
+; Check for GenuineIntel processors
+
+ LEA_L esi,intel_id
+ cmp [DWORD esi], ebx
+ jne @@NotIntel
+ cmp [DWORD esi+4], edx
+ jne @@NotIntel
+ cmp [DWORD esi+8], ecx
+ jne @@NotIntel
+ mov eax,CPU_Intel ; Flag that we have GenuineIntel
+ jmp @@FoundVendor
+
+; Check for CyrixInstead processors
+
+@@NotIntel:
+ LEA_L esi,cyrix_id
+ cmp [DWORD esi], ebx
+ jne @@NotCyrix
+ cmp [DWORD esi+4], edx
+ jne @@NotCyrix
+ cmp [DWORD esi+8], ecx
+ jne @@NotCyrix
+ mov eax,CPU_Cyrix ; Flag that we have CyrixInstead
+ jmp @@FoundVendor
+
+; Check for AuthenticAMD processors
+
+@@NotCyrix:
+ LEA_L esi,amd_id
+ cmp [DWORD esi], ebx
+ jne @@NotAMD
+ cmp [DWORD esi+4], edx
+ jne @@NotAMD
+ cmp [DWORD esi+8], ecx
+ jne @@NotAMD
+ mov eax,CPU_AMD ; Flag that we have AuthenticAMD
+ jmp @@FoundVendor
+
+; Check for CentaurHauls processors
+
+@@NotAMD:
+ LEA_L esi,idt_id
+ cmp [DWORD esi], ebx
+ jne @@NotIDT
+ cmp [DWORD esi+4], edx
+ jne @@NotIDT
+ cmp [DWORD esi+8], ecx
+ jne @@NotIDT
+ mov eax,CPU_IDT ; Flag that we have AuthenticIDT
+ jmp @@FoundVendor
+
+@@NotIDT:
+
+@@FoundVendor:
+ push eax
+ xor eax, eax
+ inc eax
+ mCPU_ID ; Get family/model/stepping/features
+ and eax, 0F00h
+ shr eax, 8 ; Isolate family
+ and eax, 0Fh
+ pop ecx
+ or eax,ecx ; Combine in the clone flag
+@@Done: leave_c
+ ret
+
+@@Fail: xor eax,eax
+ jmp @@Done
+
+cprocend
+
+;----------------------------------------------------------------------------
+; uint _CPU_getCPUIDModel(void)
+;----------------------------------------------------------------------------
+; Determines the CPU type using the CPUID instruction.
+;----------------------------------------------------------------------------
+cprocstart _CPU_getCPUIDModel
+
+ enter_c
+
+ xor eax, eax ; Set up for CPUID instruction
+ mCPU_ID ; Get and save vendor ID
+ cmp eax, 1 ; Make sure 1 is valid input for CPUID
+ jl @@Fail ; We dont have the CPUID instruction
+ xor eax, eax
+ inc eax
+ mCPU_ID ; Get family/model/stepping/features
+ and eax, 0F0h
+ shr eax, 4 ; Isolate model
+@@Done: leave_c
+ ret
+
+@@Fail: xor eax,eax
+ jmp @@Done
+
+cprocend
+
+;----------------------------------------------------------------------------
+; uint _CPU_getCPUIDStepping(void)
+;----------------------------------------------------------------------------
+; Determines the CPU type using the CPUID instruction.
+;----------------------------------------------------------------------------
+cprocstart _CPU_getCPUIDStepping
+
+ enter_c
+
+ xor eax, eax ; Set up for CPUID instruction
+ mCPU_ID ; Get and save vendor ID
+ cmp eax, 1 ; Make sure 1 is valid input for CPUID
+ jl @@Fail ; We dont have the CPUID instruction
+ xor eax, eax
+ inc eax
+ mCPU_ID ; Get family/model/stepping/features
+ and eax, 00Fh ; Isolate stepping
+@@Done: leave_c
+ ret
+
+@@Fail: xor eax,eax
+ jmp @@Done
+
+cprocend
+
+;----------------------------------------------------------------------------
+; uint _CPU_getCPUIDFeatures(void)
+;----------------------------------------------------------------------------
+; Determines the CPU type using the CPUID instruction.
+;----------------------------------------------------------------------------
+cprocstart _CPU_getCPUIDFeatures
+
+ enter_c
+
+ xor eax, eax ; Set up for CPUID instruction
+ mCPU_ID ; Get and save vendor ID
+ cmp eax, 1 ; Make sure 1 is valid input for CPUID
+ jl @@Fail ; We dont have the CPUID instruction
+ xor eax, eax
+ inc eax
+ mCPU_ID ; Get family/model/stepping/features
+ mov eax, edx
+@@Done: leave_c
+ ret
+
+@@Fail: xor eax,eax
+ jmp @@Done
+
+cprocend
+
+;----------------------------------------------------------------------------
+; uint _CPU_getCacheSize(void)
+;----------------------------------------------------------------------------
+; Determines the CPU cache size for Intel processors
+;----------------------------------------------------------------------------
+cprocstart _CPU_getCacheSize
+
+ enter_c
+ xor eax, eax ; Set up for CPUID instruction
+ mCPU_ID ; Get and save vendor ID
+ cmp eax,2 ; Make sure 2 is valid input for CPUID
+ jl @@Fail ; We dont have the CPUID instruction
+ mov eax,2
+ mCPU_ID ; Get cache descriptors
+ LEA_L esi,cache_id ; Get address of cache ID (-fPIC aware)
+ shr eax,8
+ mov [esi+0],eax
+ mov [esi+3],ebx
+ mov [esi+7],ecx
+ mov [esi+11],edx
+ xor eax,eax
+ LEA_L esi,cache_id ; Get address of cache ID (-fPIC aware)
+ mov edi,15
+@@ScanLoop:
+ cmp [BYTE esi],41h
+ mov eax,128
+ je @@Done
+ cmp [BYTE esi],42h
+ mov eax,256
+ je @@Done
+ cmp [BYTE esi],43h
+ mov eax,512
+ je @@Done
+ cmp [BYTE esi],44h
+ mov eax,1024
+ je @@Done
+ cmp [BYTE esi],45h
+ mov eax,2048
+ je @@Done
+ inc esi
+ dec edi
+ jnz @@ScanLoop
+
+@@Done: leave_c
+ ret
+
+@@Fail: xor eax,eax
+ jmp @@Done
+
+cprocend
+
+;----------------------------------------------------------------------------
+; uint _CPU_have3DNow(void)
+;----------------------------------------------------------------------------
+; Determines the CPU type using the CPUID instruction.
+;----------------------------------------------------------------------------
+cprocstart _CPU_have3DNow
+
+ enter_c
+
+ mov eax,80000000h ; Query for extended functions
+ mCPU_ID ; Get extended function limit
+ cmp eax,80000001h
+ jbe @@Fail ; Nope, we dont have function 800000001h
+ mov eax,80000001h ; Setup extended function 800000001h
+ mCPU_ID ; and get the information
+ test edx,80000000h ; Bit 31 is set if 3DNow! present
+ jz @@Fail ; Nope, we dont have 3DNow support
+ mov eax,1 ; Yep, we have 3DNow! support!
+@@Done: leave_c
+ ret
+
+@@Fail: xor eax,eax
+ jmp @@Done
+
+cprocend
+
+;----------------------------------------------------------------------------
+; ulong _CPU_quickRDTSC(void)
+;----------------------------------------------------------------------------
+; Reads the time stamp counter and returns the low order 32-bits
+;----------------------------------------------------------------------------
+cprocstart _CPU_quickRDTSC
+
+ mRDTSC
+ ret
+
+cprocend
+
+;----------------------------------------------------------------------------
+; void _CPU_runBSFLoop(ulong interations)
+;----------------------------------------------------------------------------
+; Runs a loop of BSF instructions for the specified number of iterations
+;----------------------------------------------------------------------------
+cprocstart _CPU_runBSFLoop
+
+ ARG iterations:ULONG
+
+ push _bp
+ mov _bp,_sp
+ push _bx
+
+ mov edx,[iterations]
+ mov eax,80000000h
+ mov ebx,edx
+
+ ALIGN 4
+
+@@loop: bsf ecx,eax
+ dec ebx
+ jnz @@loop
+
+ pop _bx
+ pop _bp
+ ret
+
+cprocend
+
+;----------------------------------------------------------------------------
+; void _CPU_readTimeStamp(CPU_largeInteger *time);
+;----------------------------------------------------------------------------
+; Reads the time stamp counter and returns the 64-bit result.
+;----------------------------------------------------------------------------
+cprocstart _CPU_readTimeStamp
+
+ mRDTSC
+ mov ecx,[esp+4] ; Access directly without stack frame
+ mov [ecx],eax
+ mov [ecx+4],edx
+ ret
+
+cprocend
+
+;----------------------------------------------------------------------------
+; ulong _CPU_diffTime64(CPU_largeInteger *t1,CPU_largeInteger *t2,CPU_largeInteger *t)
+;----------------------------------------------------------------------------
+; Computes the difference between two 64-bit numbers.
+;----------------------------------------------------------------------------
+cprocstart _CPU_diffTime64
+
+ ARG t1:DPTR, t2:DPTR, t:DPTR
+
+ enter_c
+
+ mov ecx,[t2]
+ mov eax,[ecx] ; EAX := t2.low
+ mov ecx,[t1]
+ sub eax,[ecx]
+ mov edx,eax ; EDX := low difference
+ mov ecx,[t2]
+ mov eax,[ecx+4] ; ECX := t2.high
+ mov ecx,[t1]
+ sbb eax,[ecx+4] ; EAX := high difference
+
+ mov ebx,[t] ; Store the result
+ mov [ebx],edx ; Store low part
+ mov [ebx+4],eax ; Store high part
+ mov eax,edx ; Return low part
+ifndef flatmodel
+ shld edx,eax,16 ; Return in DX:AX
+endif
+ leave_c
+ ret
+
+cprocend
+
+;----------------------------------------------------------------------------
+; ulong _CPU_calcMicroSec(CPU_largeInteger *count,ulong freq);
+;----------------------------------------------------------------------------
+; Computes the value in microseconds for the elapsed time with maximum
+; precision. The formula we use is:
+;
+; us = (((diff * 0x100000) / freq) * 1000000) / 0x100000)
+;
+; The power of two multiple before the first divide allows us to scale the
+; 64-bit difference using simple shifts, and then the divide brings the
+; final result into the range to fit into a 32-bit integer.
+;----------------------------------------------------------------------------
+cprocstart _CPU_calcMicroSec
+
+ ARG count:DPTR, freq:ULONG
+
+ enter_c
+
+ mov ecx,[count]
+ mov eax,[ecx] ; EAX := low part
+ mov edx,[ecx+4] ; EDX := high part
+ shld edx,eax,20
+ shl eax,20 ; diff * 0x100000
+ div [DWORD freq] ; (diff * 0x100000) / freq
+ mov ecx,1000000
+ xor edx,edx
+ mul ecx ; ((diff * 0x100000) / freq) * 1000000)
+ shrd eax,edx,20 ; ((diff * 0x100000) / freq) * 1000000) / 0x100000
+ifndef flatmodel
+ shld edx,eax,16 ; Return in DX:AX
+endif
+ leave_c
+ ret
+
+cprocend
+
+;----------------------------------------------------------------------------
+; ulong _CPU_mulDiv(ulong a,ulong b,ulong c);
+;----------------------------------------------------------------------------
+; Computes the following with 64-bit integer precision:
+;
+; result = (a * b) / c
+;
+;----------------------------------------------------------------------------
+cprocstart _CPU_mulDiv
+
+ ARG a:ULONG, b:ULONG, c:ULONG
+
+ enter_c
+ mov eax,[a]
+ imul [ULONG b]
+ idiv [ULONG c]
+ifndef flatmodel
+ shld edx,eax,16 ; Return in DX:AX
+endif
+ leave_c
+ ret
+
+cprocend
+
+endcodeseg _cpuinfo
+
+ END
diff --git a/board/MAI/bios_emulator/scitech/src/pm/common/_dma.asm b/board/MAI/bios_emulator/scitech/src/pm/common/_dma.asm
new file mode 100644
index 00000000000..2b6e1e8b561
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/pm/common/_dma.asm
@@ -0,0 +1,246 @@
+;****************************************************************************
+;*
+;* SciTech OS Portability Manager Library
+;*
+;* ========================================================================
+;*
+;* The contents of this file are subject to the SciTech MGL Public
+;* License Version 1.0 (the "License"); you may not use this file
+;* except in compliance with the License. You may obtain a copy of
+;* the License at http://www.scitechsoft.com/mgl-license.txt
+;*
+;* Software distributed under the License is distributed on an
+;* "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+;* implied. See the License for the specific language governing
+;* rights and limitations under the License.
+;*
+;* The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+;*
+;* The Initial Developer of the Original Code is SciTech Software, Inc.
+;* All Rights Reserved.
+;*
+;* ========================================================================
+;*
+;* Language: 80386 Assembler, TASM 4.0 or NASM
+;* Environment: 16/32 bit Ring 0 device driver
+;*
+;* Description: Assembler support routines for ISA DMA controller.
+;*
+;****************************************************************************
+
+ IDEAL
+
+include "scitech.mac" ; Memory model macros
+
+header _dma ; Set up memory model
+
+begdataseg _dma ; Start of data segment
+
+cpublic _PM_DMADataStart
+
+; DMA register I/O addresses for channels 0-7 (except 4)
+
+DMAC_page db 087h,083h,081h,082h, -1,08Bh,089h,08Ah
+DMAC_addr db 000h,002h,004h,006h, -1,0C4h,0C8h,0CCh
+DMAC_cnt db 001h,003h,005h,007h, -1,0C6h,0CAh,0CEh
+DMAC_mask db 00Ah,00Ah,00Ah,00Ah, -1,0D4h,0D4h,0D4h
+DMAC_mode db 00Bh,00Bh,00Bh,00Bh, -1,0D6h,0D6h,0D6h
+DMAC_FF db 00Ch,00Ch,00Ch,00Ch, -1,0D8h,0D8h,0D8h
+
+cpublic _PM_DMADataEnd
+
+enddataseg _dma
+
+begcodeseg _dma ; Start of code segment
+
+ifdef flatmodel
+
+cpublic _PM_DMACodeStart
+
+;----------------------------------------------------------------------------
+; void PM_DMACDisable(int channel);
+;----------------------------------------------------------------------------
+; Masks DMA channel, inhibiting DMA transfers
+;----------------------------------------------------------------------------
+cprocstart PM_DMACDisable
+
+ ARG channel:UINT
+
+ push ebp
+ mov ebp,esp
+ mov ecx,[channel] ; ECX indexes DMAC register tables
+ mov dh,0 ; DH = 0 for DMAC register port access
+ mov al,cl
+ and al,11b
+ or al,100b ; AL = (channel & 3) | "set mask bit"
+ mov dl,[DMAC_mask+ecx]
+ out dx,al
+ pop ebp
+ ret
+
+cprocend
+
+;----------------------------------------------------------------------------
+; void PM_DMACEnable(int channel);
+;----------------------------------------------------------------------------
+; Unmasks DMA channel, enabling DMA transfers
+;----------------------------------------------------------------------------
+cprocstart PM_DMACEnable
+
+ ARG channel:UINT
+
+ push ebp
+ mov ebp,esp
+ mov ecx,[channel] ; ECX indexes DMAC register tables
+ mov dh,0 ; DH = 0 for DMAC register port access
+ mov al,cl
+ and al,11b ; AL = (channel & 3), "set mask bit"=0
+ mov dl,[DMAC_mask+ecx]
+ out dx,al
+ pop ebp
+ ret
+
+cprocend
+
+;----------------------------------------------------------------------------
+; void PM_DMACProgram(int channel,int mode,ulong bufferPhys,int count);
+;----------------------------------------------------------------------------
+; Purpose: Program DMA controller to perform transfer from first 16MB
+; based on previously selected mode and channel. DMA transfer may be enabled
+; by subsequent call to PM_DMACEnable.
+;
+; Entry: channel - DMA channel in use (0-7)
+; mode - Selected DMAMODE type for transfer
+; buffer - 32-bit physical address of DMA buffer
+; count - DMA byte count (1-65536 bytes)
+;----------------------------------------------------------------------------
+cprocstart PM_DMACProgram
+
+ ARG channel:UINT, mode:UINT, bufferPhys:ULONG, count:UINT
+
+ enter_c
+ pushfd
+ cli ; Disable interrupts
+
+; Mask DMA channel to disable it
+
+ mov ebx,[channel] ; EBX indexes DMAC register tables
+ mov dh,0 ; DH = 0 for DMAC register port access
+ mov al,bl
+ and al,11b
+ or al,100b ; AL = (channel & 3) | "set mask bit"
+ mov dl,[DMAC_mask+ebx]
+ out dx,al
+
+; Generate IOW to clear FF toggle state
+
+ mov al,0
+ mov dl,[DMAC_FF+ebx]
+ out dx,al
+
+; Compute buffer address to program
+
+ mov eax,[bufferPhys] ; AX := DMA address offset
+ mov ecx,eax
+ shr ecx,16 ; CL := bufferPhys >> 16 (DMA page)
+ mov esi,[count] ; ESI = # of bytes to transfer
+ cmp ebx,4 ; 16-bit channel?
+ jb @@WriteDMAC ; No, program DMAC
+ shr eax,1 ; Yes, convert address and count
+ shr esi,1 ; to 16-bit, 128K/page format
+
+; Set the DMA address word (bits 0-15)
+
+@@WriteDMAC:
+ mov dl,[DMAC_addr+ebx]
+ out dx,al
+ mov al,ah
+ out dx,al
+
+; Set DMA transfer count
+
+ mov eax,esi
+ dec eax ; ESI = # of bytes to transfer - 1
+ mov dl,[DMAC_cnt+ebx]
+ out dx,al
+ mov al,ah
+ out dx,al
+
+; Set DMA page byte (bits 16-23)
+
+ mov al,cl
+ mov dl,[DMAC_page+ebx]
+ out dx,al
+
+; Set the DMA channel mode
+
+ mov al,bl
+ and al,11b
+ or al,[BYTE mode] ; EAX = (channel & 3) | mode
+ mov dl,[DMAC_mode+ebx]
+ out dx,al
+
+ pop eax ; SMP safe interrupt state restore!
+ test eax,200h
+ jz @@1
+ sti
+@@1: leave_c
+ ret
+
+cprocend
+
+;----------------------------------------------------------------------------
+; ulong PMAPI PM_DMACPosition(int channel);
+;----------------------------------------------------------------------------
+; Returns the current position in a dma transfer. Interrupts should be
+; disabled before calling this function.
+;----------------------------------------------------------------------------
+cprocstart PM_DMACPosition
+
+ ARG channel:UINT
+
+ enter_c
+ mov ecx,[channel] ; ECX indexes DMAC register tables
+ mov dh,0 ; DH = 0 for DMAC register port access
+
+; Generate IOW to clear FF toggle state
+
+ mov al,0
+ mov dl,[DMAC_FF+ebx]
+ out dx,al
+ xor eax,eax
+ xor ecx,ecx
+
+; Now read the current position for the channel
+
+@@ReadLoop:
+ mov dl,[DMAC_cnt+ebx]
+ out dx,al
+ in al,dx
+ mov cl,al
+ in al,dx
+ mov ch,al ; ECX := first count read
+ in al,dx
+ mov ah,al
+ in al,dx
+ xchg al,ah ; EAX := second count read
+ sub ecx,eax
+ cmp ecx,40h
+ jg @@ReadLoop
+ cmp ebx,4 ; 16-bit channel?
+ jb @@Exit ; No, we are done
+ shl eax,1 ; Yes, adjust to byte address
+
+@@Exit: leave_c
+ ret
+
+cprocend
+
+
+cpublic _PM_DMACodeEnd
+
+endif
+
+endcodeseg _dma
+
+ END ; End of module
diff --git a/board/MAI/bios_emulator/scitech/src/pm/common/_int64.asm b/board/MAI/bios_emulator/scitech/src/pm/common/_int64.asm
new file mode 100644
index 00000000000..fdec1b58d8a
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/pm/common/_int64.asm
@@ -0,0 +1,309 @@
+;****************************************************************************
+;*
+;* SciTech OS Portability Manager Library
+;*
+;* ========================================================================
+;*
+;* The contents of this file are subject to the SciTech MGL Public
+;* License Version 1.0 (the "License"); you may not use this file
+;* except in compliance with the License. You may obtain a copy of
+;* the License at http://www.scitechsoft.com/mgl-license.txt
+;*
+;* Software distributed under the License is distributed on an
+;* "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+;* implied. See the License for the specific language governing
+;* rights and limitations under the License.
+;*
+;* The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+;*
+;* The Initial Developer of the Original Code is SciTech Software, Inc.
+;* All Rights Reserved.
+;*
+;* ========================================================================
+;*
+;* Language: NASM or TASM Assembler
+;* Environment: Intel 32 bit Protected Mode.
+;*
+;* Description: Code for 64-bit arhithmetic
+;*
+;****************************************************************************
+
+ IDEAL
+
+include "scitech.mac"
+
+header _int64
+
+begcodeseg _int64 ; Start of code segment
+
+a_low EQU 04h ; Access a_low directly on stack
+a_high EQU 08h ; Access a_high directly on stack
+b_low EQU 0Ch ; Access b_low directly on stack
+shift EQU 0Ch ; Access shift directly on stack
+result_2 EQU 0Ch ; Access result directly on stack
+b_high EQU 10h ; Access b_high directly on stack
+result_3 EQU 10h ; Access result directly on stack
+result_4 EQU 14h ; Access result directly on stack
+
+;----------------------------------------------------------------------------
+; void _PM_add64(u32 a_low,u32 a_high,u32 b_low,u32 b_high,__u64 *result);
+;----------------------------------------------------------------------------
+; Adds two 64-bit numbers.
+;----------------------------------------------------------------------------
+cprocstart _PM_add64
+
+ mov eax,[esp+a_low]
+ add eax,[esp+b_low]
+ mov edx,[esp+a_high]
+ adc edx,[esp+b_high]
+ mov ecx,[esp+result_4]
+ mov [ecx],eax
+ mov [ecx+4],edx
+ ret
+
+cprocend
+
+;----------------------------------------------------------------------------
+; void _PM_sub64(u32 a_low,u32 a_high,u32 b_low,u32 b_high,__u64 *result);
+;----------------------------------------------------------------------------
+; Subtracts two 64-bit numbers.
+;----------------------------------------------------------------------------
+cprocstart _PM_sub64
+
+ mov eax,[esp+a_low]
+ sub eax,[esp+b_low]
+ mov edx,[esp+a_high]
+ sbb edx,[esp+b_high]
+ mov ecx,[esp+result_4]
+ mov [ecx],eax
+ mov [ecx+4],edx
+ ret
+
+cprocend
+
+;----------------------------------------------------------------------------
+; void _PM_mul64(u32 a_high,u32 a_low,u32 b_high,u32 b_low,__u64 *result);
+;----------------------------------------------------------------------------
+; Multiples two 64-bit numbers.
+;----------------------------------------------------------------------------
+cprocstart _PM_mul64
+
+ mov eax,[esp+a_high]
+ mov ecx,[esp+b_high]
+ or ecx,eax
+ mov ecx,[esp+b_low]
+ jnz @@FullMultiply
+ mov eax,[esp+a_low] ; EDX:EAX = b.low * a.low
+ mul ecx
+ mov ecx,[esp+result_4]
+ mov [ecx],eax
+ mov [ecx+4],edx
+ ret
+
+@@FullMultiply:
+ push ebx
+ mul ecx ; EDX:EAX = a.high * b.low
+ mov ebx,eax
+ mov eax,[esp+a_low+4]
+ mul [DWORD esp+b_high+4] ; EDX:EAX = b.high * a.low
+ add ebx,eax
+ mov eax,[esp+a_low+4]
+ mul ecx ; EDX:EAX = a.low * b.low
+ add edx,ebx
+ pop ebx
+ mov ecx,[esp+result_4]
+ mov [ecx],eax
+ mov [ecx+4],edx
+ ret
+
+cprocend
+
+;----------------------------------------------------------------------------
+; void _PM_div64(u32 a_low,u32 a_high,u32 b_low,u32 b_high,__u64 *result);
+;----------------------------------------------------------------------------
+; Divides two 64-bit numbers.
+;----------------------------------------------------------------------------
+cprocstart _PM_div64
+
+ push edi
+ push esi
+ push ebx
+ xor edi,edi
+ mov eax,[esp+a_high+0Ch]
+ or eax,eax
+ jns @@ANotNeg
+
+; Dividend is negative, so negate it and save result for later
+
+ inc edi
+ mov edx,[esp+a_low+0Ch]
+ neg eax
+ neg edx
+ sbb eax,0
+ mov [esp+a_high+0Ch],eax
+ mov [esp+a_low+0Ch],edx
+
+@@ANotNeg:
+ mov eax,[esp+b_high+0Ch]
+ or eax,eax
+ jns @@BNotNeg
+
+; Divisor is negative, so negate it and save result for later
+
+ inc edi
+ mov edx,[esp+b_low+0Ch]
+ neg eax
+ neg edx
+ sbb eax,0
+ mov [esp+b_high+0Ch],eax
+ mov [esp+b_low+0Ch],edx
+
+@@BNotNeg:
+ or eax,eax
+ jnz @@BHighNotZero
+
+; b.high is zero, so handle this faster
+
+ mov ecx,[esp+b_low+0Ch]
+ mov eax,[esp+a_high+0Ch]
+ xor edx,edx
+ div ecx
+ mov ebx,eax
+ mov eax,[esp+a_low+0Ch]
+ div ecx
+ mov edx,ebx
+ jmp @@BHighZero
+
+@@BHighNotZero:
+ mov ebx,eax
+ mov ecx,[esp+b_low+0Ch]
+ mov edx,[esp+a_high+0Ch]
+ mov eax,[esp+a_low+0Ch]
+
+; Shift values right until b.high becomes zero
+
+@@ShiftLoop:
+ shr ebx,1
+ rcr ecx,1
+ shr edx,1
+ rcr eax,1
+ or ebx,ebx
+ jnz @@ShiftLoop
+
+; Now complete the divide process
+
+ div ecx
+ mov esi,eax
+ mul [DWORD esp+b_high+0Ch]
+ mov ecx,eax
+ mov eax,[esp+b_low+0Ch]
+ mul esi
+ add edx,ecx
+ jb @@8
+ cmp edx,[esp+a_high+0Ch]
+ ja @@8
+ jb @@9
+ cmp eax,[esp+a_low+0Ch]
+ jbe @@9
+@@8: dec esi
+@@9: xor edx,edx
+ mov eax,esi
+
+@@BHighZero:
+ dec edi
+ jnz @@Done
+
+; The result needs to be negated as either a or b was negative
+
+ neg edx
+ neg eax
+ sbb edx,0
+
+@@Done: pop ebx
+ pop esi
+ pop edi
+ mov ecx,[esp+result_4]
+ mov [ecx],eax
+ mov [ecx+4],edx
+ ret
+
+cprocend
+
+;----------------------------------------------------------------------------
+; __i64 _PM_shr64(u32 a_low,s32 a_high,s32 shift,__u64 *result);
+;----------------------------------------------------------------------------
+; Shift a 64-bit number right
+;----------------------------------------------------------------------------
+cprocstart _PM_shr64
+
+ mov eax,[esp+a_low]
+ mov edx,[esp+a_high]
+ mov cl,[esp+shift]
+ shrd edx,eax,cl
+ mov ecx,[esp+result_3]
+ mov [ecx],eax
+ mov [ecx+4],edx
+ ret
+
+cprocend
+
+;----------------------------------------------------------------------------
+; __i64 _PM_sar64(u32 a_low,s32 a_high,s32 shift,__u64 *result);
+;----------------------------------------------------------------------------
+; Shift a 64-bit number right (signed)
+;----------------------------------------------------------------------------
+cprocstart _PM_sar64
+
+ mov eax,[esp+a_low]
+ mov edx,[esp+a_high]
+ mov cl,[esp+shift]
+ sar edx,cl
+ rcr eax,cl
+ mov ecx,[esp+result_3]
+ mov [ecx],eax
+ mov [ecx+4],edx
+ ret
+
+cprocend
+
+;----------------------------------------------------------------------------
+; __i64 _PM_shl64(u32 a_low,s32 a_high,s32 shift,__u64 *result);
+;----------------------------------------------------------------------------
+; Shift a 64-bit number left
+;----------------------------------------------------------------------------
+cprocstart _PM_shl64
+
+ mov eax,[esp+a_low]
+ mov edx,[esp+a_high]
+ mov cl,[esp+shift]
+ shld edx,eax,cl
+ mov ecx,[esp+result_3]
+ mov [ecx],eax
+ mov [ecx+4],edx
+ ret
+
+cprocend
+
+;----------------------------------------------------------------------------
+; __i64 _PM_neg64(u32 a_low,s32 a_high,__u64 *result);
+;----------------------------------------------------------------------------
+; Shift a 64-bit number left
+;----------------------------------------------------------------------------
+cprocstart _PM_neg64
+
+ mov eax,[esp+a_low]
+ mov edx,[esp+a_high]
+ neg eax
+ neg edx
+ sbb eax,0
+ mov ecx,[esp+result_2]
+ mov [ecx],eax
+ mov [ecx+4],edx
+ ret
+
+cprocend
+
+
+endcodeseg _int64
+
+ END
diff --git a/board/MAI/bios_emulator/scitech/src/pm/common/_joy.asm b/board/MAI/bios_emulator/scitech/src/pm/common/_joy.asm
new file mode 100644
index 00000000000..0ff1ecf55d3
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/pm/common/_joy.asm
@@ -0,0 +1,230 @@
+;****************************************************************************
+;*
+;* SciTech OS Portability Manager Library
+;*
+;* ========================================================================
+;*
+;* The contents of this file are subject to the SciTech MGL Public
+;* License Version 1.0 (the "License"); you may not use this file
+;* except in compliance with the License. You may obtain a copy of
+;* the License at http://www.scitechsoft.com/mgl-license.txt
+;*
+;* Software distributed under the License is distributed on an
+;* "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+;* implied. See the License for the specific language governing
+;* rights and limitations under the License.
+;*
+;* The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+;*
+;* The Initial Developer of the Original Code is SciTech Software, Inc.
+;* All Rights Reserved.
+;*
+;* ========================================================================
+;*
+;* Language: 80386 Assembler
+;* Environment: Intel x86, any OS
+;*
+;* Description: Assembly language support routines for reading analogue
+;* joysticks.
+;*
+;****************************************************************************
+
+ ideal
+
+include "scitech.mac" ; Memory model macros
+
+ifdef flatmodel
+
+header _joy ; Set up memory model
+
+begcodeseg _joy ; Start of code segment
+
+;----------------------------------------------------------------------------
+; initTimer
+;----------------------------------------------------------------------------
+; Sets up 8253 timer 2 (PC speaker) to start timing, but not produce output.
+;----------------------------------------------------------------------------
+cprocstatic initTimer
+
+; Start timer 2 counting
+
+ in al,61h
+ and al,0FDh ; Disable speaker output (just in case)
+ or al,1
+ out 61h,al
+
+; Set the timer 2 count to 0 again to start the timing interval.
+
+ mov al,10110100b ; set up to load initial (timer 2)
+ out 43h,al ; timer count
+ sub al,al
+ out 42h,al ; load count lsb
+ out 42h,al ; load count msb
+ ret
+
+cprocend
+
+;----------------------------------------------------------------------------
+; readTimer2
+;----------------------------------------------------------------------------
+; Reads the number of ticks from the 8253 timer chip using channel 2 (PC
+; speaker). This is non-destructive and does not screw up other libraries.
+;----------------------------------------------------------------------------
+cprocstatic readTimer
+
+ xor al,al ; Latch timer 0 command
+ out 43h,al ; Latch timer
+ in al,42h ; least significant byte
+ mov ah,al
+ in al,42h ; most significant byte
+ xchg ah,al
+ and eax,0FFFFh
+ ret
+
+cprocend
+
+;----------------------------------------------------------------------------
+; exitTimer
+;----------------------------------------------------------------------------
+; Stops the 8253 timer 2 (PC speaker) counting
+;----------------------------------------------------------------------------
+cprocstatic exitTimer
+
+; Stop timer 2 from counting
+
+ push eax
+ in al,61h
+ and al,0FEh
+ out 61h,al
+
+; Some programs have a problem if we change the control port; better change it
+; to something they expect (mode 3 - square wave generator)...
+ mov al,0B6h
+ out 43h,al
+
+ pop eax
+ ret
+
+cprocend
+
+;----------------------------------------------------------------------------
+; int _EVT_readJoyAxis(int jmask,int *axis);
+;----------------------------------------------------------------------------
+; Function to poll the joystick to read the current axis positions.
+;----------------------------------------------------------------------------
+cprocstart _EVT_readJoyAxis
+
+ ARG jmask:UINT, axis:DPTR
+
+ LOCAL firstTick:UINT, lastTick:UINT, totalTicks:UINT = LocalSize
+
+ enter_c
+
+ mov ebx,[jmask]
+ mov edi,[axis]
+ mov ecx,(1193180/100)
+ and ebx,01111b ; Mask out supported axes
+ mov dx,201h ; DX := joystick I/O port
+ call initTimer ; Start timer 2 counting
+ call readTimer ; Returns counter in EAX
+ mov [lastTick],eax
+
+@@WaitStable:
+ in al,dx
+ and al,bl ; Wait for the axes in question to be
+ jz @@Stable ; done reading...
+ call readTimer ; Returns counter in EAX
+ xchg eax,[lastTick]
+ cmp eax,[lastTick]
+ jb @@1
+ sub eax,[lastTick]
+@@1: add [totalTicks],eax
+ cmp [totalTicks],ecx ; Check for timeout
+ jae @@Stable
+ jmp @@WaitStable
+
+@@Stable:
+ mov al,0FFh
+ out dx,al ; Start joystick reading
+ call initTimer ; Start timer 2 counting
+ call readTimer ; Returns counter in EAX
+ mov [firstTick],eax ; Store initial count
+ mov [lastTick],eax
+ mov [DWORD totalTicks],0
+ cli
+
+@@PollLoop:
+ in al,dx ; Read Joystick port
+ not al
+ and al,bl ; Mask off channels we don't want to read
+ jnz @@AxisFlipped ; See if any of the channels flipped
+ call readTimer ; Returns counter in EAX
+ xchg eax,[lastTick]
+ cmp eax,[lastTick]
+ jb @@2
+ sub eax,[lastTick]
+@@2: add [totalTicks],eax
+ cmp [totalTicks],ecx ; Check for timeout
+ jae @@TimedOut
+ jmp @@PollLoop
+
+@@AxisFlipped:
+ xor esi,esi
+ mov ah,1
+ test al,ah
+ jnz @@StoreCount ; Joystick 1, X axis flipped
+ add esi,4
+ mov ah,2
+ test al,ah
+ jnz @@StoreCount ; Joystick 1, Y axis flipped
+ add esi,4
+ mov ah,4
+ test al,ah
+ jnz @@StoreCount ; Joystick 2, X axis flipped
+ add esi,4 ; Joystick 2, Y axis flipped
+ mov ah,8
+
+@@StoreCount:
+ or bh,ah ; Indicate this axis is active
+ xor bl,ah ; Unmark the channels that just tripped
+ call readTimer ; Returns counter in EAX
+ xchg eax,[lastTick]
+ cmp eax,[lastTick]
+ jb @@3
+ sub eax,[lastTick]
+@@3: add [totalTicks],eax
+ mov eax,[totalTicks]
+ mov [edi+esi],eax ; Record the time this channel flipped
+ cmp bl,0 ; If there are more channels to read,
+ jne @@PollLoop ; keep looping
+
+@@TimedOut:
+ sti
+ call exitTimer ; Stop timer 2 counting
+ movzx eax,bh ; Return the mask of working axes
+ leave_c
+ ret
+
+cprocend
+
+;----------------------------------------------------------------------------
+; int _EVT_readJoyButtons(void);
+;----------------------------------------------------------------------------
+; Function to poll the current joystick buttons
+;----------------------------------------------------------------------------
+cprocstart _EVT_readJoyButtons
+
+ mov dx,0201h
+ in al,dx
+ shr al,4
+ not al
+ and eax,0Fh
+ ret
+
+cprocend
+
+endcodeseg _joy
+
+endif
+
+ END ; End of module
diff --git a/board/MAI/bios_emulator/scitech/src/pm/common/_mtrr.asm b/board/MAI/bios_emulator/scitech/src/pm/common/_mtrr.asm
new file mode 100644
index 00000000000..1e0a6966ce9
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/pm/common/_mtrr.asm
@@ -0,0 +1,272 @@
+;****************************************************************************
+;*
+;* SciTech OS Portability Manager Library
+;*
+;* ========================================================================
+;*
+;* The contents of this file are subject to the SciTech MGL Public
+;* License Version 1.0 (the "License"); you may not use this file
+;* except in compliance with the License. You may obtain a copy of
+;* the License at http://www.scitechsoft.com/mgl-license.txt
+;*
+;* Software distributed under the License is distributed on an
+;* "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+;* implied. See the License for the specific language governing
+;* rights and limitations under the License.
+;*
+;* The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+;*
+;* The Initial Developer of the Original Code is SciTech Software, Inc.
+;* All Rights Reserved.
+;*
+;* ========================================================================
+;*
+;* Language: 80386 Assembler, TASM 4.0 or NASM
+;* Environment: 16/32 bit Ring 0 device driver
+;*
+;* Description: Assembler support routines for the Memory Type Range Register
+;* (MTRR) module.
+;*
+;****************************************************************************
+
+ IDEAL
+
+include "scitech.mac" ; Memory model macros
+
+header _mtrr ; Set up memory model
+
+begdataseg _mtrr
+
+ifdef DOS4GW
+ cextern _PM_haveCauseWay,UINT
+endif
+
+enddataseg _mtrr
+
+begcodeseg _mtrr ; Start of code segment
+
+P586
+
+;----------------------------------------------------------------------------
+; ibool _MTRR_isRing0(void);
+;----------------------------------------------------------------------------
+; Checks to see if we are running at ring 0. This check is only relevant
+; for 32-bit DOS4GW and compatible programs. If we are not running under
+; DOS4GW, then we simply assume we are a ring 0 device driver.
+;----------------------------------------------------------------------------
+cprocnear _MTRR_isRing0
+
+; Are we running under CauseWay?
+
+ifdef DOS4GW
+ enter_c
+ mov ax,cs
+ and eax,3
+ xor eax,3
+ jnz @@Exit
+
+; CauseWay runs the apps at ring 3, but implements support for specific
+; ring 0 instructions that we need to get stuff done under real DOS.
+
+ mov eax,1
+ cmp [UINT _PM_haveCauseWay],0
+ jnz @@Exit
+@@Fail: xor eax,eax
+@@Exit: leave_c
+ ret
+else
+ifdef __SMX32__
+ mov eax,1 ; SMX is ring 0!
+ ret
+else
+ifdef __VXD__
+ mov eax,1 ; VxD is ring 0!
+ ret
+else
+ifdef __NT_DRIVER__
+ mov eax,1 ; NT/W2K is ring 0!
+ ret
+else
+else
+ xor eax,eax ; Assume ring 3 for 32-bit DOS
+ ret
+endif
+endif
+endif
+endif
+
+cprocend
+
+;----------------------------------------------------------------------------
+; ulong _MTRR_disableInt(void);
+;----------------------------------------------------------------------------
+; Return processor interrupt status and disable interrupts.
+;----------------------------------------------------------------------------
+cprocstart _MTRR_disableInt
+
+ pushfd ; Put flag word on stack
+ cli ; Disable interrupts!
+ pop eax ; deposit flag word in return register
+ ret
+
+cprocend
+
+;----------------------------------------------------------------------------
+; void _MTRR_restoreInt(ulong ps);
+;----------------------------------------------------------------------------
+; Restore processor interrupt status.
+;----------------------------------------------------------------------------
+cprocstart _MTRR_restoreInt
+
+ ARG ps:ULONG
+
+ push ebp
+ mov ebp,esp ; Set up stack frame
+ mov ecx,[ps]
+ test ecx,200h ; SMP safe interrupt flag restore!
+ jz @@1
+ sti
+@@1: pop ebp
+ ret
+
+cprocend
+
+;----------------------------------------------------------------------------
+; ulong _MTRR_saveCR4(void);
+;----------------------------------------------------------------------------
+; Save the value of CR4 and clear the Page Global Enable (bit 7). We also
+; disable and flush the caches.
+;----------------------------------------------------------------------------
+cprocstart _MTRR_saveCR4
+
+ enter_c
+
+; Save value of CR4 and clear Page Global Enable (bit 7)
+
+ mov ebx,cr4
+ mov eax,ebx
+ and al,7Fh
+ mov cr4,eax
+
+; Disable and flush caches
+
+ mov eax,cr0
+ or eax,40000000h
+ wbinvd
+ mov cr0,eax
+ wbinvd
+
+; Return value from CR4
+
+ mov eax,ebx
+ leave_c
+ ret
+
+cprocend
+
+;----------------------------------------------------------------------------
+; void _MTRR_restoreCR4(ulong cr4Val)
+;----------------------------------------------------------------------------
+; Save the value of CR4 and clear the Page Global Enable (bit 7). We also
+; disable and flush the caches.
+;----------------------------------------------------------------------------
+cprocstart _MTRR_restoreCR4
+
+ ARG cr4Val:ULONG
+
+ enter_c
+
+; Enable caches
+
+ mov eax,cr0
+ and eax,0BFFFFFFFh
+ mov cr0,eax
+ mov eax,[cr4Val]
+ mov cr4,eax
+ leave_c
+ ret
+
+cprocend
+
+;----------------------------------------------------------------------------
+; uchar _MTRR_getCx86(uchar reg);
+;----------------------------------------------------------------------------
+; Read a Cyrix CPU indexed register
+;----------------------------------------------------------------------------
+cprocstart _MTRR_getCx86
+
+ ARG reg:UCHAR
+
+ enter_c
+ mov al,[reg]
+ out 22h,al
+ in al,23h
+ leave_c
+ ret
+
+cprocend
+
+;----------------------------------------------------------------------------
+; uchar _MTRR_setCx86(uchar reg,uchar val);
+;----------------------------------------------------------------------------
+; Write a Cyrix CPU indexed register
+;----------------------------------------------------------------------------
+cprocstart _MTRR_setCx86
+
+ ARG reg:UCHAR, val:UCHAR
+
+ enter_c
+ mov al,[reg]
+ out 22h,al
+ mov al,[val]
+ out 23h,al
+ leave_c
+ ret
+
+cprocend
+
+;----------------------------------------------------------------------------
+; void _MTRR_readMSR(uong reg, ulong FAR *eax, ulong FAR *edx);
+;----------------------------------------------------------------------------
+; Writes the specific Machine Status Register used on the newer Intel
+; Pentium Pro and Pentium II motherboards.
+;----------------------------------------------------------------------------
+cprocnear _MTRR_readMSR
+
+ ARG reg:ULONG, v_eax:DPTR, v_edx:DPTR
+
+ enter_c
+ mov ecx,[reg]
+ rdmsr
+ mov ebx,[v_eax]
+ mov [ebx],eax
+ mov ebx,[v_edx]
+ mov [ebx],edx
+ leave_c
+ ret
+
+cprocend
+
+;----------------------------------------------------------------------------
+; void _MTRR_writeMSR(uong reg, ulong eax, ulong edx);
+;----------------------------------------------------------------------------
+; Writes the specific Machine Status Register used on the newer Intel
+; Pentium Pro and Pentium II motherboards.
+;----------------------------------------------------------------------------
+cprocnear _MTRR_writeMSR
+
+ ARG reg:ULONG, v_eax:ULONG, v_edx:ULONG
+
+ enter_c
+ mov ecx,[reg]
+ mov eax,[v_eax]
+ mov edx,[v_edx]
+ wrmsr
+ leave_c
+ ret
+
+cprocend
+
+endcodeseg _mtrr
+
+ END ; End of module
diff --git a/board/MAI/bios_emulator/scitech/src/pm/common/_pcihelp.asm b/board/MAI/bios_emulator/scitech/src/pm/common/_pcihelp.asm
new file mode 100644
index 00000000000..5b8dbcc73a4
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/pm/common/_pcihelp.asm
@@ -0,0 +1,358 @@
+;****************************************************************************
+;*
+;* SciTech OS Portability Manager Library
+;*
+;* ========================================================================
+;*
+;* The contents of this file are subject to the SciTech MGL Public
+;* License Version 1.0 (the "License"); you may not use this file
+;* except in compliance with the License. You may obtain a copy of
+;* the License at http://www.scitechsoft.com/mgl-license.txt
+;*
+;* Software distributed under the License is distributed on an
+;* "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+;* implied. See the License for the specific language governing
+;* rights and limitations under the License.
+;*
+;* The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+;*
+;* The Initial Developer of the Original Code is SciTech Software, Inc.
+;* All Rights Reserved.
+;*
+;* ========================================================================
+;*
+;* Language: 80386 Assembler, TASM 4.0 or NASM
+;* Environment: Any
+;*
+;* Description: Helper assembler functions for PCI access module.
+;*
+;****************************************************************************
+
+ IDEAL
+
+include "scitech.mac" ; Memory model macros
+
+header _pcilib
+
+begcodeseg _pcilib
+
+ifdef flatmodel
+
+;----------------------------------------------------------------------------
+; uchar _ASMAPI _BIOS32_service(
+; ulong service,
+; ulong func,
+; ulong *physBase,
+; ulong *length,
+; ulong *serviceOffset,
+; PCIBIOS_entry entry);
+;----------------------------------------------------------------------------
+; Call the BIOS32 services directory
+;----------------------------------------------------------------------------
+cprocstart _BIOS32_service
+
+ ARG service:ULONG, func:ULONG, physBase:DPTR, len:DPTR, off:DPTR, entry:QWORD
+
+ enter_c
+ mov eax,[service]
+ mov ebx,[func]
+ifdef USE_NASM
+ call far dword [entry]
+else
+ call [FWORD entry]
+endif
+ mov esi,[physBase]
+ mov [esi],ebx
+ mov esi,[len]
+ mov [esi],ecx
+ mov esi,[off]
+ mov [esi],edx
+ leave_c
+ ret
+
+cprocend
+
+endif
+
+;----------------------------------------------------------------------------
+; ushort _ASMAPI _PCIBIOS_isPresent(ulong i_eax,ulong *o_edx,ushort *oeax,
+; uchar *o_cl,PCIBIOS_entry entry)
+;----------------------------------------------------------------------------
+; Call the PCI BIOS to determine if it is present.
+;----------------------------------------------------------------------------
+cprocstart _PCIBIOS_isPresent
+
+ ARG i_eax:ULONG, o_edx:DPTR, oeax:DPTR, o_cl:DPTR, entry:QWORD
+
+ enter_c
+ mov eax,[i_eax]
+ifdef flatmodel
+ifdef USE_NASM
+ call far dword [entry]
+else
+ call [FWORD entry]
+endif
+else
+ int 1Ah
+endif
+ _les _si,[o_edx]
+ mov [_ES _si],edx
+ _les _si,[oeax]
+ mov [_ES _si],ax
+ _les _si,[o_cl]
+ mov [_ES _si],cl
+ mov ax,bx
+ leave_c
+ ret
+
+cprocend
+
+;----------------------------------------------------------------------------
+; ulong _PCIBIOS_service(ulong r_eax,ulong r_ebx,ulong r_edi,ulong r_ecx,
+; PCIBIOS_entry entry)
+;----------------------------------------------------------------------------
+; Call the PCI BIOS services, either via the 32-bit protected mode entry
+; point or via the Int 1Ah 16-bit interrupt.
+;----------------------------------------------------------------------------
+cprocstart _PCIBIOS_service
+
+ ARG r_eax:ULONG, r_ebx:ULONG, r_edi:ULONG, r_ecx:ULONG, entry:QWORD
+
+ enter_c
+ mov eax,[r_eax]
+ mov ebx,[r_ebx]
+ mov edi,[r_edi]
+ mov ecx,[r_ecx]
+ifdef flatmodel
+ifdef USE_NASM
+ call far dword [entry]
+else
+ call [FWORD entry]
+endif
+else
+ int 1Ah
+endif
+ mov eax,ecx
+ifndef flatmodel
+ shld edx,eax,16 ; Return result in DX:AX
+endif
+ leave_c
+ ret
+
+cprocend
+
+;----------------------------------------------------------------------------
+; int _PCIBIOS_getRouting(PCIRoutingOptionsBuffer *buf,PCIBIOS_entry entry);
+;----------------------------------------------------------------------------
+; Get the routing options for PCI devices
+;----------------------------------------------------------------------------
+cprocstart _PCIBIOS_getRouting
+
+ ARG buf:DPTR, entry:QWORD
+
+ enter_c
+ mov eax,0B10Eh
+ mov bx,0
+ _les _di,[buf]
+ifdef flatmodel
+ifdef USE_NASM
+ call far dword [entry]
+else
+ call [FWORD entry]
+endif
+else
+ int 1Ah
+endif
+ movzx eax,ah
+ leave_c
+ ret
+
+cprocend
+
+;----------------------------------------------------------------------------
+; ibool _PCIBIOS_setIRQ(int busDev,int intPin,int IRQ,PCIBIOS_entry entry);
+;----------------------------------------------------------------------------
+; Change the IRQ routing for the PCI device
+;----------------------------------------------------------------------------
+cprocstart _PCIBIOS_setIRQ
+
+ ARG busDev:UINT, intPin:UINT, IRQ:UINT, entry:QWORD
+
+ enter_c
+ mov eax,0B10Fh
+ mov bx,[USHORT busDev]
+ mov cl,[BYTE intPin]
+ mov ch,[BYTE IRQ]
+ifdef flatmodel
+ifdef USE_NASM
+ call far dword [entry]
+else
+ call [FWORD entry]
+endif
+else
+ int 1Ah
+endif
+ mov eax,1
+ jnc @@1
+ xor eax,eax ; Function failed!
+@@1: leave_c
+ ret
+
+cprocend
+
+;----------------------------------------------------------------------------
+; ulong _PCIBIOS_specialCycle(int bus,ulong data,PCIBIOS_entry entry);
+;----------------------------------------------------------------------------
+; Generate a special cycle via the PCI BIOS.
+;----------------------------------------------------------------------------
+cprocstart _PCIBIOS_specialCycle
+
+ ARG bus:UINT, data:ULONG, entry:QWORD
+
+ enter_c
+ mov eax,0B106h
+ mov bh,[BYTE bus]
+ mov ecx,[data]
+ifdef flatmodel
+ifdef USE_NASM
+ call far dword [entry]
+else
+ call [FWORD entry]
+endif
+else
+ int 1Ah
+endif
+ leave_c
+ ret
+
+cprocend
+
+;----------------------------------------------------------------------------
+; ushort _PCI_getCS(void)
+;----------------------------------------------------------------------------
+cprocstart _PCI_getCS
+
+ mov ax,cs
+ ret
+
+cprocend
+
+;----------------------------------------------------------------------------
+; int PM_inpb(int port)
+;----------------------------------------------------------------------------
+; Reads a byte from the specified port
+;----------------------------------------------------------------------------
+cprocstart PM_inpb
+
+ ARG port:UINT
+
+ push _bp
+ mov _bp,_sp
+ xor _ax,_ax
+ mov _dx,[port]
+ in al,dx
+ pop _bp
+ ret
+
+cprocend
+
+;----------------------------------------------------------------------------
+; int PM_inpw(int port)
+;----------------------------------------------------------------------------
+; Reads a word from the specified port
+;----------------------------------------------------------------------------
+cprocstart PM_inpw
+
+ ARG port:UINT
+
+ push _bp
+ mov _bp,_sp
+ xor _ax,_ax
+ mov _dx,[port]
+ in ax,dx
+ pop _bp
+ ret
+
+cprocend
+
+;----------------------------------------------------------------------------
+; ulong PM_inpd(int port)
+;----------------------------------------------------------------------------
+; Reads a word from the specified port
+;----------------------------------------------------------------------------
+cprocstart PM_inpd
+
+ ARG port:UINT
+
+ push _bp
+ mov _bp,_sp
+ mov _dx,[port]
+ in eax,dx
+ifndef flatmodel
+ shld edx,eax,16 ; DX:AX = result
+endif
+ pop _bp
+ ret
+
+cprocend
+
+;----------------------------------------------------------------------------
+; void PM_outpb(int port,int value)
+;----------------------------------------------------------------------------
+; Write a byte to the specified port.
+;----------------------------------------------------------------------------
+cprocstart PM_outpb
+
+ ARG port:UINT, value:UINT
+
+ push _bp
+ mov _bp,_sp
+ mov _dx,[port]
+ mov _ax,[value]
+ out dx,al
+ pop _bp
+ ret
+
+cprocend
+
+;----------------------------------------------------------------------------
+; void PM_outpw(int port,int value)
+;----------------------------------------------------------------------------
+; Write a word to the specified port.
+;----------------------------------------------------------------------------
+cprocstart PM_outpw
+
+ ARG port:UINT, value:UINT
+
+ push _bp
+ mov _bp,_sp
+ mov _dx,[port]
+ mov _ax,[value]
+ out dx,ax
+ pop _bp
+ ret
+
+cprocend
+
+;----------------------------------------------------------------------------
+; void PM_outpd(int port,ulong value)
+;----------------------------------------------------------------------------
+; Write a word to the specified port.
+;----------------------------------------------------------------------------
+cprocstart PM_outpd
+
+ ARG port:UINT, value:ULONG
+
+ push _bp
+ mov _bp,_sp
+ mov _dx,[port]
+ mov eax,[value]
+ out dx,eax
+ pop _bp
+ ret
+
+cprocend
+
+endcodeseg _pcilib
+
+ END
diff --git a/board/MAI/bios_emulator/scitech/src/pm/common/agp.c b/board/MAI/bios_emulator/scitech/src/pm/common/agp.c
new file mode 100644
index 00000000000..23f7e1e1458
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/pm/common/agp.c
@@ -0,0 +1,190 @@
+/****************************************************************************
+*
+* SciTech OS Portability Manager Library
+*
+* ========================================================================
+*
+* The contents of this file are subject to the SciTech MGL Public
+* License Version 1.0 (the "License"); you may not use this file
+* except in compliance with the License. You may obtain a copy of
+* the License at http://www.scitechsoft.com/mgl-license.txt
+*
+* Software distributed under the License is distributed on an
+* "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+* implied. See the License for the specific language governing
+* rights and limitations under the License.
+*
+* The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+*
+* The Initial Developer of the Original Code is SciTech Software, Inc.
+* All Rights Reserved.
+*
+* ========================================================================
+*
+* Language: ANSI C
+* Environment: 32-bit Ring 0 device driver
+*
+* Description: Generic module to implement AGP support functions using the
+* SciTech Nucleus AGP support drivers. If the OS provides
+* native AGP support, this module should *NOT* be used. Instead
+* wrappers should be placed around the OS support functions
+* to implement this functionality.
+*
+****************************************************************************/
+
+#include "pmapi.h"
+#ifndef REALMODE
+#include "nucleus/agp.h"
+
+/*--------------------------- Global variables ----------------------------*/
+
+static AGP_devCtx *agp;
+static AGP_driverFuncs driver;
+
+/*----------------------------- Implementation ----------------------------*/
+
+/****************************************************************************
+RETURNS:
+Size of AGP aperture in MB on success, 0 on failure.
+
+REMARKS:
+This function initialises the AGP driver in the system and returns the
+size of the available AGP aperture in megabytes.
+****************************************************************************/
+ulong PMAPI PM_agpInit(void)
+{
+ if ((agp = AGP_loadDriver(0)) == NULL)
+ return 0;
+ driver.dwSize = sizeof(driver);
+ if (!agp->QueryFunctions(AGP_GET_DRIVERFUNCS,&driver))
+ return 0;
+ switch (driver.GetApertureSize()) {
+ case agpSize4MB: return 4;
+ case agpSize8MB: return 8;
+ case agpSize16MB: return 16;
+ case agpSize32MB: return 32;
+ case agpSize64MB: return 64;
+ case agpSize128MB: return 128;
+ case agpSize256MB: return 256;
+ case agpSize512MB: return 512;
+ case agpSize1GB: return 1024;
+ case agpSize2GB: return 2048;
+ }
+ return 0;
+}
+
+/****************************************************************************
+REMARKS:
+This function closes down the loaded AGP driver.
+****************************************************************************/
+void PMAPI PM_agpExit(void)
+{
+ AGP_unloadDriver(agp);
+}
+
+/****************************************************************************
+PARAMETERS:
+numPages - Number of memory pages that should be reserved
+type - Type of memory to allocate
+physContext - Returns the physical context handle for the mapping
+physAddr - Returns the physical address for the mapping
+
+RETURNS:
+True on success, false on failure.
+
+REMARKS:
+This function reserves a range of physical memory addresses on the system
+bus which the AGP controller will respond to. If this function succeeds,
+the AGP controller can respond to the reserved physical address range on
+the bus. However you must first call AGP_commitPhysical to cause this memory
+to actually be committed for use before it can be accessed.
+****************************************************************************/
+ibool PMAPI PM_agpReservePhysical(
+ ulong numPages,
+ int type,
+ void **physContext,
+ PM_physAddr *physAddr)
+{
+ switch (type) {
+ case PM_agpUncached:
+ type = agpUncached;
+ break;
+ case PM_agpWriteCombine:
+ type = agpWriteCombine;
+ break;
+ case PM_agpIntelDCACHE:
+ type = agpIntelDCACHE;
+ break;
+ default:
+ return false;
+ }
+ return driver.ReservePhysical(numPages,type,physContext,physAddr) == nOK;
+}
+
+/****************************************************************************
+PARAMETERS:
+physContext - Physical AGP context to release
+
+RETURNS:
+True on success, false on failure.
+
+REMARKS:
+This function releases a range of physical memory addresses on the system
+bus which the AGP controller will respond to. All committed memory for
+the physical address range covered by the context will be released.
+****************************************************************************/
+ibool PMAPI PM_agpReleasePhysical(
+ void *physContext)
+{
+ return driver.ReleasePhysical(physContext) == nOK;
+}
+
+/****************************************************************************
+PARAMETERS:
+physContext - Physical AGP context to commit memory for
+numPages - Number of pages to be committed
+startOffset - Offset in pages into the reserved physical context
+physAddr - Returns the physical address of the committed memory
+
+RETURNS:
+True on success, false on failure.
+
+REMARKS:
+This function commits into the specified physical context that was previously
+reserved by a call to ReservePhysical. You can use the startOffset and
+numPages parameters to only commit portions of the reserved memory range at
+a time.
+****************************************************************************/
+ibool PMAPI PM_agpCommitPhysical(
+ void *physContext,
+ ulong numPages,
+ ulong startOffset,
+ PM_physAddr *physAddr)
+{
+ return driver.CommitPhysical(physContext,numPages,startOffset,physAddr) == nOK;
+}
+
+/****************************************************************************
+PARAMETERS:
+physContext - Physical AGP context to free memory for
+numPages - Number of pages to be freed
+startOffset - Offset in pages into the reserved physical context
+
+RETURNS:
+True on success, false on failure.
+
+REMARKS:
+This function frees memory previously committed by the CommitPhysical
+function. Note that you can free a portion of a memory range that was
+previously committed if you wish.
+****************************************************************************/
+ibool PMAPI PM_agpFreePhysical(
+ void *physContext,
+ ulong numPages,
+ ulong startOffset)
+{
+ return driver.FreePhysical(physContext,numPages,startOffset) == nOK;
+}
+
+#endif /* !REALMODE */
+
diff --git a/board/MAI/bios_emulator/scitech/src/pm/common/keyboard.c b/board/MAI/bios_emulator/scitech/src/pm/common/keyboard.c
new file mode 100644
index 00000000000..79b4040ac1a
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/pm/common/keyboard.c
@@ -0,0 +1,450 @@
+/****************************************************************************
+*
+* SciTech OS Portability Manager Library
+*
+* ========================================================================
+*
+* The contents of this file are subject to the SciTech MGL Public
+* License Version 1.0 (the "License"); you may not use this file
+* except in compliance with the License. You may obtain a copy of
+* the License at http://www.scitechsoft.com/mgl-license.txt
+*
+* Software distributed under the License is distributed on an
+* "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+* implied. See the License for the specific language governing
+* rights and limitations under the License.
+*
+* The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+*
+* The Initial Developer of the Original Code is SciTech Software, Inc.
+* All Rights Reserved.
+*
+* ========================================================================
+*
+* Language: ANSI C
+* Environment: Any
+*
+* Description: Direct keyboard event handling module. This module contains
+* code to process raw scan code information, convert it to
+* virtual scan codes and do code page translation to ASCII
+* for different international keyboard layouts.
+*
+****************************************************************************/
+
+/*---------------------------- Implementation -----------------------------*/
+
+/****************************************************************************
+PARAMETERS:
+scanCode - Keyboard scan code to translate
+table - Code page table to search
+count - Number of entries in the code page table
+
+REMARKS:
+This function translates the scan codes from keyboard scan codes to ASCII
+codes using a binary search on the code page table.
+****************************************************************************/
+static uchar translateScan(
+ uchar scanCode,
+ codepage_entry_t *table,
+ int count)
+{
+ codepage_entry_t *test;
+ int n,pivot,val;
+
+ for (n = count; n > 0; ) {
+ pivot = n >> 1;
+ test = table + pivot;
+ val = scanCode - test->scanCode;
+ if (val < 0)
+ n = pivot;
+ else if (val == 0)
+ return test->asciiCode;
+ else {
+ table = test + 1;
+ n -= pivot + 1;
+ }
+ }
+ return 0;
+}
+
+/****************************************************************************
+REMARKS:
+This macro/function is used to converts the scan codes reported by the
+keyboard to our event libraries normalised format. We only have one scan
+code for the 'A' key, and use shift modifiers to determine if it is a
+Ctrl-F1, Alt-F1 etc. The raw scan codes from the keyboard work this way,
+but the OS gives us 'cooked' scan codes, we have to translate them back
+to the raw format.
+{secret}
+****************************************************************************/
+void _EVT_maskKeyCode(
+ event_t *evt)
+{
+ int ascii,scan = EVT_scanCode(evt->message);
+
+ evt->message &= ~0xFF;
+ if (evt->modifiers & EVT_NUMLOCK) {
+ if ((ascii = translateScan(scan,EVT.codePage->numPad,EVT.codePage->numPadLen)) != 0) {
+ evt->message |= ascii;
+ return;
+ }
+ }
+ if (evt->modifiers & EVT_CTRLSTATE) {
+ evt->message |= translateScan(scan,EVT.codePage->ctrl,EVT.codePage->ctrlLen);
+ return;
+ }
+ if (evt->modifiers & EVT_CAPSLOCK) {
+ if (evt->modifiers & EVT_SHIFTKEY) {
+ if ((ascii = translateScan(scan,EVT.codePage->shiftCaps,EVT.codePage->shiftCapsLen)) != 0) {
+ evt->message |= ascii;
+ return;
+ }
+ }
+ else {
+ if ((ascii = translateScan(scan,EVT.codePage->caps,EVT.codePage->capsLen)) != 0) {
+ evt->message |= ascii;
+ return;
+ }
+ }
+ }
+ if (evt->modifiers & EVT_SHIFTKEY) {
+ if ((ascii = translateScan(scan,EVT.codePage->shift,EVT.codePage->shiftLen)) != 0) {
+ evt->message |= ascii;
+ return;
+ }
+ }
+ evt->message |= translateScan(scan,EVT.codePage->normal,EVT.codePage->normalLen);
+}
+
+/****************************************************************************
+REMARKS:
+Returns true if the key with the specified scan code is being held down.
+****************************************************************************/
+static ibool _EVT_isKeyDown(
+ uchar scanCode)
+{
+ if (scanCode > 0x7F)
+ return false;
+ else
+ return EVT.keyTable[scanCode] != 0;
+}
+
+/****************************************************************************
+PARAMETERS:
+what - Event code
+message - Event message (ASCII code and scan code)
+
+REMARKS:
+Adds a new keyboard event to the event queue. This routine is called from
+within the keyboard interrupt subroutine!
+
+NOTE: Interrupts are OFF when this routine is called by the keyboard ISR,
+ and we leave them OFF the entire time.
+****************************************************************************/
+static void addKeyEvent(
+ uint what,
+ uint message)
+{
+ event_t evt;
+
+ if (EVT.count < EVENTQSIZE) {
+ /* Save information in event record */
+ evt.when = _EVT_getTicks();
+ evt.what = what;
+ evt.message = message | 0x10000UL;
+ evt.where_x = 0;
+ evt.where_y = 0;
+ evt.relative_x = 0;
+ evt.relative_y = 0;
+ evt.modifiers = EVT.keyModifiers;
+ if (evt.what == EVT_KEYREPEAT) {
+ if (EVT.oldKey != -1)
+ EVT.evtq[EVT.oldKey].message += 0x10000UL;
+ else {
+ EVT.oldKey = EVT.freeHead;
+ addEvent(&evt); /* Add to tail of event queue */
+ }
+ }
+ else {
+#ifdef __QNX__
+ _EVT_maskKeyCode(&evt);
+#endif
+ addEvent(&evt); /* Add to tail of event queue */
+ }
+ EVT.oldMove = -1;
+ }
+}
+
+/****************************************************************************
+REMARKS:
+This function waits for the keyboard controller to set the ready-for-write
+bit.
+****************************************************************************/
+static int kbWaitForWriteReady(void)
+{
+ int timeout = 8192;
+ while ((timeout > 0) && (PM_inpb(0x64) & 0x02))
+ timeout--;
+ return (timeout > 0);
+}
+
+/****************************************************************************
+REMARKS:
+This function waits for the keyboard controller to set the ready-for-read
+bit.
+****************************************************************************/
+static int kbWaitForReadReady(void)
+{
+ int timeout = 8192;
+ while ((timeout > 0) && (!(PM_inpb(0x64) & 0x01)))
+ timeout--;
+ return (timeout > 0);
+}
+
+/****************************************************************************
+PARAMETERS:
+data - Data to send to the keyboard
+
+REMARKS:
+This function sends a data byte to the keyboard controller.
+****************************************************************************/
+static int kbSendData(
+ uchar data)
+{
+ int resends = 4;
+ int timeout, temp;
+
+ do {
+ if (!kbWaitForWriteReady())
+ return 0;
+ PM_outpb(0x60,data);
+ timeout = 8192;
+ while (--timeout > 0) {
+ if (!kbWaitForReadReady())
+ return 0;
+ temp = PM_inpb(0x60);
+ if (temp == 0xFA)
+ return 1;
+ if (temp == 0xFE)
+ break;
+ }
+ } while ((resends-- > 0) && (timeout > 0));
+ return 0;
+}
+
+/****************************************************************************
+PARAMETERS:
+modifiers - Keyboard modifier flags
+
+REMARKS:
+This function re-programs the LED's on the keyboard to the values stored
+in the passed in modifier flags. If the 'allowLEDS' flag is false, this
+function does nothing.
+****************************************************************************/
+static void setLEDS(
+ uint modifiers)
+{
+ if (EVT.allowLEDS) {
+ if (!kbSendData(0xED) || !kbSendData((modifiers>>9) & 7)) {
+ kbSendData(0xF4);
+ }
+ }
+}
+
+/****************************************************************************
+REMARKS:
+Function to process raw scan codes read from the keyboard controller.
+
+NOTE: Interrupts are OFF when this routine is called by the keyboard ISR,
+ and we leave them OFF the entire time.
+{secret}
+****************************************************************************/
+void processRawScanCode(
+ int scan)
+{
+ static int pauseLoop = 0;
+ static int extended = 0;
+ int what;
+
+ if (pauseLoop) {
+ /* Skip scan codes until the pause key sequence has been read */
+ pauseLoop--;
+ }
+ else if (scan == 0xE0) {
+ /* This signals the start of an extended scan code sequence */
+ extended = 1;
+ }
+ else if (scan == 0xE1) {
+ /* The Pause key sends a strange scan code sequence, which is:
+ *
+ * E1 1D 52 E1 9D D2
+ *
+ * However there is never any release code nor any auto-repeat for
+ * this key. For this reason we simply ignore the key and skip the
+ * next 5 scan codes read from the keyboard.
+ */
+ pauseLoop = 5;
+ }
+ else {
+ /* Process the scan code normally (it may be an extended code
+ * however!). Bit 7 means key was released, and bits 0-6 are the
+ * scan code.
+ */
+ what = (scan & 0x80) ? EVT_KEYUP : EVT_KEYDOWN;
+ scan &= 0x7F;
+ if (extended) {
+ extended = 0;
+ if (scan == 0x2A || scan == 0x36) {
+ /* Ignore these extended scan code sequences. These are
+ * used by the keyboard controller to wrap around certain
+ * key sequences for the keypad (and when NUMLOCK is down
+ * internally).
+ */
+ return;
+ }
+
+ /* Convert extended codes for key sequences that we map to
+ * virtual scan codes so the user can detect them in their
+ * code.
+ */
+ switch (scan) {
+ case KB_leftCtrl: scan = KB_rightCtrl; break;
+ case KB_leftAlt: scan = KB_rightAlt; break;
+ case KB_divide: scan = KB_padDivide; break;
+ case KB_enter: scan = KB_padEnter; break;
+ case KB_padTimes: scan = KB_sysReq; break;
+ }
+ }
+ else {
+ /* Convert regular scan codes for key sequences that we map to
+ * virtual scan codes so the user can detect them in their
+ * code.
+ */
+ switch (scan) {
+ case KB_left: scan = KB_padLeft; break;
+ case KB_right: scan = KB_padRight; break;
+ case KB_up: scan = KB_padUp; break;
+ case KB_down: scan = KB_padDown; break;
+ case KB_insert: scan = KB_padInsert; break;
+ case KB_delete: scan = KB_padDelete; break;
+ case KB_home: scan = KB_padHome; break;
+ case KB_end: scan = KB_padEnd; break;
+ case KB_pageUp: scan = KB_padPageUp; break;
+ case KB_pageDown: scan = KB_padPageDown; break;
+ }
+ }
+
+ /* Determine if the key is an UP, DOWN or REPEAT and maintain the
+ * up/down status of all keys in our global key array.
+ */
+ if (what == EVT_KEYDOWN) {
+ if (EVT.keyTable[scan])
+ what = EVT_KEYREPEAT;
+ else
+ EVT.keyTable[scan] = scan;
+ }
+ else {
+ EVT.keyTable[scan] = 0;
+ }
+
+ /* Handle shift key modifiers */
+ if (what != EVT_KEYREPEAT) {
+ switch (scan) {
+ case KB_capsLock:
+ if (what == EVT_KEYDOWN)
+ EVT.keyModifiers ^= EVT_CAPSLOCK;
+ setLEDS(EVT.keyModifiers);
+ break;
+ case KB_numLock:
+ if (what == EVT_KEYDOWN)
+ EVT.keyModifiers ^= EVT_NUMLOCK;
+ setLEDS(EVT.keyModifiers);
+ break;
+ case KB_scrollLock:
+ if (what == EVT_KEYDOWN)
+ EVT.keyModifiers ^= EVT_SCROLLLOCK;
+ setLEDS(EVT.keyModifiers);
+ break;
+ case KB_leftShift:
+ if (what == EVT_KEYUP)
+ EVT.keyModifiers &= ~EVT_LEFTSHIFT;
+ else
+ EVT.keyModifiers |= EVT_LEFTSHIFT;
+ break;
+ case KB_rightShift:
+ if (what == EVT_KEYUP)
+ EVT.keyModifiers &= ~EVT_RIGHTSHIFT;
+ else
+ EVT.keyModifiers |= EVT_RIGHTSHIFT;
+ break;
+ case KB_leftCtrl:
+ if (what == EVT_KEYUP)
+ EVT.keyModifiers &= ~EVT_LEFTCTRL;
+ else
+ EVT.keyModifiers |= EVT_LEFTCTRL;
+ break;
+ case KB_rightCtrl:
+ if (what == EVT_KEYUP)
+ EVT.keyModifiers &= ~EVT_RIGHTCTRL;
+ else
+ EVT.keyModifiers |= EVT_RIGHTCTRL;
+ break;
+ case KB_leftAlt:
+ if (what == EVT_KEYUP)
+ EVT.keyModifiers &= ~EVT_LEFTALT;
+ else
+ EVT.keyModifiers |= EVT_LEFTALT;
+ break;
+ case KB_rightAlt:
+ if (what == EVT_KEYUP)
+ EVT.keyModifiers &= ~EVT_RIGHTALT;
+ else
+ EVT.keyModifiers |= EVT_RIGHTALT;
+ break;
+#ifdef SUPPORT_CTRL_ALT_DEL
+ case KB_delete:
+ if ((EVT.keyModifiers & EVT_CTRLSTATE) && (EVT.keyModifiers & EVT_ALTSTATE))
+ Reboot();
+ break;
+#endif
+ }
+ }
+
+ /* Add the untranslated key code to the event queue. All
+ * translation to ASCII from the key codes occurs when the key
+ * is extracted from the queue, saving time in the low level
+ * interrupt handler.
+ */
+ addKeyEvent(what,scan << 8);
+ }
+}
+
+/****************************************************************************
+DESCRIPTION:
+Enables/disables the update of the keyboard LED status indicators.
+
+HEADER:
+event.h
+
+PARAMETERS:
+enable - True to enable, false to disable
+
+REMARKS:
+Enables the update of the keyboard LED status indicators. Sometimes it may
+be convenient in the application to turn off the updating of the LED
+status indicators (such as if a game is using the CAPSLOCK key for some
+function). Passing in a value of FALSE to this function will turn off all
+the LEDS, and stop updating them when the internal status changes (note
+however that internally we still keep track of the toggle key status!).
+****************************************************************************/
+void EVTAPI EVT_allowLEDS(
+ ibool enable)
+{
+ EVT.allowLEDS = true;
+ if (enable)
+ setLEDS(EVT.keyModifiers);
+ else
+ setLEDS(0);
+ EVT.allowLEDS = enable;
+}
+
diff --git a/board/MAI/bios_emulator/scitech/src/pm/common/malloc.c b/board/MAI/bios_emulator/scitech/src/pm/common/malloc.c
new file mode 100644
index 00000000000..83ef22113c1
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/pm/common/malloc.c
@@ -0,0 +1,205 @@
+/****************************************************************************
+*
+* SciTech OS Portability Manager Library
+*
+* ========================================================================
+*
+* The contents of this file are subject to the SciTech MGL Public
+* License Version 1.0 (the "License"); you may not use this file
+* except in compliance with the License. You may obtain a copy of
+* the License at http://www.scitechsoft.com/mgl-license.txt
+*
+* Software distributed under the License is distributed on an
+* "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+* implied. See the License for the specific language governing
+* rights and limitations under the License.
+*
+* The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+*
+* The Initial Developer of the Original Code is SciTech Software, Inc.
+* All Rights Reserved.
+*
+* ========================================================================
+*
+* Language: ANSI C
+* Environment: Any
+*
+* Description: Module for implementing the PM library overrideable memory
+* allocator functions.
+*
+****************************************************************************/
+
+#include "pmapi.h"
+
+/*--------------------------- Global variables ----------------------------*/
+
+void * (*__PM_malloc)(size_t size) = malloc;
+void * (*__PM_calloc)(size_t nelem,size_t size) = calloc;
+void * (*__PM_realloc)(void *ptr,size_t size) = realloc;
+void (*__PM_free)(void *p) = free;
+
+/*----------------------------- Implementation ----------------------------*/
+
+/****************************************************************************
+DESCRIPTION:
+Use local memory allocation routines.
+
+HEADER:
+pmapi.h
+
+PARAMETERS:
+malloc - Pointer to new malloc routine to use
+calloc - Pointer to new caalloc routine to use
+realloc - Pointer to new realloc routine to use
+free - Pointer to new free routine to use
+
+REMARKS:
+Tells the PM library to use a set of user specified memory allocation
+routines instead of using the normal malloc/calloc/realloc/free standard
+C library functions. This is useful if you wish to use a third party
+debugging malloc library or perhaps a set of faster memory allocation
+functions with the PM library, or any apps that use the PM library (such as
+the MGL). Once you have registered your memory allocation routines, all
+calls to PM_malloc, PM_calloc, PM_realloc and PM_free will be revectored to
+your local memory allocation routines.
+
+This is also useful if you need to keep track of just how much physical
+memory your program has been using. You can use the PM_availableMemory
+function to find out how much physical memory is available when the program
+starts, and then you can use your own local memory allocation routines to
+keep track of how much memory has been used and freed.
+
+NOTE: This function should be called right at the start of your application,
+ before you initialise any other components or libraries.
+
+NOTE: Code compiled into Binary Portable DLL's and Drivers automatically
+ end up calling these functions via the BPD C runtime library.
+
+SEE ALSO:
+PM_malloc, PM_calloc, PM_realloc, PM_free, PM_availableMemory
+****************************************************************************/
+void PMAPI PM_useLocalMalloc(
+ void * (*malloc)(size_t size),
+ void * (*calloc)(size_t nelem,size_t size),
+ void * (*realloc)(void *ptr,size_t size),
+ void (*free)(void *p))
+{
+ __PM_malloc = malloc;
+ __PM_calloc = calloc;
+ __PM_realloc = realloc;
+ __PM_free = free;
+}
+
+/****************************************************************************
+DESCRIPTION:
+Allocate a block of memory.
+
+HEADER:
+pmapi.h
+
+PARAMETERS:
+size - Size of block to allocate in bytes
+
+RETURNS:
+Pointer to allocated block, or NULL if out of memory.
+
+REMARKS:
+Allocates a block of memory of length size. If you have changed the memory
+allocation routines with the PM_useLocalMalloc function, then calls to this
+function will actually make calls to the local memory allocation routines
+that you have registered.
+
+SEE ALSO:
+PM_calloc, PM_realloc, PM_free, PM_useLocalMalloc
+****************************************************************************/
+void * PMAPI PM_malloc(
+ size_t size)
+{
+ return __PM_malloc(size);
+}
+
+/****************************************************************************
+DESCRIPTION:
+Allocate and clear a large memory block.
+
+HEADER:
+pmapi.h
+
+PARAMETERS:
+nelem - number of contiguous size-byte units to allocate
+size - size of unit in bytes
+
+RETURNS:
+Pointer to allocated memory if successful, NULL if out of memory.
+
+REMARKS:
+Allocates a block of memory of length (size * nelem), and clears the
+allocated area with zeros (0). If you have changed the memory allocation
+routines with the PM_useLocalMalloc function, then calls to this function
+will actually make calls to the local memory allocation routines that you
+have registered.
+
+SEE ALSO:
+PM_malloc, PM_realloc, PM_free, PM_useLocalMalloc
+****************************************************************************/
+void * PMAPI PM_calloc(
+ size_t nelem,
+ size_t size)
+{
+ return __PM_calloc(nelem,size);
+}
+
+/****************************************************************************
+DESCRIPTION:
+Re-allocate a block of memory
+
+HEADER:
+pmapi.h
+
+PARAMETERS:
+ptr - Pointer to block to resize
+size - size of unit in bytes
+
+RETURNS:
+Pointer to allocated memory if successful, NULL if out of memory.
+
+REMARKS:
+This function reallocates a block of memory that has been previously been
+allocated to the new of size. The new size may be smaller or larger than
+the original block of memory. If you have changed the memory allocation
+routines with the PM_useLocalMalloc function, then calls to this function
+will actually make calls to the local memory allocation routines that you
+have registered.
+
+SEE ALSO:
+PM_malloc, PM_calloc, PM_free, PM_useLocalMalloc
+****************************************************************************/
+void * PMAPI PM_realloc(
+ void *ptr,
+ size_t size)
+{
+ return __PM_realloc(ptr,size);
+}
+
+/****************************************************************************
+DESCRIPTION:
+Frees a block of memory.
+
+HEADER:
+pmapi.h
+
+PARAMETERS:
+p - Pointer to memory block to free
+
+REMARKS:
+Frees a block of memory previously allocated with either PM_malloc,
+PM_calloc or PM_realloc.
+
+SEE ALSO:
+PM_malloc, PM_calloc, PM_realloc, PM_useLocalMalloc
+****************************************************************************/
+void PMAPI PM_free(
+ void *p)
+{
+ __PM_free(p);
+}
diff --git a/board/MAI/bios_emulator/scitech/src/pm/common/mtrr.c b/board/MAI/bios_emulator/scitech/src/pm/common/mtrr.c
new file mode 100644
index 00000000000..d6ced6eadce
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/pm/common/mtrr.c
@@ -0,0 +1,867 @@
+/****************************************************************************
+*
+* SciTech OS Portability Manager Library
+*
+* ========================================================================
+*
+* The contents of this file are subject to the SciTech MGL Public
+* License Version 1.0 (the "License"); you may not use this file
+* except in compliance with the License. You may obtain a copy of
+* the License at http://www.scitechsoft.com/mgl-license.txt
+*
+* Software distributed under the License is distributed on an
+* "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+* implied. See the License for the specific language governing
+* rights and limitations under the License.
+*
+* The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+*
+* The Initial Developer of the Original Code is SciTech Software, Inc.
+* All Rights Reserved.
+*
+* ========================================================================
+*
+* Heavily based on code copyright (C) Richard Gooch
+*
+* Language: ANSI C
+* Environment: 32-bit Ring 0 device driver
+*
+* Description: Generic Memory Type Range Register (MTRR) functions to
+* manipulate the MTRR registers on supported CPU's. This code
+* *must* run at ring 0, so you can't normally include this
+* code directly in normal applications (the except is DOS4GW
+* apps which run at ring 0 under real DOS). Thus this code
+* will normally be compiled into a ring 0 device driver for
+* the target operating system.
+*
+****************************************************************************/
+
+#include "pmapi.h"
+#include "ztimerc.h"
+#include "mtrr.h"
+
+#ifndef REALMODE
+
+/*--------------------------- Global variables ----------------------------*/
+
+/* Intel pre-defined MTRR registers */
+
+#define NUM_FIXED_RANGES 88
+#define INTEL_cap_MSR 0x0FE
+#define INTEL_defType_MSR 0x2FF
+#define INTEL_fix64K_00000_MSR 0x250
+#define INTEL_fix16K_80000_MSR 0x258
+#define INTEL_fix16K_A0000_MSR 0x259
+#define INTEL_fix4K_C0000_MSR 0x268
+#define INTEL_fix4K_C8000_MSR 0x269
+#define INTEL_fix4K_D0000_MSR 0x26A
+#define INTEL_fix4K_D8000_MSR 0x26B
+#define INTEL_fix4K_E0000_MSR 0x26C
+#define INTEL_fix4K_E8000_MSR 0x26D
+#define INTEL_fix4K_F0000_MSR 0x26E
+#define INTEL_fix4K_F8000_MSR 0x26F
+
+/* Macros to find the address of a paricular MSR register */
+
+#define INTEL_physBase_MSR(reg) (0x200 + 2 * (reg))
+#define INTEL_physMask_MSR(reg) (0x200 + 2 * (reg) + 1)
+
+/* Cyrix CPU configuration register indexes */
+#define CX86_CCR0 0xC0
+#define CX86_CCR1 0xC1
+#define CX86_CCR2 0xC2
+#define CX86_CCR3 0xC3
+#define CX86_CCR4 0xE8
+#define CX86_CCR5 0xE9
+#define CX86_CCR6 0xEA
+#define CX86_DIR0 0xFE
+#define CX86_DIR1 0xFF
+#define CX86_ARR_BASE 0xC4
+#define CX86_RCR_BASE 0xDC
+
+/* Structure to maintain machine state while updating MTRR registers */
+
+typedef struct {
+ ulong flags;
+ ulong defTypeLo;
+ ulong defTypeHi;
+ ulong cr4Val;
+ ulong ccr3;
+ } MTRRContext;
+
+static int numMTRR = -1;
+static int cpuFamily,cpuType,cpuStepping;
+static void (*getMTRR)(uint reg,ulong *base,ulong *size,int *type) = NULL;
+static void (*setMTRR)(uint reg,ulong base,ulong size,int type) = NULL;
+static int (*getFreeRegion)(ulong base,ulong size) = NULL;
+
+/*----------------------------- Implementation ----------------------------*/
+
+/****************************************************************************
+RETURNS:
+Returns non-zero if we have the write-combining memory type
+****************************************************************************/
+static int MTRR_haveWriteCombine(void)
+{
+ ulong config,dummy;
+
+ switch (cpuFamily) {
+ case CPU_AMD:
+ if (cpuType < CPU_AMDAthlon) {
+ /* AMD K6-2 stepping 8 and later support the MTRR registers.
+ * The earlier K6-2 steppings (300Mhz models) do not
+ * support MTRR's.
+ */
+ if ((cpuType < CPU_AMDK6_2) || (cpuType == CPU_AMDK6_2 && cpuStepping < 8))
+ return 0;
+ return 1;
+ }
+ /* Fall through for AMD Athlon which uses P6 style MTRR's */
+ case CPU_Intel:
+ _MTRR_readMSR(INTEL_cap_MSR,&config,&dummy);
+ return (config & (1 << 10));
+ case CPU_Cyrix:
+ /* Cyrix 6x86 and later support the MTRR registers */
+ if (cpuType < CPU_Cyrix6x86)
+ return 0;
+ return 1;
+ }
+ return 0;
+}
+
+/****************************************************************************
+PARAMETERS:
+base - The starting physical base address of the region
+size - The size in bytes of the region
+
+RETURNS:
+The index of the region on success, else -1 on error.
+
+REMARKS:
+Generic function to find the location of a free MTRR register to be used
+for creating a new mapping.
+****************************************************************************/
+static int GENERIC_getFreeRegion(
+ ulong base,
+ ulong size)
+{
+ int i,ltype;
+ ulong lbase,lsize;
+
+ for (i = 0; i < numMTRR; i++) {
+ getMTRR(i,&lbase,&lsize,<ype);
+ if (lsize < 1)
+ return i;
+ }
+ (void)base;
+ (void)size;
+ return -1;
+}
+
+/****************************************************************************
+PARAMETERS:
+base - The starting physical base address of the region
+size - The size in bytes of the region
+
+RETURNS:
+The index of the region on success, else -1 on error.
+
+REMARKS:
+Generic function to find the location of a free MTRR register to be used
+for creating a new mapping.
+****************************************************************************/
+static int AMDK6_getFreeRegion(
+ ulong base,
+ ulong size)
+{
+ int i,ltype;
+ ulong lbase,lsize;
+
+ for (i = 0; i < numMTRR; i++) {
+ getMTRR(i,&lbase,&lsize,<ype);
+ if (lsize < 1)
+ return i;
+ }
+ (void)base;
+ (void)size;
+ return -1;
+}
+
+/****************************************************************************
+PARAMETERS:
+base - The starting physical base address of the region
+size - The size in bytes of the region
+
+RETURNS:
+The index of the region on success, else -1 on error.
+
+REMARKS:
+Cyrix specific function to find the location of a free MTRR register to be
+used for creating a new mapping.
+****************************************************************************/
+static int CYRIX_getFreeRegion(
+ ulong base,
+ ulong size)
+{
+ int i,ltype;
+ ulong lbase, lsize;
+
+ if (size > 0x2000000UL) {
+ /* If we are to set up a region >32M then look at ARR7 immediately */
+ getMTRR(7,&lbase,&lsize,<ype);
+ if (lsize < 1)
+ return 7;
+ }
+ else {
+ /* Check ARR0-6 registers */
+ for (i = 0; i < 7; i++) {
+ getMTRR(i,&lbase,&lsize,<ype);
+ if (lsize < 1)
+ return i;
+ }
+ /* Try ARR7 but its size must be at least 256K */
+ getMTRR(7,&lbase,&lsize,<ype);
+ if ((lsize < 1) && (size >= 0x40000))
+ return i;
+ }
+ (void)base;
+ return -1;
+}
+
+/****************************************************************************
+PARAMETERS:
+c - Place to store the machine context across the call
+
+REMARKS:
+Puts the processor into a state where MTRRs can be safely updated
+****************************************************************************/
+static void MTRR_beginUpdate(
+ MTRRContext *c)
+{
+ c->flags = _MTRR_disableInt();
+ if (cpuFamily != CPU_AMD || (cpuFamily == CPU_AMD && cpuType >= CPU_AMDAthlon)) {
+ switch (cpuFamily) {
+ case CPU_Intel:
+ case CPU_AMD:
+ /* Disable MTRRs, and set the default type to uncached */
+ c->cr4Val = _MTRR_saveCR4();
+ _MTRR_readMSR(INTEL_defType_MSR,&c->defTypeLo,&c->defTypeHi);
+ _MTRR_writeMSR(INTEL_defType_MSR,c->defTypeLo & 0xF300UL,c->defTypeHi);
+ break;
+ case CPU_Cyrix:
+ c->ccr3 = _MTRR_getCx86(CX86_CCR3);
+ _MTRR_setCx86(CX86_CCR3, (uchar)((c->ccr3 & 0x0F) | 0x10));
+ break;
+ }
+ }
+}
+
+/****************************************************************************
+PARAMETERS:
+c - Place to restore the machine context from
+
+REMARKS:
+Restores the processor after updating any of the registers
+****************************************************************************/
+static void MTRR_endUpdate(
+ MTRRContext *c)
+{
+ if (cpuFamily != CPU_AMD || (cpuFamily == CPU_AMD && cpuType >= CPU_AMDAthlon)) {
+ PM_flushTLB();
+ switch (cpuFamily) {
+ case CPU_Intel:
+ case CPU_AMD:
+ _MTRR_writeMSR(INTEL_defType_MSR,c->defTypeLo,c->defTypeHi);
+ _MTRR_restoreCR4(c->cr4Val);
+ break;
+ case CPU_Cyrix:
+ _MTRR_setCx86(CX86_CCR3,(uchar)c->ccr3);
+ break;
+ }
+ }
+
+ /* Re-enable interrupts (if enabled previously) */
+ _MTRR_restoreInt(c->flags);
+}
+
+/****************************************************************************
+PARAMETERS:
+reg - MTRR register to read
+base - Place to store the starting physical base address of the region
+size - Place to store the size in bytes of the region
+type - Place to store the type of the MTRR register
+
+REMARKS:
+Intel specific function to read the value of a specific MTRR register.
+****************************************************************************/
+static void INTEL_getMTRR(
+ uint reg,
+ ulong *base,
+ ulong *size,
+ int *type)
+{
+ ulong hi,maskLo,baseLo;
+
+ _MTRR_readMSR(INTEL_physMask_MSR(reg),&maskLo,&hi);
+ if ((maskLo & 0x800) == 0) {
+ /* MTRR is disabled, so it is free */
+ *base = 0;
+ *size = 0;
+ *type = 0;
+ return;
+ }
+ _MTRR_readMSR(INTEL_physBase_MSR(reg),&baseLo,&hi);
+ maskLo = (maskLo & 0xFFFFF000UL);
+ *size = ~(maskLo - 1);
+ *base = (baseLo & 0xFFFFF000UL);
+ *type = (baseLo & 0xFF);
+}
+
+/****************************************************************************
+PARAMETERS:
+reg - MTRR register to set
+base - The starting physical base address of the region
+size - The size in bytes of the region
+type - Type to place into the MTRR register
+
+REMARKS:
+Intel specific function to set the value of a specific MTRR register to
+the passed in base, size and type.
+****************************************************************************/
+static void INTEL_setMTRR(
+ uint reg,
+ ulong base,
+ ulong size,
+ int type)
+{
+ MTRRContext c;
+
+ MTRR_beginUpdate(&c);
+ if (size == 0) {
+ /* The invalid bit is kept in the mask, so we simply clear the
+ * relevant mask register to disable a range.
+ */
+ _MTRR_writeMSR(INTEL_physMask_MSR(reg),0,0);
+ }
+ else {
+ _MTRR_writeMSR(INTEL_physBase_MSR(reg),base | type,0);
+ _MTRR_writeMSR(INTEL_physMask_MSR(reg),~(size - 1) | 0x800,0);
+ }
+ MTRR_endUpdate(&c);
+}
+
+/****************************************************************************
+REMARKS:
+Disabled banked write combing for Intel processors. We always disable this
+because it invariably causes problems with older hardware.
+****************************************************************************/
+static void INTEL_disableBankedWriteCombine(void)
+{
+ MTRRContext c;
+
+ MTRR_beginUpdate(&c);
+ _MTRR_writeMSR(INTEL_fix16K_A0000_MSR,0,0);
+ MTRR_endUpdate(&c);
+}
+
+/****************************************************************************
+PARAMETERS:
+reg - MTRR register to set
+base - The starting physical base address of the region
+size - The size in bytes of the region
+type - Type to place into the MTRR register
+
+REMARKS:
+Intel specific function to set the value of a specific MTRR register to
+the passed in base, size and type.
+****************************************************************************/
+static void AMD_getMTRR(
+ uint reg,
+ ulong *base,
+ ulong *size,
+ int *type)
+{
+ ulong low,high;
+
+ /* Upper dword is region 1, lower is region 0 */
+ _MTRR_readMSR(0xC0000085, &low, &high);
+ if (reg == 1)
+ low = high;
+
+ /* Find the base and type for the region */
+ *base = low & 0xFFFE0000;
+ *type = 0;
+ if (low & 1)
+ *type = PM_MTRR_UNCACHABLE;
+ if (low & 2)
+ *type = PM_MTRR_WRCOMB;
+ if ((low & 3) == 0) {
+ *size = 0;
+ return;
+ }
+
+ /* This needs a little explaining. The size is stored as an
+ * inverted mask of bits of 128K granularity 15 bits long offset
+ * 2 bits
+ *
+ * So to get a size we do invert the mask and add 1 to the lowest
+ * mask bit (4 as its 2 bits in). This gives us a size we then shift
+ * to turn into 128K blocks
+ *
+ * eg 111 1111 1111 1100 is 512K
+ *
+ * invert 000 0000 0000 0011
+ * +1 000 0000 0000 0100
+ * *128K ...
+ */
+ low = (~low) & 0x0FFFC;
+ *size = (low + 4) << 15;
+}
+
+/****************************************************************************
+PARAMETERS:
+reg - MTRR register to set
+base - The starting physical base address of the region
+size - The size in bytes of the region
+type - Type to place into the MTRR register
+
+REMARKS:
+Intel specific function to set the value of a specific MTRR register to
+the passed in base, size and type.
+****************************************************************************/
+static void AMD_setMTRR(
+ uint reg,
+ ulong base,
+ ulong size,
+ int type)
+{
+ ulong low,high,newVal;
+ MTRRContext c;
+
+ MTRR_beginUpdate(&c);
+ _MTRR_readMSR(0xC0000085, &low, &high);
+ if (size == 0) {
+ /* Clear register to disable */
+ if (reg)
+ high = 0;
+ else
+ low = 0;
+ }
+ else {
+ /* Set the register to the base (already shifted for us), the
+ * type (off by one) and an inverted bitmask of the size
+ * The size is the only odd bit. We are fed say 512K
+ * We invert this and we get 111 1111 1111 1011 but
+ * if you subtract one and invert you get the desired
+ * 111 1111 1111 1100 mask
+ */
+ newVal = (((~(size-1)) >> 15) & 0x0001FFFC) | base | (type+1);
+ if (reg)
+ high = newVal;
+ else
+ low = newVal;
+ }
+
+ /* The writeback rule is quite specific. See the manual. Its
+ * disable local interrupts, write back the cache, set the MTRR
+ */
+ PM_flushTLB();
+ _MTRR_writeMSR(0xC0000085, low, high);
+ MTRR_endUpdate(&c);
+}
+
+/****************************************************************************
+PARAMETERS:
+reg - MTRR register to set
+base - The starting physical base address of the region
+size - The size in bytes of the region
+type - Type to place into the MTRR register
+
+REMARKS:
+Intel specific function to set the value of a specific MTRR register to
+the passed in base, size and type.
+****************************************************************************/
+static void CYRIX_getMTRR(
+ uint reg,
+ ulong *base,
+ ulong *size,
+ int *type)
+{
+ MTRRContext c;
+ uchar arr = CX86_ARR_BASE + reg*3;
+ uchar rcr,shift;
+
+ /* Save flags and disable interrupts */
+ MTRR_beginUpdate(&c);
+ ((uchar*)base)[3] = _MTRR_getCx86(arr);
+ ((uchar*)base)[2] = _MTRR_getCx86((uchar)(arr+1));
+ ((uchar*)base)[1] = _MTRR_getCx86((uchar)(arr+2));
+ rcr = _MTRR_getCx86((uchar)(CX86_RCR_BASE + reg));
+ MTRR_endUpdate(&c);
+
+ /* Enable interrupts if it was enabled previously */
+ shift = ((uchar*)base)[1] & 0x0f;
+ *base &= 0xFFFFF000UL;
+
+ /* Power of two, at least 4K on ARR0-ARR6, 256K on ARR7
+ * Note: shift==0xF means 4G, this is unsupported.
+ */
+ if (shift)
+ *size = (reg < 7 ? 0x800UL : 0x20000UL) << shift;
+ else
+ *size = 0;
+
+ /* Bit 0 is Cache Enable on ARR7, Cache Disable on ARR0-ARR6 */
+ if (reg < 7) {
+ switch (rcr) {
+ case 1: *type = PM_MTRR_UNCACHABLE; break;
+ case 8: *type = PM_MTRR_WRBACK; break;
+ case 9: *type = PM_MTRR_WRCOMB; break;
+ case 24:
+ default: *type = PM_MTRR_WRTHROUGH; break;
+ }
+ }
+ else {
+ switch (rcr) {
+ case 0: *type = PM_MTRR_UNCACHABLE; break;
+ case 8: *type = PM_MTRR_WRCOMB; break;
+ case 9: *type = PM_MTRR_WRBACK; break;
+ case 25:
+ default: *type = PM_MTRR_WRTHROUGH; break;
+ }
+ }
+}
+
+/****************************************************************************
+PARAMETERS:
+reg - MTRR register to set
+base - The starting physical base address of the region
+size - The size in bytes of the region
+type - Type to place into the MTRR register
+
+REMARKS:
+Intel specific function to set the value of a specific MTRR register to
+the passed in base, size and type.
+****************************************************************************/
+static void CYRIX_setMTRR(
+ uint reg,
+ ulong base,
+ ulong size,
+ int type)
+{
+ MTRRContext c;
+ uchar arr = CX86_ARR_BASE + reg*3;
+ uchar arr_type,arr_size;
+
+ /* Count down from 32M (ARR0-ARR6) or from 2G (ARR7) */
+ size >>= (reg < 7 ? 12 : 18);
+ size &= 0x7FFF; /* Make sure arr_size <= 14 */
+ for (arr_size = 0; size; arr_size++, size >>= 1)
+ ;
+ if (reg < 7) {
+ switch (type) {
+ case PM_MTRR_UNCACHABLE: arr_type = 1; break;
+ case PM_MTRR_WRCOMB: arr_type = 9; break;
+ case PM_MTRR_WRTHROUGH: arr_type = 24; break;
+ default: arr_type = 8; break;
+ }
+ }
+ else {
+ switch (type) {
+ case PM_MTRR_UNCACHABLE: arr_type = 0; break;
+ case PM_MTRR_WRCOMB: arr_type = 8; break;
+ case PM_MTRR_WRTHROUGH: arr_type = 25; break;
+ default: arr_type = 9; break;
+ }
+ }
+ MTRR_beginUpdate(&c);
+ _MTRR_setCx86((uchar)arr, ((uchar*)&base)[3]);
+ _MTRR_setCx86((uchar)(arr+1), ((uchar*)&base)[2]);
+ _MTRR_setCx86((uchar)(arr+2), (uchar)((((uchar*)&base)[1]) | arr_size));
+ _MTRR_setCx86((uchar)(CX86_RCR_BASE + reg), (uchar)arr_type);
+ MTRR_endUpdate(&c);
+}
+
+/****************************************************************************
+REMARKS:
+On Cyrix 6x86(MX) and MII the ARR3 is special: it has connection
+with the SMM (System Management Mode) mode. So we need the following:
+Check whether SMI_LOCK (CCR3 bit 0) is set
+ if it is set, ARR3 cannot be changed (it cannot be changed until the
+ next processor reset)
+ if it is reset, then we can change it, set all the needed bits:
+ - disable access to SMM memory through ARR3 range (CCR1 bit 7 reset)
+ - disable access to SMM memory (CCR1 bit 2 reset)
+ - disable SMM mode (CCR1 bit 1 reset)
+ - disable write protection of ARR3 (CCR6 bit 1 reset)
+ - (maybe) disable ARR3
+Just to be sure, we enable ARR usage by the processor (CCR5 bit 5 set)
+****************************************************************************/
+static void CYRIX_initARR(void)
+{
+ MTRRContext c;
+ uchar ccr[7];
+ int ccrc[7] = { 0, 0, 0, 0, 0, 0, 0 };
+
+ /* Begin updating */
+ MTRR_beginUpdate(&c);
+
+ /* Save all CCRs locally */
+ ccr[0] = _MTRR_getCx86(CX86_CCR0);
+ ccr[1] = _MTRR_getCx86(CX86_CCR1);
+ ccr[2] = _MTRR_getCx86(CX86_CCR2);
+ ccr[3] = (uchar)c.ccr3;
+ ccr[4] = _MTRR_getCx86(CX86_CCR4);
+ ccr[5] = _MTRR_getCx86(CX86_CCR5);
+ ccr[6] = _MTRR_getCx86(CX86_CCR6);
+ if (ccr[3] & 1)
+ ccrc[3] = 1;
+ else {
+ /* Disable SMM mode (bit 1), access to SMM memory (bit 2) and
+ * access to SMM memory through ARR3 (bit 7).
+ */
+ if (ccr[6] & 0x02) {
+ ccr[6] &= 0xFD;
+ ccrc[6] = 1; /* Disable write protection of ARR3. */
+ _MTRR_setCx86(CX86_CCR6,ccr[6]);
+ }
+ }
+
+ /* If we changed CCR1 in memory, change it in the processor, too. */
+ if (ccrc[1])
+ _MTRR_setCx86(CX86_CCR1,ccr[1]);
+
+ /* Enable ARR usage by the processor */
+ if (!(ccr[5] & 0x20)) {
+ ccr[5] |= 0x20;
+ ccrc[5] = 1;
+ _MTRR_setCx86(CX86_CCR5,ccr[5]);
+ }
+
+ /* We are finished updating */
+ MTRR_endUpdate(&c);
+}
+
+/****************************************************************************
+REMARKS:
+Initialise the MTRR module, by detecting the processor type and determining
+if the processor supports the MTRR functionality.
+****************************************************************************/
+void MTRR_init(void)
+{
+ int i,cpu,ltype;
+ ulong eax,edx,lbase,lsize;
+
+ /* Check that we have a compatible CPU */
+ if (numMTRR == -1) {
+ numMTRR = 0;
+ if (!_MTRR_isRing0())
+ return;
+ cpu = CPU_getProcessorType();
+ cpuFamily = cpu & CPU_familyMask;
+ cpuType = cpu & CPU_mask;
+ cpuStepping = (cpu & CPU_steppingMask) >> CPU_steppingShift;
+ switch (cpuFamily) {
+ case CPU_Intel:
+ /* Intel Pentium Pro and later support the MTRR registers */
+ if (cpuType < CPU_PentiumPro)
+ return;
+ _MTRR_readMSR(INTEL_cap_MSR,&eax,&edx);
+ numMTRR = eax & 0xFF;
+ getMTRR = INTEL_getMTRR;
+ setMTRR = INTEL_setMTRR;
+ getFreeRegion = GENERIC_getFreeRegion;
+ INTEL_disableBankedWriteCombine();
+ break;
+ case CPU_AMD:
+ /* AMD K6-2 and later support the MTRR registers */
+ if ((cpuType < CPU_AMDK6_2) || (cpuType == CPU_AMDK6_2 && cpuStepping < 8))
+ return;
+ if (cpuType < CPU_AMDAthlon) {
+ numMTRR = 2; /* AMD CPU's have 2 MTRR's */
+ getMTRR = AMD_getMTRR;
+ setMTRR = AMD_setMTRR;
+ getFreeRegion = AMDK6_getFreeRegion;
+
+ /* For some reason some IBM systems with K6-2 processors
+ * have write combined enabled for the system BIOS
+ * region from 0xE0000 to 0xFFFFFF. We need *both* MTRR's
+ * for our own graphics drivers, so if we detect any
+ * regions below the 1Meg boundary, we remove them
+ * so we can use this MTRR register ourselves.
+ */
+ for (i = 0; i < numMTRR; i++) {
+ getMTRR(i,&lbase,&lsize,<ype);
+ if (lbase < 0x100000)
+ setMTRR(i,0,0,0);
+ }
+ }
+ else {
+ /* AMD Athlon uses P6 style MTRR's */
+ _MTRR_readMSR(INTEL_cap_MSR,&eax,&edx);
+ numMTRR = eax & 0xFF;
+ getMTRR = INTEL_getMTRR;
+ setMTRR = INTEL_setMTRR;
+ getFreeRegion = GENERIC_getFreeRegion;
+ INTEL_disableBankedWriteCombine();
+ }
+ break;
+ case CPU_Cyrix:
+ /* Cyrix 6x86 and later support the MTRR registers */
+ if (cpuType < CPU_Cyrix6x86 || cpuType >= CPU_CyrixMediaGX)
+ return;
+ numMTRR = 8; /* Cyrix CPU's have 8 ARR's */
+ getMTRR = CYRIX_getMTRR;
+ setMTRR = CYRIX_setMTRR;
+ getFreeRegion = CYRIX_getFreeRegion;
+ CYRIX_initARR();
+ break;
+ default:
+ return;
+ }
+ }
+}
+
+/****************************************************************************
+PARAMETERS:
+base - The starting physical base address of the region
+size - The size in bytes of the region
+type - Type to place into the MTRR register
+
+RETURNS:
+Error code describing the result.
+
+REMARKS:
+Function to enable write combining for the specified region of memory.
+****************************************************************************/
+int MTRR_enableWriteCombine(
+ ulong base,
+ ulong size,
+ uint type)
+{
+ int i;
+ int ltype;
+ ulong lbase,lsize,last;
+
+ /* Check that we have a CPU that supports MTRR's and type is valid */
+ if (numMTRR <= 0) {
+ if (!_MTRR_isRing0())
+ return PM_MTRR_ERR_NO_OS_SUPPORT;
+ return PM_MTRR_NOT_SUPPORTED;
+ }
+ if (type >= PM_MTRR_MAX)
+ return PM_MTRR_ERR_PARAMS;
+
+ /* If the type is WC, check that this processor supports it */
+ if (!MTRR_haveWriteCombine())
+ return PM_MTRR_ERR_NOWRCOMB;
+
+ /* Adjust the boundaries depending on the CPU type */
+ switch (cpuFamily) {
+ case CPU_AMD:
+ if (cpuType < CPU_AMDAthlon) {
+ /* Apply the K6 block alignment and size rules. In order:
+ * o Uncached or gathering only
+ * o 128K or bigger block
+ * o Power of 2 block
+ * o base suitably aligned to the power
+ */
+ if (type > PM_MTRR_WRCOMB && (size < (1 << 17) || (size & ~(size-1))-size || (base & (size-1))))
+ return PM_MTRR_ERR_NOT_ALIGNED;
+ break;
+ }
+ /* Fall through for AMD Athlon which uses P6 style MTRR's */
+ case CPU_Intel:
+ case CPU_Cyrix:
+ if ((base & 0xFFF) || (size & 0xFFF)) {
+ /* Base and size must be multiples of 4Kb */
+ return PM_MTRR_ERR_NOT_4KB_ALIGNED;
+ }
+ if (base < 0x100000) {
+ /* Base must be >= 1Mb */
+ return PM_MTRR_ERR_BELOW_1MB;
+ }
+
+ /* Check upper bits of base and last are equal and lower bits
+ * are 0 for base and 1 for last
+ */
+ last = base + size - 1;
+ for (lbase = base; !(lbase & 1) && (last & 1); lbase = lbase >> 1, last = last >> 1)
+ ;
+ if (lbase != last) {
+ /* Base is not aligned on the correct boundary */
+ return PM_MTRR_ERR_NOT_ALIGNED;
+ }
+ break;
+ default:
+ return PM_MTRR_NOT_SUPPORTED;
+ }
+
+ /* Search for existing MTRR */
+ for (i = 0; i < numMTRR; ++i) {
+ getMTRR(i,&lbase,&lsize,<ype);
+ if (lbase == 0 && lsize == 0)
+ continue;
+ if (base > lbase + (lsize-1))
+ continue;
+ if ((base < lbase) && (base+size-1 < lbase))
+ continue;
+
+ /* Check that we don't overlap an existing region */
+ if (type != PM_MTRR_UNCACHABLE) {
+ if ((base < lbase) || (base+size-1 > lbase+lsize-1))
+ return PM_MTRR_ERR_OVERLAP;
+ }
+ else if (base == lbase && size == lsize) {
+ /* The region already exists so leave it alone */
+ return PM_MTRR_ERR_OK;
+ }
+
+ /* New region is enclosed by an existing region, so only allow
+ * a new type to be created if we are setting a region to be
+ * uncacheable (such as MMIO registers within a framebuffer).
+ */
+ if (ltype != (int)type) {
+ if (type == PM_MTRR_UNCACHABLE)
+ continue;
+ return PM_MTRR_ERR_TYPE_MISMATCH;
+ }
+ return PM_MTRR_ERR_OK;
+ }
+
+ /* Search for an empty MTRR */
+ if ((i = getFreeRegion(base,size)) < 0)
+ return PM_MTRR_ERR_NONE_FREE;
+ setMTRR(i,base,size,type);
+ return PM_MTRR_ERR_OK;
+}
+
+/****************************************************************************
+PARAMETERS:
+callback - Function to callback with write combine information
+
+REMARKS:
+Function to enumerate all write combine regions currently enabled for the
+processor.
+****************************************************************************/
+int PMAPI PM_enumWriteCombine(
+ PM_enumWriteCombine_t callback)
+{
+ int i,ltype;
+ ulong lbase,lsize;
+
+ /* Check that we have a CPU that supports MTRR's and type is valid */
+ if (numMTRR <= 0) {
+ if (!_MTRR_isRing0())
+ return PM_MTRR_ERR_NO_OS_SUPPORT;
+ return PM_MTRR_NOT_SUPPORTED;
+ }
+
+ /* Enumerate all existing MTRR's */
+ for (i = 0; i < numMTRR; ++i) {
+ getMTRR(i,&lbase,&lsize,<ype);
+ callback(lbase,lsize,ltype);
+ }
+ return PM_MTRR_ERR_OK;
+}
+#endif
diff --git a/board/MAI/bios_emulator/scitech/src/pm/common/pcilib.c b/board/MAI/bios_emulator/scitech/src/pm/common/pcilib.c
new file mode 100644
index 00000000000..8dd6dd13e3a
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/pm/common/pcilib.c
@@ -0,0 +1,747 @@
+/****************************************************************************
+*
+* SciTech OS Portability Manager Library
+*
+* ========================================================================
+*
+* The contents of this file are subject to the SciTech MGL Public
+* License Version 1.0 (the "License"); you may not use this file
+* except in compliance with the License. You may obtain a copy of
+* the License at http://www.scitechsoft.com/mgl-license.txt
+*
+* Software distributed under the License is distributed on an
+* "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+* implied. See the License for the specific language governing
+* rights and limitations under the License.
+*
+* The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+*
+* The Initial Developer of the Original Code is SciTech Software, Inc.
+* All Rights Reserved.
+*
+* ========================================================================
+*
+* Language: ANSI C
+* Environment: Any
+*
+* Description: Module for interfacing to the PCI bus and configuration
+* space registers.
+*
+****************************************************************************/
+
+#include "pmapi.h"
+#include "pcilib.h"
+#if !defined(__WIN32_VXD__) && !defined(__NT_DRIVER__)
+#include <string.h>
+#endif
+
+/*---------------------- Macros and type definitions ----------------------*/
+
+#pragma pack(1)
+
+/* Length of the memory mapping for the PCI BIOS */
+
+#define BIOS_LIMIT (128 * 1024L - 1)
+
+/* Macros for accessing the PCI BIOS functions from 32-bit protected mode */
+
+#define BIOS32_SIGNATURE (((ulong)'_' << 0) + ((ulong)'3' << 8) + ((ulong)'2' << 16) + ((ulong)'_' << 24))
+#define PCI_SIGNATURE (((ulong)'P' << 0) + ((ulong)'C' << 8) + ((ulong)'I' << 16) + ((ulong)' ' << 24))
+#define PCI_SERVICE (((ulong)'$' << 0) + ((ulong)'P' << 8) + ((ulong)'C' << 16) + ((ulong)'I' << 24))
+#define PCI_BIOS_PRESENT 0xB101
+#define FIND_PCI_DEVICE 0xB102
+#define FIND_PCI_CLASS 0xB103
+#define GENERATE_SPECIAL 0xB106
+#define READ_CONFIG_BYTE 0xB108
+#define READ_CONFIG_WORD 0xB109
+#define READ_CONFIG_DWORD 0xB10A
+#define WRITE_CONFIG_BYTE 0xB10B
+#define WRITE_CONFIG_WORD 0xB10C
+#define WRITE_CONFIG_DWORD 0xB10D
+#define GET_IRQ_ROUTING_OPT 0xB10E
+#define SET_PCI_IRQ 0xB10F
+
+/* This is the standard structure used to identify the entry point to the
+ * BIOS32 Service Directory, as documented in PCI 2.1 BIOS Specicition.
+ */
+
+typedef union {
+ struct {
+ ulong signature; /* _32_ */
+ ulong entry; /* 32 bit physical address */
+ uchar revision; /* Revision level, 0 */
+ uchar length; /* Length in paragraphs should be 01 */
+ uchar checksum; /* All bytes must add up to zero */
+ uchar reserved[5]; /* Must be zero */
+ } fields;
+ char chars[16];
+ } PCI_bios32;
+
+/* Structure for a far pointer to call the PCI BIOS services with */
+
+typedef struct {
+ ulong address;
+ ushort segment;
+ } PCIBIOS_entry;
+
+/* Macros to copy a structure that includes dwSize members */
+
+#define COPY_STRUCTURE(d,s) memcpy(d,s,MIN((s)->dwSize,(d)->dwSize))
+
+#pragma pack()
+
+/*--------------------------- Global variables ----------------------------*/
+
+static uchar *BIOSImage = NULL; /* BIOS image mapping */
+static int PCIBIOSVersion = -1;/* PCI BIOS version */
+static PCIBIOS_entry PCIEntry; /* PCI services entry point */
+static ulong PCIPhysEntry = 0; /* Physical address */
+
+/*----------------------------- Implementation ----------------------------*/
+
+/* External assembler helper functions */
+
+uchar _ASMAPI _BIOS32_service(ulong service,ulong function,ulong *physBase,ulong *length,ulong *serviceOffset,PCIBIOS_entry entry);
+ushort _ASMAPI _PCIBIOS_isPresent(ulong i_eax,ulong *o_edx,ushort *o_ax,uchar *o_cl,PCIBIOS_entry entry);
+ulong _ASMAPI _PCIBIOS_service(ulong r_eax,ulong r_ebx,ulong r_edi,ulong r_ecx,PCIBIOS_entry entry);
+int _ASMAPI _PCIBIOS_getRouting(PCIRoutingOptionsBuffer *buf,PCIBIOS_entry entry);
+ibool _ASMAPI _PCIBIOS_setIRQ(int busDev,int intPin,int IRQ,PCIBIOS_entry entry);
+ulong _ASMAPI _PCIBIOS_specialCycle(int bus,ulong data,PCIBIOS_entry entry);
+ushort _ASMAPI _PCI_getCS(void);
+
+/****************************************************************************
+REMARKS:
+This functions returns the physical address of the PCI BIOS entry point.
+****************************************************************************/
+ulong _ASMAPI PCIBIOS_getEntry(void)
+{ return PCIPhysEntry; }
+
+/****************************************************************************
+PARAMETERS:
+hwType - Place to store the PCI hardware access mechanism flags
+lastBus - Place to store the index of the last PCI bus in the system
+
+RETURNS:
+Version number of the PCI BIOS found.
+
+REMARKS:
+This function determines if the PCI BIOS is present in the system, and if
+so returns the information returned by the PCI BIOS detect function.
+****************************************************************************/
+static int PCIBIOS_detect(
+ uchar *hwType,
+ uchar *lastBus)
+{
+ ulong signature;
+ ushort stat,version;
+
+#ifndef __16BIT__
+ PCIBIOS_entry BIOSEntry = {0};
+ uchar *BIOSEnd;
+ PCI_bios32 *BIOSDir;
+ ulong physBase,length,offset;
+
+ /* Bail if we have already detected no BIOS is present */
+ if (PCIBIOSVersion == 0)
+ return 0;
+
+ /* First scan the memory from 0xE0000 to 0xFFFFF looking for the
+ * BIOS32 service directory, so we can determine if we can call it
+ * from 32-bit protected mode.
+ */
+ if (PCIBIOSVersion == -1) {
+ PCIBIOSVersion = 0;
+ BIOSImage = PM_mapPhysicalAddr(0xE0000,BIOS_LIMIT,false);
+ if (!BIOSImage)
+ return 0;
+ BIOSEnd = BIOSImage + 0x20000;
+ for (BIOSDir = (PCI_bios32*)BIOSImage; BIOSDir < (PCI_bios32*)BIOSEnd; BIOSDir++) {
+ uchar sum;
+ int i,length;
+
+ if (BIOSDir->fields.signature != BIOS32_SIGNATURE)
+ continue;
+ length = BIOSDir->fields.length * 16;
+ if (!length)
+ continue;
+ for (sum = i = 0; i < length ; i++)
+ sum += BIOSDir->chars[i];
+ if (sum != 0)
+ continue;
+ BIOSEntry.address = (ulong)BIOSImage + (BIOSDir->fields.entry - 0xE0000);
+ BIOSEntry.segment = _PCI_getCS();
+ break;
+ }
+
+ /* If we found the BIOS32 directory, call it to get the address of the
+ * PCI services.
+ */
+ if (BIOSEntry.address == 0)
+ return 0;
+ if (_BIOS32_service(PCI_SERVICE,0,&physBase,&length,&offset,BIOSEntry) != 0)
+ return 0;
+ PCIPhysEntry = physBase + offset;
+ PCIEntry.address = (ulong)BIOSImage + (PCIPhysEntry - 0xE0000);
+ PCIEntry.segment = _PCI_getCS();
+ }
+#endif
+ /* We found the BIOS entry, so now do the version check */
+ version = _PCIBIOS_isPresent(PCI_BIOS_PRESENT,&signature,&stat,lastBus,PCIEntry);
+ if (version > 0 && ((stat >> 8) == 0) && signature == PCI_SIGNATURE) {
+ *hwType = stat & 0xFF;
+ return PCIBIOSVersion = version;
+ }
+ return 0;
+}
+
+/****************************************************************************
+PARAMETERS:
+info - Array of PCIDeviceInfo structures to check against
+index - Index of the current device to check
+
+RETURNS:
+True if the device is a duplicate, false if not.
+
+REMARKS:
+This function goes through the list of all devices preceeding the newly
+found device in the info structure, and checks that the device is not a
+duplicate of a previous device. Some devices incorrectly enumerate
+themselves at different function addresses so we check here to exclude
+those cases.
+****************************************************************************/
+static ibool CheckDuplicate(
+ PCIDeviceInfo *info,
+ PCIDeviceInfo *prev)
+{
+ /* Ignore devices with a vendor ID of 0 */
+ if (info->VendorID == 0)
+ return true;
+
+ /* NOTE: We only check against the current device on
+ * the bus to ensure that we do not exclude
+ * multiple controllers of the same device ID.
+ */
+ if (info->slot.p.Bus == prev->slot.p.Bus &&
+ info->slot.p.Device == prev->slot.p.Device &&
+ info->DeviceID == prev->DeviceID)
+ return true;
+ return false;
+}
+
+/****************************************************************************
+PARAMETERS:
+info - Array of PCIDeviceInfo structures to fill in
+maxDevices - Maximum number of of devices to enumerate into array
+
+RETURNS:
+Number of PCI devices found and enumerated on the PCI bus, 0 if not PCI.
+
+REMARKS:
+Function to enumerate all available devices on the PCI bus into an array
+of configuration information blocks.
+****************************************************************************/
+static int PCI_enumerateMech1(
+ PCIDeviceInfo info[])
+{
+ int bus,device,function,i,numFound = 0;
+ ulong *lp,tmp;
+ PCIslot slot = {{0,0,0,0,0,0,1}};
+ PCIDeviceInfo pci,prev = {0};
+
+ /* Try PCI access mechanism 1 */
+ PM_outpb(0xCFB,0x01);
+ tmp = PM_inpd(0xCF8);
+ PM_outpd(0xCF8,slot.i);
+ if ((PM_inpd(0xCF8) == slot.i) && (PM_inpd(0xCFC) != 0xFFFFFFFFUL)) {
+ /* PCI access mechanism 1 - the preferred mechanism */
+ for (bus = 0; bus < 8; bus++) {
+ slot.p.Bus = bus;
+ for (device = 0; device < 32; device++) {
+ slot.p.Device = device;
+ for (function = 0; function < 8; function++) {
+ slot.p.Function = function;
+ slot.p.Register = 0;
+ PM_outpd(0xCF8,slot.i);
+ if (PM_inpd(0xCFC) != 0xFFFFFFFFUL) {
+ memset(&pci,0,sizeof(pci));
+ pci.dwSize = sizeof(pci);
+ pci.mech1 = 1;
+ pci.slot = slot;
+ lp = (ulong*)&(pci.VendorID);
+ for (i = 0; i < NUM_PCI_REG; i++, lp++) {
+ slot.p.Register = i;
+ PM_outpd(0xCF8,slot.i);
+ *lp = PM_inpd(0xCFC);
+ }
+ if (!CheckDuplicate(&pci,&prev)) {
+ if (info)
+ COPY_STRUCTURE(&info[numFound],&pci);
+ ++numFound;
+ }
+ prev = pci;
+ }
+ }
+ }
+ }
+
+ /* Disable PCI config cycle on exit */
+ PM_outpd(0xCF8,0);
+ return numFound;
+ }
+ PM_outpd(0xCF8,tmp);
+
+ /* No hardware access mechanism 1 found */
+ return 0;
+}
+
+/****************************************************************************
+PARAMETERS:
+info - Array of PCIDeviceInfo structures to fill in
+maxDevices - Maximum number of of devices to enumerate into array
+
+RETURNS:
+Number of PCI devices found and enumerated on the PCI bus, 0 if not PCI.
+
+REMARKS:
+Function to enumerate all available devices on the PCI bus into an array
+of configuration information blocks.
+****************************************************************************/
+static int PCI_enumerateMech2(
+ PCIDeviceInfo info[])
+{
+ int bus,device,function,i,numFound = 0;
+ ushort deviceIO;
+ ulong *lp;
+ PCIslot slot = {{0,0,0,0,0,0,1}};
+ PCIDeviceInfo pci,prev = {0};
+
+ /* Try PCI access mechanism 2 */
+ PM_outpb(0xCFB,0x00);
+ PM_outpb(0xCF8,0x00);
+ PM_outpb(0xCFA,0x00);
+ if (PM_inpb(0xCF8) == 0x00 && PM_inpb(0xCFB) == 0x00) {
+ /* PCI access mechanism 2 - the older mechanism for legacy busses */
+ for (bus = 0; bus < 2; bus++) {
+ slot.p.Bus = bus;
+ PM_outpb(0xCFA,(uchar)bus);
+ for (device = 0; device < 16; device++) {
+ slot.p.Device = device;
+ deviceIO = 0xC000 + (device << 8);
+ for (function = 0; function < 8; function++) {
+ slot.p.Function = function;
+ slot.p.Register = 0;
+ PM_outpb(0xCF8,(uchar)((function << 1) | 0x10));
+ if (PM_inpd(deviceIO) != 0xFFFFFFFFUL) {
+ memset(&pci,0,sizeof(pci));
+ pci.dwSize = sizeof(pci);
+ pci.mech1 = 0;
+ pci.slot = slot;
+ lp = (ulong*)&(pci.VendorID);
+ for (i = 0; i < NUM_PCI_REG; i++, lp++) {
+ slot.p.Register = i;
+ *lp = PM_inpd(deviceIO + (i << 2));
+ }
+ if (!CheckDuplicate(&pci,&prev)) {
+ if (info)
+ COPY_STRUCTURE(&info[numFound],&pci);
+ ++numFound;
+ }
+ prev = pci;
+ }
+ }
+ }
+ }
+
+ /* Disable PCI config cycle on exit */
+ PM_outpb(0xCF8,0);
+ return numFound;
+ }
+
+ /* No hardware access mechanism 2 found */
+ return 0;
+}
+
+/****************************************************************************
+REMARKS:
+This functions reads a configuration dword via the PCI BIOS.
+****************************************************************************/
+static ulong PCIBIOS_readDWORD(
+ int index,
+ ulong slot)
+{
+ return (ulong)_PCIBIOS_service(READ_CONFIG_DWORD,slot >> 8,index,0,PCIEntry);
+}
+
+/****************************************************************************
+PARAMETERS:
+info - Array of PCIDeviceInfo structures to fill in
+maxDevices - Maximum number of of devices to enumerate into array
+
+RETURNS:
+Number of PCI devices found and enumerated on the PCI bus, 0 if not PCI.
+
+REMARKS:
+Function to enumerate all available devices on the PCI bus into an array
+of configuration information blocks.
+****************************************************************************/
+static int PCI_enumerateBIOS(
+ PCIDeviceInfo info[])
+{
+ uchar hwType,lastBus;
+ int bus,device,function,i,numFound = 0;
+ ulong *lp;
+ PCIslot slot = {{0,0,0,0,0,0,1}};
+ PCIDeviceInfo pci,prev = {0};
+
+ if (PCIBIOS_detect(&hwType,&lastBus)) {
+ /* PCI BIOS access - the ultimate fallback */
+ for (bus = 0; bus <= lastBus; bus++) {
+ slot.p.Bus = bus;
+ for (device = 0; device < 32; device++) {
+ slot.p.Device = device;
+ for (function = 0; function < 8; function++) {
+ slot.p.Function = function;
+ if (PCIBIOS_readDWORD(0,slot.i) != 0xFFFFFFFFUL) {
+ memset(&pci,0,sizeof(pci));
+ pci.dwSize = sizeof(pci);
+ pci.mech1 = 2;
+ pci.slot = slot;
+ lp = (ulong*)&(pci.VendorID);
+ for (i = 0; i < NUM_PCI_REG; i++, lp++)
+ *lp = PCIBIOS_readDWORD(i << 2,slot.i);
+ if (!CheckDuplicate(&pci,&prev)) {
+ if (info)
+ COPY_STRUCTURE(&info[numFound],&pci);
+ ++numFound;
+ }
+ prev = pci;
+ }
+ }
+ }
+ }
+ }
+
+ /* Return number of devices found */
+ return numFound;
+}
+
+/****************************************************************************
+PARAMETERS:
+info - Array of PCIDeviceInfo structures to fill in
+maxDevices - Maximum number of of devices to enumerate into array
+
+RETURNS:
+Number of PCI devices found and enumerated on the PCI bus, 0 if not PCI.
+
+REMARKS:
+Function to enumerate all available devices on the PCI bus into an array
+of configuration information blocks.
+****************************************************************************/
+int _ASMAPI PCI_enumerate(
+ PCIDeviceInfo info[])
+{
+ int numFound;
+
+ /* First try via the direct access mechanisms which are faster if we
+ * have them (nearly always). The BIOS is used as a fallback, and for
+ * stuff we can't do directly.
+ */
+ if ((numFound = PCI_enumerateMech1(info)) == 0) {
+ if ((numFound = PCI_enumerateMech2(info)) == 0) {
+ if ((numFound = PCI_enumerateBIOS(info)) == 0)
+ return 0;
+ }
+ }
+ return numFound;
+}
+
+/****************************************************************************
+PARAMETERS:
+info - Array of PCIDeviceInfo structures to fill in
+maxDevices - Maximum number of of devices to enumerate into array
+
+RETURNS:
+Number of PCI devices found and enumerated on the PCI bus, 0 if not PCI.
+
+REMARKS:
+Function to enumerate all available devices on the PCI bus into an array
+of configuration information blocks.
+****************************************************************************/
+int _ASMAPI PCI_getNumDevices(void)
+{
+ return PCI_enumerate(NULL);
+}
+
+/****************************************************************************
+PARAMETERS:
+bar - Base address to measure
+pci - PCI device to access
+
+RETURNS:
+Size of the PCI base address in bytes
+
+REMARKS:
+This function measures the size of the PCI base address register in bytes,
+by writing all F's to the register, and reading the value back. The size
+of the base address is determines by the bits that are hardwired to zero's.
+****************************************************************************/
+ulong _ASMAPI PCI_findBARSize(
+ int bar,
+ PCIDeviceInfo *pci)
+{
+ ulong base,size = 0;
+
+ base = PCI_accessReg(bar,0,PCI_READ_DWORD,pci);
+ if (base && !(base & 0x1)) {
+ /* For some strange reason some devices don't properly decode
+ * their base address registers (Intel PCI/PCI bridges!), and
+ * we read completely bogus values. We check for that here
+ * and clear out those BAR's.
+ *
+ * We check for that here because at least the low 12 bits
+ * of the address range must be zeros, since the page size
+ * on IA32 processors is always 4Kb.
+ */
+ if ((base & 0xFFF) == 0) {
+ PCI_accessReg(bar,0xFFFFFFFF,PCI_WRITE_DWORD,pci);
+ size = PCI_accessReg(bar,0,PCI_READ_DWORD,pci) & ~0xFF;
+ size = ~size+1;
+ PCI_accessReg(bar,base,PCI_WRITE_DWORD,pci);
+ }
+ }
+ pci->slot.p.Register = 0;
+ return size;
+}
+
+/****************************************************************************
+PARAMETERS:
+index - DWORD index of the register to access
+value - Value to write to the register for write access
+func - Function to implement
+
+RETURNS:
+The value read from the register for read operations
+
+REMARKS:
+The function code are defined as follows
+
+code - function
+0 - Read BYTE
+1 - Read WORD
+2 - Read DWORD
+3 - Write BYTE
+4 - Write WORD
+5 - Write DWORD
+****************************************************************************/
+ulong _ASMAPI PCI_accessReg(
+ int index,
+ ulong value,
+ int func,
+ PCIDeviceInfo *info)
+{
+ int iobase;
+
+ if (info->mech1 == 2) {
+ /* Use PCI BIOS access since we dont have direct hardware access */
+ switch (func) {
+ case PCI_READ_BYTE:
+ return (uchar)_PCIBIOS_service(READ_CONFIG_BYTE,info->slot.i >> 8,index,0,PCIEntry);
+ case PCI_READ_WORD:
+ return (ushort)_PCIBIOS_service(READ_CONFIG_WORD,info->slot.i >> 8,index,0,PCIEntry);
+ case PCI_READ_DWORD:
+ return (ulong)_PCIBIOS_service(READ_CONFIG_DWORD,info->slot.i >> 8,index,0,PCIEntry);
+ case PCI_WRITE_BYTE:
+ _PCIBIOS_service(WRITE_CONFIG_BYTE,info->slot.i >> 8,index,value,PCIEntry);
+ break;
+ case PCI_WRITE_WORD:
+ _PCIBIOS_service(WRITE_CONFIG_WORD,info->slot.i >> 8,index,value,PCIEntry);
+ break;
+ case PCI_WRITE_DWORD:
+ _PCIBIOS_service(WRITE_CONFIG_DWORD,info->slot.i >> 8,index,value,PCIEntry);
+ break;
+ }
+ }
+ else {
+ /* Use direct hardware access mechanisms */
+ if (info->mech1) {
+ /* PCI access mechanism 1 */
+ iobase = 0xCFC + (index & 3);
+ info->slot.p.Register = index >> 2;
+ PM_outpd(0xCF8,info->slot.i);
+ }
+ else {
+ /* PCI access mechanism 2 */
+ PM_outpb(0xCF8,(uchar)((info->slot.p.Function << 1) | 0x10));
+ PM_outpb(0xCFA,(uchar)info->slot.p.Bus);
+ iobase = 0xC000 + (info->slot.p.Device << 8) + index;
+ }
+ switch (func) {
+ case PCI_READ_BYTE:
+ case PCI_READ_WORD:
+ case PCI_READ_DWORD: value = PM_inpd(iobase); break;
+ case PCI_WRITE_BYTE: PM_outpb(iobase,(uchar)value); break;
+ case PCI_WRITE_WORD: PM_outpw(iobase,(ushort)value); break;
+ case PCI_WRITE_DWORD: PM_outpd(iobase,(ulong)value); break;
+ }
+ PM_outpd(0xCF8,0);
+ }
+ return value;
+}
+
+/****************************************************************************
+PARAMETERS:
+numDevices - Number of devices to query info for
+
+RETURNS:
+0 on success, -1 on error, number of devices to enumerate if numDevices = 0
+
+REMARKS:
+This function reads the PCI routing information. If you pass a value of
+0 for numDevices, this function will return with the number of devices
+needed in the routing buffer that will be filled in by the BIOS.
+****************************************************************************/
+ibool _ASMAPI PCI_getIRQRoutingOptions(
+ int numDevices,
+ PCIRouteInfo *buffer)
+{
+ PCIRoutingOptionsBuffer buf;
+ int ret;
+
+ if (PCIPhysEntry) {
+ buf.BufferSize = numDevices * sizeof(PCIRouteInfo);
+ buf.DataBuffer = buffer;
+ if ((ret = _PCIBIOS_getRouting(&buf,PCIEntry)) == 0x89)
+ return buf.BufferSize / sizeof(PCIRouteInfo);
+ if (ret != 0)
+ return -1;
+ return 0;
+ }
+
+ /* We currently only support this via the PCI BIOS functions */
+ return -1;
+}
+
+/****************************************************************************
+PARAMETERS:
+info - PCI device information for the specified device
+intPin - Value to store in the PCI InterruptPin register
+IRQ - New ISA IRQ to map the PCI interrupt to (0-15)
+
+RETURNS:
+True on success, or false if this function failed.
+
+REMARKS:
+This function changes the PCI IRQ routing for the specified device to the
+desired PCI interrupt and the desired ISA bus compatible IRQ. This function
+may not be supported by the PCI BIOS, in which case this function will
+fail.
+****************************************************************************/
+ibool _ASMAPI PCI_setHardwareIRQ(
+ PCIDeviceInfo *info,
+ uint intPin,
+ uint IRQ)
+{
+ if (PCIPhysEntry) {
+ if (_PCIBIOS_setIRQ(info->slot.i >> 8,intPin,IRQ,PCIEntry)) {
+ info->u.type0.InterruptPin = intPin;
+ info->u.type0.InterruptLine = IRQ;
+ return true;
+ }
+ return false;
+ }
+
+ /* We currently only support this via the PCI BIOS functions */
+ return false;
+}
+
+/****************************************************************************
+PARAMETERS:
+bus - Bus number to generate the special cycle for
+specialCycleData - Data to send for the special cyle
+
+REMARKS:
+This function generates a special cycle on the specified bus using with
+the specified data.
+****************************************************************************/
+void _ASMAPI PCI_generateSpecialCyle(
+ uint bus,
+ ulong specialCycleData)
+{
+ if (PCIPhysEntry)
+ _PCIBIOS_specialCycle(bus,specialCycleData,PCIEntry);
+ /* We currently only support this via the PCI BIOS functions */
+}
+
+/****************************************************************************
+PARAMETERS:
+info - PCI device information block for device to access
+index - Index of register to start reading from
+dst - Place to store the values read from configuration space
+count - Count of bytes to read from configuration space
+
+REMARKS:
+This function is used to read a block of PCI configuration space registers
+from the configuration space into the passed in data block. This function
+will properly handle reading non-DWORD aligned data from the configuration
+space correctly.
+****************************************************************************/
+void _ASMAPI PCI_readRegBlock(
+ PCIDeviceInfo *info,
+ int index,
+ void *dst,
+ int count)
+{
+ uchar *pb;
+ ulong *pd;
+ int i;
+ int startCount = (index & 3);
+ int middleCount = (count - startCount) >> 2;
+ int endCount = count - middleCount * 4 - startCount;
+
+ for (i = 0,pb = dst; i < startCount; i++, index++) {
+ *pb++ = (uchar)PCI_accessReg(index,0,PCI_READ_BYTE,info);
+ }
+ for (i = 0,pd = (ulong*)pb; i < middleCount; i++, index += 4) {
+ *pd++ = (ulong)PCI_accessReg(index,0,PCI_READ_DWORD,info);
+ }
+ for (i = 0,pb = (uchar*)pd; i < endCount; i++, index++) {
+ *pb++ = (uchar)PCI_accessReg(index,0,PCI_READ_BYTE,info);
+ }
+}
+
+/****************************************************************************
+PARAMETERS:
+info - PCI device information block for device to access
+index - Index of register to start reading from
+dst - Place to store the values read from configuration space
+count - Count of bytes to read from configuration space
+
+REMARKS:
+This function is used to write a block of PCI configuration space registers
+to the configuration space from the passed in data block. This function
+will properly handle writing non-DWORD aligned data to the configuration
+space correctly.
+****************************************************************************/
+void _ASMAPI PCI_writeRegBlock(
+ PCIDeviceInfo *info,
+ int index,
+ void *src,
+ int count)
+{
+ uchar *pb;
+ ulong *pd;
+ int i;
+ int startCount = (index & 3);
+ int middleCount = (count - startCount) >> 2;
+ int endCount = count - middleCount * 4 - startCount;
+
+ for (i = 0,pb = src; i < startCount; i++, index++) {
+ PCI_accessReg(index,*pb++,PCI_WRITE_BYTE,info);
+ }
+ for (i = 0,pd = (ulong*)pb; i < middleCount; i++, index += 4) {
+ PCI_accessReg(index,*pd++,PCI_WRITE_DWORD,info);
+ }
+ for (i = 0,pb = (uchar*)pd; i < endCount; i++, index++) {
+ PCI_accessReg(index,*pb++,PCI_WRITE_BYTE,info);
+ }
+}
diff --git a/board/MAI/bios_emulator/scitech/src/pm/common/unixio.c b/board/MAI/bios_emulator/scitech/src/pm/common/unixio.c
new file mode 100644
index 00000000000..04aa47002bc
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/pm/common/unixio.c
@@ -0,0 +1,306 @@
+/****************************************************************************
+*
+* SciTech OS Portability Manager Library
+*
+* ========================================================================
+*
+* The contents of this file are subject to the SciTech MGL Public
+* License Version 1.0 (the "License"); you may not use this file
+* except in compliance with the License. You may obtain a copy of
+* the License at http://www.scitechsoft.com/mgl-license.txt
+*
+* Software distributed under the License is distributed on an
+* "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+* implied. See the License for the specific language governing
+* rights and limitations under the License.
+*
+* The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+*
+* The Initial Developer of the Original Code is SciTech Software, Inc.
+* All Rights Reserved.
+*
+* ========================================================================
+*
+* Language: ANSI C
+* Environment: Any
+*
+* Description: Module containing Unix I/O functions.
+*
+****************************************************************************/
+
+#include "pmapi.h"
+#include <stdio.h>
+#include <stdlib.h>
+#include <string.h>
+#include <sys/stat.h>
+#include <unistd.h>
+#include <dirent.h>
+
+/*----------------------------- Implementation ----------------------------*/
+
+/* {secret} */
+typedef struct {
+ DIR *d;
+ char path[PM_MAX_PATH];
+ char mask[PM_MAX_PATH];
+ } PM_findHandle;
+
+/****************************************************************************
+REMARKS:
+Internal function to convert the find data to the generic interface.
+****************************************************************************/
+static void convertFindData(
+ PM_findData *findData,
+ struct dirent *blk,
+ const char *path)
+{
+ ulong dwSize = findData->dwSize;
+ struct stat st;
+ char filename[PM_MAX_PATH];
+
+ memset(findData,0,findData->dwSize);
+ findData->dwSize = dwSize;
+ strcpy(filename,path);
+ PM_backslash(filename);
+ strcat(filename,blk->d_name);
+ stat(filename,&st);
+ if (!(st.st_mode & S_IWRITE))
+ findData->attrib |= PM_FILE_READONLY;
+ if (st.st_mode & S_IFDIR)
+ findData->attrib |= PM_FILE_DIRECTORY;
+ findData->sizeLo = st.st_size;
+ findData->sizeHi = 0;
+ strncpy(findData->name,blk->d_name,PM_MAX_PATH);
+ findData->name[PM_MAX_PATH-1] = 0;
+}
+
+/****************************************************************************
+REMARKS:
+Determines if a file name matches the passed in pattern.
+****************************************************************************/
+static ibool filematch(
+ char *pattern,
+ char *dirpath,
+ struct dirent *dire)
+{
+ struct stat st;
+ int i = 0,j = 0,lastchar = '\0';
+ char fullpath[PM_MAX_PATH];
+
+ strcpy(fullpath,dirpath);
+ PM_backslash(fullpath);
+ strcat(fullpath, dire->d_name);
+ if (stat(fullpath, &st) != 0)
+ return false;
+ for (; i < (int)strlen(dire->d_name) && j < (int)strlen(pattern); i++, j++) {
+ if (pattern[j] == '*' && lastchar != '\\') {
+ if (pattern[j+1] == '\0')
+ return true;
+ while (dire->d_name[i++] != pattern[j+1]) {
+ if (dire->d_name[i] == '\0')
+ return false;
+ }
+ i -= 2;
+ }
+ else if (dire->d_name[i] != pattern[j] &&
+ !(pattern[j] == '?' && lastchar != '\\'))
+ return false;
+ lastchar = pattern[i];
+ }
+ if (j == (int)strlen(pattern) && i == (int)strlen(dire->d_name))
+ return true;
+ return false;
+}
+
+/****************************************************************************
+REMARKS:
+Function to find the first file matching a search criteria in a directory.
+****************************************************************************/
+void * PMAPI PM_findFirstFile(
+ const char *filename,
+ PM_findData *findData)
+{
+ PM_findHandle *d;
+ struct dirent *dire;
+ char name[PM_MAX_PATH];
+ char ext[PM_MAX_PATH];
+
+ if ((d = PM_malloc(sizeof(*d))) == NULL)
+ return PM_FILE_INVALID;
+ PM_splitpath(filename,NULL,d->path,name,ext);
+ strcpy(d->mask,name);
+ strcat(d->mask,ext);
+ if (strlen(d->path) == 0)
+ strcpy(d->path, ".");
+ if (d->path[strlen(d->path)-1] == '/')
+ d->path[strlen(d->path)-1] = 0;
+ if ((d->d = opendir(d->path)) != NULL) {
+ while ((dire = readdir(d->d)) != NULL) {
+ if (filematch(d->mask,d->path,dire)) {
+ convertFindData(findData,dire,d->path);
+ return d;
+ }
+ }
+ closedir(d->d);
+ }
+ PM_free(d);
+ return PM_FILE_INVALID;
+}
+
+/****************************************************************************
+REMARKS:
+Function to find the next file matching a search criteria in a directory.
+****************************************************************************/
+ibool PMAPI PM_findNextFile(
+ void *handle,
+ PM_findData *findData)
+{
+ PM_findHandle *d = handle;
+ struct dirent *dire;
+
+ while ((dire = readdir(d->d)) != NULL) {
+ if (filematch(d->mask,d->path,dire)) {
+ convertFindData(findData,dire,d->path);
+ return true;
+ }
+ }
+ return false;
+}
+
+/****************************************************************************
+REMARKS:
+Function to close the find process
+****************************************************************************/
+void PMAPI PM_findClose(
+ void *handle)
+{
+ PM_findHandle *d = handle;
+
+ closedir(d->d);
+ free(d);
+}
+
+/****************************************************************************
+REMARKS:
+Function to determine if a drive is a valid drive or not. Under Unix this
+function will return false for anything except a value of 3 (considered
+the root drive, and equivalent to C: for non-Unix systems). The drive
+numbering is:
+
+ 1 - Drive A:
+ 2 - Drive B:
+ 3 - Drive C:
+ etc
+
+****************************************************************************/
+ibool PMAPI PM_driveValid(
+ char drive)
+{
+ if (drive == 3)
+ return true;
+ return false;
+}
+
+/****************************************************************************
+REMARKS:
+Function to get the current working directory for the specififed drive.
+Under Unix this will always return the current working directory regardless
+of what the value of 'drive' is.
+****************************************************************************/
+void PMAPI PM_getdcwd(
+ int drive,
+ char *dir,
+ int len)
+{
+ (void)drive;
+ getcwd(dir,len);
+}
+
+/****************************************************************************
+REMARKS:
+Function to change the file attributes for a specific file.
+****************************************************************************/
+void PMAPI PM_setFileAttr(
+ const char *filename,
+ uint attrib)
+{
+ struct stat st;
+ mode_t mode;
+
+ stat(filename,&st);
+ mode = st.st_mode;
+ if (attrib & PM_FILE_READONLY)
+ mode &= ~S_IWRITE;
+ else
+ mode |= S_IWRITE;
+ chmod(filename,mode);
+}
+
+/****************************************************************************
+REMARKS:
+Function to get the file attributes for a specific file.
+****************************************************************************/
+uint PMAPI PM_getFileAttr(
+ const char *filename)
+{
+ struct stat st;
+
+ stat(filename,&st);
+ if (st.st_mode & S_IWRITE)
+ return 0;
+ return PM_FILE_READONLY;
+}
+
+/****************************************************************************
+REMARKS:
+Function to create a directory.
+****************************************************************************/
+ibool PMAPI PM_mkdir(
+ const char *filename)
+{
+ return mkdir(filename,0x1FF) == 0;
+}
+
+/****************************************************************************
+REMARKS:
+Function to remove a directory.
+****************************************************************************/
+ibool PMAPI PM_rmdir(
+ const char *filename)
+{
+ return rmdir(filename) == 0;
+}
+
+/****************************************************************************
+REMARKS:
+Function to get the file time and date for a specific file.
+****************************************************************************/
+ibool PMAPI PM_getFileTime(
+ const char *filename,
+ ibool gmTime,
+ PM_time *time)
+{
+ // TODO: Implement this!
+ (void)filename;
+ (void)gmTime;
+ (void)time;
+ PM_fatalError("PM_getFileTime not implemented yet!");
+ return false;
+}
+
+/****************************************************************************
+REMARKS:
+Function to set the file time and date for a specific file.
+****************************************************************************/
+ibool PMAPI PM_setFileTime(
+ const char *filename,
+ ibool gmTime,
+ PM_time *time)
+{
+ // TODO: Implement this!
+ (void)filename;
+ (void)gmTime;
+ (void)time;
+ PM_fatalError("PM_setFileTime not implemented yet!");
+ return false;
+}
diff --git a/board/MAI/bios_emulator/scitech/src/pm/common/vgastate.c b/board/MAI/bios_emulator/scitech/src/pm/common/vgastate.c
new file mode 100644
index 00000000000..3be14e81ebc
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/pm/common/vgastate.c
@@ -0,0 +1,377 @@
+/****************************************************************************
+*
+* SciTech OS Portability Manager Library
+*
+* ========================================================================
+*
+* The contents of this file are subject to the SciTech MGL Public
+* License Version 1.0 (the "License"); you may not use this file
+* except in compliance with the License. You may obtain a copy of
+* the License at http://www.scitechsoft.com/mgl-license.txt
+*
+* Software distributed under the License is distributed on an
+* "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+* implied. See the License for the specific language governing
+* rights and limitations under the License.
+*
+* The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+*
+* The Initial Developer of the Original Code is SciTech Software, Inc.
+* All Rights Reserved.
+*
+* ========================================================================
+*
+* Portions copyright (C) Josh Vanderhoof
+*
+* Language: ANSI C
+* Environment: Any
+*
+* Description: Functions to save and restore the VGA hardware state.
+*
+****************************************************************************/
+
+#include "pmapi.h"
+#if defined(__WIN32_VXD__) || defined(__NT_DRIVER__)
+#include "sdd/sddhelp.h"
+#else
+#include <string.h>
+#endif
+
+/*--------------------------- Global variables ----------------------------*/
+
+/* VGA index register ports */
+#define CRT_I 0x3D4 /* CRT Controller Index */
+#define ATT_IW 0x3C0 /* Attribute Controller Index & Data */
+#define GRA_I 0x3CE /* Graphics Controller Index */
+#define SEQ_I 0x3C4 /* Sequencer Index */
+
+/* VGA data register ports */
+#define CRT_D 0x3D5 /* CRT Controller Data Register */
+#define ATT_R 0x3C1 /* Attribute Controller Data Read Register */
+#define GRA_D 0x3CF /* Graphics Controller Data Register */
+#define SEQ_D 0x3C5 /* Sequencer Data Register */
+#define MIS_R 0x3CC /* Misc Output Read Register */
+#define MIS_W 0x3C2 /* Misc Output Write Register */
+#define IS1_R 0x3DA /* Input Status Register 1 */
+#define PEL_IW 0x3C8 /* PEL Write Index */
+#define PEL_IR 0x3C7 /* PEL Read Index */
+#define PEL_D 0x3C9 /* PEL Data Register */
+
+/* standard VGA indexes max counts */
+#define CRT_C 24 /* 24 CRT Controller Registers */
+#define ATT_C 21 /* 21 Attribute Controller Registers */
+#define GRA_C 9 /* 9 Graphics Controller Registers */
+#define SEQ_C 5 /* 5 Sequencer Registers */
+#define MIS_C 1 /* 1 Misc Output Register */
+#define PAL_C 768 /* 768 Palette Registers */
+#define FONT_C 8192 /* Total size of character generator RAM */
+
+/* VGA registers saving indexes */
+#define CRT 0 /* CRT Controller Registers start */
+#define ATT (CRT+CRT_C) /* Attribute Controller Registers start */
+#define GRA (ATT+ATT_C) /* Graphics Controller Registers start */
+#define SEQ (GRA+GRA_C) /* Sequencer Registers */
+#define MIS (SEQ+SEQ_C) /* General Registers */
+#define PAL (MIS+MIS_C) /* VGA Palette Registers */
+#define FONT (PAL+PAL_C) /* VGA font data */
+
+/* Macros for port I/O with arguments reversed */
+
+#define _port_out(v,p) PM_outpb(p,(uchar)(v))
+#define _port_in(p) PM_inpb(p)
+
+/*----------------------------- Implementation ----------------------------*/
+
+/****************************************************************************
+REMARKS:
+Returns the size of the VGA state buffer.
+****************************************************************************/
+int PMAPI PM_getVGAStateSize(void)
+{
+ return CRT_C + ATT_C + GRA_C + SEQ_C + MIS_C + PAL_C + FONT_C;
+}
+
+/****************************************************************************
+REMARKS:
+Delay for a short period of time.
+****************************************************************************/
+static void vga_delay(void)
+{
+ int i;
+
+ /* For the loop here we program the POST register. The length of this
+ * delay is dependant only on ISA bus speed, but it is enough for
+ * what we need.
+ */
+ for (i = 0; i <= 10; i++)
+ PM_outpb(0x80, 0);
+}
+
+/****************************************************************************
+PARAMETERS:
+port - I/O port to read value from
+index - Port index to read
+
+RETURNS:
+Byte read from 'port' register 'index'.
+****************************************************************************/
+static ushort vga_rdinx(
+ ushort port,
+ ushort index)
+{
+ PM_outpb(port,(uchar)index);
+ return PM_inpb(port+1);
+}
+
+/****************************************************************************
+PARAMETERS:
+port - I/O port to write to
+index - Port index to write
+value - Byte to write to port
+
+REMARKS:
+Writes a byte value to the 'port' register 'index'.
+****************************************************************************/
+static void vga_wrinx(
+ ushort port,
+ ushort index,
+ ushort value)
+{
+ PM_outpb(port,(uchar)index);
+ PM_outpb(port+1,(uchar)value);
+}
+
+/****************************************************************************
+REMARKS:
+Save the color palette values
+****************************************************************************/
+static void vga_savepalette(
+ uchar *pal)
+{
+ int i;
+
+ _port_out(0, PEL_IR);
+ for (i = 0; i < 768; i++) {
+ vga_delay();
+ *pal++ = _port_in(PEL_D);
+ }
+}
+
+/****************************************************************************
+REMARKS:
+Restore the color palette values
+****************************************************************************/
+static void vga_restorepalette(
+ const uchar *pal)
+{
+ int i;
+
+ /* restore saved palette */
+ _port_out(0, PEL_IW);
+ for (i = 0; i < 768; i++) {
+ vga_delay();
+ _port_out(*pal++, PEL_D);
+ }
+}
+
+/****************************************************************************
+REMARKS:
+Read the font data from the VGA character generator RAM
+****************************************************************************/
+static void vga_saveFont(
+ uchar *data)
+{
+ uchar *A0000Ptr = PM_getA0000Pointer();
+ uchar save[7];
+
+ /* Enable access to character generator RAM */
+ save[0] = (uchar)vga_rdinx(SEQ_I,0x00);
+ save[1] = (uchar)vga_rdinx(SEQ_I,0x02);
+ save[2] = (uchar)vga_rdinx(SEQ_I,0x04);
+ save[3] = (uchar)vga_rdinx(SEQ_I,0x00);
+ save[4] = (uchar)vga_rdinx(GRA_I,0x04);
+ save[5] = (uchar)vga_rdinx(GRA_I,0x05);
+ save[6] = (uchar)vga_rdinx(GRA_I,0x06);
+ vga_wrinx(SEQ_I,0x00,0x01);
+ vga_wrinx(SEQ_I,0x02,0x04);
+ vga_wrinx(SEQ_I,0x04,0x07);
+ vga_wrinx(SEQ_I,0x00,0x03);
+ vga_wrinx(GRA_I,0x04,0x02);
+ vga_wrinx(GRA_I,0x05,0x00);
+ vga_wrinx(GRA_I,0x06,0x00);
+
+ /* Copy character generator RAM */
+ memcpy(data,A0000Ptr,FONT_C);
+
+ /* Restore VGA state */
+ vga_wrinx(SEQ_I,0x00,save[0]);
+ vga_wrinx(SEQ_I,0x02,save[1]);
+ vga_wrinx(SEQ_I,0x04,save[2]);
+ vga_wrinx(SEQ_I,0x00,save[3]);
+ vga_wrinx(GRA_I,0x04,save[4]);
+ vga_wrinx(GRA_I,0x05,save[5]);
+ vga_wrinx(GRA_I,0x06,save[6]);
+}
+
+/****************************************************************************
+REMARKS:
+Downloads the font data to the VGA character generator RAM
+****************************************************************************/
+static void vga_restoreFont(
+ const uchar *data)
+{
+ uchar *A0000Ptr = PM_getA0000Pointer();
+
+ /* Enable access to character generator RAM */
+ vga_wrinx(SEQ_I,0x00,0x01);
+ vga_wrinx(SEQ_I,0x02,0x04);
+ vga_wrinx(SEQ_I,0x04,0x07);
+ vga_wrinx(SEQ_I,0x00,0x03);
+ vga_wrinx(GRA_I,0x04,0x02);
+ vga_wrinx(GRA_I,0x05,0x00);
+ vga_wrinx(GRA_I,0x06,0x00);
+
+ /* Copy font back to character generator RAM */
+ memcpy(A0000Ptr,data,FONT_C);
+}
+
+/****************************************************************************
+REMARKS:
+Save the state of all VGA compatible registers
+****************************************************************************/
+void PMAPI PM_saveVGAState(
+ void *stateBuf)
+{
+ uchar *regs = stateBuf;
+ int i;
+
+ /* Save state of VGA registers */
+ for (i = 0; i < CRT_C; i++) {
+ _port_out(i, CRT_I);
+ regs[CRT + i] = _port_in(CRT_D);
+ }
+ for (i = 0; i < ATT_C; i++) {
+ _port_in(IS1_R);
+ vga_delay();
+ _port_out(i, ATT_IW);
+ vga_delay();
+ regs[ATT + i] = _port_in(ATT_R);
+ vga_delay();
+ }
+ for (i = 0; i < GRA_C; i++) {
+ _port_out(i, GRA_I);
+ regs[GRA + i] = _port_in(GRA_D);
+ }
+ for (i = 0; i < SEQ_C; i++) {
+ _port_out(i, SEQ_I);
+ regs[SEQ + i] = _port_in(SEQ_D);
+ }
+ regs[MIS] = _port_in(MIS_R);
+
+ /* Save the VGA palette values */
+ vga_savepalette(®s[PAL]);
+
+ /* Save the VGA character generator RAM */
+ vga_saveFont(®s[FONT]);
+
+ /* Turn the VGA display back on */
+ PM_vgaUnblankDisplay();
+}
+
+/****************************************************************************
+REMARKS:
+Retore the state of all VGA compatible registers
+****************************************************************************/
+void PMAPI PM_restoreVGAState(
+ const void *stateBuf)
+{
+ const uchar *regs = stateBuf;
+ int i;
+
+ /* Blank the display before we start the restore */
+ PM_vgaBlankDisplay();
+
+ /* Restore the VGA character generator RAM */
+ vga_restoreFont(®s[FONT]);
+
+ /* Restore the VGA palette values */
+ vga_restorepalette(®s[PAL]);
+
+ /* Restore the state of the VGA compatible registers */
+ _port_out(regs[MIS], MIS_W);
+
+ /* Delay to allow clock change to settle */
+ for (i = 0; i < 10; i++)
+ vga_delay();
+
+ /* Synchronous reset on */
+ _port_out(0x00,SEQ_I);
+ _port_out(0x01,SEQ_D);
+
+ /* Write seqeuencer registers */
+ _port_out(1, SEQ_I);
+ _port_out(regs[SEQ + 1] | 0x20, SEQ_D);
+ for (i = 2; i < SEQ_C; i++) {
+ _port_out(i, SEQ_I);
+ _port_out(regs[SEQ + i], SEQ_D);
+ }
+
+ /* Synchronous reset off */
+ _port_out(0x00,SEQ_I);
+ _port_out(0x03,SEQ_D);
+
+ /* Deprotect CRT registers 0-7 and write CRTC */
+ _port_out(0x11, CRT_I);
+ _port_out(_port_in(CRT_D) & 0x7F, CRT_D);
+ for (i = 0; i < CRT_C; i++) {
+ _port_out(i, CRT_I);
+ _port_out(regs[CRT + i], CRT_D);
+ }
+ for (i = 0; i < GRA_C; i++) {
+ _port_out(i, GRA_I);
+ _port_out(regs[GRA + i], GRA_D);
+ }
+ for (i = 0; i < ATT_C; i++) {
+ _port_in(IS1_R); /* reset flip-flop */
+ vga_delay();
+ _port_out(i, ATT_IW);
+ vga_delay();
+ _port_out(regs[ATT + i], ATT_IW);
+ vga_delay();
+ }
+
+ /* Ensure the VGA screen is turned on */
+ PM_vgaUnblankDisplay();
+}
+
+/****************************************************************************
+REMARKS:
+Disables the VGA display for screen output making it blank.
+****************************************************************************/
+void PMAPI PM_vgaBlankDisplay(void)
+{
+ /* Turn screen off */
+ _port_out(0x01, SEQ_I);
+ _port_out(_port_in(SEQ_D) | 0x20, SEQ_D);
+
+ /* Disable video output */
+ _port_in(IS1_R);
+ vga_delay();
+ _port_out(0x00, ATT_IW);
+}
+
+/****************************************************************************
+REMARKS:
+Enables the VGA display for screen output.
+****************************************************************************/
+void PMAPI PM_vgaUnblankDisplay(void)
+{
+ /* Turn screen back on */
+ _port_out(0x01, SEQ_I);
+ _port_out(_port_in(SEQ_D) & 0xDF, SEQ_D);
+
+ /* Enable video output */
+ _port_in(IS1_R);
+ vga_delay();
+ _port_out(0x20, ATT_IW);
+}
diff --git a/board/MAI/bios_emulator/scitech/src/pm/cpuinfo.c b/board/MAI/bios_emulator/scitech/src/pm/cpuinfo.c
new file mode 100644
index 00000000000..e2446a43973
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/pm/cpuinfo.c
@@ -0,0 +1,808 @@
+/****************************************************************************
+*
+* SciTech OS Portability Manager Library
+*
+* ========================================================================
+*
+* The contents of this file are subject to the SciTech MGL Public
+* License Version 1.0 (the "License"); you may not use this file
+* except in compliance with the License. You may obtain a copy of
+* the License at http://www.scitechsoft.com/mgl-license.txt
+*
+* Software distributed under the License is distributed on an
+* "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+* implied. See the License for the specific language governing
+* rights and limitations under the License.
+*
+* The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+*
+* The Initial Developer of the Original Code is SciTech Software, Inc.
+* All Rights Reserved.
+*
+* ========================================================================
+*
+* Language: ANSI C
+* Environment: Any
+*
+* Description: Main module to implement the Zen Timer support functions.
+*
+****************************************************************************/
+
+#include "ztimer.h"
+#include "pmapi.h"
+#include "oshdr.h"
+#if !defined(__WIN32_VXD__) && !defined(__OS2_VDD__) && !defined(__NT_DRIVER__)
+#include <stdio.h>
+#include <string.h>
+#endif
+
+/*----------------------------- Implementation ----------------------------*/
+
+/* External Intel assembler functions */
+#ifdef __INTEL__
+/* {secret} */
+ibool _ASMAPI _CPU_haveCPUID(void);
+/* {secret} */
+ibool _ASMAPI _CPU_check80386(void);
+/* {secret} */
+ibool _ASMAPI _CPU_check80486(void);
+/* {secret} */
+uint _ASMAPI _CPU_checkCPUID(void);
+/* {secret} */
+uint _ASMAPI _CPU_getCPUIDModel(void);
+/* {secret} */
+uint _ASMAPI _CPU_getCPUIDStepping(void);
+/* {secret} */
+uint _ASMAPI _CPU_getCPUIDFeatures(void);
+/* {secret} */
+uint _ASMAPI _CPU_getCacheSize(void);
+/* {secret} */
+uint _ASMAPI _CPU_have3DNow(void);
+/* {secret} */
+ibool _ASMAPI _CPU_checkClone(void);
+/* {secret} */
+void _ASMAPI _CPU_readTimeStamp(CPU_largeInteger *time);
+/* {secret} */
+void _ASMAPI _CPU_runBSFLoop(ulong iterations);
+/* {secret} */
+ulong _ASMAPI _CPU_mulDiv(ulong a,ulong b,ulong c);
+/* {secret} */
+void ZTimerQuickInit(void);
+#define CPU_HaveMMX 0x00800000
+#define CPU_HaveRDTSC 0x00000010
+#define CPU_HaveSSE 0x02000000
+#endif
+
+#if defined(__SMX32__)
+#include "smx/cpuinfo.c"
+#elif defined(__RTTARGET__)
+#include "rttarget/cpuinfo.c"
+#elif defined(__REALDOS__)
+#include "dos/cpuinfo.c"
+#elif defined(__NT_DRIVER__)
+#include "ntdrv/cpuinfo.c"
+#elif defined(__WIN32_VXD__)
+#include "vxd/cpuinfo.c"
+#elif defined(__WINDOWS32__)
+#include "win32/cpuinfo.c"
+#elif defined(__OS2_VDD__)
+#include "vdd/cpuinfo.c"
+#elif defined(__OS2__)
+#include "os2/cpuinfo.c"
+#elif defined(__LINUX__)
+#include "linux/cpuinfo.c"
+#elif defined(__QNX__)
+#include "qnx/cpuinfo.c"
+#elif defined(__BEOS__)
+#include "beos/cpuinfo.c"
+#else
+#error CPU library not ported to this platform yet!
+#endif
+
+/*------------------------ Public interface routines ----------------------*/
+
+/****************************************************************************
+REMARKS:
+Read an I/O port location.
+****************************************************************************/
+static uchar rdinx(
+ int port,
+ int index)
+{
+ PM_outpb(port,(uchar)index);
+ return PM_inpb(port+1);
+}
+
+/****************************************************************************
+REMARKS:
+Write an I/O port location.
+****************************************************************************/
+static void wrinx(
+ ushort port,
+ ushort index,
+ ushort value)
+{
+ PM_outpb(port,(uchar)index);
+ PM_outpb(port+1,(uchar)value);
+}
+
+/****************************************************************************
+REMARKS:
+Enables the Cyrix CPUID instruction to properly detect MediaGX and 6x86
+processors.
+****************************************************************************/
+static void _CPU_enableCyrixCPUID(void)
+{
+ uchar ccr3;
+
+ PM_init();
+ ccr3 = rdinx(0x22,0xC3);
+ wrinx(0x22,0xC3,(uchar)(ccr3 | 0x10));
+ wrinx(0x22,0xE8,(uchar)(rdinx(0x22,0xE8) | 0x80));
+ wrinx(0x22,0xC3,ccr3);
+}
+
+/****************************************************************************
+DESCRIPTION:
+Returns the type of processor in the system.
+
+HEADER:
+ztimer.h
+
+RETURNS:
+Numerical identifier for the installed processor
+
+REMARKS:
+Returns the type of processor in the system. Note that if the CPU is an
+unknown Pentium family processor that we don't have an enumeration for,
+the return value will be greater than or equal to the value of CPU_UnkPentium
+(depending on the value returned by the CPUID instruction).
+
+SEE ALSO:
+CPU_getProcessorSpeed, CPU_haveMMX, CPU_getProcessorName
+****************************************************************************/
+uint ZAPI CPU_getProcessorType(void)
+{
+#if defined(__INTEL__)
+ uint cpu,vendor,model,cacheSize;
+ static ibool firstTime = true;
+
+ if (_CPU_haveCPUID()) {
+ cpu = _CPU_checkCPUID();
+ vendor = cpu & ~CPU_mask;
+ if (vendor == CPU_Intel) {
+ /* Check for Intel processors */
+ switch (cpu & CPU_mask) {
+ case 4: cpu = CPU_i486; break;
+ case 5: cpu = CPU_Pentium; break;
+ case 6:
+ if ((model = _CPU_getCPUIDModel()) == 1)
+ cpu = CPU_PentiumPro;
+ else if (model <= 6) {
+ cacheSize = _CPU_getCacheSize();
+ if ((model == 5 && cacheSize == 0) ||
+ (model == 5 && cacheSize == 256) ||
+ (model == 6 && cacheSize == 128))
+ cpu = CPU_Celeron;
+ else
+ cpu = CPU_PentiumII;
+ }
+ else if (model >= 7) {
+ /* Model 7 == Pentium III */
+ /* Model 8 == Celeron/Pentium III Coppermine */
+ cacheSize = _CPU_getCacheSize();
+ if ((model == 8 && cacheSize == 128))
+ cpu = CPU_Celeron;
+ else
+ cpu = CPU_PentiumIII;
+ }
+ break;
+ default:
+ cpu = CPU_UnkIntel;
+ }
+ }
+ else if (vendor == CPU_Cyrix) {
+ /* Check for Cyrix processors */
+ switch (cpu & CPU_mask) {
+ case 4:
+ if ((model = _CPU_getCPUIDModel()) == 4)
+ cpu = CPU_CyrixMediaGX;
+ else
+ cpu = CPU_UnkCyrix;
+ break;
+ case 5:
+ if ((model = _CPU_getCPUIDModel()) == 2)
+ cpu = CPU_Cyrix6x86;
+ else if (model == 4)
+ cpu = CPU_CyrixMediaGXm;
+ else
+ cpu = CPU_UnkCyrix;
+ break;
+ case 6:
+ if ((model = _CPU_getCPUIDModel()) <= 1)
+ cpu = CPU_Cyrix6x86MX;
+ else
+ cpu = CPU_UnkCyrix;
+ break;
+ default:
+ cpu = CPU_UnkCyrix;
+ }
+ }
+ else if (vendor == CPU_AMD) {
+ /* Check for AMD processors */
+ switch (cpu & CPU_mask) {
+ case 4:
+ if ((model = _CPU_getCPUIDModel()) == 0)
+ cpu = CPU_AMDAm5x86;
+ else
+ cpu = CPU_AMDAm486;
+ break;
+ case 5:
+ if ((model = _CPU_getCPUIDModel()) <= 3)
+ cpu = CPU_AMDK5;
+ else if (model <= 7)
+ cpu = CPU_AMDK6;
+ else if (model == 8)
+ cpu = CPU_AMDK6_2;
+ else if (model == 9)
+ cpu = CPU_AMDK6_III;
+ else if (model == 13) {
+ if (_CPU_getCPUIDStepping() <= 3)
+ cpu = CPU_AMDK6_IIIplus;
+ else
+ cpu = CPU_AMDK6_2plus;
+ }
+ else
+ cpu = CPU_UnkAMD;
+ break;
+ case 6:
+ if ((model = _CPU_getCPUIDModel()) == 3)
+ cpu = CPU_AMDDuron;
+ else
+ cpu = CPU_AMDAthlon;
+ break;
+ default:
+ cpu = CPU_UnkAMD;
+ }
+ }
+ else if (vendor == CPU_IDT) {
+ /* Check for IDT WinChip processors */
+ switch (cpu & CPU_mask) {
+ case 5:
+ if ((model = _CPU_getCPUIDModel()) <= 4)
+ cpu = CPU_WinChipC6;
+ else if (model == 8)
+ cpu = CPU_WinChip2;
+ else
+ cpu = CPU_UnkIDT;
+ break;
+ default:
+ cpu = CPU_UnkIDT;
+ }
+ }
+ else {
+ /* Assume a Pentium compatible Intel clone */
+ cpu = CPU_Pentium;
+ }
+ return cpu | vendor | (_CPU_getCPUIDStepping() << CPU_steppingShift);
+ }
+ else {
+ if (_CPU_check80386())
+ cpu = CPU_i386;
+ else if (_CPU_check80486()) {
+ /* If we get here we may have a Cyrix processor so we can try
+ * enabling the CPUID instruction and trying again.
+ */
+ if (firstTime) {
+ firstTime = false;
+ _CPU_enableCyrixCPUID();
+ return CPU_getProcessorType();
+ }
+ cpu = CPU_i486;
+ }
+ else
+ cpu = CPU_Pentium;
+ if (!_CPU_checkClone())
+ return cpu | CPU_Intel;
+ return cpu;
+ }
+#elif defined(__ALPHA__)
+ return CPU_Alpha;
+#elif defined(__MIPS__)
+ return CPU_Mips;
+#elif defined(__PPC__)
+ return CPU_PowerPC;
+#endif
+}
+
+/****************************************************************************
+DESCRIPTION:
+Returns true if the processor supports Intel MMX extensions.
+
+HEADER:
+ztimer.h
+
+RETURNS:
+True if MMX is available, false if not.
+
+REMARKS:
+This function determines if the processor supports the Intel MMX extended
+instruction set.
+
+SEE ALSO:
+CPU_getProcessorType, CPU_getProcessorSpeed, CPU_have3DNow, CPU_haveSSE,
+CPU_getProcessorName
+****************************************************************************/
+ibool ZAPI CPU_haveMMX(void)
+{
+#ifdef __INTEL__
+ if (_CPU_haveCPUID())
+ return (_CPU_getCPUIDFeatures() & CPU_HaveMMX) != 0;
+ return false;
+#else
+ return false;
+#endif
+}
+
+/****************************************************************************
+DESCRIPTION:
+Returns true if the processor supports AMD 3DNow! extensions.
+
+HEADER:
+ztimer.h
+
+RETURNS:
+True if 3DNow! is available, false if not.
+
+REMARKS:
+This function determines if the processor supports the AMD 3DNow! extended
+instruction set.
+
+SEE ALSO:
+CPU_getProcessorType, CPU_getProcessorSpeed, CPU_haveMMX, CPU_haveSSE,
+CPU_getProcessorName
+****************************************************************************/
+ibool ZAPI CPU_have3DNow(void)
+{
+#ifdef __INTEL__
+ if (_CPU_haveCPUID())
+ return _CPU_have3DNow();
+ return false;
+#else
+ return false;
+#endif
+}
+
+/****************************************************************************
+DESCRIPTION:
+Returns true if the processor supports Intel KNI extensions.
+
+HEADER:
+ztimer.h
+
+RETURNS:
+True if Intel KNI is available, false if not.
+
+REMARKS:
+This function determines if the processor supports the Intel KNI extended
+instruction set.
+
+SEE ALSO:
+CPU_getProcessorType, CPU_getProcessorSpeed, CPU_haveMMX, CPU_have3DNow,
+CPU_getProcessorName
+****************************************************************************/
+ibool ZAPI CPU_haveSSE(void)
+{
+#ifdef __INTEL__
+ if (_CPU_haveCPUID())
+ return (_CPU_getCPUIDFeatures() & CPU_HaveSSE) != 0;
+ return false;
+#else
+ return false;
+#endif
+}
+
+/****************************************************************************
+RETURNS:
+True if the RTSC instruction is available, false if not.
+
+REMARKS:
+This function determines if the processor supports the Intel RDTSC
+instruction, for high precision timing. If the processor is not an Intel or
+Intel clone CPU, this function will always return false.
+
+DESCRIPTION:
+Returns true if the processor supports RDTSC extensions.
+
+HEADER:
+ztimer.h
+
+RETURNS:
+True if RTSC is available, false if not.
+
+REMARKS:
+This function determines if the processor supports the RDTSC instruction
+for reading the processor time stamp counter.
+
+SEE ALSO:
+CPU_getProcessorType, CPU_getProcessorSpeed, CPU_haveMMX, CPU_have3DNow,
+CPU_getProcessorName
+****************************************************************************/
+ibool ZAPI CPU_haveRDTSC(void)
+{
+#ifdef __INTEL__
+ if (_CPU_haveCPUID())
+ return (_CPU_getCPUIDFeatures() & CPU_HaveRDTSC) != 0;
+ return false;
+#else
+ return false;
+#endif
+}
+
+#ifdef __INTEL__
+
+#define ITERATIONS 16000
+#define SAMPLINGS 2
+#define INNER_LOOPS 400
+
+/****************************************************************************
+REMARKS:
+If processor does not support time stamp reading, but is at least a 386 or
+above, utilize method of timing a loop of BSF instructions which take a
+known number of cycles to run on i386(tm), i486(tm), and Pentium(R)
+processors.
+****************************************************************************/
+static ulong GetBSFCpuSpeed(
+ ulong cycles)
+{
+ CPU_largeInteger t0,t1,count_freq;
+ ulong ticks; /* Microseconds elapsed during test */
+ ulong current; /* Variable to store time elapsed */
+ int i,j,iPriority;
+ ulong lowest = (ulong)-1;
+
+ iPriority = SetMaxThreadPriority();
+ GetCounterFrequency(&count_freq);
+ for (i = 0; i < SAMPLINGS; i++) {
+ GetCounter(&t0);
+ for (j = 0; j < INNER_LOOPS; j++)
+ _CPU_runBSFLoop(ITERATIONS);
+ GetCounter(&t1);
+ current = t1.low - t0.low;
+ if (current < lowest)
+ lowest = current;
+ }
+ RestoreThreadPriority(iPriority);
+
+ /* Compute frequency */
+ ticks = _CPU_mulDiv(lowest,1000000,count_freq.low);
+ if ((ticks % count_freq.low) > (count_freq.low/2))
+ ticks++; /* Round up if necessary */
+ if (ticks == 0)
+ return 0;
+ return ((cycles*INNER_LOOPS)/ticks);
+}
+
+#define TOLERANCE 1
+
+/****************************************************************************
+REMARKS:
+On processors supporting the Read Time Stamp opcode, compare elapsed
+time on the High-Resolution Counter with elapsed cycles on the Time
+Stamp Register.
+
+The inner loop runs up to 20 times oruntil the average of the previous
+three calculated frequencies is within 1 MHz of each of the individual
+calculated frequencies. This resampling increases the accuracy of the
+results since outside factors could affect this calculation.
+****************************************************************************/
+static ulong GetRDTSCCpuSpeed(
+ ibool accurate)
+{
+ CPU_largeInteger t0,t1,s0,s1,count_freq;
+ u64 stamp0, stamp1, ticks0, ticks1;
+ u64 total_cycles, cycles, hz, freq;
+ u64 total_ticks, ticks;
+ int tries,iPriority;
+ ulong maxCount;
+
+ PM_set64_32(total_cycles,0);
+ PM_set64_32(total_ticks,0);
+ maxCount = accurate ? 600000 : 30000;
+ iPriority = SetMaxThreadPriority();
+ GetCounterFrequency(&count_freq);
+ PM_set64(freq,count_freq.high,count_freq.low);
+ for (tries = 0; tries < 3; tries++) {
+ /* Loop until 100 ticks have passed since last read of hi-res
+ * counter. This accounts for overhead later.
+ */
+ GetCounter(&t0);
+ t1.low = t0.low;
+ t1.high = t0.high;
+ while ((t1.low - t0.low) < 100) {
+ GetCounter(&t1);
+ _CPU_readTimeStamp(&s0);
+ }
+
+ /* Loop until 30000 ticks have passed since last read of hi-res counter.
+ * This allows for elapsed time for sampling. For a hi-res frequency
+ * of 1MHz, this is about 0.03 of a second. The frequency reported
+ * by the OS dependent code should be tuned to provide a good
+ * sample period depending on the accuracy of the OS timers (ie:
+ * if the accuracy is lower, lower the frequency to spend more time
+ * in the inner loop to get better accuracy).
+ */
+ t0.low = t1.low;
+ t0.high = t1.high;
+ while ((t1.low - t0.low) < maxCount) {
+ GetCounter(&t1);
+ _CPU_readTimeStamp(&s1);
+ }
+
+ /* Find the difference during the timing loop */
+ PM_set64(stamp0,s0.high,s0.low);
+ PM_set64(stamp1,s1.high,s1.low);
+ PM_set64(ticks0,t0.high,t0.low);
+ PM_set64(ticks1,t1.high,t1.low);
+ PM_sub64(cycles,stamp1,stamp0);
+ PM_sub64(ticks,ticks1,ticks0);
+
+ /* Sum up the results */
+ PM_add64(total_ticks,total_ticks,ticks);
+ PM_add64(total_cycles,total_cycles,cycles);
+ }
+ RestoreThreadPriority(iPriority);
+
+ /* Compute frequency in Hz */
+ PM_mul64(hz,total_cycles,freq);
+ PM_div64(hz,hz,total_ticks);
+ return PM_64to32(hz);
+}
+
+#endif /* __INTEL__ */
+
+/****************************************************************************
+DESCRIPTION:
+Returns the speed of the processor in MHz.
+
+HEADER:
+ztimer.h
+
+PARAMETERS:
+accurate - True of the speed should be measured accurately
+
+RETURNS:
+Processor speed in MHz.
+
+REMARKS:
+This function returns the speed of the CPU in MHz. Note that if the speed
+cannot be determined, this function will return 0.
+
+If the accurate parameter is set to true, this function will spend longer
+profiling the speed of the CPU, and will not round the CPU speed that is
+reported. This is important for highly accurate timing using the Pentium
+RDTSC instruction, but it does take a lot longer for the profiling to
+produce accurate results.
+
+SEE ALSO:
+CPU_getProcessorSpeedInHz, CPU_getProcessorType, CPU_haveMMX,
+CPU_getProcessorName
+****************************************************************************/
+ulong ZAPI CPU_getProcessorSpeed(
+ ibool accurate)
+{
+#if defined(__INTEL__)
+ /* Number of cycles needed to execute a single BSF instruction on i386+
+ * processors.
+ */
+ ulong cpuSpeed;
+ uint i;
+ static ulong intel_cycles[] = {
+ 115,47,43,
+ };
+ static ulong cyrix_cycles[] = {
+ 38,38,52,52,
+ };
+ static ulong amd_cycles[] = {
+ 49,
+ };
+ static ulong known_speeds[] = {
+ 1000,950,900,850,800,750,700,650,600,550,500,450,433,400,350,
+ 333,300,266,233,200,166,150,133,120,100,90,75,66,60,50,33,20,0,
+ };
+
+ if (CPU_haveRDTSC()) {
+ cpuSpeed = (GetRDTSCCpuSpeed(accurate) + 500000) / 1000000;
+ }
+ else {
+ int type = CPU_getProcessorType();
+ int processor = type & CPU_mask;
+ int vendor = type & CPU_familyMask;
+ if (vendor == CPU_Intel)
+ cpuSpeed = GetBSFCpuSpeed(ITERATIONS * intel_cycles[processor - CPU_i386]);
+ else if (vendor == CPU_Cyrix)
+ cpuSpeed = GetBSFCpuSpeed(ITERATIONS * cyrix_cycles[processor - CPU_Cyrix6x86]);
+ else if (vendor == CPU_AMD)
+ cpuSpeed = GetBSFCpuSpeed(ITERATIONS * amd_cycles[0]);
+ else
+ return 0;
+ }
+
+ /* Now normalise the results given known processors speeds, if the
+ * speed we measure is within 2MHz of the expected values
+ */
+ if (!accurate) {
+ for (i = 0; known_speeds[i] != 0; i++) {
+ if (cpuSpeed >= (known_speeds[i]-3) && cpuSpeed <= (known_speeds[i]+3)) {
+ return known_speeds[i];
+ }
+ }
+ }
+ return cpuSpeed;
+#else
+ return 0;
+#endif
+}
+
+/****************************************************************************
+DESCRIPTION:
+Returns the speed of the processor in Hz.
+
+HEADER:
+ztimer.h
+
+RETURNS:
+Accurate processor speed in Hz.
+
+REMARKS:
+This function returns the accurate speed of the CPU in Hz. Note that if the
+speed cannot be determined, this function will return 0.
+
+This function is similar to the CPU_getProcessorSpeed function, except that
+it attempts to accurately measure the CPU speed in Hz. This is used
+internally in the Zen Timer libraries to provide accurate real world timing
+information. This is important for highly accurate timing using the Pentium
+RDTSC instruction, but it does take a lot longer for the profiling to
+produce accurate results.
+
+SEE ALSO:
+CPU_getProcessorSpeed, CPU_getProcessorType, CPU_haveMMX,
+CPU_getProcessorName
+****************************************************************************/
+ulong ZAPI CPU_getProcessorSpeedInHZ(
+ ibool accurate)
+{
+#if defined(__INTEL__)
+ if (CPU_haveRDTSC()) {
+ return GetRDTSCCpuSpeed(accurate);
+ }
+ return CPU_getProcessorSpeed(false) * 1000000;
+#else
+ return 0;
+#endif
+}
+
+/****************************************************************************
+DESCRIPTION:
+Returns a string defining the speed and name of the processor.
+
+HEADER:
+ztimer.h
+
+RETURNS:
+Processor name string.
+
+REMARKS:
+This function returns an English string describing the speed and name of the
+CPU.
+
+SEE ALSO:
+CPU_getProcessorType, CPU_haveMMX, CPU_getProcessorName
+****************************************************************************/
+char * ZAPI CPU_getProcessorName(void)
+{
+#if defined(__INTEL__)
+ static int cpu,speed = -1;
+ static char name[80];
+
+ if (speed == -1) {
+ cpu = CPU_getProcessorType();
+ speed = CPU_getProcessorSpeed(false);
+ }
+ sprintf(name,"%d MHz ", speed);
+ switch (cpu & CPU_mask) {
+ case CPU_i386:
+ strcat(name,"Intel i386 processor");
+ break;
+ case CPU_i486:
+ strcat(name,"Intel i486 processor");
+ break;
+ case CPU_Pentium:
+ strcat(name,"Intel Pentium processor");
+ break;
+ case CPU_PentiumPro:
+ strcat(name,"Intel Pentium Pro processor");
+ break;
+ case CPU_PentiumII:
+ strcat(name,"Intel Pentium II processor");
+ break;
+ case CPU_Celeron:
+ strcat(name,"Intel Celeron processor");
+ break;
+ case CPU_PentiumIII:
+ strcat(name,"Intel Pentium III processor");
+ break;
+ case CPU_UnkIntel:
+ strcat(name,"Unknown Intel processor");
+ break;
+ case CPU_Cyrix6x86:
+ strcat(name,"Cyrix 6x86 processor");
+ break;
+ case CPU_Cyrix6x86MX:
+ strcat(name,"Cyrix 6x86MX processor");
+ break;
+ case CPU_CyrixMediaGX:
+ strcat(name,"Cyrix MediaGX processor");
+ break;
+ case CPU_CyrixMediaGXm:
+ strcat(name,"Cyrix MediaGXm processor");
+ break;
+ case CPU_UnkCyrix:
+ strcat(name,"Unknown Cyrix processor");
+ break;
+ case CPU_AMDAm486:
+ strcat(name,"AMD Am486 processor");
+ break;
+ case CPU_AMDAm5x86:
+ strcat(name,"AMD Am5x86 processor");
+ break;
+ case CPU_AMDK5:
+ strcat(name,"AMD K5 processor");
+ break;
+ case CPU_AMDK6:
+ strcat(name,"AMD K6 processor");
+ break;
+ case CPU_AMDK6_2:
+ strcat(name,"AMD K6-2 processor");
+ break;
+ case CPU_AMDK6_III:
+ strcat(name,"AMD K6-III processor");
+ break;
+ case CPU_AMDK6_2plus:
+ strcat(name,"AMD K6-2+ processor");
+ break;
+ case CPU_AMDK6_IIIplus:
+ strcat(name,"AMD K6-III+ processor");
+ break;
+ case CPU_UnkAMD:
+ strcat(name,"Unknown AMD processor");
+ break;
+ case CPU_AMDAthlon:
+ strcat(name,"AMD Athlon processor");
+ break;
+ case CPU_AMDDuron:
+ strcat(name,"AMD Duron processor");
+ break;
+ case CPU_WinChipC6:
+ strcat(name,"IDT WinChip C6 processor");
+ break;
+ case CPU_WinChip2:
+ strcat(name,"IDT WinChip 2 processor");
+ break;
+ case CPU_UnkIDT:
+ strcat(name,"Unknown IDT processor");
+ break;
+ default:
+ strcat(name,"Unknown processor");
+ }
+ if (CPU_haveMMX())
+ strcat(name," with MMX(R)");
+ if (CPU_have3DNow())
+ strcat(name,", 3DNow!(R)");
+ if (CPU_haveSSE())
+ strcat(name,", SSE(R)");
+ return name;
+#else
+ return "Unknown";
+#endif
+}
diff --git a/board/MAI/bios_emulator/scitech/src/pm/debug.c b/board/MAI/bios_emulator/scitech/src/pm/debug.c
new file mode 100644
index 00000000000..d86e3e6a0d6
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/pm/debug.c
@@ -0,0 +1,107 @@
+/****************************************************************************
+*
+* SciTech OS Portability Manager Library
+*
+* ========================================================================
+*
+* The contents of this file are subject to the SciTech MGL Public
+* License Version 1.0 (the "License"); you may not use this file
+* except in compliance with the License. You may obtain a copy of
+* the License at http://www.scitechsoft.com/mgl-license.txt
+*
+* Software distributed under the License is distributed on an
+* "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+* implied. See the License for the specific language governing
+* rights and limitations under the License.
+*
+* The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+*
+* The Initial Developer of the Original Code is SciTech Software, Inc.
+* All Rights Reserved.
+*
+* ========================================================================
+*
+* Language: ANSI C
+* Environment: Any
+*
+* Description: Main module containing debug checking features.
+*
+****************************************************************************/
+
+#include "pmapi.h"
+#ifdef __WIN32_VXD__
+#include "vxdfile.h"
+#elif defined(__NT_DRIVER__)
+#include "ntdriver.h"
+#elif defined(__OS2_VDD__)
+#include "vddfile.h"
+#else
+#include <stdio.h>
+#include <stdlib.h>
+#include <string.h>
+#endif
+
+/*---------------------------- Global variables ---------------------------*/
+
+/* {secret} */
+void (*_CHK_fail)(int fatal,const char *msg,const char *cond,const char *file,int line) = _CHK_defaultFail;
+static char logFile[256] = "";
+
+/*----------------------------- Implementation ----------------------------*/
+
+#ifdef CHECKED
+void _CHK_defaultFail(
+ int fatal,
+ const char *msg,
+ const char *cond,
+ const char *file,
+ int line)
+{
+ FILE *f;
+ char buf[256];
+
+ if (logFile[0] == 0) {
+ strcpy(logFile,PM_getNucleusPath());
+ PM_backslash(logFile);
+ strcat(logFile,"scitech.log");
+ }
+ if ((f = fopen(logFile,"a+")) != NULL) {
+#if defined(__WIN32_VXD__) || defined(__OS2_VDD__) || defined(__NT_DRIVER__)
+ sprintf(buf,msg,cond,file,line);
+ fwrite(buf,1,strlen(buf),f);
+#else
+ fprintf(f,msg,cond,file,line);
+#endif
+ fclose(f);
+ }
+ if (fatal) {
+ sprintf(buf,"Check failed: check '%s' for details", logFile);
+ PM_fatalError(buf);
+ }
+}
+#endif
+
+/****************************************************************************
+DESCRIPTION:
+Sets the location of the debug log file.
+
+HEADER:
+pmapi.h
+
+PARAMETERS:
+logFilePath - Full file and path name to debug log file.
+
+REMARKS:
+Sets the name and location of the debug log file. The debug log file is
+created and written to when runtime checks, warnings and failure conditions
+are logged to disk when code is compiled in CHECKED mode. By default the
+log file is called 'scitech.log' and goes into the current SciTech Nucleus
+path for the application. You can use this function to set the filename
+and location of the debug log file to your own application specific
+directory.
+****************************************************************************/
+void PMAPI PM_setDebugLog(
+ const char *logFilePath)
+{
+ strcpy(logFile,logFilePath);
+}
diff --git a/board/MAI/bios_emulator/scitech/src/pm/dos/_event.asm b/board/MAI/bios_emulator/scitech/src/pm/dos/_event.asm
new file mode 100644
index 00000000000..36dcaab67b4
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/pm/dos/_event.asm
@@ -0,0 +1,194 @@
+;****************************************************************************
+;*
+;* SciTech Multi-platform Graphics Library
+;*
+;* ========================================================================
+;*
+;* The contents of this file are subject to the SciTech MGL Public
+;* License Version 1.0 (the "License"); you may not use this file
+;* except in compliance with the License. You may obtain a copy of
+;* the License at http://www.scitechsoft.com/mgl-license.txt
+;*
+;* Software distributed under the License is distributed on an
+;* "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+;* implied. See the License for the specific language governing
+;* rights and limitations under the License.
+;*
+;* The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+;*
+;* The Initial Developer of the Original Code is SciTech Software, Inc.
+;* All Rights Reserved.
+;*
+;* ========================================================================
+;*
+;* Language: 80386 Assembler
+;* Environment: IBM PC (MS DOS)
+;*
+;* Description: Assembly language support routines for the event module.
+;*
+;****************************************************************************
+
+ ideal
+
+include "scitech.mac" ; Memory model macros
+
+ifdef flatmodel
+
+header _event ; Set up memory model
+
+begdataseg _event
+
+ cextern _EVT_biosPtr,DPTR
+
+ifdef USE_NASM
+%define KB_HEAD WORD esi+01Ah ; Keyboard buffer head in BIOS data area
+%define KB_TAIL WORD esi+01Ch ; Keyboard buffer tail in BIOS data area
+%define KB_START WORD esi+080h ; Start of keyboard buffer in BIOS data area
+%define KB_END WORD esi+082h ; End of keyboard buffer in BIOS data area
+else
+KB_HEAD EQU WORD esi+01Ah ; Keyboard buffer head in BIOS data area
+KB_TAIL EQU WORD esi+01Ch ; Keyboard buffer tail in BIOS data area
+KB_START EQU WORD esi+080h ; Start of keyboard buffer in BIOS data area
+KB_END EQU WORD esi+082h ; End of keyboard buffer in BIOS data area
+endif
+
+enddataseg _event
+
+begcodeseg _event ; Start of code segment
+
+ cpublic _EVT_codeStart
+
+;----------------------------------------------------------------------------
+; int _EVT_getKeyCode(void)
+;----------------------------------------------------------------------------
+; Returns the key code for the next available key by extracting it from
+; the BIOS keyboard buffer.
+;----------------------------------------------------------------------------
+cprocstart _EVT_getKeyCode
+
+ enter_c
+
+ mov esi,[_EVT_biosPtr]
+ xor ebx,ebx
+ xor eax,eax
+ mov bx,[KB_HEAD]
+ cmp bx,[KB_TAIL]
+ jz @@Done
+ xor eax,eax
+ mov ax,[esi+ebx] ; EAX := character from keyboard buffer
+ inc _bx
+ inc _bx
+ cmp bx,[KB_END] ; Hit the end of the keyboard buffer?
+ jl @@1
+ mov bx,[KB_START]
+@@1: mov [KB_HEAD],bx ; Update keyboard buffer head pointer
+
+@@Done: leave_c
+ ret
+
+cprocend
+
+;----------------------------------------------------------------------------
+; void _EVT_pumpMessages(void)
+;----------------------------------------------------------------------------
+; This function would normally do nothing, however due to strange bugs
+; in the Windows 3.1 and OS/2 DOS boxes, we don't get any hardware keyboard
+; interrupts unless we periodically call the BIOS keyboard functions. Hence
+; this function gets called every time that we check for events, and works
+; around this problem (in essence it tells the DOS VDM to pump the
+; keyboard events to our program ;-).
+;
+; Note that this bug is not present under Win 9x DOS boxes.
+;----------------------------------------------------------------------------
+cprocstart _EVT_pumpMessages
+
+ mov ah,11h ; Function - Check keyboard status
+ int 16h ; Call BIOS
+
+ mov ax, 0Bh ; Reset Move Mouse
+ int 33h
+ ret
+
+cprocend
+
+;----------------------------------------------------------------------------
+; int _EVT_disableInt(void);
+;----------------------------------------------------------------------------
+; Return processor interrupt status and disable interrupts.
+;----------------------------------------------------------------------------
+cprocstart _EVT_disableInt
+
+ pushf ; Put flag word on stack
+ cli ; Disable interrupts!
+ pop eax ; deposit flag word in return register
+ ret
+
+cprocend
+
+;----------------------------------------------------------------------------
+; void _EVT_restoreInt(int ps);
+;----------------------------------------------------------------------------
+; Restore processor interrupt status.
+;----------------------------------------------------------------------------
+cprocstart _EVT_restoreInt
+
+ ARG ps:UINT
+
+ push ebp
+ mov ebp,esp ; Set up stack frame
+ push [DWORD ps]
+ popf ; Restore processor status (and interrupts)
+ pop ebp
+ ret
+
+cprocend
+
+;----------------------------------------------------------------------------
+; int EVT_rdinx(int port,int index)
+;----------------------------------------------------------------------------
+; Reads an indexed register value from an I/O port.
+;----------------------------------------------------------------------------
+cprocstart EVT_rdinx
+
+ ARG port:UINT, index:UINT
+
+ push ebp
+ mov ebp,esp
+ mov edx,[port]
+ mov al,[BYTE index]
+ out dx,al
+ inc dx
+ in al,dx
+ movzx eax,al
+ pop ebp
+ ret
+
+cprocend
+
+;----------------------------------------------------------------------------
+; void EVT_wrinx(int port,int index,int value)
+;----------------------------------------------------------------------------
+; Writes an indexed register value to an I/O port.
+;----------------------------------------------------------------------------
+cprocstart EVT_wrinx
+
+ ARG port:UINT, index:UINT, value:UINT
+
+ push ebp
+ mov ebp,esp
+ mov edx,[port]
+ mov al,[BYTE index]
+ mov ah,[BYTE value]
+ out dx,ax
+ pop ebp
+ ret
+
+cprocend
+
+ cpublic _EVT_codeEnd
+
+endcodeseg _event
+
+endif
+
+ END ; End of module
diff --git a/board/MAI/bios_emulator/scitech/src/pm/dos/_lztimer.asm b/board/MAI/bios_emulator/scitech/src/pm/dos/_lztimer.asm
new file mode 100644
index 00000000000..a4a9c7916ed
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/pm/dos/_lztimer.asm
@@ -0,0 +1,438 @@
+;****************************************************************************
+;*
+;* SciTech OS Portability Manager Library
+;*
+;* ========================================================================
+;*
+;* The contents of this file are subject to the SciTech MGL Public
+;* License Version 1.0 (the "License"); you may not use this file
+;* except in compliance with the License. You may obtain a copy of
+;* the License at http://www.scitechsoft.com/mgl-license.txt
+;*
+;* Software distributed under the License is distributed on an
+;* "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+;* implied. See the License for the specific language governing
+;* rights and limitations under the License.
+;*
+;* The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+;*
+;* The Initial Developer of the Original Code is SciTech Software, Inc.
+;* All Rights Reserved.
+;*
+;* ========================================================================
+;*
+;* Language: NASM or TASM Assembler
+;* Environment: IBM PC (MS DOS)
+;*
+;* Description: Uses the 8253 timer and the BIOS time-of-day count to time
+;* the performance of code that takes less than an hour to
+;* execute.
+;*
+;* The routines in this package only works with interrupts
+;* enabled, and in fact will explicitly turn interrupts on
+;* in order to ensure we get accurate results from the timer.
+;*
+;* Externally 'C' callable routines:
+;*
+;* LZ_timerOn: Saves the BIOS time of day count and starts the
+;* long period Zen Timer.
+;*
+;* LZ_timerLap: Latches the current count, and keeps the timer running
+;*
+;* LZ_timerOff: Stops the long-period Zen Timer and saves the timer
+;* count and the BIOS time of day count.
+;*
+;* LZ_timerCount: Returns an unsigned long representing the timed count
+;* in microseconds. If more than an hour passed during
+;* the timing interval, LZ_timerCount will return the
+;* value 0xFFFFFFFF (an invalid count).
+;*
+;* Note: If either more than an hour passes between calls to LZ_timerOn
+;* and LZ_timerOff, an error is reported. For timing code that takes
+;* more than a few minutes to execute, use the low resolution
+;* Ultra Long Period Zen Timer code, which should be accurate
+;* enough for most purposes.
+;*
+;* Note: Each block of code being timed should ideally be run several
+;* times, with at least two similar readings required to
+;* establish a true measurement, in order to eliminate any
+;* variability caused by interrupts.
+;*
+;* Note: Interrupts must not be disabled for more than 54 ms at a
+;* stretch during the timing interval. Because interrupts are
+;* enabled, key, mice, and other devices that generate interrupts
+;* should not be used during the timing interval.
+;*
+;* Note: Any extra code running off the timer interrupt (such as
+;* some memory resident utilities) will increase the time
+;* measured by the Zen Timer.
+;*
+;* Note: These routines can introduce inaccuracies of up to a few
+;* tenths of a second into the system clock count for each
+;* code section being timed. Consequently, it's a good idea to
+;* reboot at the conclusion of timing sessions. (The
+;* battery-backed clock, if any, is not affected by the Zen
+;* timer.)
+;*
+;* All registers and all flags are preserved by all routines, except
+;* interrupts which are always turned on
+;*
+;****************************************************************************
+
+ IDEAL
+
+include "scitech.mac"
+
+;****************************************************************************
+;
+; Equates used by long period Zen Timer
+;
+;****************************************************************************
+
+; Base address of 8253 timer chip
+
+BASE_8253 equ 40h
+
+; The address of the timer 0 count registers in the 8253
+
+TIMER_0_8253 equ BASE_8253 + 0
+
+; The address of the mode register in the 8253
+
+MODE_8253 equ BASE_8253 + 3
+
+; The address of the BIOS timer count variable in the BIOS data area.
+
+TIMER_COUNT equ 6Ch
+
+; Macro to delay briefly to ensure that enough time has elapsed between
+; successive I/O accesses so that the device being accessed can respond
+; to both accesses even on a very fast PC.
+
+ifdef USE_NASM
+%macro DELAY 0
+ jmp short $+2
+ jmp short $+2
+ jmp short $+2
+%endmacro
+else
+macro DELAY
+ jmp short $+2
+ jmp short $+2
+ jmp short $+2
+endm
+endif
+
+header _lztimer
+
+begdataseg _lztimer
+
+ cextern _ZTimerBIOSPtr,DPTR
+
+StartBIOSCount dd 0 ; Starting BIOS count dword
+EndBIOSCount dd 0 ; Ending BIOS count dword
+EndTimedCount dw 0 ; Timer 0 count at the end of timing period
+
+enddataseg _lztimer
+
+begcodeseg _lztimer ; Start of code segment
+
+;----------------------------------------------------------------------------
+; void LZ_timerOn(void);
+;----------------------------------------------------------------------------
+; Starts the Long period Zen timer counting.
+;----------------------------------------------------------------------------
+cprocstart LZ_timerOn
+
+; Set the timer 0 of the 8253 to mode 2 (divide-by-N), to cause
+; linear counting rather than count-by-two counting. Also stops
+; timer 0 until the timer count is loaded, except on PS/2 computers.
+
+ mov al,00110100b ; mode 2
+ out MODE_8253,al
+
+; Set the timer count to 0, so we know we won't get another timer
+; interrupt right away. Note: this introduces an inaccuracy of up to 54 ms
+; in the system clock count each time it is executed.
+
+ DELAY
+ sub al,al
+ out TIMER_0_8253,al ; lsb
+ DELAY
+ out TIMER_0_8253,al ; msb
+
+; Store the timing start BIOS count
+
+ use_es
+ifdef flatmodel
+ mov ebx,[_ZTimerBIOSPtr]
+else
+ les bx,[_ZTimerBIOSPtr]
+endif
+ cli ; No interrupts while we grab the count
+ mov eax,[_ES _bx+TIMER_COUNT]
+ sti
+ mov [StartBIOSCount],eax
+ unuse_es
+
+; Set the timer count to 0 again to start the timing interval.
+
+ mov al,00110100b ; set up to load initial
+ out MODE_8253,al ; timer count
+ DELAY
+ sub al,al
+ out TIMER_0_8253,al ; load count lsb
+ DELAY
+ out TIMER_0_8253,al ; load count msb
+
+ ret
+
+cprocend
+
+;----------------------------------------------------------------------------
+; void LZ_timerOff(void);
+;----------------------------------------------------------------------------
+; Stops the long period Zen timer and saves count.
+;----------------------------------------------------------------------------
+cprocstart LZ_timerOff
+
+; Latch the timer count.
+
+ mov al,00000000b ; latch timer 0
+ out MODE_8253,al
+ cli ; Stop the BIOS count
+
+; Read the BIOS count. (Since interrupts are disabled, the BIOS
+; count won't change).
+
+ use_es
+ifdef flatmodel
+ mov ebx,[_ZTimerBIOSPtr]
+else
+ les bx,[_ZTimerBIOSPtr]
+endif
+ mov eax,[_ES _bx+TIMER_COUNT]
+ mov [EndBIOSCount],eax
+ unuse_es
+
+; Read out the count we latched earlier.
+
+ in al,TIMER_0_8253 ; least significant byte
+ DELAY
+ mov ah,al
+ in al,TIMER_0_8253 ; most significant byte
+ xchg ah,al
+ neg ax ; Convert from countdown remaining
+ ; to elapsed count
+ mov [EndTimedCount],ax
+ sti ; Let the BIOS count continue
+
+ ret
+
+cprocend
+
+;----------------------------------------------------------------------------
+; unsigned long LZ_timerLap(void)
+;----------------------------------------------------------------------------
+; Latches the current count and converts it to a microsecond timing value,
+; but leaves the timer still running. We dont check for and overflow,
+; where the time has gone over an hour in this routine, since we want it
+; to execute as fast as possible.
+;----------------------------------------------------------------------------
+cprocstart LZ_timerLap
+
+ push ebx ; Save EBX for 32 bit code
+
+; Latch the timer count.
+
+ mov al,00000000b ; latch timer 0
+ out MODE_8253,al
+ cli ; Stop the BIOS count
+
+; Read the BIOS count. (Since interrupts are disabled, the BIOS
+; count wont change).
+
+ use_es
+ifdef flatmodel
+ mov ebx,[_ZTimerBIOSPtr]
+else
+ les bx,[_ZTimerBIOSPtr]
+endif
+ mov eax,[_ES _bx+TIMER_COUNT]
+ mov [EndBIOSCount],eax
+ unuse_es
+
+; Read out the count we latched earlier.
+
+ in al,TIMER_0_8253 ; least significant byte
+ DELAY
+ mov ah,al
+ in al,TIMER_0_8253 ; most significant byte
+ xchg ah,al
+ neg ax ; Convert from countdown remaining
+ ; to elapsed count
+ mov [EndTimedCount],ax
+ sti ; Let the BIOS count continue
+
+; See if a midnight boundary has passed and adjust the finishing BIOS
+; count by the number of ticks in 24 hours. We wont be able to detect
+; more than 24 hours, but at least we can time across a midnight
+; boundary
+
+ mov eax,[EndBIOSCount] ; Is end < start?
+ cmp eax,[StartBIOSCount]
+ jae @@CalcBIOSTime ; No, calculate the time taken
+
+; Adjust the finishing time by adding the number of ticks in 24 hours
+; (1573040).
+
+ add [DWORD EndBIOSCount],1800B0h
+
+; Convert the BIOS time to microseconds
+
+@@CalcBIOSTime:
+ mov ax,[WORD EndBIOSCount]
+ sub ax,[WORD StartBIOSCount]
+ mov dx,54925 ; Number of microseconds each
+ ; BIOS count represents.
+ mul dx
+ mov bx,ax ; set aside BIOS count in
+ mov cx,dx ; microseconds
+
+; Convert timer count to microseconds
+
+ push _si
+ mov ax,[EndTimedCount]
+ mov si,8381
+ mul si
+ mov si,10000
+ div si ; * 0.8381 = * 8381 / 10000
+ pop _si
+
+; Add the timer and BIOS counts together to get an overall time in
+; microseconds.
+
+ add ax,bx
+ adc cx,0
+ifdef flatmodel
+ shl ecx,16
+ mov cx,ax
+ mov eax,ecx ; EAX := timer count
+else
+ mov dx,cx
+endif
+ pop ebx ; Restore EBX for 32 bit code
+ ret
+
+cprocend
+
+;----------------------------------------------------------------------------
+; unsigned long LZ_timerCount(void);
+;----------------------------------------------------------------------------
+; Returns an unsigned long representing the net time in microseconds.
+;
+; If an hour has passed while timing, we return 0xFFFFFFFF as the count
+; (which is not a possible count in itself).
+;----------------------------------------------------------------------------
+cprocstart LZ_timerCount
+
+ push ebx ; Save EBX for 32 bit code
+
+; See if a midnight boundary has passed and adjust the finishing BIOS
+; count by the number of ticks in 24 hours. We wont be able to detect
+; more than 24 hours, but at least we can time across a midnight
+; boundary
+
+ mov eax,[EndBIOSCount] ; Is end < start?
+ cmp eax,[StartBIOSCount]
+ jae @@CheckForHour ; No, check for hour passing
+
+; Adjust the finishing time by adding the number of ticks in 24 hours
+; (1573040).
+
+ add [DWORD EndBIOSCount],1800B0h
+
+; See if more than an hour passed during timing. If so, notify the user.
+
+@@CheckForHour:
+ mov ax,[WORD StartBIOSCount+2]
+ cmp ax,[WORD EndBIOSCount+2]
+ jz @@CalcBIOSTime ; Hour count didn't change, so
+ ; everything is fine
+
+ inc ax
+ cmp ax,[WORD EndBIOSCount+2]
+ jnz @@TestTooLong ; Two hour boundaries passed, so the
+ ; results are no good
+ mov ax,[WORD EndBIOSCount]
+ cmp ax,[WORD StartBIOSCount]
+ jb @@CalcBIOSTime ; a single hour boundary passed. That's
+ ; OK, so long as the total time wasn't
+ ; more than an hour.
+
+; Over an hour elapsed passed during timing, which renders
+; the results invalid. Notify the user. This misses the case where a
+; multiple of 24 hours has passed, but we'll rely on the perspicacity of
+; the user to detect that case :-).
+
+@@TestTooLong:
+ifdef flatmodel
+ mov eax,0FFFFFFFFh
+else
+ mov ax,0FFFFh
+ mov dx,0FFFFh
+endif
+ jmp short @@Done
+
+; Convert the BIOS time to microseconds
+
+@@CalcBIOSTime:
+ mov ax,[WORD EndBIOSCount]
+ sub ax,[WORD StartBIOSCount]
+ mov dx,54925 ; Number of microseconds each
+ ; BIOS count represents.
+ mul dx
+ mov bx,ax ; set aside BIOS count in
+ mov cx,dx ; microseconds
+
+; Convert timer count to microseconds
+
+ push _si
+ mov ax,[EndTimedCount]
+ mov si,8381
+ mul si
+ mov si,10000
+ div si ; * 0.8381 = * 8381 / 10000
+ pop _si
+
+; Add the timer and BIOS counts together to get an overall time in
+; microseconds.
+
+ add ax,bx
+ adc cx,0
+ifdef flatmodel
+ shl ecx,16
+ mov cx,ax
+ mov eax,ecx ; EAX := timer count
+else
+ mov dx,cx
+endif
+
+@@Done: pop ebx ; Restore EBX for 32 bit code
+ ret
+
+cprocend
+
+cprocstart LZ_disable
+ cli
+ ret
+cprocend
+
+cprocstart LZ_enable
+ sti
+ ret
+cprocend
+
+endcodeseg _lztimer
+
+ END
diff --git a/board/MAI/bios_emulator/scitech/src/pm/dos/_pm.asm b/board/MAI/bios_emulator/scitech/src/pm/dos/_pm.asm
new file mode 100644
index 00000000000..42b5cf3692e
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/pm/dos/_pm.asm
@@ -0,0 +1,656 @@
+;****************************************************************************
+;*
+;* SciTech OS Portability Manager Library
+;*
+;* ========================================================================
+;*
+;* The contents of this file are subject to the SciTech MGL Public
+;* License Version 1.0 (the "License"); you may not use this file
+;* except in compliance with the License. You may obtain a copy of
+;* the License at http://www.scitechsoft.com/mgl-license.txt
+;*
+;* Software distributed under the License is distributed on an
+;* "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+;* implied. See the License for the specific language governing
+;* rights and limitations under the License.
+;*
+;* The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+;*
+;* The Initial Developer of the Original Code is SciTech Software, Inc.
+;* All Rights Reserved.
+;*
+;* ========================================================================
+;*
+;* Language: 80386 Assembler, TASM 4.0 or NASM
+;* Environment: IBM PC Real mode and 16/32 bit protected mode
+;*
+;* Description: Low level assembly support for the PM library specific to
+;* MSDOS.
+;*
+;****************************************************************************
+
+ IDEAL
+
+include "scitech.mac" ; Memory model macros
+
+header _pmdos ; Set up memory model
+
+begdataseg _pmdos
+
+ifndef flatmodel
+
+struc rmregs_s
+ax dw ?
+ax_high dw ?
+bx dw ?
+bx_high dw ?
+cx dw ?
+cx_high dw ?
+dx dw ?
+dx_high dw ?
+si dw ?
+si_high dw ?
+di dw ?
+di_high dw ?
+cflag dw ?
+cflag_high dw ?
+ends rmregs_s
+RMREGS = (rmregs_s PTR es:bx)
+
+struc rmsregs_s
+es dw ?
+cs dw ?
+ss dw ?
+ds dw ?
+ends rmsregs_s
+RMSREGS = (rmsregs_s PTR es:bx)
+
+endif ; !flatmodel
+
+ifdef flatmodel
+ cextern _PM_savedDS,USHORT
+ cextern _PM_VXD_off,UINT
+ cextern _PM_VXD_sel,UINT
+ifdef DOS4GW
+ cextern _PM_haveCauseWay,UINT
+endif
+endif
+intel_id db "GenuineIntel" ; Intel vendor ID
+
+PMHELP_GETPDB EQU 0026h
+PMHELP_FLUSHTLB EQU 0027h
+
+enddataseg _pmdos
+
+P586
+
+begcodeseg _pmdos ; Start of code segment
+
+ifndef flatmodel
+
+;----------------------------------------------------------------------------
+; void PM_callRealMode(unsigned s,unsigned o, RMREGS *regs,
+; RMSREGS *sregs)
+;----------------------------------------------------------------------------
+; Calls a real mode procedure, loading the appropriate registers values
+; from the passed in structures. Only the DS and ES register are loaded
+; from the SREGS structure.
+;----------------------------------------------------------------------------
+cprocstart PM_callRealMode
+
+ ARG s:WORD, o:WORD, regs:DWORD, sregs:DWORD
+
+ LOCAL addr:DWORD, bxVal:WORD, esVal:WORD, flags:WORD = LocalSize
+
+ enter_c
+ push ds
+ push es
+
+ mov ax,[o] ; Build the address to call in 'addr'
+ mov [WORD addr],ax
+ mov ax,[s]
+ mov [WORD addr+2],ax
+
+ les bx,[sregs]
+ mov ax,[RMSREGS.ds]
+ mov ds,ax ; DS := passed in value
+ mov ax,[RMSREGS.es]
+ mov [esVal],ax
+ les bx,[regs]
+ mov ax,[RMREGS.bx]
+ mov [bxVal],ax
+ mov ax,[RMREGS.ax] ; AX := passed in value
+ mov cx,[RMREGS.cx] ; CX := passed in value
+ mov dx,[RMREGS.dx] ; DX := passed in value
+ mov si,[RMREGS.si] ; SI := passed in value
+ mov di,[RMREGS.di] ; DI := passed in value
+ push bp
+ push [esVal]
+ pop es ; ES := passed in value
+ mov bx,[bxVal] ; BX := passed in value
+
+ call [addr] ; Call the specified routine
+
+ pushf ; Save flags for later
+ pop [flags]
+
+ pop bp
+ push es
+ pop [esVal]
+ push bx
+ pop [bxVal]
+ les bx,[sregs]
+ push ds
+ pop [RMSREGS.ds] ; Save value of DS
+ push [esVal]
+ pop [RMSREGS.es] ; Save value of ES
+ les bx,[regs]
+ mov [RMREGS.ax],ax ; Save value of AX
+ mov [RMREGS.cx],cx ; Save value of CX
+ mov [RMREGS.dx],dx ; Save value of DX
+ mov [RMREGS.si],si ; Save value of SI
+ mov [RMREGS.di],di ; Save value of DI
+ mov ax,[flags] ; Return flags
+ and ax,1h ; Isolate carry flag
+ mov [RMREGS.cflag],ax ; Save carry flag status
+ mov ax,[bxVal]
+ mov [RMREGS.bx],ax ; Save value of BX
+
+ pop es
+ pop ds
+ leave_c
+ ret
+
+cprocend
+
+endif
+
+;----------------------------------------------------------------------------
+; void PM_segread(PMSREGS *sregs)
+;----------------------------------------------------------------------------
+; Read the current value of all segment registers
+;----------------------------------------------------------------------------
+cprocstartdll16 PM_segread
+
+ ARG sregs:DPTR
+
+ enter_c
+
+ mov ax,es
+ _les _si,[sregs]
+ mov [_ES _si],ax
+ mov [_ES _si+2],cs
+ mov [_ES _si+4],ss
+ mov [_ES _si+6],ds
+ mov [_ES _si+8],fs
+ mov [_ES _si+10],gs
+
+ leave_c
+ ret
+
+cprocend
+
+; Create a table of the 256 different interrupt calls that we can jump
+; into
+
+ifdef USE_NASM
+
+%assign intno 0
+
+intTable:
+%rep 256
+ db 0CDh
+ db intno
+%assign intno intno + 1
+ ret
+ nop
+%endrep
+
+else
+
+intno = 0
+
+intTable:
+ REPT 256
+ db 0CDh
+ db intno
+intno = intno + 1
+ ret
+ nop
+ ENDM
+
+endif
+
+;----------------------------------------------------------------------------
+; _PM_genInt - Generate the appropriate interrupt
+;----------------------------------------------------------------------------
+cprocnear _PM_genInt
+
+ push _ax ; Save _ax
+ push _bx ; Save _bx
+ifdef flatmodel
+ mov ebx,[UINT esp+12] ; EBX := interrupt number
+else
+ mov bx,sp ; Make sure ESP is zeroed
+ mov bx,[UINT ss:bx+6] ; BX := interrupt number
+endif
+ mov _ax,offset intTable ; Point to interrupt generation table
+ shl _bx,2 ; _BX := index into table
+ add _ax,_bx ; _AX := pointer to interrupt code
+ifdef flatmodel
+ xchg eax,[esp+4] ; Restore eax, and set for int
+else
+ mov bx,sp
+ xchg ax,[ss:bx+2] ; Restore ax, and set for int
+endif
+ pop _bx ; restore _bx
+ ret
+
+cprocend
+
+;----------------------------------------------------------------------------
+; int PM_int386x(int intno, PMREGS *in, PMREGS *out,PMSREGS *sregs)
+;----------------------------------------------------------------------------
+; Issues a software interrupt in protected mode. This routine has been
+; written to allow user programs to load CS and DS with different values
+; other than the default.
+;----------------------------------------------------------------------------
+cprocstartdll16 PM_int386x
+
+ ARG intno:UINT, inptr:DPTR, outptr:DPTR, sregs:DPTR
+
+ LOCAL flags:UINT, sv_ds:UINT, sv_esi:ULONG = LocalSize
+
+ enter_c
+ push ds
+ push es ; Save segment registers
+ push fs
+ push gs
+
+ _lds _si,[sregs] ; DS:_SI -> Load segment registers
+ mov es,[_si]
+ mov bx,[_si+6]
+ mov [sv_ds],_bx ; Save value of user DS on stack
+ mov fs,[_si+8]
+ mov gs,[_si+10]
+
+ _lds _si,[inptr] ; Load CPU registers
+ mov eax,[_si]
+ mov ebx,[_si+4]
+ mov ecx,[_si+8]
+ mov edx,[_si+12]
+ mov edi,[_si+20]
+ mov esi,[_si+16]
+
+ push ds ; Save value of DS
+ push _bp ; Some interrupts trash this!
+ clc ; Generate the interrupt
+ push [UINT intno]
+ mov ds,[WORD sv_ds] ; Set value of user's DS selector
+ call _PM_genInt
+ pop _bp ; Pop intno from stack (flags unchanged)
+ pop _bp ; Restore value of stack frame pointer
+ pop ds ; Restore value of DS
+
+ pushf ; Save flags for later
+ pop [UINT flags]
+ push esi ; Save ESI for later
+ pop [DWORD sv_esi]
+ push ds ; Save DS for later
+ pop [UINT sv_ds]
+
+ _lds _si,[outptr] ; Save CPU registers
+ mov [_si],eax
+ mov [_si+4],ebx
+ mov [_si+8],ecx
+ mov [_si+12],edx
+ push [DWORD sv_esi]
+ pop [DWORD _si+16]
+ mov [_si+20],edi
+
+ mov _bx,[flags] ; Return flags
+ and ebx,1h ; Isolate carry flag
+ mov [_si+24],ebx ; Save carry flag status
+
+ _lds _si,[sregs] ; Save segment registers
+ mov [_si],es
+ mov _bx,[sv_ds]
+ mov [_si+6],bx ; Get returned DS from stack
+ mov [_si+8],fs
+ mov [_si+10],gs
+
+ pop gs ; Restore segment registers
+ pop fs
+ pop es
+ pop ds
+ leave_c
+ ret
+
+cprocend
+
+ifndef flatmodel
+_PM_savedDS dw _DATA ; Saved value of DS
+endif
+
+;----------------------------------------------------------------------------
+; void PM_saveDS(void)
+;----------------------------------------------------------------------------
+; Save the value of DS into a section of the code segment, so that we can
+; quickly load this value at a later date in the PM_loadDS() routine from
+; inside interrupt handlers etc. The method to do this is different
+; depending on the DOS extender being used.
+;----------------------------------------------------------------------------
+cprocstartdll16 PM_saveDS
+
+ifdef flatmodel
+ mov [_PM_savedDS],ds ; Store away in data segment
+endif
+ ret
+
+cprocend
+
+;----------------------------------------------------------------------------
+; void PM_loadDS(void)
+;----------------------------------------------------------------------------
+; Routine to load the DS register with the default value for the current
+; DOS extender. Only the DS register is loaded, not the ES register, so
+; if you wish to call C code, you will need to also load the ES register
+; in 32 bit protected mode.
+;----------------------------------------------------------------------------
+cprocstartdll16 PM_loadDS
+
+ mov ds,[cs:_PM_savedDS] ; We can access the proper DS through CS
+ ret
+
+cprocend
+
+ifdef flatmodel
+
+;----------------------------------------------------------------------------
+; ibool DPMI_allocateCallback(void (*pmcode)(), void *rmregs, long *RMCB)
+;----------------------------------------------------------------------------
+cprocstart _DPMI_allocateCallback
+
+ ARG pmcode:CPTR, rmregs:DPTR, RMCB:DPTR
+
+ enter_c
+ push ds
+ push es
+
+ push cs
+ pop ds
+ mov esi,[pmcode] ; DS:ESI -> protected mode code to call
+ mov edi,[rmregs] ; ES:EDI -> real mode register buffer
+ mov ax,303h ; AX := allocate realmode callback function
+ int 31h
+ mov eax,0 ; Return failure!
+ jc @@Fail
+
+ mov eax,[RMCB]
+ shl ecx,16
+ mov cx,dx
+ mov [es:eax],ecx ; Return real mode address
+ mov eax,1 ; Return success!
+
+@@Fail: pop es
+ pop ds
+ leave_c
+ ret
+
+cprocend
+
+;----------------------------------------------------------------------------
+; void DPMI_freeCallback(long RMCB)
+;----------------------------------------------------------------------------
+cprocstart _DPMI_freeCallback
+
+ ARG RMCB:ULONG
+
+ enter_c
+
+ mov cx,[WORD RMCB+2]
+ mov dx,[WORD RMCB] ; CX:DX := real mode callback
+ mov ax,304h
+ int 31h
+
+ leave_c
+ ret
+
+cprocend
+
+endif
+
+; Macro to delay briefly to ensure that enough time has elapsed between
+; successive I/O accesses so that the device being accessed can respond
+; to both accesses even on a very fast PC.
+
+ifdef USE_NASM
+%macro DELAY 0
+ jmp short $+2
+ jmp short $+2
+ jmp short $+2
+%endmacro
+%macro IODELAYN 1
+%rep %1
+ DELAY
+%endrep
+%endmacro
+else
+macro DELAY
+ jmp short $+2
+ jmp short $+2
+ jmp short $+2
+endm
+macro IODELAYN N
+ rept N
+ DELAY
+ endm
+endm
+endif
+
+;----------------------------------------------------------------------------
+; uchar _PM_readCMOS(int index)
+;----------------------------------------------------------------------------
+; Read the value of a specific CMOS register. We do this with both
+; normal interrupts and NMI disabled.
+;----------------------------------------------------------------------------
+cprocstart _PM_readCMOS
+
+ ARG index:UINT
+
+ push _bp
+ mov _bp,_sp
+ pushfd
+ mov al,[BYTE index]
+ or al,80h ; Add disable NMI flag
+ cli
+ out 70h,al
+ IODELAYN 5
+ in al,71h
+ mov ah,al
+ xor al,al
+ IODELAYN 5
+ out 70h,al ; Re-enable NMI
+ sti
+ mov al,ah ; Return value in AL
+ popfd
+ pop _bp
+ ret
+
+cprocend
+
+;----------------------------------------------------------------------------
+; void _PM_writeCMOS(int index,uchar value)
+;----------------------------------------------------------------------------
+; Read the value of a specific CMOS register. We do this with both
+; normal interrupts and NMI disabled.
+;----------------------------------------------------------------------------
+cprocstart _PM_writeCMOS
+
+ ARG index:UINT, value:UCHAR
+
+ push _bp
+ mov _bp,_sp
+ pushfd
+ mov al,[BYTE index]
+ or al,80h ; Add disable NMI flag
+ cli
+ out 70h,al
+ IODELAYN 5
+ mov al,[value]
+ out 71h,al
+ xor al,al
+ IODELAYN 5
+ out 70h,al ; Re-enable NMI
+ sti
+ popfd
+ pop _bp
+ ret
+
+cprocend
+
+ifdef flatmodel
+
+;----------------------------------------------------------------------------
+; int _PM_pagingEnabled(void)
+;----------------------------------------------------------------------------
+; Returns 1 if paging is enabled, 0 if not or -1 if not at ring 0
+;----------------------------------------------------------------------------
+cprocstart _PM_pagingEnabled
+
+ mov eax,-1
+ifdef DOS4GW
+ mov cx,cs
+ and ecx,3
+ jz @@Ring0
+ cmp [UINT _PM_haveCauseWay],0
+ jnz @@Ring0
+ jmp @@Exit
+
+@@Ring0:
+ mov eax,cr0 ; Load CR0
+ shr eax,31 ; Isolate paging enabled bit
+endif
+@@Exit: ret
+
+cprocend
+
+;----------------------------------------------------------------------------
+; _PM_getPDB - Return the Page Table Directory Base address
+;----------------------------------------------------------------------------
+cprocstart _PM_getPDB
+
+ifdef DOS4GW
+ mov ax,cs
+ and eax,3
+ jz @@Ring0
+ cmp [UINT _PM_haveCauseWay],0
+ jnz @@Ring0
+endif
+
+; Call VxD if running at ring 3 in a DOS box
+
+ cmp [WORD _PM_VXD_sel],0
+ jz @@Fail
+ mov eax,PMHELP_GETPDB
+ifdef USE_NASM
+ call far dword [_PM_VXD_off]
+else
+ call [FCPTR _PM_VXD_off]
+endif
+ ret
+
+@@Ring0:
+ifdef DOS4GW
+ mov eax,cr3
+ and eax,0FFFFF000h
+ ret
+endif
+@@Fail: xor eax,eax
+ ret
+
+cprocend
+
+;----------------------------------------------------------------------------
+; PM_flushTLB - Flush the Translation Lookaside buffer
+;----------------------------------------------------------------------------
+cprocstart PM_flushTLB
+
+ mov ax,cs
+ and eax,3
+ jz @@Ring0
+ifdef DOS4GW
+ cmp [UINT _PM_haveCauseWay],0
+ jnz @@Ring0
+endif
+
+; Call VxD if running at ring 3 in a DOS box
+
+ cmp [WORD _PM_VXD_sel],0
+ jz @@Fail
+ mov eax,PMHELP_FLUSHTLB
+ifdef USE_NASM
+ call far dword [_PM_VXD_off]
+else
+ call [FCPTR _PM_VXD_off]
+endif
+ ret
+
+@@Ring0:
+ifdef DOS4GW
+ wbinvd ; Flush the CPU cache
+ mov eax,cr3
+ mov cr3,eax ; Flush the TLB
+endif
+@@Fail: ret
+
+cprocend
+
+endif
+
+;----------------------------------------------------------------------------
+; void _PM_VxDCall(VXD_regs far *r,uint off,uint sel);
+;----------------------------------------------------------------------------
+cprocstart _PM_VxDCall
+
+ ARG r:DPTR, off:UINT, sel:UINT
+
+ enter_c
+
+; Load all registers from the registers structure
+
+ mov ebx,[r]
+ mov eax,[ebx+0]
+ mov ecx,[ebx+8]
+ mov edx,[ebx+12]
+ mov esi,[ebx+16]
+ mov edi,[ebx+20]
+ mov ebx,[ebx+4] ; Trashes BX structure pointer!
+
+; Call the VxD entry point (on stack)
+
+ifdef USE_NASM
+ call far dword [off]
+else
+ call [FCPTR off]
+endif
+
+; Save all registers back in the structure
+
+ push ebx ; Push EBX onto stack for later
+ mov ebx,[r]
+ mov [ebx+0],eax
+ mov [ebx+8],ecx
+ mov [ebx+12],edx
+ mov [ebx+16],esi
+ mov [ebx+20],edi
+ pop [DWORD ebx+4] ; Save value of EBX from stack
+
+ leave_c
+ ret
+
+cprocend
+
+endcodeseg _pmdos
+
+ END ; End of module
diff --git a/board/MAI/bios_emulator/scitech/src/pm/dos/_pmdos.asm b/board/MAI/bios_emulator/scitech/src/pm/dos/_pmdos.asm
new file mode 100644
index 00000000000..5c741f346c2
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/pm/dos/_pmdos.asm
@@ -0,0 +1,1105 @@
+;****************************************************************************
+;*
+;* SciTech OS Portability Manager Library
+;*
+;* ========================================================================
+;*
+;* The contents of this file are subject to the SciTech MGL Public
+;* License Version 1.0 (the "License"); you may not use this file
+;* except in compliance with the License. You may obtain a copy of
+;* the License at http://www.scitechsoft.com/mgl-license.txt
+;*
+;* Software distributed under the License is distributed on an
+;* "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+;* implied. See the License for the specific language governing
+;* rights and limitations under the License.
+;*
+;* The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+;*
+;* The Initial Developer of the Original Code is SciTech Software, Inc.
+;* All Rights Reserved.
+;*
+;* ========================================================================
+;*
+;* Language: 80386 Assembler, TASM 4.0 or NASM
+;* Environment: IBM PC Real mode and 16/32 bit protected mode
+;*
+;* Description: Low level assembly support for the PM library specific to
+;* MSDOS interrupt handling.
+;*
+;****************************************************************************
+
+ IDEAL
+
+include "scitech.mac" ; Memory model macros
+
+header _pmdos ; Set up memory model
+
+; Define the size of our local stacks. For real mode code they cant be
+; that big, but for 32 bit protected mode code we can make them nice and
+; large so that complex C functions can be used.
+
+ifdef flatmodel
+MOUSE_STACK EQU 4096
+TIMER_STACK EQU 4096
+KEY_STACK EQU 1024
+INT10_STACK EQU 1024
+IRQ_STACK EQU 1024
+else
+MOUSE_STACK EQU 1024
+TIMER_STACK EQU 512
+KEY_STACK EQU 256
+INT10_STACK EQU 256
+IRQ_STACK EQU 256
+endif
+
+ifdef USE_NASM
+
+; Macro to load DS and ES registers with correct value.
+
+%imacro LOAD_DS 0
+%ifdef flatmodel
+ mov ds,[cs:_PM_savedDS]
+ mov es,[cs:_PM_savedDS]
+%else
+ push ax
+ mov ax,_DATA
+ mov ds,ax
+ pop ax
+%endif
+%endmacro
+
+; Note that interrupts we disable interrupts during the following stack
+; %imacro for correct operation, but we do not enable them again. Normally
+; these %imacros are used within interrupt handlers so interrupts should
+; already be off. We turn them back on explicitly later if the user code
+; needs them to be back on.
+
+; Macro to switch to a new local stack.
+
+%imacro NEWSTK 1
+ cli
+ mov [seg_%1],ss
+ mov [ptr_%1],_sp
+ mov [TempSeg],ds
+ mov ss,[TempSeg]
+ mov _sp,offset %1
+%endmacro
+
+; %imacro to switch back to the old stack.
+
+%imacro RESTSTK 1
+ cli
+ mov ss,[seg_%1]
+ mov _sp,[ptr_%1]
+%endmacro
+
+; %imacro to swap the current stack with the one saved away.
+
+%imacro SWAPSTK 1
+ cli
+ mov ax,ss
+ xchg ax,[seg_%1]
+ mov ss,ax
+ xchg _sp,[ptr_%1]
+%endmacro
+
+else
+
+; Macro to load DS and ES registers with correct value.
+
+MACRO LOAD_DS
+ifdef flatmodel
+ mov ds,[cs:_PM_savedDS]
+ mov es,[cs:_PM_savedDS]
+else
+ push ax
+ mov ax,_DATA
+ mov ds,ax
+ pop ax
+endif
+ENDM
+
+; Note that interrupts we disable interrupts during the following stack
+; macro for correct operation, but we do not enable them again. Normally
+; these macros are used within interrupt handlers so interrupts should
+; already be off. We turn them back on explicitly later if the user code
+; needs them to be back on.
+
+; Macro to switch to a new local stack.
+
+MACRO NEWSTK stkname
+ cli
+ mov [seg_&stkname&],ss
+ mov [ptr_&stkname&],_sp
+ mov [TempSeg],ds
+ mov ss,[TempSeg]
+ mov _sp,offset stkname
+ENDM
+
+; Macro to switch back to the old stack.
+
+MACRO RESTSTK stkname
+ cli
+ mov ss,[seg_&stkname&]
+ mov _sp,[ptr_&stkname&]
+ENDM
+
+; Macro to swap the current stack with the one saved away.
+
+MACRO SWAPSTK stkname
+ cli
+ mov ax,ss
+ xchg ax,[seg_&stkname&]
+ mov ss,ax
+ xchg _sp,[ptr_&stkname&]
+ENDM
+
+endif
+
+begdataseg _pmdos
+
+ifdef flatmodel
+ cextern _PM_savedDS,USHORT
+endif
+ cextern _PM_critHandler,CPTR
+ cextern _PM_breakHandler,CPTR
+ cextern _PM_timerHandler,CPTR
+ cextern _PM_rtcHandler,CPTR
+ cextern _PM_keyHandler,CPTR
+ cextern _PM_key15Handler,CPTR
+ cextern _PM_mouseHandler,CPTR
+ cextern _PM_int10Handler,CPTR
+
+ cextern _PM_ctrlCPtr,DPTR
+ cextern _PM_ctrlBPtr,DPTR
+ cextern _PM_critPtr,DPTR
+
+ cextern _PM_prevTimer,FCPTR
+ cextern _PM_prevRTC,FCPTR
+ cextern _PM_prevKey,FCPTR
+ cextern _PM_prevKey15,FCPTR
+ cextern _PM_prevBreak,FCPTR
+ cextern _PM_prevCtrlC,FCPTR
+ cextern _PM_prevCritical,FCPTR
+ cextern _PM_prevRealTimer,ULONG
+ cextern _PM_prevRealRTC,ULONG
+ cextern _PM_prevRealKey,ULONG
+ cextern _PM_prevRealKey15,ULONG
+ cextern _PM_prevRealInt10,ULONG
+
+cpublic _PM_pmdosDataStart
+
+; Allocate space for all of the local stacks that we need. These stacks
+; are not very large, but should be large enough for most purposes
+; (generally you want to handle these interrupts quickly, simply storing
+; the information for later and then returning). If you need bigger
+; stacks then change the appropriate value in here.
+
+ ALIGN 4
+ dclb MOUSE_STACK ; Space for local stack (small)
+MsStack: ; Stack starts at end!
+ptr_MsStack DUINT 0 ; Place to store old stack offset
+seg_MsStack dw 0 ; Place to store old stack segment
+
+ ALIGN 4
+ dclb INT10_STACK ; Space for local stack (small)
+Int10Stack: ; Stack starts at end!
+ptr_Int10Stack DUINT 0 ; Place to store old stack offset
+seg_Int10Stack dw 0 ; Place to store old stack segment
+
+ ALIGN 4
+ dclb TIMER_STACK ; Space for local stack (small)
+TmStack: ; Stack starts at end!
+ptr_TmStack DUINT 0 ; Place to store old stack offset
+seg_TmStack dw 0 ; Place to store old stack segment
+
+ ALIGN 4
+ dclb TIMER_STACK ; Space for local stack (small)
+RtcStack: ; Stack starts at end!
+ptr_RtcStack DUINT 0 ; Place to store old stack offset
+seg_RtcStack dw 0 ; Place to store old stack segment
+RtcInside dw 0 ; Are we still handling current interrupt
+
+ ALIGN 4
+ dclb KEY_STACK ; Space for local stack (small)
+KyStack: ; Stack starts at end!
+ptr_KyStack DUINT 0 ; Place to store old stack offset
+seg_KyStack dw 0 ; Place to store old stack segment
+KyInside dw 0 ; Are we still handling current interrupt
+
+ ALIGN 4
+ dclb KEY_STACK ; Space for local stack (small)
+Ky15Stack: ; Stack starts at end!
+ptr_Ky15Stack DUINT 0 ; Place to store old stack offset
+seg_Ky15Stack dw 0 ; Place to store old stack segment
+
+TempSeg dw 0 ; Place to store stack segment
+
+cpublic _PM_pmdosDataEnd
+
+enddataseg _pmdos
+
+begcodeseg _pmdos ; Start of code segment
+
+cpublic _PM_pmdosCodeStart
+
+;----------------------------------------------------------------------------
+; PM_mouseISR - Mouse interrupt subroutine dispatcher
+;----------------------------------------------------------------------------
+; Interrupt subroutine called by the mouse driver upon interrupts, to
+; dispatch control to high level C based subroutines. Interrupts are on
+; when we call the user code.
+;
+; It is _extremely_ important to save the state of the extended registers
+; as these may well be trashed by the routines called from here and not
+; restored correctly by the mouse interface module.
+;
+; NOTE: This routine switches to a local stack before calling any C code,
+; and hence is _not_ re-entrant. For mouse handlers this is not a
+; problem, as the mouse driver arbitrates calls to the user mouse
+; handler for us.
+;
+; Entry: AX - Condition mask giving reason for call
+; BX - Mouse button state
+; CX - Horizontal cursor coordinate
+; DX - Vertical cursor coordinate
+; SI - Horizontal mickey value
+; DI - Vertical mickey value
+;
+;----------------------------------------------------------------------------
+ifdef DJGPP
+cprocstart _PM_mouseISR
+else
+cprocfar _PM_mouseISR
+endif
+
+ push ds ; Save value of DS
+ push es
+ pushad ; Save _all_ extended registers
+ cld ; Clear direction flag
+
+ LOAD_DS ; Load DS register
+ NEWSTK MsStack ; Switch to local stack
+
+; Call the installed high level C code routine
+
+ clrhi dx ; Clear out high order values
+ clrhi cx
+ clrhi bx
+ clrhi ax
+ sgnhi si
+ sgnhi di
+
+ push _di
+ push _si
+ push _dx
+ push _cx
+ push _bx
+ push _ax
+ sti ; Enable interrupts
+ call [CPTR _PM_mouseHandler]
+ _add sp,12,24
+
+ RESTSTK MsStack ; Restore previous stack
+
+ popad ; Restore all extended registers
+ pop es
+ pop ds
+ ret ; We are done!!
+
+cprocend
+
+;----------------------------------------------------------------------------
+; PM_timerISR - Timer interrupt subroutine dispatcher
+;----------------------------------------------------------------------------
+; Hardware interrupt handler for the timer interrupt, to dispatch control
+; to high level C based subroutines. We save the state of all registers
+; in this routine, and switch to a local stack. Interrupts are *off*
+; when we call the user code.
+;
+; NOTE: This routine switches to a local stack before calling any C code,
+; and hence is _not_ re-entrant. Make sure your C code executes as
+; quickly as possible, since a timer overrun will simply hang the
+; system.
+;----------------------------------------------------------------------------
+cprocfar _PM_timerISR
+
+ push ds ; Save value of DS
+ push es
+ pushad ; Save _all_ extended registers
+ cld ; Clear direction flag
+
+ LOAD_DS ; Load DS register
+
+ NEWSTK TmStack ; Switch to local stack
+ call [CPTR _PM_timerHandler]
+ RESTSTK TmStack ; Restore previous stack
+
+ popad ; Restore all extended registers
+ pop es
+ pop ds
+ iret ; Return from interrupt
+
+cprocend
+
+;----------------------------------------------------------------------------
+; PM_chainPrevTimer - Chain to previous timer interrupt and return
+;----------------------------------------------------------------------------
+; Chains to the previous timer interrupt routine and returns control
+; back to the high level interrupt handler.
+;----------------------------------------------------------------------------
+cprocstart PM_chainPrevTimer
+
+ifdef TNT
+ push eax
+ push ebx
+ push ecx
+ pushfd ; Push flags on stack to simulate interrupt
+ mov ax,250Eh ; Call real mode procedure function
+ mov ebx,[_PM_prevRealTimer]
+ mov ecx,1 ; Copy real mode flags to real mode stack
+ int 21h ; Call the real mode code
+ popfd
+ pop ecx
+ pop ebx
+ pop eax
+ ret
+else
+ SWAPSTK TmStack ; Swap back to previous stack
+ pushf ; Save state of interrupt flag
+ pushf ; Push flags on stack to simulate interrupt
+ifdef USE_NASM
+ call far dword [_PM_prevTimer]
+else
+ call [_PM_prevTimer]
+endif
+ popf ; Restore state of interrupt flag
+ SWAPSTK TmStack ; Swap back to C stack again
+ ret
+endif
+
+cprocend
+
+; Macro to delay briefly to ensure that enough time has elapsed between
+; successive I/O accesses so that the device being accessed can respond
+; to both accesses even on a very fast PC.
+
+ifdef USE_NASM
+%macro DELAY 0
+ jmp short $+2
+ jmp short $+2
+ jmp short $+2
+%endmacro
+%macro IODELAYN 1
+%rep %1
+ DELAY
+%endrep
+%endmacro
+else
+macro DELAY
+ jmp short $+2
+ jmp short $+2
+ jmp short $+2
+endm
+macro IODELAYN N
+ rept N
+ DELAY
+ endm
+endm
+endif
+
+;----------------------------------------------------------------------------
+; PM_rtcISR - Real time clock interrupt subroutine dispatcher
+;----------------------------------------------------------------------------
+; Hardware interrupt handler for the timer interrupt, to dispatch control
+; to high level C based subroutines. We save the state of all registers
+; in this routine, and switch to a local stack. Interrupts are *off*
+; when we call the user code.
+;
+; NOTE: This routine switches to a local stack before calling any C code,
+; and hence is _not_ re-entrant. Make sure your C code executes as
+; quickly as possible, since a timer overrun will simply hang the
+; system.
+;----------------------------------------------------------------------------
+cprocfar _PM_rtcISR
+
+ push ds ; Save value of DS
+ push es
+ pushad ; Save _all_ extended registers
+ cld ; Clear direction flag
+
+; Clear priority interrupt controller and re-enable interrupts so we
+; dont lock things up for long.
+
+ mov al,20h
+ out 0A0h,al
+ out 020h,al
+
+; Clear real-time clock timeout
+
+ in al,70h ; Read CMOS index register
+ push _ax ; and save for later
+ IODELAYN 3
+ mov al,0Ch
+ out 70h,al
+ IODELAYN 5
+ in al,71h
+
+; Call the C interrupt handler function
+
+ LOAD_DS ; Load DS register
+ cmp [BYTE RtcInside],1 ; Check for mutual exclusion
+ je @@Exit
+ mov [BYTE RtcInside],1
+ NEWSTK RtcStack ; Switch to local stack
+ sti ; Re-enable interrupts
+ call [CPTR _PM_rtcHandler]
+ RESTSTK RtcStack ; Restore previous stack
+ mov [BYTE RtcInside],0
+
+@@Exit: pop _ax
+ out 70h,al ; Restore CMOS index register
+ popad ; Restore all extended registers
+ pop es
+ pop ds
+ iret ; Return from interrupt
+
+cprocend
+
+ifdef flatmodel
+;----------------------------------------------------------------------------
+; PM_irqISRTemplate - Hardware interrupt handler IRQ template
+;----------------------------------------------------------------------------
+; Hardware interrupt handler for any interrupt, to dispatch control
+; to high level C based subroutines. We save the state of all registers
+; in this routine, and switch to a local stack. Interrupts are *off*
+; when we call the user code.
+;
+; NOTE: This routine switches to a local stack before calling any C code,
+; and hence is _not_ re-entrant. Make sure your C code executes as
+; quickly as possible.
+;----------------------------------------------------------------------------
+cprocfar _PM_irqISRTemplate
+
+ push ebx
+ mov ebx,0 ; Relocation adjustment factor
+ jmp __IRQEntry
+
+; Global variables stored in the IRQ thunk code segment
+
+_CHandler dd 0 ; Pointer to C interrupt handler
+_PrevIRQ dd 0 ; Previous IRQ handler
+ dd 0
+_IRQ dd 0 ; IRQ we are hooked for
+ptr_IRQStack DUINT 0 ; Place to store old stack offset
+seg_IRQStack dw 0 ; Place to store old stack segment
+_Inside db 0 ; Mutual exclusion flag
+ ALIGN 4
+ dclb IRQ_STACK ; Space for local stack
+_IRQStack: ; Stack starts at end!
+
+; Check for and reject spurious IRQ 7 signals
+
+__IRQEntry:
+ cmp [BYTE cs:ebx+_IRQ],7 ; Spurious IRQs occur only on IRQ 7
+ jmp @@ValidIRQ
+ push eax
+ mov al,1011b ; OCW3: read ISR
+ out 20h,al ; (Intel Peripheral Components, 1991,
+ in al,20h ; p. 3-188)
+ shl al,1 ; Set C = bit 7 (IRQ 7) of ISR register
+ pop eax
+ jc @@ValidIRQ
+ iret ; Return from interrupt
+
+; Save all registers for duration of IRQ handler
+
+@@ValidIRQ:
+ push ds ; Save value of DS
+ push es
+ pushad ; Save _all_ extended registers
+ cld ; Clear direction flag
+ LOAD_DS ; Load DS register
+
+; Send an EOI to the PIC
+
+ mov al,20h ; Send EOI to PIC
+ cmp [BYTE ebx+_IRQ],8 ; Clear PIC1 first if IRQ >= 8
+ jb @@1
+ out 0A0h,al
+@@1: out 20h,al
+
+; Check for mutual exclusion
+
+ cmp [BYTE ebx+_Inside],1
+ je @@ChainOldHandler
+ mov [BYTE ebx+_Inside],1
+
+; Call the C interrupt handler function
+
+ mov [ebx+seg_IRQStack],ss ; Switch to local stack
+ mov [ebx+ptr_IRQStack],esp
+ mov [TempSeg],ds
+ mov ss,[TempSeg]
+ lea esp,[ebx+_IRQStack]
+ sti ; Re-enable interrupts
+ push ebx
+ call [DWORD ebx+_CHandler]
+ pop ebx
+ cli
+ mov ss,[ebx+seg_IRQStack] ; Restore previous stack
+ mov esp,[ebx+ptr_IRQStack]
+ or eax,eax
+ jz @@ChainOldHandler ; Chain if not handled for shared IRQ
+
+@@Exit: mov [BYTE ebx+_Inside],0
+ popad ; Restore all extended registers
+ pop es
+ pop ds
+ pop ebx
+ iret ; Return from interrupt
+
+@@ChainOldHandler:
+ cmp [DWORD ebx+_PrevIRQ],0
+ jz @@Exit
+ mov [BYTE ebx+_Inside],0
+ mov eax,[DWORD ebx+_PrevIRQ]
+ mov ebx,[DWORD ebx+_PrevIRQ+4]
+ mov [DWORD _PrevIRQ],eax
+ mov [DWORD _PrevIRQ+4],ebx
+ popad ; Restore all extended registers
+ pop es
+ pop ds
+ pop ebx
+ jmp [cs:_PrevIRQ] ; Chain to previous IRQ handler
+
+cprocend
+cpublic _PM_irqISRTemplateEnd
+endif
+
+;----------------------------------------------------------------------------
+; PM_keyISR - keyboard interrupt subroutine dispatcher
+;----------------------------------------------------------------------------
+; Hardware interrupt handler for the keyboard interrupt, to dispatch control
+; to high level C based subroutines. We save the state of all registers
+; in this routine, and switch to a local stack. Interrupts are *off*
+; when we call the user code.
+;
+; NOTE: This routine switches to a local stack before calling any C code,
+; and hence is _not_ re-entrant. However we ensure within this routine
+; mutual exclusion to the keyboard handling routine.
+;----------------------------------------------------------------------------
+cprocfar _PM_keyISR
+
+ push ds ; Save value of DS
+ push es
+ pushad ; Save _all_ extended registers
+ cld ; Clear direction flag
+
+ LOAD_DS ; Load DS register
+
+ cmp [BYTE KyInside],1 ; Check for mutual exclusion
+ je @@Reissued
+
+ mov [BYTE KyInside],1
+ NEWSTK KyStack ; Switch to local stack
+ call [CPTR _PM_keyHandler] ; Call C code
+ RESTSTK KyStack ; Restore previous stack
+ mov [BYTE KyInside],0
+
+@@Exit: popad ; Restore all extended registers
+ pop es
+ pop ds
+ iret ; Return from interrupt
+
+; When the BIOS keyboard handler needs to change the SHIFT status lights
+; on the keyboard, in the process of doing this the keyboard controller
+; re-issues another interrupt, while the current handler is still executing.
+; If we recieve another interrupt while still handling the current one,
+; then simply chain directly to the previous handler.
+;
+; Note that for most DOS extenders, the real mode interrupt handler that we
+; install takes care of this for us.
+
+@@Reissued:
+ifdef TNT
+ push eax
+ push ebx
+ push ecx
+ pushfd ; Push flags on stack to simulate interrupt
+ mov ax,250Eh ; Call real mode procedure function
+ mov ebx,[_PM_prevRealKey]
+ mov ecx,1 ; Copy real mode flags to real mode stack
+ int 21h ; Call the real mode code
+ popfd
+ pop ecx
+ pop ebx
+ pop eax
+else
+ pushf
+ifdef USE_NASM
+ call far dword [_PM_prevKey]
+else
+ call [_PM_prevKey]
+endif
+endif
+ jmp @@Exit
+
+cprocend
+
+;----------------------------------------------------------------------------
+; PM_chainPrevkey - Chain to previous key interrupt and return
+;----------------------------------------------------------------------------
+; Chains to the previous key interrupt routine and returns control
+; back to the high level interrupt handler.
+;----------------------------------------------------------------------------
+cprocstart PM_chainPrevKey
+
+ifdef TNT
+ push eax
+ push ebx
+ push ecx
+ pushfd ; Push flags on stack to simulate interrupt
+ mov ax,250Eh ; Call real mode procedure function
+ mov ebx,[_PM_prevRealKey]
+ mov ecx,1 ; Copy real mode flags to real mode stack
+ int 21h ; Call the real mode code
+ popfd
+ pop ecx
+ pop ebx
+ pop eax
+ ret
+else
+
+; YIKES! For some strange reason, when execution returns from the
+; previous keyboard handler, interrupts are re-enabled!! Since we expect
+; interrupts to remain off during the duration of our handler, this can
+; cause havoc. However our stack macros always turn off interrupts, so they
+; will be off when we exit this routine. Obviously there is a tiny weeny
+; window when interrupts will be enabled, but there is nothing we can
+; do about this.
+
+ SWAPSTK KyStack ; Swap back to previous stack
+ pushf ; Push flags on stack to simulate interrupt
+ifdef USE_NASM
+ call far dword [_PM_prevKey]
+else
+ call [_PM_prevKey]
+endif
+ SWAPSTK KyStack ; Swap back to C stack again
+ ret
+endif
+
+cprocend
+
+;----------------------------------------------------------------------------
+; PM_key15ISR - Int 15h keyboard interrupt subroutine dispatcher
+;----------------------------------------------------------------------------
+; This routine gets called if we have been called to handle the Int 15h
+; keyboard interrupt callout from real mode.
+;
+; Entry: AX - Hardware scan code to process
+; Exit: AX - Hardware scan code to process (0 to ignore)
+;----------------------------------------------------------------------------
+cprocfar _PM_key15ISR
+
+ push ds
+ push es
+ LOAD_DS
+ cmp ah,4Fh
+ jnz @@NotOurs ; Quit if not keyboard callout
+
+ pushad
+ cld ; Clear direction flag
+ xor ah,ah ; AX := scan code
+ NEWSTK Ky15Stack ; Switch to local stack
+ push _ax
+ call [CPTR _PM_key15Handler] ; Call C code
+ _add sp,2,4
+ RESTSTK Ky15Stack ; Restore previous stack
+ test ax,ax
+ jz @@1
+ stc ; Set carry to process as normal
+ jmp @@2
+@@1: clc ; Clear carry to ignore scan code
+@@2: popad
+ jmp @@Exit ; We are done
+
+@@NotOurs:
+ifdef TNT
+ push eax
+ push ebx
+ push ecx
+ pushfd ; Push flags on stack to simulate interrupt
+ mov ax,250Eh ; Call real mode procedure function
+ mov ebx,[_PM_prevRealKey15]
+ mov ecx,1 ; Copy real mode flags to real mode stack
+ int 21h ; Call the real mode code
+ popfd
+ pop ecx
+ pop ebx
+ pop eax
+else
+ pushf
+ifdef USE_NASM
+ call far dword [_PM_prevKey15]
+else
+ call [_PM_prevKey15]
+endif
+endif
+@@Exit: pop es
+ pop ds
+ifdef flatmodel
+ retf 4
+else
+ retf 2
+endif
+
+cprocend
+
+;----------------------------------------------------------------------------
+; PM_breakISR - Control Break interrupt subroutine dispatcher
+;----------------------------------------------------------------------------
+; Hardware interrupt handler for the Ctrl-Break interrupt. We simply set
+; the Ctrl-Break flag to a 1 and leave (note that this is accessed through
+; a far pointer, as it may well be located in conventional memory).
+;----------------------------------------------------------------------------
+cprocfar _PM_breakISR
+
+ sti
+ push ds ; Save value of DS
+ push es
+ push _bx
+
+ LOAD_DS ; Load DS register
+ifdef flatmodel
+ mov ebx,[_PM_ctrlBPtr]
+else
+ les bx,[_PM_ctrlBPtr]
+endif
+ mov [UINT _ES _bx],1
+
+; Run alternate break handler code if installed
+
+ cmp [CPTR _PM_breakHandler],0
+ je @@Exit
+
+ pushad
+ mov _ax,1
+ push _ax
+ call [CPTR _PM_breakHandler] ; Call C code
+ pop _ax
+ popad
+
+@@Exit: pop _bx
+ pop es
+ pop ds
+ iret ; Return from interrupt
+
+cprocend
+
+;----------------------------------------------------------------------------
+; int PM_ctrlBreakHit(int clearFlag)
+;----------------------------------------------------------------------------
+; Returns the current state of the Ctrl-Break flag and possibly clears it.
+;----------------------------------------------------------------------------
+cprocstart PM_ctrlBreakHit
+
+ ARG clearFlag:UINT
+
+ enter_c
+ pushf ; Save interrupt status
+ push es
+ifdef flatmodel
+ mov ebx,[_PM_ctrlBPtr]
+else
+ les bx,[_PM_ctrlBPtr]
+endif
+ cli ; No interrupts thanks!
+ mov _ax,[_ES _bx]
+ test [BYTE clearFlag],1
+ jz @@Done
+ mov [UINT _ES _bx],0
+
+@@Done: pop es
+ popf ; Restore interrupt status
+ leave_c
+ ret
+
+cprocend
+
+;----------------------------------------------------------------------------
+; PM_ctrlCISR - Control Break interrupt subroutine dispatcher
+;----------------------------------------------------------------------------
+; Hardware interrupt handler for the Ctrl-C interrupt. We simply set
+; the Ctrl-C flag to a 1 and leave (note that this is accessed through
+; a far pointer, as it may well be located in conventional memory).
+;----------------------------------------------------------------------------
+cprocfar _PM_ctrlCISR
+
+ sti
+ push ds ; Save value of DS
+ push es
+ push _bx
+
+ LOAD_DS ; Load DS register
+ifdef flatmodel
+ mov ebx,[_PM_ctrlCPtr]
+else
+ les bx,[_PM_ctrlCPtr]
+endif
+ mov [UINT _ES _bx],1
+
+; Run alternate break handler code if installed
+
+ cmp [CPTR _PM_breakHandler],0
+ je @@Exit
+
+ pushad
+ mov _ax,0
+ push _ax
+ call [CPTR _PM_breakHandler] ; Call C code
+ pop _ax
+ popad
+
+@@Exit: pop _bx
+ pop es
+ pop ds
+ iret ; Return from interrupt
+ iretd
+
+cprocend
+
+;----------------------------------------------------------------------------
+; int PM_ctrlCHit(int clearFlag)
+;----------------------------------------------------------------------------
+; Returns the current state of the Ctrl-C flag and possibly clears it.
+;----------------------------------------------------------------------------
+cprocstart PM_ctrlCHit
+
+ ARG clearFlag:UINT
+
+ enter_c
+ pushf ; Save interrupt status
+ push es
+ifdef flatmodel
+ mov ebx,[_PM_ctrlCPtr]
+else
+ les bx,[_PM_ctrlCPtr]
+endif
+ cli ; No interrupts thanks!
+ mov _ax,[_ES _bx]
+ test [BYTE clearFlag],1
+ jz @@Done
+ mov [UINT _ES _bx],0
+
+@@Done:
+ pop es
+ popf ; Restore interrupt status
+ leave_c
+ ret
+
+cprocend
+
+;----------------------------------------------------------------------------
+; PM_criticalISR - Control Error handler interrupt subroutine dispatcher
+;----------------------------------------------------------------------------
+; Interrupt handler for the MSDOS Critical Error interrupt, to dispatch
+; control to high level C based subroutines. We save the state of all
+; registers in this routine, and switch to a local stack. We also pass
+; the values of the AX and DI registers to the as pointers, so that the
+; values can be modified before returning to MSDOS.
+;----------------------------------------------------------------------------
+cprocfar _PM_criticalISR
+
+ sti
+ push ds ; Save value of DS
+ push es
+ push _bx ; Save register values changed
+ cld ; Clear direction flag
+
+ LOAD_DS ; Load DS register
+ifdef flatmodel
+ mov ebx,[_PM_critPtr]
+else
+ les bx,[_PM_critPtr]
+endif
+ mov [_ES _bx],ax
+ mov [_ES _bx+2],di
+
+; Run alternate critical handler code if installed
+
+ cmp [CPTR _PM_critHandler],0
+ je @@NoAltHandler
+
+ pushad
+ push _di
+ push _ax
+ call [CPTR _PM_critHandler] ; Call C code
+ _add sp,4,8
+ popad
+
+ pop _bx
+ pop es
+ pop ds
+ iret ; Return from interrupt
+
+@@NoAltHandler:
+ mov ax,3 ; Tell MSDOS to fail the operation
+ pop _bx
+ pop es
+ pop ds
+ iret ; Return from interrupt
+
+cprocend
+
+;----------------------------------------------------------------------------
+; int PM_criticalError(int *axVal,int *diVal,int clearFlag)
+;----------------------------------------------------------------------------
+; Returns the current state of the critical error flags, and the values that
+; MSDOS passed in the AX and DI registers to our handler.
+;----------------------------------------------------------------------------
+cprocstart PM_criticalError
+
+ ARG axVal:DPTR, diVal:DPTR, clearFlag:UINT
+
+ enter_c
+ pushf ; Save interrupt status
+ push es
+ifdef flatmodel
+ mov ebx,[_PM_critPtr]
+else
+ les bx,[_PM_critPtr]
+endif
+ cli ; No interrupts thanks!
+ xor _ax,_ax
+ xor _di,_di
+ mov ax,[_ES _bx]
+ mov di,[_ES _bx+2]
+ test [BYTE clearFlag],1
+ jz @@NoClear
+ mov [ULONG _ES _bx],0
+@@NoClear:
+ _les _bx,[axVal]
+ mov [_ES _bx],_ax
+ _les _bx,[diVal]
+ mov [_ES _bx],_di
+ pop es
+ popf ; Restore interrupt status
+ leave_c
+ ret
+
+cprocend
+
+;----------------------------------------------------------------------------
+; void PM_setMouseHandler(int mask, PM_mouseHandler mh)
+;----------------------------------------------------------------------------
+cprocstart _PM_setMouseHandler
+
+ ARG mouseMask:UINT
+
+ enter_c
+ push es
+
+ mov ax,0Ch ; AX := Function 12 - install interrupt sub
+ mov _cx,[mouseMask] ; CX := mouse mask
+ mov _dx,offset _PM_mouseISR
+ push cs
+ pop es ; ES:_DX -> mouse handler
+ int 33h ; Call mouse driver
+
+ pop es
+ leave_c
+ ret
+
+cprocend
+
+ifdef flatmodel
+
+;----------------------------------------------------------------------------
+; void PM_mousePMCB(void)
+;----------------------------------------------------------------------------
+; Mouse realmode callback routine. Upon entry to this routine, we recieve
+; the following from the DPMI server:
+;
+; Entry: DS:_SI -> Real mode stack at time of call
+; ES:_DI -> Real mode register data structure
+; SS:_SP -> Locked protected mode stack to use
+;----------------------------------------------------------------------------
+cprocfar _PM_mousePMCB
+
+ pushad
+ mov eax,[es:_di+1Ch] ; Load register values from real mode
+ mov ebx,[es:_di+10h]
+ mov ecx,[es:_di+18h]
+ mov edx,[es:_di+14h]
+ mov esi,[es:_di+04h]
+ mov edi,[es:_di]
+ call _PM_mouseISR ; Call the mouse handler
+ popad
+
+ mov ax,[ds:_si]
+ mov [es:_di+2Ah],ax ; Plug in return IP address
+ mov ax,[ds:_si+2]
+ mov [es:_di+2Ch],ax ; Plug in return CS value
+ add [WORD es:_di+2Eh],4 ; Remove return address from stack
+ iret ; Go back to real mode!
+
+cprocend
+
+;----------------------------------------------------------------------------
+; void PM_int10PMCB(void)
+;----------------------------------------------------------------------------
+; int10 realmode callback routine. Upon entry to this routine, we recieve
+; the following from the DPMI server:
+;
+; Entry: DS:ESI -> Real mode stack at time of call
+; ES:EDI -> Real mode register data structure
+; SS:ESP -> Locked protected mode stack to use
+;----------------------------------------------------------------------------
+cprocfar _PM_int10PMCB
+
+ pushad
+ push ds
+ push es
+ push fs
+
+ pushfd
+ pop eax
+ mov [es:edi+20h],ax ; Save return flag status
+ mov ax,[ds:esi]
+ mov [es:edi+2Ah],ax ; Plug in return IP address
+ mov ax,[ds:esi+2]
+ mov [es:edi+2Ch],ax ; Plug in return CS value
+ add [WORD es:edi+2Eh],4 ; Remove return address from stack
+
+; Call the install int10 handler in protected mode. This function gets called
+; with DS set to the current data selector, and ES:EDI pointing the the
+; real mode DPMI register structure at the time of the interrupt. The
+; handle must be written in assembler to be able to extract the real mode
+; register values from the structure
+
+ push es
+ pop fs ; FS:EDI -> real mode registers
+ LOAD_DS
+ NEWSTK Int10Stack ; Switch to local stack
+
+ call [_PM_int10Handler]
+
+ RESTSTK Int10Stack ; Restore previous stack
+ pop fs
+ pop es
+ pop ds
+ popad
+ iret ; Go back to real mode!
+
+cprocend
+
+endif
+
+cpublic _PM_pmdosCodeEnd
+
+endcodeseg _pmdos
+
+ END ; End of module
diff --git a/board/MAI/bios_emulator/scitech/src/pm/dos/_vflat.asm b/board/MAI/bios_emulator/scitech/src/pm/dos/_vflat.asm
new file mode 100644
index 00000000000..34985a9d8bf
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/pm/dos/_vflat.asm
@@ -0,0 +1,652 @@
+;****************************************************************************
+;*
+;* SciTech OS Portability Manager Library
+;*
+;* ========================================================================
+;*
+;* The contents of this file are subject to the SciTech MGL Public
+;* License Version 1.0 (the "License"); you may not use this file
+;* except in compliance with the License. You may obtain a copy of
+;* the License at http://www.scitechsoft.com/mgl-license.txt
+;*
+;* Software distributed under the License is distributed on an
+;* "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+;* implied. See the License for the specific language governing
+;* rights and limitations under the License.
+;*
+;* The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+;*
+;* The Initial Developer of the Original Code is SciTech Software, Inc.
+;* All Rights Reserved.
+;*
+;* ========================================================================
+;*
+;* Based on original code Copyright 1994 Otto Chrons
+;*
+;* Language: 80386 Assembler, TASM 4.0 or later
+;* Environment: IBM PC 32 bit protected mode
+;*
+;* Description: Low level page fault handler for virtual linear framebuffers.
+;*
+;****************************************************************************
+
+ IDEAL
+ JUMPS
+
+include "scitech.mac" ; Memory model macros
+
+header _vflat ; Set up memory model
+
+VFLAT_START EQU 0F0000000h
+VFLAT_END EQU 0F03FFFFFh
+PAGE_PRESENT EQU 1
+PAGE_NOTPRESENT EQU 0
+PAGE_READ EQU 0
+PAGE_WRITE EQU 2
+
+ifdef DOS4GW
+
+;----------------------------------------------------------------------------
+; DOS4G/W flat linear framebuffer emulation.
+;----------------------------------------------------------------------------
+
+begdataseg _vflat
+
+; Near pointers to the page directory base and our page tables. All of
+; this memory is always located in the first Mb of DOS memory.
+
+PDBR dd 0 ; Page directory base register (CR3)
+accessPageAddr dd 0
+accessPageTable dd 0
+
+; CauseWay page directory & 1st page table linear addresses.
+
+CauseWayDIRLinear dd 0
+CauseWay1stLinear dd 0
+
+; Place to store a copy of the original Page Table Directory before we
+; intialised our virtual buffer code.
+
+pageDirectory: resd 1024 ; Saved page table directory
+
+ValidCS dw 0 ; Valid CS for page faults
+Ring0CS dw 0 ; Our ring 0 code selector
+LastPage dd 0 ; Last page we mapped in
+BankFuncBuf: resb 101 ; Place to store bank switch code
+BankFuncPtr dd offset BankFuncBuf
+
+INT14Gate:
+INT14Offset dd 0 ; eip of original vector
+INT14Selector dw 0 ; cs of original vector
+
+ cextern _PM_savedDS,USHORT
+ cextern VF_haveCauseWay,BOOL
+
+enddataseg _vflat
+
+begcodeseg _vflat ; Start of code segment
+
+ cextern VF_malloc,FPTR
+
+;----------------------------------------------------------------------------
+; PF_handler64k - Page fault handler for 64k banks
+;----------------------------------------------------------------------------
+; The handler below is a 32 bit ring 0 page fault handler. It receives
+; control immediately after any page fault or after an IRQ6 (hardware
+; interrupt). This provides the fastest possible handling of page faults
+; since it jump directly here. If this is a page fault, the number
+; immediately on the stack will be an error code, at offset 4 will be
+; the eip of the faulting instruction, at offset 8 will be the cs of the
+; faulting instruction. If it is a hardware interrupt, it will not have
+; the error code and the eflags will be at offset 8.
+;----------------------------------------------------------------------------
+cprocfar PF_handler64k
+
+; Check if this is a processor exeception or a page fault
+
+ push eax
+ mov ax,[cs:ValidCS] ; Use CS override to access data
+ cmp [ss:esp+12],ax ; Is this a page fault?
+ jne @@ToOldHandler ; Nope, jump to the previous handler
+
+; Get address of page fault and check if within our handlers range
+
+ mov eax,cr2 ; EBX has page fault linear address
+ cmp eax,VFLAT_START ; Is the fault less than ours?
+ jb @@ToOldHandler ; Yep, go to previous handler
+ cmp eax,VFLAT_END ; Is the fault more than ours?
+ jae @@ToOldHandler ; Yep, go to previous handler
+
+; This is our page fault, so we need to handle it
+
+ pushad
+ push ds
+ push es
+ mov ebx,eax ; EBX := page fault address
+ and ebx,invert 0FFFFh ; Mask to 64k bank boundary
+ mov ds,[cs:_PM_savedDS]; Load segment registers
+ mov es,[cs:_PM_savedDS]
+
+; Map in the page table for our virtual framebuffer area for modification
+
+ mov edi,[PDBR] ; EDI points to page directory
+ mov edx,ebx ; EDX = linear address
+ shr edx,22 ; EDX = offset to page directory
+ mov edx,[edx*4+edi] ; EDX = physical page table address
+ mov eax,edx
+ mov edx,[accessPageTable]
+ or eax,7
+ mov [edx],eax
+ mov eax,cr3
+ mov cr3,eax ; Update page table cache
+
+; Mark all pages valid for the new page fault area
+
+ mov esi,ebx ; ESI := linear address for page
+ shr esi,10
+ and esi,0FFFh ; Offset into page table
+ add esi,[accessPageAddr]
+ifdef USE_NASM
+%assign off 0
+%rep 16
+ or [DWORD esi+off],0000000001h ; Enable pages
+%assign off off+4
+%endrep
+else
+off = 0
+REPT 16
+ or [DWORD esi+off],0000000001h ; Enable pages
+off = off+4
+ENDM
+endif
+
+; Mark all pages invalid for the previously mapped area
+
+ xchg esi,[LastPage] ; Save last page for next page fault
+ test esi,esi
+ jz @@DoneMapping ; Dont update if first time round
+ifdef USE_NASM
+%assign off 0
+%rep 16
+ or [DWORD esi+off],0FFFFFFFEh ; Disable pages
+%assign off off+4
+%endrep
+else
+off = 0
+REPT 16
+ and [DWORD esi+off],0FFFFFFFEh ; Disable pages
+off = off+4
+ENDM
+endif
+
+@@DoneMapping:
+ mov eax,cr3
+ mov cr3,eax ; Flush the TLB
+
+; Now program the new SuperVGA starting bank address
+
+ mov eax,ebx ; EAX := page fault address
+ shr eax,16
+ and eax,0FFh ; Mask to 0-255
+ call [BankFuncPtr] ; Call the bank switch function
+
+ pop es
+ pop ds
+ popad
+ pop eax
+ add esp,4 ; Pop the error code from stack
+ iretd ; Return to faulting instruction
+
+@@ToOldHandler:
+ pop eax
+ifdef USE_NASM
+ jmp far dword [cs:INT14Gate]; Chain to previous handler
+else
+ jmp [FWORD cs:INT14Gate]; Chain to previous handler
+endif
+
+cprocend
+
+;----------------------------------------------------------------------------
+; PF_handler4k - Page fault handler for 4k banks
+;----------------------------------------------------------------------------
+; The handler below is a 32 bit ring 0 page fault handler. It receives
+; control immediately after any page fault or after an IRQ6 (hardware
+; interrupt). This provides the fastest possible handling of page faults
+; since it jump directly here. If this is a page fault, the number
+; immediately on the stack will be an error code, at offset 4 will be
+; the eip of the faulting instruction, at offset 8 will be the cs of the
+; faulting instruction. If it is a hardware interrupt, it will not have
+; the error code and the eflags will be at offset 8.
+;----------------------------------------------------------------------------
+cprocfar PF_handler4k
+
+; Fill in when we have tested all the 64Kb code
+
+ifdef USE_NASM
+ jmp far dword [cs:INT14Gate]; Chain to previous handler
+else
+ jmp [FWORD cs:INT14Gate]; Chain to previous handler
+endif
+
+cprocend
+
+;----------------------------------------------------------------------------
+; void InstallFaultHandler(void *baseAddr,int bankSize)
+;----------------------------------------------------------------------------
+; Installes the page fault handler directly int the interrupt descriptor
+; table for maximum performance. This of course requires ring 0 access,
+; but none of this stuff will run without ring 0!
+;----------------------------------------------------------------------------
+cprocstart InstallFaultHandler
+
+ ARG baseAddr:ULONG, bankSize:UINT
+
+ enter_c
+
+ mov [DWORD LastPage],0 ; No pages have been mapped
+ mov ax,cs
+ mov [ValidCS],ax ; Save CS value for page faults
+
+; Put address of our page fault handler into the IDT directly
+
+ sub esp,6 ; Allocate space on stack
+ifdef USE_NASM
+ sidt [ss:esp] ; Store pointer to IDT
+else
+ sidt [FWORD ss:esp] ; Store pointer to IDT
+endif
+ pop ax ; add esp,2
+ pop eax ; Absolute address of IDT
+ add eax,14*8 ; Point to Int #14
+
+; Note that Interrupt gates do not have the high and low word of the
+; offset in adjacent words in memory, there are 4 bytes separating them.
+
+ mov ecx,[eax] ; Get cs and low 16 bits of offset
+ mov edx,[eax+6] ; Get high 16 bits of offset in dx
+ shl edx,16
+ mov dx,cx ; edx has offset
+ mov [INT14Offset],edx ; Save offset
+ shr ecx,16
+ mov [INT14Selector],cx ; Save original cs
+ mov [eax+2],cs ; Install new cs
+ mov edx,offset PF_handler64k
+ cmp [UINT bankSize],4
+ jne @@1
+ mov edx,offset PF_handler4k
+@@1: mov [eax],dx ; Install low word of offset
+ shr edx,16
+ mov [eax+6],dx ; Install high word of offset
+
+ leave_c
+ ret
+
+cprocend
+
+;----------------------------------------------------------------------------
+; void RemoveFaultHandler(void)
+;----------------------------------------------------------------------------
+; Closes down the virtual framebuffer services and restores the previous
+; page fault handler.
+;----------------------------------------------------------------------------
+cprocstart RemoveFaultHandler
+
+ enter_c
+
+; Remove page fault handler from IDT
+
+ sub esp,6 ; Allocate space on stack
+ifdef USE_NASM
+ sidt [ss:esp] ; Store pointer to IDT
+else
+ sidt [FWORD ss:esp] ; Store pointer to IDT
+endif
+
+ pop ax ; add esp,2
+ pop eax ; Absolute address of IDT
+ add eax,14*8 ; Point to Int #14
+ mov cx,[INT14Selector]
+ mov [eax+2],cx ; Restore original CS
+ mov edx,[INT14Offset]
+ mov [eax],dx ; Install low word of offset
+ shr edx,16
+ mov [eax+6],dx ; Install high word of offset
+
+ leave_c
+ ret
+
+cprocend
+
+;----------------------------------------------------------------------------
+; void InstallBankFunc(int codeLen,void *bankFunc)
+;----------------------------------------------------------------------------
+; Installs the bank switch function by relocating it into our data segment
+; and making it into a callable function. We do it this way to make the
+; code identical to the way that the VflatD devices work under Windows.
+;----------------------------------------------------------------------------
+cprocstart InstallBankFunc
+
+ ARG codeLen:UINT, bankFunc:DPTR
+
+ enter_c
+
+ mov esi,[bankFunc] ; Copy the code into buffer
+ mov edi,offset BankFuncBuf
+ mov ecx,[codeLen]
+ rep movsb
+ mov [BYTE edi],0C3h ; Terminate the function with a near ret
+
+ leave_c
+ ret
+
+cprocend
+
+;----------------------------------------------------------------------------
+; int InitPaging(void)
+;----------------------------------------------------------------------------
+; Initializes paging system. If paging is not enabled, builds a page table
+; directory and page tables for physical memory
+;
+; Exit: 0 - Successful
+; -1 - Couldn't initialize paging mechanism
+;----------------------------------------------------------------------------
+cprocstart InitPaging
+
+ push ebx
+ push ecx
+ push edx
+ push esi
+ push edi
+
+; Are we running under CauseWay?
+
+ mov ax,0FFF9h
+ int 31h
+ jc @@NotCauseway
+ cmp ecx,"CAUS"
+ jnz @@NotCauseway
+ cmp edx,"EWAY"
+ jnz @@NotCauseway
+
+ mov [BOOL VF_haveCauseWay],1
+ mov [CauseWayDIRLinear],esi
+ mov [CauseWay1stLinear],edi
+
+; Check for DPMI
+
+ mov ax,0ff00h
+ push es
+ int 31h
+ pop es
+ shr edi,2
+ and edi,3
+ cmp edi,2
+ jz @@ErrExit ; Not supported under DPMI
+
+ mov eax,[CauseWayDIRLinear]
+ jmp @@CopyCR3
+
+@@NotCauseway:
+ mov ax,cs
+ test ax,3 ; Which ring are we running
+ jnz @@ErrExit ; Needs zero ring to access
+ ; page tables (CR3)
+ mov eax,cr0 ; Load CR0
+ test eax,80000000h ; Is paging enabled?
+ jz @@ErrExit ; No, we must have paging!
+
+ mov eax,cr3 ; Load directory address
+ and eax,0FFFFF000h
+
+@@CopyCR3:
+ mov [PDBR],eax ; Save it
+ mov esi,eax
+ mov edi,offset pageDirectory
+ mov ecx,1024
+ cld
+ rep movsd ; Copy the original page table directory
+ cmp [DWORD accessPageAddr],0; Check if we have allocated page
+ jne @@HaveRealMem ; table already (we cant free it)
+
+ mov eax,0100h ; DPMI DOS allocate
+ mov ebx,8192/16
+ int 31h ; Allocate 8192 bytes
+ and eax,0FFFFh
+ shl eax,4 ; EAX points to newly allocated memory
+ add eax,4095
+ and eax,0FFFFF000h ; Page align
+ mov [accessPageAddr],eax
+
+@@HaveRealMem:
+ mov eax,[accessPageAddr] ; EAX -> page table in 1st Mb
+ shr eax,12
+ and eax,3FFh ; Page table offset
+ shl eax,2
+ cmp [BOOL VF_haveCauseWay],0
+ jz @@NotCW0
+ mov ebx,[CauseWay1stLinear]
+ jmp @@Put1st
+
+@@NotCW0:
+ mov ebx,[PDBR]
+ mov ebx,[ebx]
+ and ebx,0FFFFF000h ; Page table for 1st megabyte
+
+@@Put1st:
+ add eax,ebx
+ mov [accessPageTable],eax
+ sub eax,eax ; No error
+ jmp @@Exit
+
+@@ErrExit:
+ mov eax,-1
+
+@@Exit: pop edi
+ pop esi
+ pop edx
+ pop ecx
+ pop ebx
+ ret
+
+cprocend
+
+;----------------------------------------------------------------------------
+; void ClosePaging(void)
+;----------------------------------------------------------------------------
+; Closes the paging system
+;----------------------------------------------------------------------------
+cprocstart ClosePaging
+
+ push eax
+ push ecx
+ push edx
+ push esi
+ push edi
+
+ mov eax,[accessPageAddr]
+ call AccessPage ; Restore AccessPage mapping
+ mov edi,[PDBR]
+ mov esi,offset pageDirectory
+ mov ecx,1024
+ cld
+ rep movsd ; Restore the original page table directory
+
+@@Exit: pop edi
+ pop esi
+ pop edx
+ pop ecx
+ pop eax
+ ret
+
+cprocend
+
+;----------------------------------------------------------------------------
+; long AccessPage(long phys)
+;----------------------------------------------------------------------------
+; Maps a known page to given physical memory
+; Entry: EAX - Physical memory
+; Exit: EAX - Linear memory address of mapped phys mem
+;----------------------------------------------------------------------------
+cprocstatic AccessPage
+
+ push edx
+ mov edx,[accessPageTable]
+ or eax,7
+ mov [edx],eax
+ mov eax,cr3
+ mov cr3,eax ; Update page table cache
+ mov eax,[accessPageAddr]
+ pop edx
+ ret
+
+cprocend
+
+;----------------------------------------------------------------------------
+; long GetPhysicalAddress(long linear)
+;----------------------------------------------------------------------------
+; Returns the physical address of linear address
+; Entry: EAX - Linear address to convert
+; Exit: EAX - Physical address
+;----------------------------------------------------------------------------
+cprocstatic GetPhysicalAddress
+
+ push ebx
+ push edx
+ mov edx,eax
+ shr edx,22 ; EDX is the directory offset
+ mov ebx,[PDBR]
+ mov edx,[edx*4+ebx] ; Load page table address
+ push eax
+ mov eax,edx
+ call AccessPage ; Access the page table
+ mov edx,eax
+ pop eax
+ shr eax,12
+ and eax,03FFh ; EAX offset into page table
+ mov eax,[edx+eax*4] ; Load physical address
+ and eax,0FFFFF000h
+ pop edx
+ pop ebx
+ ret
+
+cprocend
+
+;----------------------------------------------------------------------------
+; void CreatePageTable(long pageDEntry)
+;----------------------------------------------------------------------------
+; Creates a page table for specific address (4MB)
+; Entry: EAX - Page directory entry (top 10-bits of address)
+;----------------------------------------------------------------------------
+cprocstatic CreatePageTable
+
+ push ebx
+ push ecx
+ push edx
+ push edi
+ mov ebx,eax ; Save address
+ mov eax,8192
+ push eax
+ call VF_malloc ; Allocate page table directory
+ add esp,4
+ add eax,0FFFh
+ and eax,0FFFFF000h ; Page align (4KB)
+ mov edi,eax ; Save page table linear address
+ sub eax,eax ; Fill with zero
+ mov ecx,1024
+ cld
+ rep stosd ; Clear page table
+ sub edi,4096
+ mov eax,edi
+ call GetPhysicalAddress
+ mov edx,[PDBR]
+ or eax,7 ; Present/write/user bit
+ mov [edx+ebx*4],eax ; Save physical address into page directory
+ mov eax,cr3
+ mov cr3,eax ; Update page table cache
+ pop edi
+ pop edx
+ pop ecx
+ pop ebx
+ ret
+
+cprocend
+
+;----------------------------------------------------------------------------
+; void MapPhysical2Linear(ulong pAddr, ulong lAddr, int pages, int flags);
+;----------------------------------------------------------------------------
+; Maps physical memory into linear memory
+; Entry: pAddr - Physical address
+; lAddr - Linear address
+; pages - Number of 4K pages to map
+; flags - Page flags
+; bit 0 = present
+; bit 1 = Read(0)/Write(1)
+;----------------------------------------------------------------------------
+cprocstart MapPhysical2Linear
+
+ ARG pAddr:ULONG, lAddr:ULONG, pages:UINT, pflags:UINT
+
+ enter_c
+
+ and [ULONG pAddr],0FFFFF000h; Page boundary
+ and [ULONG lAddr],0FFFFF000h; Page boundary
+ mov ecx,[pflags]
+ and ecx,11b ; Just two bits
+ or ecx,100b ; Supervisor bit
+ mov [pflags],ecx
+
+ mov edx,[lAddr]
+ shr edx,22 ; EDX = Directory
+ mov esi,[PDBR]
+ mov edi,[pages] ; EDI page count
+ mov ebx,[lAddr]
+
+@@CreateLoop:
+ mov ecx,[esi+edx*4] ; Load page table address
+ test ecx,1 ; Is it present?
+ jnz @@TableOK
+ mov eax,edx
+ call CreatePageTable ; Create a page table
+@@TableOK:
+ mov eax,ebx
+ shr eax,12
+ and eax,3FFh
+ sub eax,1024
+ neg eax ; EAX = page count in this table
+ inc edx ; Next table
+ mov ebx,0 ; Next time we'll map 1K pages
+ sub edi,eax ; Subtract mapped pages from page count
+ jns @@CreateLoop ; Create more tables if necessary
+
+ mov ecx,[pages] ; ECX = Page count
+ mov esi,[lAddr]
+ shr esi,12 ; Offset part isn't needed
+ mov edi,[pAddr]
+@@MappingLoop:
+ mov eax,esi
+ shr eax,10 ; EAX = offset to page directory
+ mov ebx,[PDBR]
+ mov eax,[eax*4+ebx] ; EAX = page table address
+ call AccessPage
+ mov ebx,esi
+ and ebx,3FFh ; EBX = offset to page table
+ mov edx,edi
+ add edi,4096 ; Next physical address
+ inc esi ; Next linear page
+ or edx,[pflags] ; Update flags...
+ mov [eax+ebx*4],edx ; Store page table entry
+ loop @@MappingLoop
+ mov eax,cr3
+ mov cr3,eax ; Update page table cache
+
+ leave_c
+ ret
+
+cprocend
+
+endcodeseg _vflat
+
+endif
+
+ END ; End of module
diff --git a/board/MAI/bios_emulator/scitech/src/pm/dos/cpuinfo.c b/board/MAI/bios_emulator/scitech/src/pm/dos/cpuinfo.c
new file mode 100644
index 00000000000..ee117c78e95
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/pm/dos/cpuinfo.c
@@ -0,0 +1,72 @@
+/****************************************************************************
+*
+* Ultra Long Period Timer
+*
+* ========================================================================
+*
+* The contents of this file are subject to the SciTech MGL Public
+* License Version 1.0 (the "License"); you may not use this file
+* except in compliance with the License. You may obtain a copy of
+* the License at http://www.scitechsoft.com/mgl-license.txt
+*
+* Software distributed under the License is distributed on an
+* "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+* implied. See the License for the specific language governing
+* rights and limitations under the License.
+*
+* The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+*
+* The Initial Developer of the Original Code is SciTech Software, Inc.
+* All Rights Reserved.
+*
+* ========================================================================
+*
+* Language: ANSI C
+* Environment: DOS
+*
+* Description: MSDOS specific code for the CPU detection module.
+*
+****************************************************************************/
+
+/*----------------------------- Implementation ----------------------------*/
+
+/* External timing function */
+
+void __ZTimerInit(void);
+
+/****************************************************************************
+REMARKS:
+Do nothing for DOS because we don't have thread priorities.
+****************************************************************************/
+#define SetMaxThreadPriority() 0
+
+/****************************************************************************
+REMARKS:
+Do nothing for DOS because we don't have thread priorities.
+****************************************************************************/
+#define RestoreThreadPriority(i) (void)(i)
+
+/****************************************************************************
+REMARKS:
+Initialise the counter and return the frequency of the counter.
+****************************************************************************/
+static void GetCounterFrequency(
+ CPU_largeInteger *freq)
+{
+ ulong resolution;
+
+ __ZTimerInit();
+ ULZTimerResolution(&resolution);
+ freq->low = (ulong)(10000000000.0 / resolution);
+ freq->high = 0;
+}
+
+/****************************************************************************
+REMARKS:
+Read the counter and return the counter value.
+****************************************************************************/
+#define GetCounter(t) \
+{ \
+ (t)->low = ULZReadTime() * 10000L; \
+ (t)->high = 0; \
+}
diff --git a/board/MAI/bios_emulator/scitech/src/pm/dos/event.c b/board/MAI/bios_emulator/scitech/src/pm/dos/event.c
new file mode 100644
index 00000000000..12ecb298bc3
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/pm/dos/event.c
@@ -0,0 +1,494 @@
+/****************************************************************************
+*
+* SciTech OS Portability Manager Library
+*
+* ========================================================================
+*
+* The contents of this file are subject to the SciTech MGL Public
+* License Version 1.0 (the "License"); you may not use this file
+* except in compliance with the License. You may obtain a copy of
+* the License at http://www.scitechsoft.com/mgl-license.txt
+*
+* Software distributed under the License is distributed on an
+* "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+* implied. See the License for the specific language governing
+* rights and limitations under the License.
+*
+* The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+*
+* The Initial Developer of the Original Code is SciTech Software, Inc.
+* All Rights Reserved.
+*
+* ========================================================================
+*
+* Language: ANSI C
+* Environment: 32-bit DOS
+*
+* Description: 32-bit DOS implementation for the SciTech cross platform
+* event library.
+*
+****************************************************************************/
+
+/*--------------------------- Global variables ----------------------------*/
+
+ibool _VARAPI _EVT_useEvents = true; /* True to use event handling */
+ibool _VARAPI _EVT_installed = 0; /* Event handers installed? */
+uchar _VARAPI *_EVT_biosPtr = NULL; /* Pointer to the BIOS data area */
+static ibool haveMouse = false; /* True if we have a mouse */
+
+/*---------------------------- Implementation -----------------------------*/
+
+/* External assembler functions */
+
+void EVTAPI _EVT_pollJoystick(void);
+uint EVTAPI _EVT_disableInt(void);
+uint EVTAPI _EVT_restoreInt(uint flags);
+void EVTAPI _EVT_codeStart(void);
+void EVTAPI _EVT_codeEnd(void);
+void EVTAPI _EVT_cCodeStart(void);
+void EVTAPI _EVT_cCodeEnd(void);
+int EVTAPI _EVT_getKeyCode(void);
+void EVTAPI _EVT_pumpMessages(void);
+int EVTAPI EVT_rdinx(int port,int index);
+void EVTAPI EVT_wrinx(int port,int index,int value);
+
+#ifdef NO_KEYBOARD_INTERRUPT
+/****************************************************************************
+REMARKS:
+This function is used to pump all keyboard messages from the BIOS keyboard
+handler into our event queue. This can be used to avoid using the
+installable keyboard handler if this is causing problems.
+****************************************************************************/
+static void EVTAPI _EVT_pumpMessages(void)
+{
+ RMREGS regs;
+ uint key,ps;
+
+ /* Since the keyboard ISR has not been installed if NO_IDE_BUG has
+ * been defined, we first check for any pending keyboard events
+ * here, and if there are some insert them into the event queue to
+ * be picked up later - what a kludge.
+ */
+ while ((key = _EVT_getKeyCode()) != 0) {
+ ps = _EVT_disableInt();
+ addKeyEvent(EVT_KEYDOWN, key);
+ _EVT_restoreInt(ps);
+ }
+
+ regs.x.ax = 0x0B; // Reset Move Mouse
+ PM_int86(0x33,®s,®s);
+}
+#endif
+
+/****************************************************************************
+REMARKS:
+This function is used to return the number of ticks since system
+startup in milliseconds. This should be the same value that is placed into
+the time stamp fields of events, and is used to implement auto mouse down
+events.
+****************************************************************************/
+ulong _EVT_getTicks(void)
+{
+ return (ulong)PM_getLong(_EVT_biosPtr+0x6C) * 55UL;
+}
+
+/****************************************************************************
+REMARKS:
+Reboots the machine from DOS (warm boot)
+****************************************************************************/
+static void Reboot(void)
+{
+ PMREGS regs;
+ PMSREGS sregs;
+
+ ushort *rebootType = PM_mapRealPointer(0x40,0x72);
+ *rebootType = 0x1234;
+ PM_callRealMode(0xFFFF,0x0000,®s,&sregs);
+}
+
+/****************************************************************************
+REMARKS:
+Include generic raw scancode keyboard module.
+****************************************************************************/
+#define SUPPORT_CTRL_ALT_DEL
+#include "common/keyboard.c"
+
+/****************************************************************************
+REMARKS:
+This function fools the DOS mouse driver into thinking that it is running
+in graphics mode, rather than text mode so we always get virtual coordinates
+correctly rather than character coordinates.
+****************************************************************************/
+int _EVT_foolMouse(void)
+{
+ int oldmode = PM_getByte(_EVT_biosPtr+0x49);
+ PM_setByte(_EVT_biosPtr+0x49,0x10);
+ oldmode |= (EVT_rdinx(0x3C4,0x2) << 8);
+ return oldmode;
+}
+
+/****************************************************************************
+REMARKS:
+This function unfools the DOS mouse driver after we have finished calling it.
+****************************************************************************/
+void _EVT_unfoolMouse(
+ int oldmode)
+{
+ PM_setByte(_EVT_biosPtr+0x49,oldmode);
+
+ /* Some mouse drivers reset the plane mask register for VGA plane 4
+ * modes, which screws up the display on some VGA compatible controllers
+ * in SuperVGA modes. We reset the value back again in here to solve
+ * the problem.
+ */
+ EVT_wrinx(0x3C4,0x2,oldmode >> 8);
+}
+
+/****************************************************************************
+REMARKS:
+Determines if we have a mouse attached and functioning.
+****************************************************************************/
+static ibool detectMouse(void)
+{
+ RMREGS regs;
+ RMSREGS sregs;
+ uchar *p;
+ ibool retval;
+
+ regs.x.ax = 0x3533; /* Get interrupt vector 0x33 */
+ PM_int86x(0x21,®s,®s,&sregs);
+
+ /* Check that interrupt vector 0x33 is not a zero, and that the first
+ * instruction in the interrupt vector is not an IRET instruction
+ */
+ p = PM_mapRealPointer(sregs.es, regs.x.bx);
+ retval = ((sregs.es != 0) || (regs.x.bx != 0)) && (PM_getByte(p) != 207);
+ return retval;
+}
+
+/****************************************************************************
+PARAMETERS:
+what - Event code
+message - Event message
+x,y - Mouse position at time of event
+but_stat - Mouse button status at time of event
+
+REMARKS:
+Adds a new mouse event to the event queue. This routine is called from within
+the mouse interrupt subroutine, so it must be efficient.
+
+NOTE: Interrupts MUST be OFF while this routine is called to ensure we have
+ mutually exclusive access to our internal data structures for
+ interrupt driven systems (like under DOS).
+****************************************************************************/
+static void addMouseEvent(
+ uint what,
+ uint message,
+ int x,
+ int y,
+ int mickeyX,
+ int mickeyY,
+ uint but_stat)
+{
+ event_t evt;
+
+ if (EVT.count < EVENTQSIZE) {
+ /* Save information in event record. */
+ evt.when = _EVT_getTicks();
+ evt.what = what;
+ evt.message = message;
+ evt.modifiers = but_stat;
+ evt.where_x = x; /* Save mouse event position */
+ evt.where_y = y;
+ evt.relative_x = mickeyX;
+ evt.relative_y = mickeyY;
+ evt.modifiers |= EVT.keyModifiers;
+ addEvent(&evt); /* Add to tail of event queue */
+ }
+}
+
+/****************************************************************************
+PARAMETERS:
+mask - Event mask
+butstate - Button state
+x - Mouse x coordinate
+y - Mouse y coordinate
+
+REMARKS:
+Mouse event handling routine. This gets called when a mouse event occurs,
+and we call the addMouseEvent() routine to add the appropriate mouse event
+to the event queue.
+
+Note: Interrupts are ON when this routine is called by the mouse driver code.
+****************************************************************************/
+static void EVTAPI mouseISR(
+ uint mask,
+ uint butstate,
+ int x,
+ int y,
+ int mickeyX,
+ int mickeyY)
+{
+ uint ps;
+ uint buttonMask;
+
+ if (mask & 1) {
+ /* Save the current mouse coordinates */
+ EVT.mx = x; EVT.my = y;
+
+ /* If the last event was a movement event, then modify the last
+ * event rather than post a new one, so that the queue will not
+ * become saturated. Before we modify the data structures, we
+ * MUST ensure that interrupts are off.
+ */
+ ps = _EVT_disableInt();
+ if (EVT.oldMove != -1) {
+ EVT.evtq[EVT.oldMove].where_x = x; /* Modify existing one */
+ EVT.evtq[EVT.oldMove].where_y = y;
+ EVT.evtq[EVT.oldMove].relative_x += mickeyX;
+ EVT.evtq[EVT.oldMove].relative_y += mickeyY;
+ }
+ else {
+ EVT.oldMove = EVT.freeHead; /* Save id of this move event */
+ addMouseEvent(EVT_MOUSEMOVE,0,x,y,mickeyX,mickeyY,butstate);
+ }
+ _EVT_restoreInt(ps);
+ }
+ if (mask & 0x2A) {
+ ps = _EVT_disableInt();
+ buttonMask = 0;
+ if (mask & 2) buttonMask |= EVT_LEFTBMASK;
+ if (mask & 8) buttonMask |= EVT_RIGHTBMASK;
+ if (mask & 32) buttonMask |= EVT_MIDDLEBMASK;
+ addMouseEvent(EVT_MOUSEDOWN,buttonMask,x,y,0,0,butstate);
+ EVT.oldMove = -1;
+ _EVT_restoreInt(ps);
+ }
+ if (mask & 0x54) {
+ ps = _EVT_disableInt();
+ buttonMask = 0;
+ if (mask & 2) buttonMask |= EVT_LEFTBMASK;
+ if (mask & 8) buttonMask |= EVT_RIGHTBMASK;
+ if (mask & 32) buttonMask |= EVT_MIDDLEBMASK;
+ addMouseEvent(EVT_MOUSEUP,buttonMask,x,y,0,0,butstate);
+ EVT.oldMove = -1;
+ _EVT_restoreInt(ps);
+ }
+ EVT.oldKey = -1;
+}
+
+/****************************************************************************
+REMARKS:
+Keyboard interrupt handler function.
+
+NOTE: Interrupts are OFF when this routine is called by the keyboard ISR,
+ and we leave them OFF the entire time.
+****************************************************************************/
+static void EVTAPI keyboardISR(void)
+{
+ processRawScanCode(PM_inpb(0x60));
+ PM_outpb(0x20,0x20);
+}
+
+/****************************************************************************
+REMARKS:
+Safely abort the event module upon catching a fatal error.
+****************************************************************************/
+void _EVT_abort()
+{
+ EVT_exit();
+ PM_fatalError("Unhandled exception!");
+}
+
+/****************************************************************************
+PARAMETERS:
+mouseMove - Callback function to call wheneve the mouse needs to be moved
+
+REMARKS:
+Initiliase the event handling module. Here we install our mouse handling ISR
+to be called whenever any button's are pressed or released. We also build
+the free list of events in the event queue.
+
+We use handler number 2 of the mouse libraries interrupt handlers for our
+event handling routines.
+****************************************************************************/
+void EVTAPI EVT_init(
+ _EVT_mouseMoveHandler mouseMove)
+{
+ int i;
+
+ PM_init();
+ EVT.mouseMove = mouseMove;
+ _EVT_biosPtr = PM_getBIOSPointer();
+ EVT_resume();
+
+ /* Grab all characters pending in the keyboard buffer and stuff
+ * them into our event buffer. This allows us to pick up any keypresses
+ * while the program is initialising.
+ */
+ while ((i = _EVT_getKeyCode()) != 0)
+ addKeyEvent(EVT_KEYDOWN,i);
+}
+
+/****************************************************************************
+REMARKS:
+Initiailises the internal event handling modules. The EVT_suspend function
+can be called to suspend event handling (such as when shelling out to DOS),
+and this function can be used to resume it again later.
+****************************************************************************/
+void EVTAPI EVT_resume(void)
+{
+ static int locked = 0;
+ int stat;
+ uchar mods;
+ PM_lockHandle lh; /* Unused in DOS */
+
+ if (_EVT_useEvents) {
+ /* Initialise the event queue and enable our interrupt handlers */
+ initEventQueue();
+#ifndef NO_KEYBOARD_INTERRUPT
+ PM_setKeyHandler(keyboardISR);
+#endif
+#ifndef NO_MOUSE_INTERRUPT
+ if ((haveMouse = detectMouse()) != 0) {
+ int oldmode = _EVT_foolMouse();
+ PM_setMouseHandler(0xFFFF,mouseISR);
+ _EVT_unfoolMouse(oldmode);
+ }
+#endif
+
+ /* Read the keyboard modifier flags from the BIOS to get the
+ * correct initialisation state. The only state we care about is
+ * the correct toggle state flags such as SCROLLLOCK, NUMLOCK and
+ * CAPSLOCK.
+ */
+ EVT.keyModifiers = 0;
+ mods = PM_getByte(_EVT_biosPtr+0x17);
+ if (mods & 0x10)
+ EVT.keyModifiers |= EVT_SCROLLLOCK;
+ if (mods & 0x20)
+ EVT.keyModifiers |= EVT_NUMLOCK;
+ if (mods & 0x40)
+ EVT.keyModifiers |= EVT_CAPSLOCK;
+
+ /* Lock all of the code and data used by our protected mode interrupt
+ * handling routines, so that it will continue to work correctly
+ * under real mode.
+ */
+ if (!locked) {
+ /* It is difficult to ensure that we lock our global data, so we
+ * do this by taking the address of a variable locking all data
+ * 2Kb on either side. This should properly cover the global data
+ * used by the module (the other alternative is to declare the
+ * variables in assembler, in which case we know it will be
+ * correct).
+ */
+ stat = !PM_lockDataPages(&EVT,sizeof(EVT),&lh);
+ stat |= !PM_lockDataPages(&_EVT_biosPtr,sizeof(_EVT_biosPtr),&lh);
+ stat |= !PM_lockCodePages((__codePtr)_EVT_cCodeStart,(int)_EVT_cCodeEnd-(int)_EVT_cCodeStart,&lh);
+ stat |= !PM_lockCodePages((__codePtr)_EVT_codeStart,(int)_EVT_codeEnd-(int)_EVT_codeStart,&lh);
+ if (stat) {
+ PM_fatalError("Page locking services failed - interrupt handling not safe!");
+ exit(1);
+ }
+ locked = 1;
+ }
+
+ /* Catch program termination signals so we can clean up properly */
+ signal(SIGABRT, _EVT_abort);
+ signal(SIGFPE, _EVT_abort);
+ signal(SIGINT, _EVT_abort);
+ _EVT_installed = true;
+ }
+}
+
+/****************************************************************************
+REMARKS
+Changes the range of coordinates returned by the mouse functions to the
+specified range of values. This is used when changing between graphics
+modes set the range of mouse coordinates for the new display mode.
+****************************************************************************/
+void EVTAPI EVT_setMouseRange(
+ int xRes,
+ int yRes)
+{
+ RMREGS regs;
+
+ if (haveMouse) {
+ int oldmode = _EVT_foolMouse();
+ PM_resetMouseDriver(1);
+ regs.x.ax = 7; /* Mouse function 7 - Set horizontal min and max */
+ regs.x.cx = 0;
+ regs.x.dx = xRes;
+ PM_int86(0x33,®s,®s);
+ regs.x.ax = 8; /* Mouse function 8 - Set vertical min and max */
+ regs.x.cx = 0;
+ regs.x.dx = yRes;
+ PM_int86(0x33,®s,®s);
+ _EVT_unfoolMouse(oldmode);
+ }
+}
+
+/****************************************************************************
+REMARKS
+Modifes the mouse coordinates as necessary if scaling to OS coordinates,
+and sets the OS mouse cursor position.
+****************************************************************************/
+void _EVT_setMousePos(
+ int *x,
+ int *y)
+{
+ RMREGS regs;
+
+ if (haveMouse) {
+ int oldmode = _EVT_foolMouse();
+ regs.x.ax = 4; /* Mouse function 4 - Set mouse position */
+ regs.x.cx = *x; /* New horizontal coordinate */
+ regs.x.dx = *y; /* New vertical coordinate */
+ PM_int86(0x33,®s,®s);
+ _EVT_unfoolMouse(oldmode);
+ }
+}
+
+/****************************************************************************
+REMARKS
+Suspends all of our event handling operations. This is also used to
+de-install the event handling code.
+****************************************************************************/
+void EVTAPI EVT_suspend(void)
+{
+ uchar mods;
+
+ if (_EVT_installed) {
+ /* Restore the interrupt handlers */
+ PM_restoreKeyHandler();
+ if (haveMouse)
+ PM_restoreMouseHandler();
+ signal(SIGABRT, SIG_DFL);
+ signal(SIGFPE, SIG_DFL);
+ signal(SIGINT, SIG_DFL);
+
+ /* Set the keyboard modifier flags in the BIOS to our values */
+ EVT_allowLEDS(true);
+ mods = PM_getByte(_EVT_biosPtr+0x17) & ~0x70;
+ if (EVT.keyModifiers & EVT_SCROLLLOCK)
+ mods |= 0x10;
+ if (EVT.keyModifiers & EVT_NUMLOCK)
+ mods |= 0x20;
+ if (EVT.keyModifiers & EVT_CAPSLOCK)
+ mods |= 0x40;
+ PM_setByte(_EVT_biosPtr+0x17,mods);
+
+ /* Flag that we are no longer installed */
+ _EVT_installed = false;
+ }
+}
+
+/****************************************************************************
+REMARKS
+Exits the event module for program terminatation.
+****************************************************************************/
+void EVTAPI EVT_exit(void)
+{
+ EVT_suspend();
+}
diff --git a/board/MAI/bios_emulator/scitech/src/pm/dos/oshdr.h b/board/MAI/bios_emulator/scitech/src/pm/dos/oshdr.h
new file mode 100644
index 00000000000..35e8e00f724
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/pm/dos/oshdr.h
@@ -0,0 +1,29 @@
+/****************************************************************************
+*
+* SciTech OS Portability Manager Library
+*
+* ========================================================================
+*
+* The contents of this file are subject to the SciTech MGL Public
+* License Version 1.0 (the "License"); you may not use this file
+* except in compliance with the License. You may obtain a copy of
+* the License at http://www.scitechsoft.com/mgl-license.txt
+*
+* Software distributed under the License is distributed on an
+* "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+* implied. See the License for the specific language governing
+* rights and limitations under the License.
+*
+* The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+*
+* The Initial Developer of the Original Code is SciTech Software, Inc.
+* All Rights Reserved.
+*
+* ========================================================================
+*
+* Language: ANSI C
+* Environment: 32-bit DOS
+*
+* Description: Include file to include all OS specific header files.
+*
+****************************************************************************/
diff --git a/board/MAI/bios_emulator/scitech/src/pm/dos/pm.c b/board/MAI/bios_emulator/scitech/src/pm/dos/pm.c
new file mode 100644
index 00000000000..71acd6894e1
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/pm/dos/pm.c
@@ -0,0 +1,2243 @@
+/****************************************************************************
+*
+* SciTech OS Portability Manager Library
+*
+* ========================================================================
+*
+* The contents of this file are subject to the SciTech MGL Public
+* License Version 1.0 (the "License"); you may not use this file
+* except in compliance with the License. You may obtain a copy of
+* the License at http://www.scitechsoft.com/mgl-license.txt
+*
+* Software distributed under the License is distributed on an
+* "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+* implied. See the License for the specific language governing
+* rights and limitations under the License.
+*
+* The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+*
+* The Initial Developer of the Original Code is SciTech Software, Inc.
+* All Rights Reserved.
+*
+* ========================================================================
+*
+* Language: ANSI C
+* Environment: 16/32 bit DOS
+*
+* Description: Implementation for the OS Portability Manager Library, which
+* contains functions to implement OS specific services in a
+* generic, cross platform API. Porting the OS Portability
+* Manager library is the first step to porting any SciTech
+* products to a new platform.
+*
+****************************************************************************/
+
+#include "pmapi.h"
+#include "drvlib/os/os.h"
+#include "ztimerc.h"
+#include "mtrr.h"
+#include "pm_help.h"
+#include <stdio.h>
+#include <stdlib.h>
+#include <string.h>
+#include <dos.h>
+#include <conio.h>
+#ifdef __GNUC__
+#include <unistd.h>
+#include <sys/nearptr.h>
+#include <sys/stat.h>
+#else
+#include <direct.h>
+#endif
+#ifdef __BORLANDC__
+#pragma warn -par
+#endif
+
+/*--------------------------- Global variables ----------------------------*/
+
+typedef struct {
+ int oldMode;
+ int old50Lines;
+ } DOS_stateBuf;
+
+#define MAX_RM_BLOCKS 10
+
+static struct {
+ void *p;
+ uint tag;
+ } rmBlocks[MAX_RM_BLOCKS];
+
+static uint VESABuf_len = 1024; /* Length of the VESABuf buffer */
+static void *VESABuf_ptr = NULL; /* Near pointer to VESABuf */
+static uint VESABuf_rseg; /* Real mode segment of VESABuf */
+static uint VESABuf_roff; /* Real mode offset of VESABuf */
+static void (PMAPIP fatalErrorCleanup)(void) = NULL;
+ushort _VARAPI _PM_savedDS = 0;
+#ifdef DOS4GW
+static ulong PDB = 0,*pPDB = NULL;
+#endif
+#ifndef REALMODE
+static char VXD_name[] = PMHELP_NAME;
+static char VXD_module[] = PMHELP_MODULE;
+static char VXD_DDBName[] = PMHELP_DDBNAME;
+static uint VXD_version = -1;
+static uint VXD_loadOff = 0;
+static uint VXD_loadSel = 0;
+uint _VARAPI _PM_VXD_off = 0;
+uint _VARAPI _PM_VXD_sel = 0;
+int _VARAPI _PM_haveCauseWay = -1;
+
+/* Memory mapping cache */
+
+#define MAX_MEMORY_MAPPINGS 100
+typedef struct {
+ ulong physical;
+ ulong linear;
+ ulong limit;
+ } mmapping;
+static mmapping maps[MAX_MEMORY_MAPPINGS] = {0};
+static int numMaps = 0;
+
+/* Page sized block cache */
+
+#define PAGES_PER_BLOCK 100
+#define FREELIST_NEXT(p) (*(void**)(p))
+typedef struct pageblock {
+ struct pageblock *next;
+ struct pageblock *prev;
+ void *freeListStart;
+ void *freeList;
+ void *freeListEnd;
+ int freeCount;
+ } pageblock;
+static pageblock *pageBlocks = NULL;
+#endif
+
+/* Start of all page tables in CauseWay */
+
+#define CW_PAGE_TABLE_START (1024UL*4096UL*1023UL)
+
+/*----------------------------- Implementation ----------------------------*/
+
+/* External assembler functions */
+
+ulong _ASMAPI _PM_getPDB(void);
+int _ASMAPI _PM_pagingEnabled(void);
+void _ASMAPI _PM_VxDCall(VXD_regs *regs,uint off,uint sel);
+
+#ifndef REALMODE
+/****************************************************************************
+REMARKS:
+Exit function to unload the dynamically loaded VxD
+****************************************************************************/
+static void UnloadVxD(void)
+{
+ PMSREGS sregs;
+ VXD_regs r;
+
+ r.eax = 2;
+ r.ebx = 0;
+ r.edx = (uint)VXD_module;
+ PM_segread(&sregs);
+#ifdef __16BIT__
+ r.ds = ((ulong)VXD_module) >> 16;
+#else
+ r.ds = sregs.ds;
+#endif
+ r.es = sregs.es;
+ _PM_VxDCall(&r,VXD_loadOff,VXD_loadSel);
+}
+
+/****************************************************************************
+REMARKS:
+External function to call the PMHELP helper VxD.
+****************************************************************************/
+void PMAPI PM_VxDCall(
+ VXD_regs *regs)
+{
+ if (_PM_VXD_sel != 0 || _PM_VXD_off != 0)
+ _PM_VxDCall(regs,_PM_VXD_off,_PM_VXD_sel);
+}
+
+/****************************************************************************
+RETURNS:
+BCD coded version number of the VxD, or 0 if not loaded (ie: 0x202 - 2.2)
+
+REMARKS:
+This function gets the version number for the VxD that we have connected to.
+****************************************************************************/
+uint PMAPI PMHELP_getVersion(void)
+{
+ VXD_regs r;
+
+ /* Call the helper VxD to determine the version number */
+ if (_PM_VXD_sel != 0 || _PM_VXD_off != 0) {
+ memset(&r,0,sizeof(r));
+ r.eax = API_NUM(PMHELP_GETVER);
+ _PM_VxDCall(&r,_PM_VXD_off,_PM_VXD_sel);
+ return VXD_version = (uint)r.eax;
+ }
+ return VXD_version = 0;
+}
+
+/****************************************************************************
+DESCRIPTION:
+Connects to the helper VxD and returns the version number
+
+RETURNS:
+True if the VxD was found and loaded, false otherwise.
+
+REMARKS:
+This function connects to the VxD (loading it if it is dynamically loadable)
+and returns the version number of the VxD.
+****************************************************************************/
+static ibool PMHELP_connect(void)
+{
+ PMREGS regs;
+ PMSREGS sregs;
+ VXD_regs r;
+
+ /* Bail early if we have alread connected */
+ if (VXD_version != -1)
+ return VXD_version != 0;
+
+ /* Get the static SDDHELP.VXD entry point if available */
+ PM_segread(&sregs);
+ regs.x.ax = 0x1684;
+ regs.x.bx = SDDHELP_DeviceID;
+ regs.x.di = 0;
+ sregs.es = 0;
+ PM_int386x(0x2F,®s,®s,&sregs);
+ _PM_VXD_sel = sregs.es;
+ _PM_VXD_off = regs.x.di;
+ if (_PM_VXD_sel != 0 || _PM_VXD_off != 0) {
+ if (PMHELP_getVersion() >= PMHELP_VERSION)
+ return true;
+ }
+
+ /* If we get here, then either SDDHELP.VXD is not loaded, or it is an
+ * earlier version. In this case try to dynamically load the PMHELP.VXD
+ * helper VxD instead.
+ */
+ PM_segread(&sregs);
+ regs.x.ax = 0x1684;
+ regs.x.bx = VXDLDR_DeviceID;
+ regs.x.di = 0;
+ sregs.es = 0;
+ PM_int386x(0x2F,®s,®s,&sregs);
+ VXD_loadSel = sregs.es;
+ VXD_loadOff = regs.x.di;
+ if (VXD_loadSel == 0 && VXD_loadOff == 0)
+ return VXD_version = 0;
+ r.eax = 1;
+ r.ebx = 0;
+ r.edx = (uint)VXD_name;
+ PM_segread(&sregs);
+ r.ds = sregs.ds;
+ r.es = sregs.es;
+ _PM_VxDCall(&r,VXD_loadOff,VXD_loadSel);
+ if (r.eax != 0)
+ return VXD_version = 0;
+
+ /* Get the dynamic VxD entry point so we can call it */
+ atexit(UnloadVxD);
+ PM_segread(&sregs);
+ regs.x.ax = 0x1684;
+ regs.x.bx = 0;
+ regs.e.edi = (uint)VXD_DDBName;
+ PM_int386x(0x2F,®s,®s,&sregs);
+ _PM_VXD_sel = sregs.es;
+ _PM_VXD_off = regs.x.di;
+ if (_PM_VXD_sel == 0 && _PM_VXD_off == 0)
+ return VXD_version = 0;
+ if (PMHELP_getVersion() >= PMHELP_VERSION)
+ return true;
+ return VXD_version = 0;
+}
+#endif
+
+/****************************************************************************
+REMARKS:
+Initialise the PM library. First we try to connect to a static SDDHELP.VXD
+helper VxD, and check that it is a version we can use. If not we try to
+dynamically load the PMHELP.VXD helper VxD
+****************************************************************************/
+void PMAPI PM_init(void)
+{
+#ifndef REALMODE
+ PMREGS regs;
+
+ /* Check if we are running under CauseWay under real DOS */
+ if (_PM_haveCauseWay == -1) {
+ /* Check if we are running under DPMI in which case we will not be
+ * able to use our special ring 0 CauseWay functions.
+ */
+ _PM_haveCauseWay = false;
+ regs.x.ax = 0xFF00;
+ PM_int386(0x31,®s,®s);
+ if (regs.x.cflag || !(regs.e.edi & 8)) {
+ /* We are not under DPMI, so now check if CauseWay is active */
+ regs.x.ax = 0xFFF9;
+ PM_int386(0x31,®s,®s);
+ if (!regs.x.cflag && regs.e.ecx == 0x43415553 && regs.e.edx == 0x45574159)
+ _PM_haveCauseWay = true;
+ }
+
+ /* Now connect to PMHELP.VXD and initialise MTRR module */
+ if (!PMHELP_connect())
+ MTRR_init();
+ }
+#endif
+}
+
+/****************************************************************************
+PARAMETERS:
+base - The starting physical base address of the region
+size - The size in bytes of the region
+type - Type to place into the MTRR register
+
+RETURNS:
+Error code describing the result.
+
+REMARKS:
+Function to enable write combining for the specified region of memory.
+****************************************************************************/
+int PMAPI PM_enableWriteCombine(
+ ulong base,
+ ulong size,
+ uint type)
+{
+#ifndef REALMODE
+ VXD_regs regs;
+
+ if (PMHELP_connect()) {
+ memset(®s,0,sizeof(regs));
+ regs.eax = API_NUM(PMHELP_ENABLELFBCOMB);
+ regs.ebx = base;
+ regs.ecx = size;
+ regs.edx = type;
+ _PM_VxDCall(®s,_PM_VXD_off,_PM_VXD_sel);
+ return regs.eax;
+ }
+ return MTRR_enableWriteCombine(base,size,type);
+#else
+ return PM_MTRR_NOT_SUPPORTED;
+#endif
+}
+
+ibool PMAPI PM_haveBIOSAccess(void)
+{ return true; }
+
+long PMAPI PM_getOSType(void)
+{ return _OS_DOS; }
+
+int PMAPI PM_getModeType(void)
+{
+#if defined(REALMODE)
+ return PM_realMode;
+#elif defined(PM286)
+ return PM_286;
+#elif defined(PM386)
+ return PM_386;
+#endif
+}
+
+void PMAPI PM_backslash(char *s)
+{
+ uint pos = strlen(s);
+ if (s[pos-1] != '\\') {
+ s[pos] = '\\';
+ s[pos+1] = '\0';
+ }
+}
+
+void PMAPI PM_setFatalErrorCleanup(
+ void (PMAPIP cleanup)(void))
+{
+ fatalErrorCleanup = cleanup;
+}
+
+void PMAPI PM_fatalError(const char *msg)
+{
+ if (fatalErrorCleanup)
+ fatalErrorCleanup();
+ fprintf(stderr,"%s\n", msg);
+ exit(1);
+}
+
+static void ExitVBEBuf(void)
+{
+ if (VESABuf_ptr)
+ PM_freeRealSeg(VESABuf_ptr);
+ VESABuf_ptr = 0;
+}
+
+void * PMAPI PM_getVESABuf(uint *len,uint *rseg,uint *roff)
+{
+ if (!VESABuf_ptr) {
+ /* Allocate a global buffer for communicating with the VESA VBE */
+ if ((VESABuf_ptr = PM_allocRealSeg(VESABuf_len, &VESABuf_rseg, &VESABuf_roff)) == NULL)
+ return NULL;
+ atexit(ExitVBEBuf);
+ }
+ *len = VESABuf_len;
+ *rseg = VESABuf_rseg;
+ *roff = VESABuf_roff;
+ return VESABuf_ptr;
+}
+
+int PMAPI PM_int386(int intno, PMREGS *in, PMREGS *out)
+{
+ PMSREGS sregs;
+ PM_segread(&sregs);
+ return PM_int386x(intno,in,out,&sregs);
+}
+
+/* Routines to set and get the real mode interrupt vectors, by making
+ * direct real mode calls to DOS and bypassing the DOS extenders API.
+ * This is the safest way to handle this, as some servers try to be
+ * smart about changing real mode vectors.
+ */
+
+void PMAPI _PM_getRMvect(int intno, long *realisr)
+{
+ RMREGS regs;
+ RMSREGS sregs;
+
+ PM_saveDS();
+ regs.h.ah = 0x35;
+ regs.h.al = intno;
+ PM_int86x(0x21, ®s, ®s, &sregs);
+ *realisr = ((long)sregs.es << 16) | regs.x.bx;
+}
+
+void PMAPI _PM_setRMvect(int intno, long realisr)
+{
+ RMREGS regs;
+ RMSREGS sregs;
+
+ PM_saveDS();
+ regs.h.ah = 0x25;
+ regs.h.al = intno;
+ sregs.ds = (int)(realisr >> 16);
+ regs.x.dx = (int)(realisr & 0xFFFF);
+ PM_int86x(0x21, ®s, ®s, &sregs);
+}
+
+void PMAPI _PM_addRealModeBlock(void *mem,uint tag)
+{
+ int i;
+
+ for (i = 0; i < MAX_RM_BLOCKS; i++) {
+ if (rmBlocks[i].p == NULL) {
+ rmBlocks[i].p = mem;
+ rmBlocks[i].tag = tag;
+ return;
+ }
+ }
+ PM_fatalError("To many real mode memory block allocations!");
+}
+
+uint PMAPI _PM_findRealModeBlock(void *mem)
+{
+ int i;
+
+ for (i = 0; i < MAX_RM_BLOCKS; i++) {
+ if (rmBlocks[i].p == mem)
+ return rmBlocks[i].tag;
+ }
+ PM_fatalError("Could not find prior real mode memory block allocation!");
+ return 0;
+}
+
+char * PMAPI PM_getCurrentPath(
+ char *path,
+ int maxLen)
+{
+ return getcwd(path,maxLen);
+}
+
+char PMAPI PM_getBootDrive(void)
+{ return 'C'; }
+
+const char * PMAPI PM_getVBEAFPath(void)
+{ return "c:\\"; }
+
+const char * PMAPI PM_getNucleusPath(void)
+{
+ static char path[256];
+ char *env;
+
+ if ((env = getenv("NUCLEUS_PATH")) != NULL)
+ return env;
+ if ((env = getenv("WINBOOTDIR")) != NULL) {
+ /* Running in a Windows 9x DOS box or DOS mode */
+ strcpy(path,env);
+ strcat(path,"\\system\\nucleus");
+ return path;
+ }
+ if ((env = getenv("SystemRoot")) != NULL) {
+ /* Running in an NT/2K DOS box */
+ strcpy(path,env);
+ strcat(path,"\\system32\\nucleus");
+ return path;
+ }
+ return "c:\\nucleus";
+}
+
+const char * PMAPI PM_getNucleusConfigPath(void)
+{
+ static char path[256];
+ strcpy(path,PM_getNucleusPath());
+ PM_backslash(path);
+ strcat(path,"config");
+ return path;
+}
+
+const char * PMAPI PM_getUniqueID(void)
+{ return "DOS"; }
+
+const char * PMAPI PM_getMachineName(void)
+{ return "DOS"; }
+
+int PMAPI PM_kbhit(void)
+{
+ return kbhit();
+}
+
+int PMAPI PM_getch(void)
+{
+ return getch();
+}
+
+PM_HWND PMAPI PM_openConsole(PM_HWND hwndUser,int device,int xRes,int yRes,int bpp,ibool fullScreen)
+{
+ /* Not used for DOS */
+ (void)hwndUser;
+ (void)device;
+ (void)xRes;
+ (void)yRes;
+ (void)bpp;
+ (void)fullScreen;
+ return 0;
+}
+
+int PMAPI PM_getConsoleStateSize(void)
+{
+ return sizeof(DOS_stateBuf);
+}
+
+void PMAPI PM_saveConsoleState(void *stateBuf,PM_HWND hwndConsole)
+{
+ RMREGS regs;
+ DOS_stateBuf *sb = stateBuf;
+
+ /* Save the old video mode state */
+ regs.h.ah = 0x0F;
+ PM_int86(0x10,®s,®s);
+ sb->oldMode = regs.h.al & 0x7F;
+ sb->old50Lines = false;
+ if (sb->oldMode == 0x3) {
+ regs.x.ax = 0x1130;
+ regs.x.bx = 0;
+ regs.x.dx = 0;
+ PM_int86(0x10,®s,®s);
+ sb->old50Lines = (regs.h.dl == 42 || regs.h.dl == 49);
+ }
+ (void)hwndConsole;
+}
+
+void PMAPI PM_setSuspendAppCallback(int (_ASMAPIP saveState)(int flags))
+{
+ /* Not used for DOS */
+ (void)saveState;
+}
+
+void PMAPI PM_restoreConsoleState(const void *stateBuf,PM_HWND hwndConsole)
+{
+ RMREGS regs;
+ const DOS_stateBuf *sb = stateBuf;
+
+ /* Retore 50 line mode if set */
+ if (sb->old50Lines) {
+ regs.x.ax = 0x1112;
+ regs.x.bx = 0;
+ PM_int86(0x10,®s,®s);
+ }
+ (void)hwndConsole;
+}
+
+void PMAPI PM_closeConsole(PM_HWND hwndConsole)
+{
+ /* Not used for DOS */
+ (void)hwndConsole;
+}
+
+void PMAPI PM_setOSCursorLocation(int x,int y)
+{
+ uchar *_biosPtr = PM_getBIOSPointer();
+ PM_setByte(_biosPtr+0x50,x);
+ PM_setByte(_biosPtr+0x51,y);
+}
+
+void PMAPI PM_setOSScreenWidth(int width,int height)
+{
+ uchar *_biosPtr = PM_getBIOSPointer();
+ PM_setWord(_biosPtr+0x4A,width);
+ PM_setWord(_biosPtr+0x4C,width*2);
+ PM_setByte(_biosPtr+0x84,height-1);
+ if (height > 25) {
+ PM_setWord(_biosPtr+0x60,0x0607);
+ PM_setByte(_biosPtr+0x85,0x08);
+ }
+ else {
+ PM_setWord(_biosPtr+0x60,0x0D0E);
+ PM_setByte(_biosPtr+0x85,0x016);
+ }
+}
+
+void * PMAPI PM_mallocShared(long size)
+{
+ return PM_malloc(size);
+}
+
+void PMAPI PM_freeShared(void *ptr)
+{
+ PM_free(ptr);
+}
+
+#define GetRMVect(intno,isr) *(isr) = ((ulong*)rmZeroPtr)[intno]
+#define SetRMVect(intno,isr) ((ulong*)rmZeroPtr)[intno] = (isr)
+
+ibool PMAPI PM_doBIOSPOST(
+ ushort axVal,
+ ulong BIOSPhysAddr,
+ void *mappedBIOS,
+ ulong BIOSLen)
+{
+ static int firstTime = true;
+ static uchar *rmZeroPtr;
+ long Current10,Current6D,Current42;
+ RMREGS regs;
+ RMSREGS sregs;
+
+ /* Create a zero memory mapping for us to use */
+ if (firstTime) {
+ rmZeroPtr = PM_mapPhysicalAddr(0,0x7FFF,true);
+ firstTime = false;
+ }
+
+ /* Remap the secondary BIOS to 0xC0000 physical */
+ if (BIOSPhysAddr != 0xC0000L || BIOSLen > 32768) {
+ /* DOS cannot virtually remap the BIOS, so we can only work if all
+ * the secondary controllers are identical, and we then use the
+ * BIOS on the first controller for all the remaining controllers.
+ *
+ * For OS'es that do virtual memory, and remapping of 0xC0000
+ * physical (perhaps a copy on write mapping) should be all that
+ * is needed.
+ */
+ return false;
+ }
+
+ /* Save current handlers of int 10h and 6Dh */
+ GetRMVect(0x10,&Current10);
+ GetRMVect(0x6D,&Current6D);
+
+ /* POST the secondary BIOS */
+ GetRMVect(0x42,&Current42);
+ SetRMVect(0x10,Current42); /* Restore int 10h to STD-BIOS */
+ regs.x.ax = axVal;
+ PM_callRealMode(0xC000,0x0003,®s,&sregs);
+
+ /* Restore current handlers */
+ SetRMVect(0x10,Current10);
+ SetRMVect(0x6D,Current6D);
+
+ /* Second the primary BIOS mappin 1:1 for 0xC0000 physical */
+ if (BIOSPhysAddr != 0xC0000L) {
+ /* DOS does not support this */
+ (void)mappedBIOS;
+ }
+ return true;
+}
+
+void PMAPI PM_sleep(ulong milliseconds)
+{
+ ulong microseconds = milliseconds * 1000L;
+ LZTimerObject tm;
+
+ LZTimerOnExt(&tm);
+ while (LZTimerLapExt(&tm) < microseconds)
+ ;
+ LZTimerOffExt(&tm);
+}
+
+int PMAPI PM_getCOMPort(int port)
+{
+ switch (port) {
+ case 0: return 0x3F8;
+ case 1: return 0x2F8;
+ }
+ return 0;
+}
+
+int PMAPI PM_getLPTPort(int port)
+{
+ switch (port) {
+ case 0: return 0x3BC;
+ case 1: return 0x378;
+ case 2: return 0x278;
+ }
+ return 0;
+}
+
+PM_MODULE PMAPI PM_loadLibrary(
+ const char *szDLLName)
+{
+ (void)szDLLName;
+ return NULL;
+}
+
+void * PMAPI PM_getProcAddress(
+ PM_MODULE hModule,
+ const char *szProcName)
+{
+ (void)hModule;
+ (void)szProcName;
+ return NULL;
+}
+
+void PMAPI PM_freeLibrary(
+ PM_MODULE hModule)
+{
+ (void)hModule;
+}
+
+int PMAPI PM_setIOPL(
+ int level)
+{
+ return level;
+}
+
+/****************************************************************************
+REMARKS:
+Internal function to convert the find data to the generic interface.
+****************************************************************************/
+static void convertFindData(
+ PM_findData *findData,
+ struct find_t *blk)
+{
+ ulong dwSize = findData->dwSize;
+
+ memset(findData,0,findData->dwSize);
+ findData->dwSize = dwSize;
+ if (blk->attrib & _A_RDONLY)
+ findData->attrib |= PM_FILE_READONLY;
+ if (blk->attrib & _A_SUBDIR)
+ findData->attrib |= PM_FILE_DIRECTORY;
+ if (blk->attrib & _A_ARCH)
+ findData->attrib |= PM_FILE_ARCHIVE;
+ if (blk->attrib & _A_HIDDEN)
+ findData->attrib |= PM_FILE_HIDDEN;
+ if (blk->attrib & _A_SYSTEM)
+ findData->attrib |= PM_FILE_SYSTEM;
+ findData->sizeLo = blk->size;
+ strncpy(findData->name,blk->name,PM_MAX_PATH);
+ findData->name[PM_MAX_PATH-1] = 0;
+}
+
+#define FIND_MASK (_A_RDONLY | _A_ARCH | _A_SUBDIR | _A_HIDDEN | _A_SYSTEM)
+
+/****************************************************************************
+REMARKS:
+Function to find the first file matching a search criteria in a directory.
+****************************************************************************/
+void * PMAPI PM_findFirstFile(
+ const char *filename,
+ PM_findData *findData)
+{
+ struct find_t *blk;
+
+ if ((blk = PM_malloc(sizeof(*blk))) == NULL)
+ return PM_FILE_INVALID;
+ if (_dos_findfirst((char*)filename,FIND_MASK,blk) == 0) {
+ convertFindData(findData,blk);
+ return blk;
+ }
+ return PM_FILE_INVALID;
+}
+
+/****************************************************************************
+REMARKS:
+Function to find the next file matching a search criteria in a directory.
+****************************************************************************/
+ibool PMAPI PM_findNextFile(
+ void *handle,
+ PM_findData *findData)
+{
+ struct find_t *blk = handle;
+
+ if (_dos_findnext(blk) == 0) {
+ convertFindData(findData,blk);
+ return true;
+ }
+ return false;
+}
+
+/****************************************************************************
+REMARKS:
+Function to close the find process
+****************************************************************************/
+void PMAPI PM_findClose(
+ void *handle)
+{
+ PM_free(handle);
+}
+
+/****************************************************************************
+REMARKS:
+Function to determine if a drive is a valid drive or not. Under Unix this
+function will return false for anything except a value of 3 (considered
+the root drive, and equivalent to C: for non-Unix systems). The drive
+numbering is:
+
+ 1 - Drive A:
+ 2 - Drive B:
+ 3 - Drive C:
+ etc
+
+****************************************************************************/
+ibool PMAPI PM_driveValid(
+ char drive)
+{
+ RMREGS regs;
+ regs.h.dl = (uchar)(drive - 'A' + 1);
+ regs.h.ah = 0x36; // Get disk information service
+ PM_int86(0x21,®s,®s);
+ return regs.x.ax != 0xFFFF; // AX = 0xFFFF if disk is invalid
+}
+
+/****************************************************************************
+REMARKS:
+Function to get the current working directory for the specififed drive.
+Under Unix this will always return the current working directory regardless
+of what the value of 'drive' is.
+****************************************************************************/
+void PMAPI PM_getdcwd(
+ int drive,
+ char *dir,
+ int len)
+{
+ uint oldDrive,maxDrives;
+ _dos_getdrive(&oldDrive);
+ _dos_setdrive(drive,&maxDrives);
+ getcwd(dir,len);
+ _dos_setdrive(oldDrive,&maxDrives);
+}
+
+/****************************************************************************
+REMARKS:
+Function to change the file attributes for a specific file.
+****************************************************************************/
+void PMAPI PM_setFileAttr(
+ const char *filename,
+ uint attrib)
+{
+#if defined(TNT) && defined(_MSC_VER)
+ DWORD attr = 0;
+
+ if (attrib & PM_FILE_READONLY)
+ attr |= FILE_ATTRIBUTE_READONLY;
+ if (attrib & PM_FILE_ARCHIVE)
+ attr |= FILE_ATTRIBUTE_ARCHIVE;
+ if (attrib & PM_FILE_HIDDEN)
+ attr |= FILE_ATTRIBUTE_HIDDEN;
+ if (attrib & PM_FILE_SYSTEM)
+ attr |= FILE_ATTRIBUTE_SYSTEM;
+ SetFileAttributes((LPSTR)filename, attr);
+#else
+ uint attr = 0;
+
+ if (attrib & PM_FILE_READONLY)
+ attr |= _A_RDONLY;
+ if (attrib & PM_FILE_ARCHIVE)
+ attr |= _A_ARCH;
+ if (attrib & PM_FILE_HIDDEN)
+ attr |= _A_HIDDEN;
+ if (attrib & PM_FILE_SYSTEM)
+ attr |= _A_SYSTEM;
+ _dos_setfileattr(filename,attr);
+#endif
+}
+
+/****************************************************************************
+REMARKS:
+Function to create a directory.
+****************************************************************************/
+ibool PMAPI PM_mkdir(
+ const char *filename)
+{
+#ifdef __GNUC__
+ return mkdir(filename,S_IRUSR) == 0;
+#else
+ return mkdir(filename) == 0;
+#endif
+}
+
+/****************************************************************************
+REMARKS:
+Function to remove a directory.
+****************************************************************************/
+ibool PMAPI PM_rmdir(
+ const char *filename)
+{
+ return rmdir(filename) == 0;
+}
+
+/*-------------------------------------------------------------------------*/
+/* Generic DPMI routines common to 16/32 bit code */
+/*-------------------------------------------------------------------------*/
+
+#ifndef REALMODE
+ulong PMAPI DPMI_mapPhysicalToLinear(ulong physAddr,ulong limit)
+{
+ PMREGS r;
+ int i;
+ ulong baseAddr,baseOfs,roundedLimit;
+
+ /* We can't map memory below 1Mb, but the linear address are already
+ * mapped 1:1 for this memory anyway so we just return the base address.
+ */
+ if (physAddr < 0x100000L)
+ return physAddr;
+
+ /* Search table of existing mappings to see if we have already mapped
+ * a region of memory that will serve this purpose. We do this because
+ * DPMI 0.9 does not allow us to free physical memory mappings, and if
+ * the mappings get re-used in the program we want to avoid allocating
+ * more mappings than necessary.
+ */
+ for (i = 0; i < numMaps; i++) {
+ if (maps[i].physical == physAddr && maps[i].limit == limit)
+ return maps[i].linear;
+ }
+
+ /* Find a free slot in our physical memory mapping table */
+ for (i = 0; i < numMaps; i++) {
+ if (maps[i].limit == 0)
+ break;
+ }
+ if (i == numMaps) {
+ i = numMaps++;
+ if (i == MAX_MEMORY_MAPPINGS)
+ return NULL;
+ }
+
+ /* Round the physical address to a 4Kb boundary and the limit to a
+ * 4Kb-1 boundary before passing the values to DPMI as some extenders
+ * will fail the calls unless this is the case. If we round the
+ * physical address, then we also add an extra offset into the address
+ * that we return.
+ */
+ baseOfs = physAddr & 4095;
+ baseAddr = physAddr & ~4095;
+ roundedLimit = ((limit+baseOfs+1+4095) & ~4095)-1;
+ r.x.ax = 0x800;
+ r.x.bx = baseAddr >> 16;
+ r.x.cx = baseAddr & 0xFFFF;
+ r.x.si = roundedLimit >> 16;
+ r.x.di = roundedLimit & 0xFFFF;
+ PM_int386(0x31, &r, &r);
+ if (r.x.cflag)
+ return 0xFFFFFFFFUL;
+ maps[i].physical = physAddr;
+ maps[i].limit = limit;
+ maps[i].linear = ((ulong)r.x.bx << 16) + r.x.cx + baseOfs;
+ return maps[i].linear;
+}
+
+int PMAPI DPMI_setSelectorBase(ushort sel,ulong linAddr)
+{
+ PMREGS r;
+
+ r.x.ax = 7; /* DPMI set selector base address */
+ r.x.bx = sel;
+ r.x.cx = linAddr >> 16;
+ r.x.dx = linAddr & 0xFFFF;
+ PM_int386(0x31, &r, &r);
+ if (r.x.cflag)
+ return 0;
+ return 1;
+}
+
+ulong PMAPI DPMI_getSelectorBase(ushort sel)
+{
+ PMREGS r;
+
+ r.x.ax = 6; /* DPMI get selector base address */
+ r.x.bx = sel;
+ PM_int386(0x31, &r, &r);
+ return ((ulong)r.x.cx << 16) + r.x.dx;
+}
+
+int PMAPI DPMI_setSelectorLimit(ushort sel,ulong limit)
+{
+ PMREGS r;
+
+ r.x.ax = 8; /* DPMI set selector limit */
+ r.x.bx = sel;
+ r.x.cx = limit >> 16;
+ r.x.dx = limit & 0xFFFF;
+ PM_int386(0x31, &r, &r);
+ if (r.x.cflag)
+ return 0;
+ return 1;
+}
+
+uint PMAPI DPMI_createSelector(ulong base,ulong limit)
+{
+ uint sel;
+ PMREGS r;
+
+ /* Allocate 1 descriptor */
+ r.x.ax = 0;
+ r.x.cx = 1;
+ PM_int386(0x31, &r, &r);
+ if (r.x.cflag) return 0;
+ sel = r.x.ax;
+
+ /* Set the descriptor access rights (for a 32 bit page granular
+ * segment).
+ */
+ if (limit >= 0x10000L) {
+ r.x.ax = 9;
+ r.x.bx = sel;
+ r.x.cx = 0x40F3;
+ PM_int386(0x31, &r, &r);
+ }
+
+ /* Map physical memory and create selector */
+ if ((base = DPMI_mapPhysicalToLinear(base,limit)) == 0xFFFFFFFFUL)
+ return 0;
+ if (!DPMI_setSelectorBase(sel,base))
+ return 0;
+ if (!DPMI_setSelectorLimit(sel,limit))
+ return 0;
+ return sel;
+}
+
+void PMAPI DPMI_freeSelector(uint sel)
+{
+ PMREGS r;
+
+ r.x.ax = 1;
+ r.x.bx = sel;
+ PM_int386(0x31, &r, &r);
+}
+
+int PMAPI DPMI_lockLinearPages(ulong linear,ulong len)
+{
+ PMREGS r;
+
+ r.x.ax = 0x600; /* DPMI Lock Linear Region */
+ r.x.bx = (linear >> 16); /* Linear address in BX:CX */
+ r.x.cx = (linear & 0xFFFF);
+ r.x.si = (len >> 16); /* Length in SI:DI */
+ r.x.di = (len & 0xFFFF);
+ PM_int386(0x31, &r, &r);
+ return (!r.x.cflag);
+}
+
+int PMAPI DPMI_unlockLinearPages(ulong linear,ulong len)
+{
+ PMREGS r;
+
+ r.x.ax = 0x601; /* DPMI Unlock Linear Region */
+ r.x.bx = (linear >> 16); /* Linear address in BX:CX */
+ r.x.cx = (linear & 0xFFFF);
+ r.x.si = (len >> 16); /* Length in SI:DI */
+ r.x.di = (len & 0xFFFF);
+ PM_int386(0x31, &r, &r);
+ return (!r.x.cflag);
+}
+
+/****************************************************************************
+REMARKS:
+Adjust the page table caching bits directly. Requires ring 0 access and
+only works with DOS4GW and compatible extenders (CauseWay also works since
+it has direct support for the ring 0 instructions we need from ring 3). Will
+not work in a DOS box, but we call into the ring 0 helper VxD so we should
+never get here in a DOS box anyway (assuming the VxD is present). If we
+do get here and we are in windows, this code will be skipped.
+****************************************************************************/
+static void PM_adjustPageTables(
+ ulong linear,
+ ulong limit,
+ ibool isCached)
+{
+#ifdef DOS4GW
+ int startPDB,endPDB,iPDB,startPage,endPage,start,end,iPage;
+ ulong andMask,orMask,pageTable,*pPageTable;
+
+ andMask = ~0x18;
+ orMask = (isCached) ? 0x00 : 0x18;
+ if (_PM_pagingEnabled() == 1 && (PDB = _PM_getPDB()) != 0) {
+ if (_PM_haveCauseWay) {
+ /* CauseWay is a little different in the page table handling.
+ * The code that we use for DOS4G/W does not appear to work
+ * with CauseWay correctly as it does not appear to allow us
+ * to map the page tables directly. Instead we can directly
+ * access the page table entries in extended memory where
+ * CauseWay always locates them (starting at 1024*4096*1023)
+ */
+ startPage = (linear >> 12);
+ endPage = ((linear+limit) >> 12);
+ pPageTable = (ulong*)CW_PAGE_TABLE_START;
+ for (iPage = startPage; iPage <= endPage; iPage++)
+ pPageTable[iPage] = (pPageTable[iPage] & andMask) | orMask;
+ }
+ else {
+ pPDB = (ulong*)DPMI_mapPhysicalToLinear(PDB,0xFFF);
+ if (pPDB) {
+ startPDB = (linear >> 22) & 0x3FF;
+ startPage = (linear >> 12) & 0x3FF;
+ endPDB = ((linear+limit) >> 22) & 0x3FF;
+ endPage = ((linear+limit) >> 12) & 0x3FF;
+ for (iPDB = startPDB; iPDB <= endPDB; iPDB++) {
+ pageTable = pPDB[iPDB] & ~0xFFF;
+ pPageTable = (ulong*)DPMI_mapPhysicalToLinear(pageTable,0xFFF);
+ start = (iPDB == startPDB) ? startPage : 0;
+ end = (iPDB == endPDB) ? endPage : 0x3FF;
+ for (iPage = start; iPage <= end; iPage++)
+ pPageTable[iPage] = (pPageTable[iPage] & andMask) | orMask;
+ }
+ }
+ }
+ PM_flushTLB();
+ }
+#endif
+}
+
+void * PMAPI DPMI_mapPhysicalAddr(ulong base,ulong limit,ibool isCached)
+{
+ PMSREGS sregs;
+ ulong linAddr;
+ ulong DSBaseAddr;
+
+ /* Get the base address for the default DS selector */
+ PM_segread(&sregs);
+ DSBaseAddr = DPMI_getSelectorBase(sregs.ds);
+ if ((base < 0x100000) && (DSBaseAddr == 0)) {
+ /* DS is zero based, so we can directly access the first 1Mb of
+ * system memory (like under DOS4GW).
+ */
+ return (void*)base;
+ }
+
+ /* Map the memory to a linear address using DPMI function 0x800 */
+ if ((linAddr = DPMI_mapPhysicalToLinear(base,limit)) == 0xFFFFFFFF) {
+ if (base >= 0x100000)
+ return NULL;
+ /* If the linear address mapping fails but we are trying to
+ * map an area in the first 1Mb of system memory, then we must
+ * be running under a Windows or OS/2 DOS box. Under these
+ * environments we can use the segment wrap around as a fallback
+ * measure, as this does work properly.
+ */
+ linAddr = base;
+ }
+
+ /* Now expand the default DS selector to 4Gb so we can access it */
+ if (!DPMI_setSelectorLimit(sregs.ds,0xFFFFFFFFUL))
+ return NULL;
+
+ /* Finally enable caching for the page tables that we just mapped in,
+ * since DOS4GW and PMODE/W create the page table entries without
+ * caching enabled which hurts the performance of the linear framebuffer
+ * as it disables write combining on Pentium Pro and above processors.
+ *
+ * For those processors cache disabling is better handled through the
+ * MTRR registers anyway (we can write combine a region but disable
+ * caching) so that MMIO register regions do not screw up.
+ */
+ if (DSBaseAddr == 0)
+ PM_adjustPageTables(linAddr,limit,isCached);
+
+ /* Now return the base address of the memory into the default DS */
+ return (void*)(linAddr - DSBaseAddr);
+}
+
+#if defined(PM386)
+
+/* Some DOS extender implementations do not directly support calling a
+ * real mode procedure from protected mode. However we can simulate what
+ * we need temporarily hooking the INT 6Ah vector with a small real mode
+ * stub that will call our real mode code for us.
+ */
+
+static uchar int6AHandler[] = {
+ 0x00,0x00,0x00,0x00, /* __PMODE_callReal variable */
+ 0xFB, /* sti */
+ 0x2E,0xFF,0x1E,0x00,0x00, /* call [cs:__PMODE_callReal] */
+ 0xCF, /* iretf */
+ };
+static uchar *crPtr = NULL; /* Pointer to of int 6A handler */
+static uint crRSeg,crROff; /* Real mode seg:offset of handler */
+
+void PMAPI PM_callRealMode(uint seg,uint off, RMREGS *in,
+ RMSREGS *sregs)
+{
+ uchar *p;
+ uint oldSeg,oldOff;
+
+ if (!crPtr) {
+ /* Allocate and copy the memory block only once */
+ crPtr = PM_allocRealSeg(sizeof(int6AHandler), &crRSeg, &crROff);
+ memcpy(crPtr,int6AHandler,sizeof(int6AHandler));
+ }
+ PM_setWord(crPtr,off); /* Plug in address to call */
+ PM_setWord(crPtr+2,seg);
+ p = PM_mapRealPointer(0,0x6A * 4);
+ oldOff = PM_getWord(p); /* Save old handler address */
+ oldSeg = PM_getWord(p+2);
+ PM_setWord(p,crROff+4); /* Hook 6A handler */
+ PM_setWord(p+2,crRSeg);
+ PM_int86x(0x6A, in, in, sregs); /* Call real mode code */
+ PM_setWord(p,oldOff); /* Restore old handler */
+ PM_setWord(p+2,oldSeg);
+}
+
+#endif /* PM386 */
+
+#endif /* !REALMODE */
+
+/****************************************************************************
+REMARKS:
+Allocates a block of locked, physically contiguous memory. The memory
+may be required to be below the 16Meg boundary.
+****************************************************************************/
+void * PMAPI PM_allocLockedMem(
+ uint size,
+ ulong *physAddr,
+ ibool contiguous,
+ ibool below16Meg)
+{
+ uchar *p,*roundedP;
+ uint r_seg,r_off;
+ uint roundedSize = (size + 4 + 0xFFF) & ~0xFFF;
+ PM_lockHandle lh; /* Unused in DOS */
+#ifndef REALMODE
+ VXD_regs regs;
+
+ /* If we have connected to our helper VxD in a Windows DOS box, use the
+ * helper VxD services to allocate the memory that we need.
+ */
+ if (VXD_version) {
+ memset(®s,0,sizeof(regs));
+ regs.eax = API_NUM(PMHELP_ALLOCLOCKED);
+ regs.ebx = size;
+ regs.ecx = (ulong)physAddr;
+ regs.edx = contiguous | (below16Meg << 8);
+ _PM_VxDCall(®s,_PM_VXD_off,_PM_VXD_sel);
+ return (void*)regs.eax;
+ }
+
+ /* If the memory is not contiguous, we simply need to allocate it
+ * using regular memory allocation services, and lock it down
+ * in memory.
+ *
+ * For contiguous memory blocks, the only way to guarantee contiguous physical
+ * memory addresses under DOS is to allocate the memory below the
+ * 1Meg boundary as real mode memory.
+ *
+ * Note that we must page align the memory block, and we also must
+ * keep track of the non-aligned pointer so we can properly free
+ * it later. Hence we actually allocate 4 bytes more than the
+ * size rounded up to the next 4K boundary.
+ */
+ if (!contiguous)
+ p = PM_malloc(roundedSize);
+ else
+#endif
+ p = PM_allocRealSeg(roundedSize,&r_seg,&r_off);
+ if (p == NULL)
+ return NULL;
+ roundedP = (void*)(((ulong)p + 0xFFF) & ~0xFFF);
+ *((ulong*)(roundedP + size)) = (ulong)p;
+ PM_lockDataPages(roundedP,size,&lh);
+ if ((*physAddr = PM_getPhysicalAddr(roundedP)) == 0xFFFFFFFF) {
+ PM_freeLockedMem(roundedP,size,contiguous);
+ return NULL;
+ }
+
+ /* Disable caching for the memory since it is probably a DMA buffer */
+#ifndef REALMODE
+ PM_adjustPageTables((ulong)roundedP,size-1,false);
+#endif
+ return roundedP;
+}
+
+/****************************************************************************
+REMARKS:
+Free a block of locked memory.
+****************************************************************************/
+void PMAPI PM_freeLockedMem(void *p,uint size,ibool contiguous)
+{
+#ifndef REALMODE
+ VXD_regs regs;
+ PM_lockHandle lh; /* Unused in DOS */
+
+ if (!p)
+ return;
+ if (VXD_version) {
+ memset(®s,0,sizeof(regs));
+ regs.eax = API_NUM(PMHELP_FREELOCKED);
+ regs.ebx = (ulong)p;
+ regs.ecx = size;
+ regs.edx = contiguous;
+ _PM_VxDCall(®s,_PM_VXD_off,_PM_VXD_sel);
+ return;
+ }
+ PM_unlockDataPages(p,size,&lh);
+ if (!contiguous)
+ free(*((void**)((uchar*)p + size)));
+ else
+#endif
+ PM_freeRealSeg(*((void**)((char*)p + size)));
+}
+
+#ifndef REALMODE
+/****************************************************************************
+REMARKS:
+Allocates a new block of pages for the page block manager.
+****************************************************************************/
+static pageblock *PM_addNewPageBlock(void)
+{
+ int i,size;
+ pageblock *newBlock;
+ char *p,*next;
+
+ /* Allocate memory for the new page block, and add to head of list */
+ size = PAGES_PER_BLOCK * PM_PAGE_SIZE + (PM_PAGE_SIZE-1) + sizeof(pageblock);
+ if ((newBlock = PM_malloc(size)) == NULL)
+ return NULL;
+ newBlock->prev = NULL;
+ newBlock->next = pageBlocks;
+ if (pageBlocks)
+ pageBlocks->prev = newBlock;
+ pageBlocks = newBlock;
+
+ /* Initialise the page aligned free list for the page block */
+ newBlock->freeCount = PAGES_PER_BLOCK;
+ newBlock->freeList = p = (char*)(((ulong)(newBlock + 1) + (PM_PAGE_SIZE-1)) & ~(PM_PAGE_SIZE-1));
+ newBlock->freeListStart = newBlock->freeList;
+ newBlock->freeListEnd = p + (PAGES_PER_BLOCK-1) * PM_PAGE_SIZE;
+ for (i = 0; i < PAGES_PER_BLOCK; i++,p = next)
+ FREELIST_NEXT(p) = next = p + PM_PAGE_SIZE;
+ FREELIST_NEXT(p - PM_PAGE_SIZE) = NULL;
+ return newBlock;
+}
+#endif
+
+/****************************************************************************
+REMARKS:
+Allocates a page aligned and page sized block of memory
+****************************************************************************/
+void * PMAPI PM_allocPage(
+ ibool locked)
+{
+#ifndef REALMODE
+ VXD_regs regs;
+ pageblock *block;
+ void *p;
+ PM_lockHandle lh; /* Unused in DOS */
+
+ /* Call the helper VxD for this service if we are running in a DOS box */
+ if (VXD_version) {
+ memset(®s,0,sizeof(regs));
+ regs.eax = API_NUM(PMHELP_ALLOCPAGE);
+ regs.ebx = locked;
+ _PM_VxDCall(®s,_PM_VXD_off,_PM_VXD_sel);
+ return (void*)regs.eax;
+ }
+
+ /* Scan the block list looking for any free blocks. Allocate a new
+ * page block if no free blocks are found.
+ */
+ for (block = pageBlocks; block != NULL; block = block->next) {
+ if (block->freeCount)
+ break;
+ }
+ if (block == NULL && (block = PM_addNewPageBlock()) == NULL)
+ return NULL;
+ block->freeCount--;
+ p = block->freeList;
+ block->freeList = FREELIST_NEXT(p);
+ if (locked)
+ PM_lockDataPages(p,PM_PAGE_SIZE,&lh);
+ return p;
+#else
+ return NULL;
+#endif
+}
+
+/****************************************************************************
+REMARKS:
+Free a page aligned and page sized block of memory
+****************************************************************************/
+void PMAPI PM_freePage(
+ void *p)
+{
+#ifndef REALMODE
+ VXD_regs regs;
+ pageblock *block;
+
+ /* Call the helper VxD for this service if we are running in a DOS box */
+ if (VXD_version) {
+ memset(®s,0,sizeof(regs));
+ regs.eax = API_NUM(PMHELP_FREEPAGE);
+ regs.ebx = (ulong)p;
+ _PM_VxDCall(®s,_PM_VXD_off,_PM_VXD_sel);
+ return;
+ }
+
+ /* First find the page block that this page belongs to */
+ for (block = pageBlocks; block != NULL; block = block->next) {
+ if (p >= block->freeListStart && p <= block->freeListEnd)
+ break;
+ }
+ CHECK(block != NULL);
+
+ /* Now free the block by adding it to the free list */
+ FREELIST_NEXT(p) = block->freeList;
+ block->freeList = p;
+ if (++block->freeCount == PAGES_PER_BLOCK) {
+ /* If all pages in the page block are now free, free the entire
+ * page block itself.
+ */
+ if (block == pageBlocks) {
+ /* Delete from head */
+ pageBlocks = block->next;
+ if (block->next)
+ block->next->prev = NULL;
+ }
+ else {
+ /* Delete from middle of list */
+ CHECK(block->prev != NULL);
+ block->prev->next = block->next;
+ if (block->next)
+ block->next->prev = block->prev;
+ }
+ PM_free(block);
+ }
+#else
+ (void)p;
+#endif
+}
+
+/*-------------------------------------------------------------------------*/
+/* DOS Real Mode support. */
+/*-------------------------------------------------------------------------*/
+
+#ifdef REALMODE
+
+#ifndef MK_FP
+#define MK_FP(s,o) ( (void far *)( ((ulong)(s) << 16) + \
+ (ulong)(o) ))
+#endif
+
+void * PMAPI PM_mapRealPointer(uint r_seg,uint r_off)
+{ return MK_FP(r_seg,r_off); }
+
+void * PMAPI PM_getBIOSPointer(void)
+{
+ return MK_FP(0x40,0);
+}
+
+void * PMAPI PM_getA0000Pointer(void)
+{
+ return MK_FP(0xA000,0);
+}
+
+void * PMAPI PM_mapPhysicalAddr(ulong base,ulong limit,ibool isCached)
+{
+ uint sel = base >> 4;
+ uint off = base & 0xF;
+ limit = limit;
+ return MK_FP(sel,off);
+}
+
+void PMAPI PM_freePhysicalAddr(void *ptr,ulong limit)
+{ ptr = ptr; }
+
+ulong PMAPI PM_getPhysicalAddr(void *p)
+{
+ return ((((ulong)p >> 16) << 4) + (ushort)p);
+}
+
+ibool PMAPI PM_getPhysicalAddrRange(void *p,ulong length,ulong *physAddress)
+{ return false; }
+
+void * PMAPI PM_mapToProcess(void *base,ulong limit)
+{ return (void*)base; }
+
+void * PMAPI PM_allocRealSeg(uint size,uint *r_seg,uint *r_off)
+{
+ /* Call malloc() to allocate the memory for us */
+ void *p = PM_malloc(size);
+ *r_seg = FP_SEG(p);
+ *r_off = FP_OFF(p);
+ return p;
+}
+
+void PMAPI PM_freeRealSeg(void *mem)
+{
+ if (mem) PM_free(mem);
+}
+
+int PMAPI PM_int86(int intno, RMREGS *in, RMREGS *out)
+{
+ return PM_int386(intno,in,out);
+}
+
+int PMAPI PM_int86x(int intno, RMREGS *in, RMREGS *out,
+ RMSREGS *sregs)
+{
+ return PM_int386x(intno,in,out,sregs);
+}
+
+void PMAPI PM_availableMemory(ulong *physical,ulong *total)
+{
+ PMREGS regs;
+
+ regs.h.ah = 0x48;
+ regs.x.bx = 0xFFFF;
+ PM_int86(0x21,®s,®s);
+ *physical = *total = regs.x.bx * 16UL;
+}
+
+#endif
+
+/*-------------------------------------------------------------------------*/
+/* Phar Lap TNT DOS Extender support. */
+/*-------------------------------------------------------------------------*/
+
+#ifdef TNT
+
+#include <pldos32.h>
+#include <pharlap.h>
+#include <hw386.h>
+
+static uchar *zeroPtr = NULL;
+
+void * PMAPI PM_getBIOSPointer(void)
+{
+ if (!zeroPtr)
+ zeroPtr = PM_mapPhysicalAddr(0,0xFFFFF,true);
+ return (void*)(zeroPtr + 0x400);
+}
+
+void * PMAPI PM_getA0000Pointer(void)
+{
+ static void *bankPtr;
+ if (!bankPtr)
+ bankPtr = PM_mapPhysicalAddr(0xA0000,0xFFFF,true);
+ return bankPtr;
+}
+
+void * PMAPI PM_mapPhysicalAddr(ulong base,ulong limit,ibool isCached)
+{
+ CONFIG_INF config;
+ ULONG offset;
+ int err;
+ ulong baseAddr,baseOfs,newLimit;
+ VXD_regs regs;
+
+ /* If we have connected to our helper VxD in a Windows DOS box, use
+ * the helper VxD services to map memory instead of the DPMI services.
+ * We do this because the helper VxD can properly disable caching
+ * where necessary, which we can only do directly here if we are
+ * running at ring 0 (ie: under real DOS).
+ */
+ if (VXD_version == -1)
+ PM_init();
+ if (VXD_version) {
+ memset(®s,0,sizeof(regs));
+ regs.eax = API_NUM(PMHELP_MAPPHYS);
+ regs.ebx = base;
+ regs.ecx = limit;
+ regs.edx = isCached;
+ _PM_VxDCall(®s,_PM_VXD_off,_PM_VXD_sel);
+ return (void*)regs.eax;
+ }
+
+ /* Round the physical address to a 4Kb boundary and the limit to a
+ * 4Kb-1 boundary before passing the values to TNT. If we round the
+ * physical address, then we also add an extra offset into the address
+ * that we return.
+ */
+ baseOfs = base & 4095;
+ baseAddr = base & ~4095;
+ newLimit = ((limit+baseOfs+1+4095) & ~4095)-1;
+ _dx_config_inf(&config, (UCHAR*)&config);
+ err = _dx_map_phys(config.c_ds_sel,baseAddr,(newLimit + 4095) / 4096,&offset);
+ if (err == 130) {
+ /* If the TNT function failed, we are running in a DPMI environment
+ * and this function does not work. However we know how to handle
+ * DPMI properly, so we use our generic DPMI functions to do
+ * what the TNT runtime libraries can't.
+ */
+ return DPMI_mapPhysicalAddr(base,limit,isCached);
+ }
+ if (err == 0)
+ return (void*)(offset + baseOfs);
+ return NULL;
+}
+
+void PMAPI PM_freePhysicalAddr(void *ptr,ulong limit)
+{
+}
+
+ulong PMAPI PM_getPhysicalAddr(void *p)
+{ return 0xFFFFFFFFUL; }
+
+ibool PMAPI PM_getPhysicalAddrRange(void *p,ulong length,ulong *physAddress)
+{ return false; }
+
+void * PMAPI PM_mapToProcess(void *base,ulong limit)
+{ return (void*)base; }
+
+void * PMAPI PM_mapRealPointer(uint r_seg,uint r_off)
+{
+ if (!zeroPtr)
+ zeroPtr = PM_mapPhysicalAddr(0,0xFFFFF);
+ return (void*)(zeroPtr + MK_PHYS(r_seg,r_off));
+}
+
+void * PMAPI PM_allocRealSeg(uint size,uint *r_seg,uint *r_off)
+{
+ USHORT addr,t;
+ void *p;
+
+ if (_dx_real_alloc((size + 0xF) >> 4,&addr,&t) != 0)
+ return 0;
+ *r_seg = addr; /* Real mode segment address */
+ *r_off = 0; /* Real mode segment offset */
+ p = PM_mapRealPointer(*r_seg,*r_off);
+ _PM_addRealModeBlock(p,addr);
+ return p;
+}
+
+void PMAPI PM_freeRealSeg(void *mem)
+{
+ if (mem) _dx_real_free(_PM_findRealModeBlock(mem));
+}
+
+#define INDPMI(reg) rmregs.reg = regs->reg
+#define OUTDPMI(reg) regs->reg = rmregs.reg
+
+void PMAPI DPMI_int86(int intno, DPMI_regs *regs)
+{
+ SWI_REGS rmregs;
+
+ memset(&rmregs, 0, sizeof(rmregs));
+ INDPMI(eax); INDPMI(ebx); INDPMI(ecx); INDPMI(edx); INDPMI(esi); INDPMI(edi);
+
+ _dx_real_int(intno,&rmregs);
+
+ OUTDPMI(eax); OUTDPMI(ebx); OUTDPMI(ecx); OUTDPMI(edx); OUTDPMI(esi); OUTDPMI(edi);
+ regs->flags = rmregs.flags;
+}
+
+#define IN(reg) rmregs.reg = in->e.reg
+#define OUT(reg) out->e.reg = rmregs.reg
+
+int PMAPI PM_int86(int intno, RMREGS *in, RMREGS *out)
+{
+ SWI_REGS rmregs;
+
+ memset(&rmregs, 0, sizeof(rmregs));
+ IN(eax); IN(ebx); IN(ecx); IN(edx); IN(esi); IN(edi);
+
+ _dx_real_int(intno,&rmregs);
+
+ OUT(eax); OUT(ebx); OUT(ecx); OUT(edx); OUT(esi); OUT(edi);
+ out->x.cflag = rmregs.flags & 0x1;
+ return out->x.ax;
+}
+
+int PMAPI PM_int86x(int intno, RMREGS *in, RMREGS *out,
+ RMSREGS *sregs)
+{
+ SWI_REGS rmregs;
+
+ memset(&rmregs, 0, sizeof(rmregs));
+ IN(eax); IN(ebx); IN(ecx); IN(edx); IN(esi); IN(edi);
+ rmregs.es = sregs->es;
+ rmregs.ds = sregs->ds;
+
+ _dx_real_int(intno,&rmregs);
+
+ OUT(eax); OUT(ebx); OUT(ecx); OUT(edx); OUT(esi); OUT(edi);
+ sregs->es = rmregs.es;
+ sregs->cs = rmregs.cs;
+ sregs->ss = rmregs.ss;
+ sregs->ds = rmregs.ds;
+ out->x.cflag = rmregs.flags & 0x1;
+ return out->x.ax;
+}
+
+void PMAPI PM_availableMemory(ulong *physical,ulong *total)
+{
+ PMREGS r;
+ uint data[25];
+
+ r.x.ax = 0x2520; /* Get free memory info */
+ r.x.bx = 0;
+ r.e.edx = (uint)data;
+ PM_int386(0x21, &r, &r);
+ *physical = data[21] * 4096;
+ *total = data[23] * 4096;
+}
+
+#endif
+
+/*-------------------------------------------------------------------------*/
+/* Symantec C++ DOSX and FlashTek X-32/X-32VM support */
+/*-------------------------------------------------------------------------*/
+
+#if defined(DOSX) || defined(X32VM)
+
+#ifdef X32VM
+#include <x32.h>
+
+#define _x386_mk_protected_ptr(p) _x32_mk_protected_ptr((void*)p)
+#define _x386_free_protected_ptr(p) _x32_free_protected_ptr(p)
+#define _x386_zero_base_ptr _x32_zero_base_ptr
+#else
+extern void *_x386_zero_base_ptr;
+#endif
+
+void * PMAPI PM_mapRealPointer(uint r_seg,uint r_off)
+{
+ return (void*)((ulong)_x386_zero_base_ptr + MK_PHYS(r_seg,r_off));
+}
+
+void * PMAPI PM_allocRealSeg(uint size,uint *r_seg,uint *r_off)
+{
+ PMREGS r;
+
+ r.h.ah = 0x48; /* DOS function 48h - allocate mem */
+ r.x.bx = (size + 0xF) >> 4; /* Number of paragraphs to allocate */
+ PM_int386(0x21, &r, &r); /* Call DOS extender */
+ if (r.x.cflag)
+ return 0; /* Could not allocate the memory */
+ *r_seg = r.e.eax;
+ *r_off = 0;
+ return PM_mapRealPointer(*r_seg,*r_off);
+}
+
+void PMAPI PM_freeRealSeg(void *mem)
+{
+ /* Cannot de-allocate this memory */
+ mem = mem;
+}
+
+#pragma pack(1)
+
+typedef struct {
+ ushort intno;
+ ushort ds;
+ ushort es;
+ ushort fs;
+ ushort gs;
+ ulong eax;
+ ulong edx;
+ } _RMREGS;
+
+#pragma pack()
+
+#define IN(reg) regs.e.reg = in->e.reg
+#define OUT(reg) out->e.reg = regs.e.reg
+
+int PMAPI PM_int86(int intno, RMREGS *in, RMREGS *out)
+{
+ _RMREGS rmregs;
+ PMREGS regs;
+ PMSREGS pmsregs;
+
+ rmregs.intno = intno;
+ rmregs.eax = in->e.eax;
+ rmregs.edx = in->e.edx;
+ IN(ebx); IN(ecx); IN(esi); IN(edi);
+ regs.x.ax = 0x2511;
+ regs.e.edx = (uint)(&rmregs);
+ PM_segread(&pmsregs);
+ PM_int386x(0x21,®s,®s,&pmsregs);
+
+ OUT(eax); OUT(ebx); OUT(ecx); OUT(esi); OUT(edi);
+ out->x.dx = rmregs.edx;
+ out->x.cflag = regs.x.cflag;
+ return out->x.ax;
+}
+
+int PMAPI PM_int86x(int intno, RMREGS *in, RMREGS *out, RMSREGS *sregs)
+{
+ _RMREGS rmregs;
+ PMREGS regs;
+ PMSREGS pmsregs;
+
+ rmregs.intno = intno;
+ rmregs.eax = in->e.eax;
+ rmregs.edx = in->e.edx;
+ rmregs.es = sregs->es;
+ rmregs.ds = sregs->ds;
+ IN(ebx); IN(ecx); IN(esi); IN(edi);
+ regs.x.ax = 0x2511;
+ regs.e.edx = (uint)(&rmregs);
+ PM_segread(&pmsregs);
+ PM_int386x(0x21,®s,®s,&pmsregs);
+
+ OUT(eax); OUT(ebx); OUT(ecx); OUT(esi); OUT(edi);
+ sregs->es = rmregs.es;
+ sregs->ds = rmregs.ds;
+ out->x.dx = rmregs.edx;
+ out->x.cflag = regs.x.cflag;
+ return out->x.ax;
+}
+
+void * PMAPI PM_getBIOSPointer(void)
+{
+ return (void*)((ulong)_x386_zero_base_ptr + 0x400);
+}
+
+void * PMAPI PM_getA0000Pointer(void)
+{
+ return (void*)((ulong)_x386_zero_base_ptr + 0xA0000);
+}
+
+void * PMAPI PM_mapPhysicalAddr(ulong base,ulong limit,ibool isCached)
+{
+ VXD_regs regs;
+
+ /* If we have connected to our helper VxD in a Windows DOS box, use
+ * the helper VxD services to map memory instead of the DPMI services.
+ * We do this because the helper VxD can properly disable caching
+ * where necessary, which we can only do directly here if we are
+ * running at ring 0 (ie: under real DOS).
+ */
+ if (VXD_version == -1)
+ PM_init();
+ if (VXD_version) {
+ memset(®s,0,sizeof(regs));
+ regs.eax = API_NUM(PMHELP_MAPPHYS);
+ regs.ebx = base;
+ regs.ecx = limit;
+ regs.edx = isCached;
+ _PM_VxDCall(®s,_PM_VXD_off,_PM_VXD_sel);
+ return (void*)regs.eax;
+ }
+
+ if (base > 0x100000)
+ return _x386_map_physical_address((void*)base,limit);
+ return (void*)((ulong)_x386_zero_base_ptr + base);
+}
+
+void PMAPI PM_freePhysicalAddr(void *ptr,ulong limit)
+{
+ /* Mapping cannot be freed */
+}
+
+ulong PMAPI PM_getPhysicalAddr(void *p)
+{ return 0xFFFFFFFFUL; }
+
+ibool PMAPI PM_getPhysicalAddrRange(void *p,ulong length,ulong *physAddress)
+{ return false; }
+
+void * PMAPI PM_mapToProcess(void *base,ulong limit)
+{ return (void*)base; }
+
+ulong _cdecl _X32_getPhysMem(void);
+
+void PMAPI PM_availableMemory(ulong *physical,ulong *total)
+{
+ PMREGS regs;
+
+ /* Get total memory available, including virtual memory */
+ regs.x.ax = 0x350B;
+ PM_int386(0x21,®s,®s);
+ *total = regs.e.eax;
+
+ /* Get physical memory available */
+ *physical = _X32_getPhysMem();
+ if (*physical > *total)
+ *physical = *total;
+}
+
+#endif
+
+/*-------------------------------------------------------------------------*/
+/* Borland's DPMI32, Watcom DOS4GW and DJGPP DPMI support routines */
+/*-------------------------------------------------------------------------*/
+
+#if defined(DPMI32) || defined(DOS4GW) || defined(DJGPP)
+
+void * PMAPI PM_getBIOSPointer(void)
+{
+ return PM_mapPhysicalAddr(0x400,0xFFFF,true);
+}
+
+void * PMAPI PM_getA0000Pointer(void)
+{
+ return PM_mapPhysicalAddr(0xA0000,0xFFFF,true);
+}
+
+void * PMAPI PM_mapPhysicalAddr(ulong base,ulong limit,ibool isCached)
+{
+ VXD_regs regs;
+
+#ifdef DJGPP
+ /* Enable near pointers for DJGPP V2 */
+ __djgpp_nearptr_enable();
+#endif
+ /* If we have connected to our helper VxD in a Windows DOS box, use
+ * the helper VxD services to map memory instead of the DPMI services.
+ * We do this because the helper VxD can properly disable caching
+ * where necessary, which we can only do directly here if we are
+ * running at ring 0 (ie: under real DOS).
+ */
+ if (VXD_version == -1)
+ PM_init();
+ if (VXD_version) {
+ memset(®s,0,sizeof(regs));
+ regs.eax = API_NUM(PMHELP_MAPPHYS);
+ regs.ebx = base;
+ regs.ecx = limit;
+ regs.edx = isCached;
+ _PM_VxDCall(®s,_PM_VXD_off,_PM_VXD_sel);
+ return (void*)regs.eax;
+ }
+ return DPMI_mapPhysicalAddr(base,limit,isCached);
+}
+
+void PMAPI PM_freePhysicalAddr(void *ptr,ulong limit)
+{
+ /* Mapping cannot be freed */
+ (void)ptr;
+ (void)limit;
+}
+
+ulong PMAPI PM_getPhysicalAddr(void *p)
+{
+ ulong physAddr;
+ if (!PM_getPhysicalAddrRange(p,1,&physAddr))
+ return 0xFFFFFFFF;
+ return physAddr | ((ulong)p & 0xFFF);
+}
+
+ibool PMAPI PM_getPhysicalAddrRange(
+ void *p,
+ ulong length,
+ ulong *physAddress)
+{
+ VXD_regs regs;
+ ulong pte;
+ PMSREGS sregs;
+ ulong DSBaseAddr;
+
+ /* If we have connected to our helper VxD in a Windows DOS box, use the
+ * helper VxD services to find the physical address of an address.
+ */
+ if (VXD_version) {
+ memset(®s,0,sizeof(regs));
+ regs.eax = API_NUM(PMHELP_GETPHYSICALADDRRANGE);
+ regs.ebx = (ulong)p;
+ regs.ecx = (ulong)length;
+ regs.edx = (ulong)physAddress;
+ _PM_VxDCall(®s,_PM_VXD_off,_PM_VXD_sel);
+ return regs.eax;
+ }
+
+ /* Find base address for default DS selector */
+ PM_segread(&sregs);
+ DSBaseAddr = DPMI_getSelectorBase(sregs.ds);
+
+ /* Otherwise directly access the page tables to determine the
+ * physical memory address. Note that we touch the memory before
+ * calling, otherwise the memory may not be paged in correctly.
+ */
+ pte = *((ulong*)p);
+#ifdef DOS4GW
+ if (_PM_pagingEnabled() == 0) {
+ int count;
+ ulong linAddr = (ulong)p;
+
+ /* When paging is disabled physical=linear */
+ for (count = (length+0xFFF) >> 12; count > 0; count--) {
+ *physAddress++ = linAddr;
+ linAddr += 4096;
+ }
+ return true;
+ }
+ else if ((PDB = _PM_getPDB()) != 0 && DSBaseAddr == 0) {
+ int startPDB,endPDB,iPDB,startPage,endPage,start,end,iPage;
+ ulong pageTable,*pPageTable,linAddr = (ulong)p;
+ ulong limit = length-1;
+
+ pPDB = (ulong*)DPMI_mapPhysicalToLinear(PDB,0xFFF);
+ if (pPDB) {
+ startPDB = (linAddr >> 22) & 0x3FFL;
+ startPage = (linAddr >> 12) & 0x3FFL;
+ endPDB = ((linAddr+limit) >> 22) & 0x3FFL;
+ endPage = ((linAddr+limit) >> 12) & 0x3FFL;
+ for (iPDB = startPDB; iPDB <= endPDB; iPDB++) {
+ pageTable = pPDB[iPDB] & ~0xFFFL;
+ pPageTable = (ulong*)DPMI_mapPhysicalToLinear(pageTable,0xFFF);
+ start = (iPDB == startPDB) ? startPage : 0;
+ end = (iPDB == endPDB) ? endPage : 0x3FFL;
+ for (iPage = start; iPage <= end; iPage++)
+ *physAddress++ = (pPageTable[iPage] & ~0xFFF);
+ }
+ return true;
+ }
+ }
+#endif
+ return false;
+}
+
+void * PMAPI PM_mapToProcess(void *base,ulong limit)
+{
+ (void)limit;
+ return (void*)base;
+}
+
+void * PMAPI PM_mapRealPointer(uint r_seg,uint r_off)
+{
+ static uchar *zeroPtr = NULL;
+
+ if (!zeroPtr)
+ zeroPtr = PM_mapPhysicalAddr(0,0xFFFFF,true);
+ return (void*)(zeroPtr + MK_PHYS(r_seg,r_off));
+}
+
+void * PMAPI PM_allocRealSeg(uint size,uint *r_seg,uint *r_off)
+{
+ PMREGS r;
+ void *p;
+
+ r.x.ax = 0x100; /* DPMI allocate DOS memory */
+ r.x.bx = (size + 0xF) >> 4; /* number of paragraphs */
+ PM_int386(0x31, &r, &r);
+ if (r.x.cflag)
+ return NULL; /* DPMI call failed */
+ *r_seg = r.x.ax; /* Real mode segment */
+ *r_off = 0;
+ p = PM_mapRealPointer(*r_seg,*r_off);
+ _PM_addRealModeBlock(p,r.x.dx);
+ return p;
+}
+
+void PMAPI PM_freeRealSeg(void *mem)
+{
+ PMREGS r;
+
+ if (mem) {
+ r.x.ax = 0x101; /* DPMI free DOS memory */
+ r.x.dx = _PM_findRealModeBlock(mem);/* DX := selector from 0x100 */
+ PM_int386(0x31, &r, &r);
+ }
+}
+
+static DPMI_handler_t DPMI_int10 = NULL;
+
+void PMAPI DPMI_setInt10Handler(DPMI_handler_t handler)
+{
+ DPMI_int10 = handler;
+}
+
+void PMAPI DPMI_int86(int intno, DPMI_regs *regs)
+{
+ PMREGS r;
+ PMSREGS sr;
+
+ if (intno == 0x10 && DPMI_int10) {
+ if (DPMI_int10(regs))
+ return;
+ }
+ PM_segread(&sr);
+ r.x.ax = 0x300; /* DPMI issue real interrupt */
+ r.h.bl = intno;
+ r.h.bh = 0;
+ r.x.cx = 0;
+ sr.es = sr.ds;
+ r.e.edi = (uint)regs;
+ PM_int386x(0x31, &r, &r, &sr); /* Issue the interrupt */
+}
+
+#define IN(reg) rmregs.reg = in->e.reg
+#define OUT(reg) out->e.reg = rmregs.reg
+
+int PMAPI PM_int86(int intno, RMREGS *in, RMREGS *out)
+{
+ DPMI_regs rmregs;
+
+ memset(&rmregs, 0, sizeof(rmregs));
+ IN(eax); IN(ebx); IN(ecx); IN(edx); IN(esi); IN(edi);
+
+ DPMI_int86(intno,&rmregs); /* DPMI issue real interrupt */
+
+ OUT(eax); OUT(ebx); OUT(ecx); OUT(edx); OUT(esi); OUT(edi);
+ out->x.cflag = rmregs.flags & 0x1;
+ return out->x.ax;
+}
+
+int PMAPI PM_int86x(int intno, RMREGS *in, RMREGS *out,
+ RMSREGS *sregs)
+{
+ DPMI_regs rmregs;
+
+ memset(&rmregs, 0, sizeof(rmregs));
+ IN(eax); IN(ebx); IN(ecx); IN(edx); IN(esi); IN(edi);
+ rmregs.es = sregs->es;
+ rmregs.ds = sregs->ds;
+
+ DPMI_int86(intno,&rmregs); /* DPMI issue real interrupt */
+
+ OUT(eax); OUT(ebx); OUT(ecx); OUT(edx); OUT(esi); OUT(edi);
+ sregs->es = rmregs.es;
+ sregs->cs = rmregs.cs;
+ sregs->ss = rmregs.ss;
+ sregs->ds = rmregs.ds;
+ out->x.cflag = rmregs.flags & 0x1;
+ return out->x.ax;
+}
+
+#pragma pack(1)
+
+typedef struct {
+ uint LargestBlockAvail;
+ uint MaxUnlockedPage;
+ uint LargestLockablePage;
+ uint LinAddrSpace;
+ uint NumFreePagesAvail;
+ uint NumPhysicalPagesFree;
+ uint TotalPhysicalPages;
+ uint FreeLinAddrSpace;
+ uint SizeOfPageFile;
+ uint res[3];
+ } MemInfo;
+
+#pragma pack()
+
+void PMAPI PM_availableMemory(ulong *physical,ulong *total)
+{
+ PMREGS r;
+ PMSREGS sr;
+ MemInfo memInfo;
+
+ PM_segread(&sr);
+ r.x.ax = 0x500; /* DPMI get free memory info */
+ sr.es = sr.ds;
+ r.e.edi = (uint)&memInfo;
+ PM_int386x(0x31, &r, &r, &sr); /* Issue the interrupt */
+ *physical = memInfo.NumPhysicalPagesFree * 4096;
+ *total = memInfo.LargestBlockAvail;
+ if (*total < *physical)
+ *physical = *total;
+}
+
+#endif
+
+#ifndef __16BIT__
+
+/****************************************************************************
+REMARKS:
+Call the VBE/Core software interrupt to change display banks.
+****************************************************************************/
+void PMAPI PM_setBankA(
+ int bank)
+{
+ DPMI_regs regs;
+ memset(®s, 0, sizeof(regs));
+ regs.eax = 0x4F05;
+ regs.ebx = 0x0000;
+ regs.edx = bank;
+ DPMI_int86(0x10,®s);
+}
+
+/****************************************************************************
+REMARKS:
+Call the VBE/Core software interrupt to change display banks.
+****************************************************************************/
+void PMAPI PM_setBankAB(
+ int bank)
+{
+ DPMI_regs regs;
+ memset(®s, 0, sizeof(regs));
+ regs.eax = 0x4F05;
+ regs.ebx = 0x0000;
+ regs.edx = bank;
+ DPMI_int86(0x10,®s);
+ regs.eax = 0x4F05;
+ regs.ebx = 0x0001;
+ regs.edx = bank;
+ DPMI_int86(0x10,®s);
+}
+
+/****************************************************************************
+REMARKS:
+Call the VBE/Core software interrupt to change display start address.
+****************************************************************************/
+void PMAPI PM_setCRTStart(
+ int x,
+ int y,
+ int waitVRT)
+{
+ DPMI_regs regs;
+ memset(®s, 0, sizeof(regs));
+ regs.eax = 0x4F07;
+ regs.ebx = waitVRT;
+ regs.ecx = x;
+ regs.edx = y;
+ DPMI_int86(0x10,®s);
+}
+
+#endif
+
+/****************************************************************************
+REMARKS:
+Function to get the file attributes for a specific file.
+****************************************************************************/
+uint PMAPI PM_getFileAttr(
+ const char *filename)
+{
+ // TODO: Implement this!
+ return 0;
+}
+
+/****************************************************************************
+REMARKS:
+Function to get the file time and date for a specific file.
+****************************************************************************/
+ibool PMAPI PM_getFileTime(
+ const char *filename,
+ ibool gmTime,
+ PM_time *time)
+{
+ // TODO: Implement this!
+ return false;
+}
+
+/****************************************************************************
+REMARKS:
+Function to set the file time and date for a specific file.
+****************************************************************************/
+ibool PMAPI PM_setFileTime(
+ const char *filename,
+ ibool gmTime,
+ PM_time *time)
+{
+ // TODO: Implement this!
+ return false;
+}
diff --git a/board/MAI/bios_emulator/scitech/src/pm/dos/pmdos.c b/board/MAI/bios_emulator/scitech/src/pm/dos/pmdos.c
new file mode 100644
index 00000000000..74f8427a1c5
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/pm/dos/pmdos.c
@@ -0,0 +1,1637 @@
+/****************************************************************************
+*
+* SciTech OS Portability Manager Library
+*
+* ========================================================================
+*
+* The contents of this file are subject to the SciTech MGL Public
+* License Version 1.0 (the "License"); you may not use this file
+* except in compliance with the License. You may obtain a copy of
+* the License at http://www.scitechsoft.com/mgl-license.txt
+*
+* Software distributed under the License is distributed on an
+* "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+* implied. See the License for the specific language governing
+* rights and limitations under the License.
+*
+* The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+*
+* The Initial Developer of the Original Code is SciTech Software, Inc.
+* All Rights Reserved.
+*
+* ========================================================================
+*
+* Language: ANSI C
+* Environment: 16/32 bit DOS
+*
+* Description: Implementation for the OS Portability Manager Library, which
+* contains functions to implement OS specific services in a
+* generic, cross platform API. Porting the OS Portability
+* Manager library is the first step to porting any SciTech
+* products to a new platform.
+*
+****************************************************************************/
+
+#include "pmapi.h"
+#include <stdio.h>
+#include <stdlib.h>
+#include <string.h>
+#include <dos.h>
+
+/*--------------------------- Global variables ----------------------------*/
+
+#ifndef REALMODE
+static int globalDataStart;
+#endif
+
+PM_criticalHandler _VARAPI _PM_critHandler = NULL;
+PM_breakHandler _VARAPI _PM_breakHandler = NULL;
+PM_intHandler _VARAPI _PM_timerHandler = NULL;
+PM_intHandler _VARAPI _PM_rtcHandler = NULL;
+PM_intHandler _VARAPI _PM_keyHandler = NULL;
+PM_key15Handler _VARAPI _PM_key15Handler = NULL;
+PM_mouseHandler _VARAPI _PM_mouseHandler = NULL;
+PM_intHandler _VARAPI _PM_int10Handler = NULL;
+int _VARAPI _PM_mouseMask;
+
+uchar * _VARAPI _PM_ctrlCPtr; /* Location of Ctrl-C flag */
+uchar * _VARAPI _PM_ctrlBPtr; /* Location of Ctrl-Break flag */
+uchar * _VARAPI _PM_critPtr; /* Location of Critical error Bf*/
+PMFARPTR _VARAPI _PM_prevTimer = PMNULL; /* Previous timer handler */
+PMFARPTR _VARAPI _PM_prevRTC = PMNULL; /* Previous RTC handler */
+PMFARPTR _VARAPI _PM_prevKey = PMNULL; /* Previous key handler */
+PMFARPTR _VARAPI _PM_prevKey15 = PMNULL; /* Previous key15 handler */
+PMFARPTR _VARAPI _PM_prevBreak = PMNULL; /* Previous break handler */
+PMFARPTR _VARAPI _PM_prevCtrlC = PMNULL; /* Previous CtrlC handler */
+PMFARPTR _VARAPI _PM_prevCritical = PMNULL; /* Previous critical handler */
+long _VARAPI _PM_prevRealTimer; /* Previous real mode timer */
+long _VARAPI _PM_prevRealRTC; /* Previous real mode RTC */
+long _VARAPI _PM_prevRealKey; /* Previous real mode key */
+long _VARAPI _PM_prevRealKey15; /* Previous real mode key15 */
+long _VARAPI _PM_prevRealInt10; /* Previous real mode int 10h */
+static uchar _PM_oldCMOSRegA; /* CMOS register A contents */
+static uchar _PM_oldCMOSRegB; /* CMOS register B contents */
+static uchar _PM_oldRTCPIC2; /* Mask value for RTC IRQ8 */
+
+/* Structure to maintain information about hardware interrupt handlers,
+ * include a copy of the hardware IRQ assembler thunk (one for each
+ * hooked interrupt handler).
+ */
+
+typedef struct {
+ uchar IRQ;
+ uchar IRQVect;
+ uchar prevPIC;
+ uchar prevPIC2;
+ PMFARPTR prevHandler;
+ long prevRealhandler;
+ uchar thunk[1];
+ /* IRQ assembler thunk follows ... */
+ } _PM_IRQHandle;
+
+/*----------------------------- Implementation ----------------------------*/
+
+/* Globals for locking interrupt handlers in _pmdos.asm */
+
+#ifndef REALMODE
+extern int _VARAPI _PM_pmdosDataStart;
+extern int _VARAPI _PM_pmdosDataEnd;
+extern int _VARAPI _PM_DMADataStart;
+extern int _VARAPI _PM_DMADataEnd;
+void _ASMAPI _PM_pmdosCodeStart(void);
+void _ASMAPI _PM_pmdosCodeEnd(void);
+void _ASMAPI _PM_DMACodeStart(void);
+void _ASMAPI _PM_DMACodeEnd(void);
+#endif
+
+/* Protected mode interrupt handlers, also called by PM callbacks below */
+
+void _ASMAPI _PM_timerISR(void);
+void _ASMAPI _PM_rtcISR(void);
+void _ASMAPI _PM_irqISRTemplate(void);
+void _ASMAPI _PM_irqISRTemplateEnd(void);
+void _ASMAPI _PM_keyISR(void);
+void _ASMAPI _PM_key15ISR(void);
+void _ASMAPI _PM_breakISR(void);
+void _ASMAPI _PM_ctrlCISR(void);
+void _ASMAPI _PM_criticalISR(void);
+void _ASMAPI _PM_mouseISR(void);
+void _ASMAPI _PM_int10PMCB(void);
+
+/* Protected mode DPMI callback handlers */
+
+void _ASMAPI _PM_mousePMCB(void);
+
+/* Routine to install a mouse handler function */
+
+void _ASMAPI _PM_setMouseHandler(int mask);
+
+/* Routine to allocate DPMI real mode callback routines */
+
+ibool _ASMAPI _DPMI_allocateCallback(void (_ASMAPI *pmcode)(),void *rmregs,long *RMCB);
+void _ASMAPI _DPMI_freeCallback(long RMCB);
+
+/* DPMI helper functions in PMLITE.C */
+
+ulong PMAPI DPMI_mapPhysicalToLinear(ulong physAddr,ulong limit);
+int PMAPI DPMI_setSelectorBase(ushort sel,ulong linAddr);
+ulong PMAPI DPMI_getSelectorBase(ushort sel);
+int PMAPI DPMI_setSelectorLimit(ushort sel,ulong limit);
+uint PMAPI DPMI_createSelector(ulong base,ulong limit);
+void PMAPI DPMI_freeSelector(uint sel);
+int PMAPI DPMI_lockLinearPages(ulong linear,ulong len);
+int PMAPI DPMI_unlockLinearPages(ulong linear,ulong len);
+
+/* Functions to read and write CMOS registers */
+
+uchar PMAPI _PM_readCMOS(int index);
+void PMAPI _PM_writeCMOS(int index,uchar value);
+
+/*-------------------------------------------------------------------------*/
+/* Generic routines common to all environments */
+/*-------------------------------------------------------------------------*/
+
+void PMAPI PM_resetMouseDriver(int hardReset)
+{
+ RMREGS regs;
+ PM_mouseHandler oldHandler = _PM_mouseHandler;
+
+ PM_restoreMouseHandler();
+ regs.x.ax = hardReset ? 0 : 33;
+ PM_int86(0x33, ®s, ®s);
+ if (oldHandler)
+ PM_setMouseHandler(_PM_mouseMask, oldHandler);
+}
+
+void PMAPI PM_setRealTimeClockFrequency(int frequency)
+{
+ static short convert[] = {
+ 8192,
+ 4096,
+ 2048,
+ 1024,
+ 512,
+ 256,
+ 128,
+ 64,
+ 32,
+ 16,
+ 8,
+ 4,
+ 2,
+ -1,
+ };
+ int i;
+
+ /* First clear any pending RTC timeout if not cleared */
+ _PM_readCMOS(0x0C);
+ if (frequency == 0) {
+ /* Disable RTC timout */
+ _PM_writeCMOS(0x0A,_PM_oldCMOSRegA);
+ _PM_writeCMOS(0x0B,_PM_oldCMOSRegB & 0x0F);
+ }
+ else {
+ /* Convert frequency value to RTC clock indexes */
+ for (i = 0; convert[i] != -1; i++) {
+ if (convert[i] == frequency)
+ break;
+ }
+
+ /* Set RTC timout value and enable timeout */
+ _PM_writeCMOS(0x0A,0x20 | (i+3));
+ _PM_writeCMOS(0x0B,(_PM_oldCMOSRegB & 0x0F) | 0x40);
+ }
+}
+
+#ifndef REALMODE
+
+static void PMAPI lockPMHandlers(void)
+{
+ static int locked = 0;
+ int stat;
+ PM_lockHandle lh; /* Unused in DOS */
+
+ /* Lock all of the code and data used by our protected mode interrupt
+ * handling routines, so that it will continue to work correctly
+ * under real mode.
+ */
+ if (!locked) {
+ PM_saveDS();
+ stat = !PM_lockDataPages(&globalDataStart-2048,4096,&lh);
+ stat |= !PM_lockDataPages(&_PM_pmdosDataStart,(int)&_PM_pmdosDataEnd - (int)&_PM_pmdosDataStart,&lh);
+ stat |= !PM_lockCodePages((__codePtr)_PM_pmdosCodeStart,(int)_PM_pmdosCodeEnd-(int)_PM_pmdosCodeStart,&lh);
+ stat |= !PM_lockDataPages(&_PM_DMADataStart,(int)&_PM_DMADataEnd - (int)&_PM_DMADataStart,&lh);
+ stat |= !PM_lockCodePages((__codePtr)_PM_DMACodeStart,(int)_PM_DMACodeEnd-(int)_PM_DMACodeStart,&lh);
+ if (stat) {
+ printf("Page locking services failed - interrupt handling not safe!\n");
+ exit(1);
+ }
+ locked = 1;
+ }
+}
+
+#endif
+
+/*-------------------------------------------------------------------------*/
+/* DOS Real Mode support. */
+/*-------------------------------------------------------------------------*/
+
+#ifdef REALMODE
+
+#ifndef MK_FP
+#define MK_FP(s,o) ( (void far *)( ((ulong)(s) << 16) + \
+ (ulong)(o) ))
+#endif
+
+int PMAPI PM_setMouseHandler(int mask, PM_mouseHandler mh)
+{
+ PM_saveDS();
+ _PM_mouseHandler = mh;
+ _PM_setMouseHandler(_PM_mouseMask = mask);
+ return 1;
+}
+
+void PMAPI PM_restoreMouseHandler(void)
+{
+ union REGS regs;
+
+ if (_PM_mouseHandler) {
+ regs.x.ax = 33;
+ int86(0x33, ®s, ®s);
+ _PM_mouseHandler = NULL;
+ }
+}
+
+void PMAPI PM_setTimerHandler(PM_intHandler th)
+{
+ _PM_getRMvect(0x8, (long*)&_PM_prevTimer);
+ _PM_timerHandler = th;
+ _PM_setRMvect(0x8, (long)_PM_timerISR);
+}
+
+void PMAPI PM_restoreTimerHandler(void)
+{
+ if (_PM_timerHandler) {
+ _PM_setRMvect(0x8, (long)_PM_prevTimer);
+ _PM_timerHandler = NULL;
+ }
+}
+
+ibool PMAPI PM_setRealTimeClockHandler(PM_intHandler th,int frequency)
+{
+ /* Save the old CMOS real time clock values */
+ _PM_oldCMOSRegA = _PM_readCMOS(0x0A);
+ _PM_oldCMOSRegB = _PM_readCMOS(0x0B);
+
+ /* Set the real time clock interrupt handler */
+ _PM_getRMvect(0x70, (long*)&_PM_prevRTC);
+ _PM_rtcHandler = th;
+ _PM_setRMvect(0x70, (long)_PM_rtcISR);
+
+ /* Program the real time clock default frequency */
+ PM_setRealTimeClockFrequency(frequency);
+
+ /* Unmask IRQ8 in the PIC2 */
+ _PM_oldRTCPIC2 = PM_inpb(0xA1);
+ PM_outpb(0xA1,_PM_oldRTCPIC2 & 0xFE);
+ return true;
+}
+
+void PMAPI PM_restoreRealTimeClockHandler(void)
+{
+ if (_PM_rtcHandler) {
+ /* Restore CMOS registers and mask RTC clock */
+ _PM_writeCMOS(0x0A,_PM_oldCMOSRegA);
+ _PM_writeCMOS(0x0B,_PM_oldCMOSRegB);
+ PM_outpb(0xA1,(PM_inpb(0xA1) & 0xFE) | (_PM_oldRTCPIC2 & ~0xFE));
+
+ /* Restore the interrupt vector */
+ _PM_setRMvect(0x70, (long)_PM_prevRTC);
+ _PM_rtcHandler = NULL;
+ }
+}
+
+void PMAPI PM_setKeyHandler(PM_intHandler kh)
+{
+ _PM_getRMvect(0x9, (long*)&_PM_prevKey);
+ _PM_keyHandler = kh;
+ _PM_setRMvect(0x9, (long)_PM_keyISR);
+}
+
+void PMAPI PM_restoreKeyHandler(void)
+{
+ if (_PM_keyHandler) {
+ _PM_setRMvect(0x9, (long)_PM_prevKey);
+ _PM_keyHandler = NULL;
+ }
+}
+
+void PMAPI PM_setKey15Handler(PM_key15Handler kh)
+{
+ _PM_getRMvect(0x15, (long*)&_PM_prevKey15);
+ _PM_key15Handler = kh;
+ _PM_setRMvect(0x15, (long)_PM_key15ISR);
+}
+
+void PMAPI PM_restoreKey15Handler(void)
+{
+ if (_PM_key15Handler) {
+ _PM_setRMvect(0x15, (long)_PM_prevKey15);
+ _PM_key15Handler = NULL;
+ }
+}
+
+void PMAPI PM_installAltBreakHandler(PM_breakHandler bh)
+{
+ static int ctrlCFlag,ctrlBFlag;
+
+ _PM_ctrlCPtr = (uchar*)&ctrlCFlag;
+ _PM_ctrlBPtr = (uchar*)&ctrlBFlag;
+ _PM_getRMvect(0x1B, (long*)&_PM_prevBreak);
+ _PM_getRMvect(0x23, (long*)&_PM_prevCtrlC);
+ _PM_breakHandler = bh;
+ _PM_setRMvect(0x1B, (long)_PM_breakISR);
+ _PM_setRMvect(0x23, (long)_PM_ctrlCISR);
+}
+
+void PMAPI PM_installBreakHandler(void)
+{
+ PM_installAltBreakHandler(NULL);
+}
+
+void PMAPI PM_restoreBreakHandler(void)
+{
+ if (_PM_prevBreak) {
+ _PM_setRMvect(0x1B, (long)_PM_prevBreak);
+ _PM_setRMvect(0x23, (long)_PM_prevCtrlC);
+ _PM_prevBreak = NULL;
+ _PM_breakHandler = NULL;
+ }
+}
+
+void PMAPI PM_installAltCriticalHandler(PM_criticalHandler ch)
+{
+ static short critBuf[2];
+
+ _PM_critPtr = (uchar*)critBuf;
+ _PM_getRMvect(0x24, (long*)&_PM_prevCritical);
+ _PM_critHandler = ch;
+ _PM_setRMvect(0x24, (long)_PM_criticalISR);
+}
+
+void PMAPI PM_installCriticalHandler(void)
+{
+ PM_installAltCriticalHandler(NULL);
+}
+
+void PMAPI PM_restoreCriticalHandler(void)
+{
+ if (_PM_prevCritical) {
+ _PM_setRMvect(0x24, (long)_PM_prevCritical);
+ _PM_prevCritical = NULL;
+ _PM_critHandler = NULL;
+ }
+}
+
+int PMAPI PM_lockDataPages(void *p,uint len,PM_lockHandle *lh)
+{
+ p = p; len = len; /* Do nothing for real mode */
+ return 1;
+}
+
+int PMAPI PM_unlockDataPages(void *p,uint len,PM_lockHandle *lh)
+{
+ p = p; len = len; /* Do nothing for real mode */
+ return 1;
+}
+
+int PMAPI PM_lockCodePages(void (*p)(),uint len,PM_lockHandle *lh)
+{
+ p = p; len = len; /* Do nothing for real mode */
+ return 1;
+}
+
+int PMAPI PM_unlockCodePages(void (*p)(),uint len,PM_lockHandle *lh)
+{
+ p = p; len = len; /* Do nothing for real mode */
+ return 1;
+}
+
+void PMAPI PM_getPMvect(int intno, PMFARPTR *isr)
+{
+ long t;
+ _PM_getRMvect(intno,&t);
+ *isr = (void*)t;
+}
+
+void PMAPI PM_setPMvect(int intno, PM_intHandler isr)
+{
+ PM_saveDS();
+ _PM_setRMvect(intno,(long)isr);
+}
+
+void PMAPI PM_restorePMvect(int intno, PMFARPTR isr)
+{
+ _PM_setRMvect(intno,(long)isr);
+}
+
+#endif
+
+/*-------------------------------------------------------------------------*/
+/* Phar Lap TNT DOS Extender support. */
+/*-------------------------------------------------------------------------*/
+
+#ifdef TNT
+
+#include <pldos32.h>
+#include <pharlap.h>
+#include <hw386.h>
+
+static long prevRealBreak; /* Previous real mode break handler */
+static long prevRealCtrlC; /* Previous real mode CtrlC handler */
+static long prevRealCritical; /* Prev real mode critical handler */
+static uchar *mousePtr;
+
+/* The following real mode routine is used to call a 32 bit protected
+ * mode FAR function from real mode. We use this for passing up control
+ * from the real mode mouse callback to our protected mode code.
+ */
+
+static UCHAR realHandler[] = { /* Real mode code generic handler */
+ 0x00,0x00,0x00,0x00, /* __PM_callProtp */
+ 0x00,0x00, /* __PM_protCS */
+ 0x00,0x00,0x00,0x00, /* __PM_protHandler */
+ 0x66,0x60, /* pushad */
+ 0x1E, /* push ds */
+ 0x6A,0x00, /* push 0 */
+ 0x6A,0x00, /* push 0 */
+ 0x2E,0xFF,0x36,0x04,0x00, /* push [cs:__PM_protCS] */
+ 0x66,0x2E,0xFF,0x36,0x06,0x00, /* push [cs:__PM_protHandler] */
+ 0x2E,0xFF,0x1E,0x00,0x00, /* call [cs:__PM_callProtp] */
+ 0x83,0xC4,0x0A, /* add sp,10 */
+ 0x1F, /* pop ds */
+ 0x66,0x61, /* popad */
+ 0xCB, /* retf */
+ };
+
+/* The following functions installs the above realmode callback mechanism
+ * in real mode memory for calling the protected mode routine.
+ */
+
+uchar * installCallback(void (PMAPI *pmCB)(),uint *rseg, uint *roff)
+{
+ CONFIG_INF config;
+ REALPTR realBufAdr,callProtp;
+ ULONG bufSize;
+ FARPTR protBufAdr;
+ uchar *p;
+
+ /* Get address of real mode routine to call up to protected mode */
+ _dx_rmlink_get(&callProtp, &realBufAdr, &bufSize, &protBufAdr);
+ _dx_config_inf(&config, (UCHAR*)&config);
+
+ /* Fill in the values in the real mode code segment so that it will
+ * call the correct routine.
+ */
+ *((REALPTR*)&realHandler[0]) = callProtp;
+ *((USHORT*)&realHandler[4]) = config.c_cs_sel;
+ *((ULONG*)&realHandler[6]) = (ULONG)pmCB;
+
+ /* Copy the real mode handler to real mode memory */
+ if ((p = PM_allocRealSeg(sizeof(realHandler),rseg,roff)) == NULL)
+ return NULL;
+ memcpy(p,realHandler,sizeof(realHandler));
+
+ /* Skip past global variabls in real mode code segment */
+ *roff += 0x0A;
+ return p;
+}
+
+int PMAPI PM_setMouseHandler(int mask, PM_mouseHandler mh)
+{
+ RMREGS regs;
+ RMSREGS sregs;
+ uint rseg,roff;
+
+ lockPMHandlers(); /* Ensure our handlers are locked */
+
+ if ((mousePtr = installCallback(_PM_mouseISR, &rseg, &roff)) == NULL)
+ return 0;
+ _PM_mouseHandler = mh;
+
+ /* Install the real mode mouse handler */
+ sregs.es = rseg;
+ regs.x.dx = roff;
+ regs.x.cx = _PM_mouseMask = mask;
+ regs.x.ax = 0xC;
+ PM_int86x(0x33, ®s, ®s, &sregs);
+ return 1;
+}
+
+void PMAPI PM_restoreMouseHandler(void)
+{
+ RMREGS regs;
+
+ if (_PM_mouseHandler) {
+ regs.x.ax = 33;
+ PM_int86(0x33, ®s, ®s);
+ PM_freeRealSeg(mousePtr);
+ _PM_mouseHandler = NULL;
+ }
+}
+
+void PMAPI PM_getPMvect(int intno, PMFARPTR *isr)
+{
+ FARPTR ph;
+
+ _dx_pmiv_get(intno, &ph);
+ isr->sel = FP_SEL(ph);
+ isr->off = FP_OFF(ph);
+}
+
+void PMAPI PM_setPMvect(int intno, PM_intHandler isr)
+{
+ CONFIG_INF config;
+ FARPTR ph;
+
+ PM_saveDS();
+ _dx_config_inf(&config, (UCHAR*)&config);
+ FP_SET(ph,(uint)isr,config.c_cs_sel);
+ _dx_pmiv_set(intno,ph);
+}
+
+void PMAPI PM_restorePMvect(int intno, PMFARPTR isr)
+{
+ FARPTR ph;
+
+ FP_SET(ph,isr.off,isr.sel);
+ _dx_pmiv_set(intno,ph);
+}
+
+static void getISR(int intno, PMFARPTR *pmisr, long *realisr)
+{
+ PM_getPMvect(intno,pmisr);
+ _PM_getRMvect(intno, realisr);
+}
+
+static void restoreISR(int intno, PMFARPTR pmisr, long realisr)
+{
+ _PM_setRMvect(intno,realisr);
+ PM_restorePMvect(intno,pmisr);
+}
+
+static void setISR(int intno, void (PMAPI *isr)())
+{
+ CONFIG_INF config;
+ FARPTR ph;
+
+ lockPMHandlers(); /* Ensure our handlers are locked */
+
+ _dx_config_inf(&config, (UCHAR*)&config);
+ FP_SET(ph,(uint)isr,config.c_cs_sel);
+ _dx_apmiv_set(intno,ph);
+}
+
+void PMAPI PM_setTimerHandler(PM_intHandler th)
+{
+ getISR(0x8, &_PM_prevTimer, &_PM_prevRealTimer);
+ _PM_timerHandler = th;
+ setISR(0x8, _PM_timerISR);
+}
+
+void PMAPI PM_restoreTimerHandler(void)
+{
+ if (_PM_timerHandler) {
+ restoreISR(0x8, _PM_prevTimer, _PM_prevRealTimer);
+ _PM_timerHandler = NULL;
+ }
+}
+
+ibool PMAPI PM_setRealTimeClockHandler(PM_intHandler th,int frequency)
+{
+ /* Save the old CMOS real time clock values */
+ _PM_oldCMOSRegA = _PM_readCMOS(0x0A);
+ _PM_oldCMOSRegB = _PM_readCMOS(0x0B);
+
+ /* Set the real time clock interrupt handler */
+ getISR(0x70, &_PM_prevRTC, &_PM_prevRealRTC);
+ _PM_rtcHandler = th;
+ setISR(0x70, _PM_rtcISR);
+
+ /* Program the real time clock default frequency */
+ PM_setRealTimeClockFrequency(frequency);
+
+ /* Unmask IRQ8 in the PIC2 */
+ _PM_oldRTCPIC2 = PM_inpb(0xA1);
+ PM_outpb(0xA1,_PM_oldRTCPIC2 & 0xFE);
+ return true;
+}
+
+void PMAPI PM_restoreRealTimeClockHandler(void)
+{
+ if (_PM_rtcHandler) {
+ /* Restore CMOS registers and mask RTC clock */
+ _PM_writeCMOS(0x0A,_PM_oldCMOSRegA);
+ _PM_writeCMOS(0x0B,_PM_oldCMOSRegB);
+ PM_outpb(0xA1,(PM_inpb(0xA1) & 0xFE) | (_PM_oldRTCPIC2 & ~0xFE));
+
+ /* Restore the interrupt vector */
+ restoreISR(0x70, _PM_prevRTC, _PM_prevRealRTC);
+ _PM_rtcHandler = NULL;
+ }
+}
+
+void PMAPI PM_setKeyHandler(PM_intHandler kh)
+{
+ getISR(0x9, &_PM_prevKey, &_PM_prevRealKey);
+ _PM_keyHandler = kh;
+ setISR(0x9, _PM_keyISR);
+}
+
+void PMAPI PM_restoreKeyHandler(void)
+{
+ if (_PM_keyHandler) {
+ restoreISR(0x9, _PM_prevKey, _PM_prevRealKey);
+ _PM_keyHandler = NULL;
+ }
+}
+
+void PMAPI PM_setKey15Handler(PM_key15Handler kh)
+{
+ getISR(0x15, &_PM_prevKey15, &_PM_prevRealKey15);
+ _PM_key15Handler = kh;
+ setISR(0x15, _PM_key15ISR);
+}
+
+void PMAPI PM_restoreKey15Handler(void)
+{
+ if (_PM_key15Handler) {
+ restoreISR(0x15, _PM_prevKey15, _PM_prevRealKey15);
+ _PM_key15Handler = NULL;
+ }
+}
+
+void PMAPI PM_installAltBreakHandler(PM_breakHandler bh)
+{
+ static int ctrlCFlag,ctrlBFlag;
+
+ _PM_ctrlCPtr = (uchar*)&ctrlCFlag;
+ _PM_ctrlBPtr = (uchar*)&ctrlBFlag;
+ getISR(0x1B, &_PM_prevBreak, &prevRealBreak);
+ getISR(0x23, &_PM_prevCtrlC, &prevRealCtrlC);
+ _PM_breakHandler = bh;
+ setISR(0x1B, _PM_breakISR);
+ setISR(0x23, _PM_ctrlCISR);
+}
+
+void PMAPI PM_installBreakHandler(void)
+{
+ PM_installAltBreakHandler(NULL);
+}
+
+void PMAPI PM_restoreBreakHandler(void)
+{
+ if (_PM_prevBreak.sel) {
+ restoreISR(0x1B, _PM_prevBreak, prevRealBreak);
+ restoreISR(0x23, _PM_prevCtrlC, prevRealCtrlC);
+ _PM_prevBreak.sel = 0;
+ _PM_breakHandler = NULL;
+ }
+}
+
+void PMAPI PM_installAltCriticalHandler(PM_criticalHandler ch)
+{
+ static short critBuf[2];
+
+ _PM_critPtr = (uchar*)critBuf;
+ getISR(0x24, &_PM_prevCritical, &prevRealCritical);
+ _PM_critHandler = ch;
+ setISR(0x24, _PM_criticalISR);
+}
+
+void PMAPI PM_installCriticalHandler(void)
+{
+ PM_installAltCriticalHandler(NULL);
+}
+
+void PMAPI PM_restoreCriticalHandler(void)
+{
+ if (_PM_prevCritical.sel) {
+ restoreISR(0x24, _PM_prevCritical, prevRealCritical);
+ _PM_prevCritical.sel = 0;
+ _PM_critHandler = NULL;
+ }
+}
+
+int PMAPI PM_lockDataPages(void *p,uint len,PM_lockHandle *lh)
+{
+ return (_dx_lock_pgsn(p,len) == 0);
+}
+
+int PMAPI PM_unlockDataPages(void *p,uint len,PM_lockHandle *lh)
+{
+ return (_dx_ulock_pgsn(p,len) == 0);
+}
+
+int PMAPI PM_lockCodePages(void (*p)(),uint len,PM_lockHandle *lh)
+{
+ CONFIG_INF config;
+ FARPTR fp;
+
+ _dx_config_inf(&config, (UCHAR*)&config);
+ FP_SET(fp,p,config.c_cs_sel);
+ return (_dx_lock_pgs(fp,len) == 0);
+}
+
+int PMAPI PM_unlockCodePages(void (*p)(),uint len,PM_lockHandle *lh)
+{
+ CONFIG_INF config;
+ FARPTR fp;
+
+ _dx_config_inf(&config, (UCHAR*)&config);
+ FP_SET(fp,p,config.c_cs_sel);
+ return (_dx_ulock_pgs(fp,len) == 0);
+}
+
+#endif
+
+/*-------------------------------------------------------------------------*/
+/* Symantec C++ DOSX and FlashTek X-32/X-32VM support */
+/*-------------------------------------------------------------------------*/
+
+#if defined(DOSX) || defined(X32VM)
+
+#ifdef X32VM
+#include <x32.h>
+#endif
+
+static long prevRealBreak; /* Previous real mode break handler */
+static long prevRealCtrlC; /* Previous real mode CtrlC handler */
+static long prevRealCritical; /* Prev real mode critical handler */
+
+static uint mouseSel = 0,mouseOff;
+
+/* The following real mode routine is used to call a 32 bit protected
+ * mode FAR function from real mode. We use this for passing up control
+ * from the real mode mouse callback to our protected mode code.
+ */
+
+static char realHandler[] = { /* Real mode code generic handler */
+ 0x00,0x00,0x00,0x00, /* __PM_callProtp */
+ 0x00,0x00, /* __PM_protCS */
+ 0x00,0x00,0x00,0x00, /* __PM_protHandler */
+ 0x1E, /* push ds */
+ 0x6A,0x00, /* push 0 */
+ 0x6A,0x00, /* push 0 */
+ 0x2E,0xFF,0x36,0x04,0x00, /* push [cs:__PM_protCS] */
+ 0x66,0x2E,0xFF,0x36,0x06,0x00, /* push [cs:__PM_protHandler] */
+ 0x2E,0xFF,0x1E,0x00,0x00, /* call [cs:__PM_callProtp] */
+ 0x83,0xC4,0x0A, /* add sp,10 */
+ 0x1F, /* pop ds */
+ 0xCB, /* retf */
+ };
+
+/* The following functions installs the above realmode callback mechanism
+ * in real mode memory for calling the protected mode routine.
+ */
+
+int installCallback(void (PMAPI *pmCB)(),uint *psel, uint *poff,
+ uint *rseg, uint *roff)
+{
+ PMREGS regs;
+ PMSREGS sregs;
+
+ regs.x.ax = 0x250D;
+ PM_segread(&sregs);
+ PM_int386x(0x21,®s,®s,&sregs); /* Get RM callback address */
+
+ /* Fill in the values in the real mode code segment so that it will
+ * call the correct routine.
+ */
+ *((ulong*)&realHandler[0]) = regs.e.eax;
+ *((ushort*)&realHandler[4]) = sregs.cs;
+ *((ulong*)&realHandler[6]) = (ulong)pmCB;
+
+ /* Copy the real mode handler to real mode memory (only allocate the
+ * buffer once since we cant dealloate it with X32).
+ */
+ if (*psel == 0) {
+ if (!PM_allocRealSeg(sizeof(realHandler),psel,poff,rseg,roff))
+ return 0;
+ }
+ PM_memcpyfn(*psel,*poff,realHandler,sizeof(realHandler));
+
+ /* Skip past global variables in real mode code segment */
+ *roff += 0x0A;
+ return 1;
+}
+
+int PMAPI PM_setMouseHandler(int mask, PM_mouseHandler mh)
+{
+ RMREGS regs;
+ RMSREGS sregs;
+ uint rseg,roff;
+
+ lockPMHandlers(); /* Ensure our handlers are locked */
+
+ if (!installCallback(_PM_mouseISR, &mouseSel, &mouseOff, &rseg, &roff))
+ return 0;
+ _PM_mouseHandler = mh;
+
+ /* Install the real mode mouse handler */
+ sregs.es = rseg;
+ regs.x.dx = roff;
+ regs.x.cx = _PM_mouseMask = mask;
+ regs.x.ax = 0xC;
+ PM_int86x(0x33, ®s, ®s, &sregs);
+ return 1;
+}
+
+void PMAPI PM_restoreMouseHandler(void)
+{
+ RMREGS regs;
+
+ if (_PM_mouseHandler) {
+ regs.x.ax = 33;
+ PM_int86(0x33, ®s, ®s);
+ _PM_mouseHandler = NULL;
+ }
+}
+
+void PMAPI PM_getPMvect(int intno, PMFARPTR *isr)
+{
+ PMREGS regs;
+ PMSREGS sregs;
+
+ PM_segread(&sregs);
+ regs.x.ax = 0x2502; /* Get PM interrupt vector */
+ regs.x.cx = intno;
+ PM_int386x(0x21, ®s, ®s, &sregs);
+ isr->sel = sregs.es;
+ isr->off = regs.e.ebx;
+}
+
+void PMAPI PM_setPMvect(int intno, PM_intHandler isr)
+{
+ PMFARPTR pmisr;
+ PMSREGS sregs;
+
+ PM_saveDS();
+ PM_segread(&sregs);
+ pmisr.sel = sregs.cs;
+ pmisr.off = (uint)isr;
+ PM_restorePMvect(intno, pmisr);
+}
+
+void PMAPI PM_restorePMvect(int intno, PMFARPTR isr)
+{
+ PMREGS regs;
+ PMSREGS sregs;
+
+ PM_segread(&sregs);
+ regs.x.ax = 0x2505; /* Set PM interrupt vector */
+ regs.x.cx = intno;
+ sregs.ds = isr.sel;
+ regs.e.edx = isr.off;
+ PM_int386x(0x21, ®s, ®s, &sregs);
+}
+
+static void getISR(int intno, PMFARPTR *pmisr, long *realisr)
+{
+ PM_getPMvect(intno,pmisr);
+ _PM_getRMvect(intno,realisr);
+}
+
+static void restoreISR(int intno, PMFARPTR pmisr, long realisr)
+{
+ PMREGS regs;
+ PMSREGS sregs;
+
+ PM_segread(&sregs);
+ regs.x.ax = 0x2507; /* Set real and PM vectors */
+ regs.x.cx = intno;
+ sregs.ds = pmisr.sel;
+ regs.e.edx = pmisr.off;
+ regs.e.ebx = realisr;
+ PM_int386x(0x21, ®s, ®s, &sregs);
+}
+
+static void setISR(int intno, void *isr)
+{
+ PMREGS regs;
+ PMSREGS sregs;
+
+ lockPMHandlers(); /* Ensure our handlers are locked */
+
+ PM_segread(&sregs);
+ regs.x.ax = 0x2506; /* Hook real and protected vectors */
+ regs.x.cx = intno;
+ sregs.ds = sregs.cs;
+ regs.e.edx = (uint)isr;
+ PM_int386x(0x21, ®s, ®s, &sregs);
+}
+
+void PMAPI PM_setTimerHandler(PM_intHandler th)
+{
+ getISR(0x8, &_PM_prevTimer, &_PM_prevRealTimer);
+ _PM_timerHandler = th;
+ setISR(0x8, _PM_timerISR);
+}
+
+void PMAPI PM_restoreTimerHandler(void)
+{
+ if (_PM_timerHandler) {
+ restoreISR(0x8, _PM_prevTimer, _PM_prevRealTimer);
+ _PM_timerHandler = NULL;
+ }
+}
+
+ibool PMAPI PM_setRealTimeClockHandler(PM_intHandler th,int frequency)
+{
+ /* Save the old CMOS real time clock values */
+ _PM_oldCMOSRegA = _PM_readCMOS(0x0A);
+ _PM_oldCMOSRegB = _PM_readCMOS(0x0B);
+
+ /* Set the real time clock interrupt handler */
+ getISR(0x70, &_PM_prevRTC, &_PM_prevRealRTC);
+ _PM_rtcHandler = th;
+ setISR(0x70, _PM_rtcISR);
+
+ /* Program the real time clock default frequency */
+ PM_setRealTimeClockFrequency(frequency);
+
+ /* Unmask IRQ8 in the PIC2 */
+ _PM_oldRTCPIC2 = PM_inpb(0xA1);
+ PM_outpb(0xA1,_PM_oldRTCPIC2 & 0xFE);
+ return true;
+}
+
+void PMAPI PM_restoreRealTimeClockHandler(void)
+{
+ if (_PM_rtcHandler) {
+ /* Restore CMOS registers and mask RTC clock */
+ _PM_writeCMOS(0x0A,_PM_oldCMOSRegA);
+ _PM_writeCMOS(0x0B,_PM_oldCMOSRegB);
+ PM_outpb(0xA1,(PM_inpb(0xA1) & 0xFE) | (_PM_oldRTCPIC2 & ~0xFE));
+
+ /* Restore the interrupt vector */
+ restoreISR(0x70, _PM_prevRTC, _PM_prevRealRTC);
+ _PM_rtcHandler = NULL;
+ }
+}
+
+void PMAPI PM_setKeyHandler(PM_intHandler kh)
+{
+ getISR(0x9, &_PM_prevKey, &_PM_prevRealKey);
+ _PM_keyHandler = kh;
+ setISR(0x9, _PM_keyISR);
+}
+
+void PMAPI PM_restoreKeyHandler(void)
+{
+ if (_PM_keyHandler) {
+ restoreISR(0x9, _PM_prevKey, _PM_prevRealKey);
+ _PM_keyHandler = NULL;
+ }
+}
+
+void PMAPI PM_setKey15Handler(PM_key15Handler kh)
+{
+ getISR(0x15, &_PM_prevKey15, &_PM_prevRealKey15);
+ _PM_key15Handler = kh;
+ setISR(0x15, _PM_key15ISR);
+}
+
+void PMAPI PM_restoreKey15Handler(void)
+{
+ if (_PM_key15Handler) {
+ restoreISR(0x15, _PM_prevKey15, _PM_prevRealKey15);
+ _PM_key15Handler = NULL;
+ }
+}
+
+void PMAPI PM_installAltBreakHandler(PM_breakHandler bh)
+{
+ static int ctrlCFlag,ctrlBFlag;
+
+ _PM_ctrlCPtr = (uchar*)&ctrlCFlag;
+ _PM_ctrlBPtr = (uchar*)&ctrlBFlag;
+ getISR(0x1B, &_PM_prevBreak, &prevRealBreak);
+ getISR(0x23, &_PM_prevCtrlC, &prevRealCtrlC);
+ _PM_breakHandler = bh;
+ setISR(0x1B, _PM_breakISR);
+ setISR(0x23, _PM_ctrlCISR);
+}
+
+void PMAPI PM_installBreakHandler(void)
+{
+ PM_installAltBreakHandler(NULL);
+}
+
+void PMAPI PM_restoreBreakHandler(void)
+{
+ if (_PM_prevBreak.sel) {
+ restoreISR(0x1B, _PM_prevBreak, prevRealBreak);
+ restoreISR(0x23, _PM_prevCtrlC, prevRealCtrlC);
+ _PM_prevBreak.sel = 0;
+ _PM_breakHandler = NULL;
+ }
+}
+
+void PMAPI PM_installAltCriticalHandler(PM_criticalHandler ch)
+{
+ static short critBuf[2];
+
+ _PM_critPtr = (uchar*)critBuf;
+ getISR(0x24, &_PM_prevCritical, &prevRealCritical);
+ _PM_critHandler = ch;
+ setISR(0x24, _PM_criticalISR);
+}
+
+void PMAPI PM_installCriticalHandler(void)
+{
+ PM_installAltCriticalHandler(NULL);
+}
+
+void PMAPI PM_restoreCriticalHandler(void)
+{
+ if (_PM_prevCritical.sel) {
+ restoreISR(0x24, _PM_prevCritical, prevRealCritical);
+ _PM_prevCritical.sel = 0;
+ _PM_critHandler = NULL;
+ }
+}
+
+int PMAPI PM_lockDataPages(void *p,uint len,PM_lockHandle *lh)
+{
+ return (_x386_memlock(p,len) == 0);
+}
+
+int PMAPI PM_unlockDataPages(void *p,uint len,PM_lockHandle *lh)
+{
+ return (_x386_memunlock(p,len) == 0);
+}
+
+int PMAPI PM_lockCodePages(void (*p)(),uint len,PM_lockHandle *lh)
+{
+ return (_x386_memlock(p,len) == 0);
+}
+
+int PMAPI PM_unlockCodePages(void (*p)(),uint len,PM_lockHandle *lh)
+{
+ return (_x386_memunlock(p,len) == 0);
+}
+
+#endif
+
+/*-------------------------------------------------------------------------*/
+/* Borland's DPMI32 DOS Power Pack Extender support. */
+/*-------------------------------------------------------------------------*/
+
+#ifdef DPMI32
+#define GENERIC_DPMI32 /* Use generic 32 bit DPMI routines */
+
+void PMAPI PM_getPMvect(int intno, PMFARPTR *isr)
+{
+ PMREGS regs;
+
+ regs.x.ax = 0x204;
+ regs.h.bl = intno;
+ PM_int386(0x31,®s,®s);
+ isr->sel = regs.x.cx;
+ isr->off = regs.e.edx;
+}
+
+void PMAPI PM_setPMvect(int intno, PM_intHandler isr)
+{
+ PMSREGS sregs;
+ PMREGS regs;
+
+ PM_saveDS();
+ regs.x.ax = 0x205; /* Set protected mode vector */
+ regs.h.bl = intno;
+ PM_segread(&sregs);
+ regs.x.cx = sregs.cs;
+ regs.e.edx = (uint)isr;
+ PM_int386(0x31,®s,®s);
+}
+
+void PMAPI PM_restorePMvect(int intno, PMFARPTR isr)
+{
+ PMREGS regs;
+
+ regs.x.ax = 0x205;
+ regs.h.bl = intno;
+ regs.x.cx = isr.sel;
+ regs.e.edx = isr.off;
+ PM_int386(0x31,®s,®s);
+}
+#endif
+
+/*-------------------------------------------------------------------------*/
+/* Watcom C/C++ with Rational DOS/4GW support. */
+/*-------------------------------------------------------------------------*/
+
+#ifdef DOS4GW
+#define GENERIC_DPMI32 /* Use generic 32 bit DPMI routines */
+
+#define MOUSE_SUPPORTED /* DOS4GW directly supports mouse */
+
+/* We use the normal DOS services to save and restore interrupts handlers
+ * for Watcom C++, because using the direct DPMI functions does not
+ * appear to work properly. At least if we use the DPMI functions, we
+ * dont get the auto-passup feature that we need to correctly trap
+ * real and protected mode interrupts without installing Bi-model
+ * interrupt handlers.
+ */
+
+void PMAPI PM_getPMvect(int intno, PMFARPTR *isr)
+{
+ PMREGS regs;
+ PMSREGS sregs;
+
+ PM_segread(&sregs);
+ regs.h.ah = 0x35;
+ regs.h.al = intno;
+ PM_int386x(0x21,®s,®s,&sregs);
+ isr->sel = sregs.es;
+ isr->off = regs.e.ebx;
+}
+
+void PMAPI PM_setPMvect(int intno, PM_intHandler isr)
+{
+ PMREGS regs;
+ PMSREGS sregs;
+
+ PM_saveDS();
+ PM_segread(&sregs);
+ regs.h.ah = 0x25;
+ regs.h.al = intno;
+ sregs.ds = sregs.cs;
+ regs.e.edx = (uint)isr;
+ PM_int386x(0x21,®s,®s,&sregs);
+}
+
+void PMAPI PM_restorePMvect(int intno, PMFARPTR isr)
+{
+ PMREGS regs;
+ PMSREGS sregs;
+
+ PM_segread(&sregs);
+ regs.h.ah = 0x25;
+ regs.h.al = intno;
+ sregs.ds = isr.sel;
+ regs.e.edx = isr.off;
+ PM_int386x(0x21,®s,®s,&sregs);
+}
+
+int PMAPI PM_setMouseHandler(int mask, PM_mouseHandler mh)
+{
+ lockPMHandlers(); /* Ensure our handlers are locked */
+
+ _PM_mouseHandler = mh;
+ _PM_setMouseHandler(_PM_mouseMask = mask);
+ return 1;
+}
+
+void PMAPI PM_restoreMouseHandler(void)
+{
+ PMREGS regs;
+
+ if (_PM_mouseHandler) {
+ regs.x.ax = 33;
+ PM_int386(0x33, ®s, ®s);
+ _PM_mouseHandler = NULL;
+ }
+}
+
+#endif
+
+/*-------------------------------------------------------------------------*/
+/* DJGPP port of GNU C++ support. */
+/*-------------------------------------------------------------------------*/
+
+#ifdef DJGPP
+#define GENERIC_DPMI32 /* Use generic 32 bit DPMI routines */
+
+void PMAPI PM_getPMvect(int intno, PMFARPTR *isr)
+{
+ PMREGS regs;
+
+ regs.x.ax = 0x204;
+ regs.h.bl = intno;
+ PM_int386(0x31,®s,®s);
+ isr->sel = regs.x.cx;
+ isr->off = regs.e.edx;
+}
+
+void PMAPI PM_setPMvect(int intno, PM_intHandler isr)
+{
+ PMSREGS sregs;
+ PMREGS regs;
+
+ PM_saveDS();
+ regs.x.ax = 0x205; /* Set protected mode vector */
+ regs.h.bl = intno;
+ PM_segread(&sregs);
+ regs.x.cx = sregs.cs;
+ regs.e.edx = (uint)isr;
+ PM_int386(0x31,®s,®s);
+}
+
+void PMAPI PM_restorePMvect(int intno, PMFARPTR isr)
+{
+ PMREGS regs;
+
+ regs.x.ax = 0x205;
+ regs.h.bl = intno;
+ regs.x.cx = isr.sel;
+ regs.e.edx = isr.off;
+ PM_int386(0x31,®s,®s);
+}
+
+#endif
+
+/*-------------------------------------------------------------------------*/
+/* Generic 32 bit DPMI routines */
+/*-------------------------------------------------------------------------*/
+
+#if defined(GENERIC_DPMI32)
+
+static long prevRealBreak; /* Previous real mode break handler */
+static long prevRealCtrlC; /* Previous real mode CtrlC handler */
+static long prevRealCritical; /* Prev real mode critical handler */
+
+#ifndef MOUSE_SUPPORTED
+
+/* The following real mode routine is used to call a 32 bit protected
+ * mode FAR function from real mode. We use this for passing up control
+ * from the real mode mouse callback to our protected mode code.
+ */
+
+static long mouseRMCB; /* Mouse real mode callback address */
+static uchar *mousePtr;
+static char mouseRegs[0x32]; /* Real mode regs for mouse callback */
+static uchar mouseHandler[] = {
+ 0x00,0x00,0x00,0x00, /* _realRMCB */
+ 0x2E,0xFF,0x1E,0x00,0x00, /* call [cs:_realRMCB] */
+ 0xCB, /* retf */
+ };
+
+int PMAPI PM_setMouseHandler(int mask, PM_mouseHandler mh)
+{
+ RMREGS regs;
+ RMSREGS sregs;
+ uint rseg,roff;
+
+ lockPMHandlers(); /* Ensure our handlers are locked */
+
+ /* Copy the real mode handler to real mode memory */
+ if ((mousePtr = PM_allocRealSeg(sizeof(mouseHandler),&rseg,&roff)) == NULL)
+ return 0;
+ memcpy(mousePtr,mouseHandler,sizeof(mouseHandler));
+ if (!_DPMI_allocateCallback(_PM_mousePMCB, mouseRegs, &mouseRMCB))
+ PM_fatalError("Unable to allocate real mode callback!\n");
+ PM_setLong(mousePtr,mouseRMCB);
+
+ /* Install the real mode mouse handler */
+ _PM_mouseHandler = mh;
+ sregs.es = rseg;
+ regs.x.dx = roff+4;
+ regs.x.cx = _PM_mouseMask = mask;
+ regs.x.ax = 0xC;
+ PM_int86x(0x33, ®s, ®s, &sregs);
+ return 1;
+}
+
+void PMAPI PM_restoreMouseHandler(void)
+{
+ RMREGS regs;
+
+ if (_PM_mouseHandler) {
+ regs.x.ax = 33;
+ PM_int86(0x33, ®s, ®s);
+ PM_freeRealSeg(mousePtr);
+ _DPMI_freeCallback(mouseRMCB);
+ _PM_mouseHandler = NULL;
+ }
+}
+
+#endif
+
+static void getISR(int intno, PMFARPTR *pmisr, long *realisr)
+{
+ PM_getPMvect(intno,pmisr);
+ _PM_getRMvect(intno,realisr);
+}
+
+static void restoreISR(int intno, PMFARPTR pmisr, long realisr)
+{
+ _PM_setRMvect(intno,realisr);
+ PM_restorePMvect(intno,pmisr);
+}
+
+static void setISR(int intno, void (* PMAPI pmisr)())
+{
+ lockPMHandlers(); /* Ensure our handlers are locked */
+ PM_setPMvect(intno,pmisr);
+}
+
+void PMAPI PM_setTimerHandler(PM_intHandler th)
+{
+ getISR(0x8, &_PM_prevTimer, &_PM_prevRealTimer);
+ _PM_timerHandler = th;
+ setISR(0x8, _PM_timerISR);
+}
+
+void PMAPI PM_restoreTimerHandler(void)
+{
+ if (_PM_timerHandler) {
+ restoreISR(0x8, _PM_prevTimer, _PM_prevRealTimer);
+ _PM_timerHandler = NULL;
+ }
+}
+
+ibool PMAPI PM_setRealTimeClockHandler(PM_intHandler th,int frequency)
+{
+ /* Save the old CMOS real time clock values */
+ _PM_oldCMOSRegA = _PM_readCMOS(0x0A);
+ _PM_oldCMOSRegB = _PM_readCMOS(0x0B);
+
+ /* Set the real time clock interrupt handler */
+ getISR(0x70, &_PM_prevRTC, &_PM_prevRealRTC);
+ _PM_rtcHandler = th;
+ setISR(0x70, _PM_rtcISR);
+
+ /* Program the real time clock default frequency */
+ PM_setRealTimeClockFrequency(frequency);
+
+ /* Unmask IRQ8 in the PIC2 */
+ _PM_oldRTCPIC2 = PM_inpb(0xA1);
+ PM_outpb(0xA1,_PM_oldRTCPIC2 & 0xFE);
+ return true;
+}
+
+void PMAPI PM_restoreRealTimeClockHandler(void)
+{
+ if (_PM_rtcHandler) {
+ /* Restore CMOS registers and mask RTC clock */
+ _PM_writeCMOS(0x0A,_PM_oldCMOSRegA);
+ _PM_writeCMOS(0x0B,_PM_oldCMOSRegB);
+ PM_outpb(0xA1,(PM_inpb(0xA1) & 0xFE) | (_PM_oldRTCPIC2 & ~0xFE));
+
+ /* Restore the interrupt vector */
+ restoreISR(0x70, _PM_prevRTC, _PM_prevRealRTC);
+ _PM_rtcHandler = NULL;
+ }
+}
+
+PM_IRQHandle PMAPI PM_setIRQHandler(
+ int IRQ,
+ PM_irqHandler ih)
+{
+ int thunkSize,PICmask,chainPrevious;
+ ulong offsetAdjust;
+ _PM_IRQHandle *handle;
+
+ thunkSize = (ulong)_PM_irqISRTemplateEnd - (ulong)_PM_irqISRTemplate;
+ if ((handle = PM_malloc(sizeof(_PM_IRQHandle) + thunkSize)) == NULL)
+ return NULL;
+ handle->IRQ = IRQ;
+ handle->prevPIC = PM_inpb(0x21);
+ handle->prevPIC2 = PM_inpb(0xA1);
+ if (IRQ < 8) {
+ handle->IRQVect = (IRQ + 8);
+ PICmask = (1 << IRQ);
+ chainPrevious = ((handle->prevPIC & PICmask) == 0);
+ }
+ else {
+ handle->IRQVect = (0x60 + IRQ + 8);
+ PICmask = ((1 << IRQ) | 0x4);
+ chainPrevious = ((handle->prevPIC2 & (PICmask >> 8)) == 0);
+ }
+
+ /* Copy and setup the assembler thunk */
+ offsetAdjust = (ulong)handle->thunk - (ulong)_PM_irqISRTemplate;
+ memcpy(handle->thunk,_PM_irqISRTemplate,thunkSize);
+ *((ulong*)&handle->thunk[2]) = offsetAdjust;
+ *((ulong*)&handle->thunk[11+0]) = (ulong)ih;
+ if (chainPrevious) {
+ *((ulong*)&handle->thunk[11+4]) = handle->prevHandler.off;
+ *((ulong*)&handle->thunk[11+8]) = handle->prevHandler.sel;
+ }
+ else {
+ *((ulong*)&handle->thunk[11+4]) = 0;
+ *((ulong*)&handle->thunk[11+8]) = 0;
+ }
+ *((ulong*)&handle->thunk[11+12]) = IRQ;
+
+ /* Set the real time clock interrupt handler */
+ getISR(handle->IRQVect, &handle->prevHandler, &handle->prevRealhandler);
+ setISR(handle->IRQVect, (PM_intHandler)handle->thunk);
+
+ /* Unmask the IRQ in the PIC */
+ PM_outpb(0xA1,handle->prevPIC2 & ~(PICmask >> 8));
+ PM_outpb(0x21,handle->prevPIC & ~PICmask);
+ return handle;
+}
+
+void PMAPI PM_restoreIRQHandler(
+ PM_IRQHandle irqHandle)
+{
+ int PICmask;
+ _PM_IRQHandle *handle = irqHandle;
+
+ /* Restore PIC mask for the interrupt */
+ if (handle->IRQ < 8)
+ PICmask = (1 << handle->IRQ);
+ else
+ PICmask = ((1 << handle->IRQ) | 0x4);
+ PM_outpb(0xA1,(PM_inpb(0xA1) & ~(PICmask >> 8)) | (handle->prevPIC2 & (PICmask >> 8)));
+ PM_outpb(0x21,(PM_inpb(0x21) & ~PICmask) | (handle->prevPIC & PICmask));
+
+ /* Restore the interrupt vector */
+ restoreISR(handle->IRQVect, handle->prevHandler, handle->prevRealhandler);
+
+ /* Finally free the thunk */
+ PM_free(handle);
+}
+
+void PMAPI PM_setKeyHandler(PM_intHandler kh)
+{
+ getISR(0x9, &_PM_prevKey, &_PM_prevRealKey);
+ _PM_keyHandler = kh;
+ setISR(0x9, _PM_keyISR);
+}
+
+void PMAPI PM_restoreKeyHandler(void)
+{
+ if (_PM_keyHandler) {
+ restoreISR(0x9, _PM_prevKey, _PM_prevRealKey);
+ _PM_keyHandler = NULL;
+ }
+}
+
+void PMAPI PM_setKey15Handler(PM_key15Handler kh)
+{
+ getISR(0x15, &_PM_prevKey15, &_PM_prevRealKey15);
+ _PM_key15Handler = kh;
+ setISR(0x15, _PM_key15ISR);
+}
+
+void PMAPI PM_restoreKey15Handler(void)
+{
+ if (_PM_key15Handler) {
+ restoreISR(0x15, _PM_prevKey15, _PM_prevRealKey15);
+ _PM_key15Handler = NULL;
+ }
+}
+
+/* Real mode Ctrl-C and Ctrl-Break handler. This handler simply sets a
+ * flag in the real mode code segment and exit. We save the location
+ * of this flag in real mode memory so that both the real mode and
+ * protected mode code will be modifying the same flags.
+ */
+
+#ifndef DOS4GW
+static uchar ctrlHandler[] = {
+ 0x00,0x00,0x00,0x00, /* ctrlBFlag */
+ 0x66,0x2E,0xC7,0x06,0x00,0x00,
+ 0x01,0x00,0x00,0x00, /* mov [cs:ctrlBFlag],1 */
+ 0xCF, /* iretf */
+ };
+#endif
+
+void PMAPI PM_installAltBreakHandler(PM_breakHandler bh)
+{
+#ifndef DOS4GW
+ uint rseg,roff;
+#else
+ static int ctrlCFlag,ctrlBFlag;
+
+ _PM_ctrlCPtr = (uchar*)&ctrlCFlag;
+ _PM_ctrlBPtr = (uchar*)&ctrlBFlag;
+#endif
+
+ getISR(0x1B, &_PM_prevBreak, &prevRealBreak);
+ getISR(0x23, &_PM_prevCtrlC, &prevRealCtrlC);
+ _PM_breakHandler = bh;
+ setISR(0x1B, _PM_breakISR);
+ setISR(0x23, _PM_ctrlCISR);
+
+#ifndef DOS4GW
+ /* Hook the real mode vectors for these handlers, as these are not
+ * normally reflected by the DPMI server up to protected mode
+ */
+ _PM_ctrlBPtr = PM_allocRealSeg(sizeof(ctrlHandler)*2, &rseg, &roff);
+ memcpy(_PM_ctrlBPtr,ctrlHandler,sizeof(ctrlHandler));
+ memcpy(_PM_ctrlBPtr+sizeof(ctrlHandler),ctrlHandler,sizeof(ctrlHandler));
+ _PM_ctrlCPtr = _PM_ctrlBPtr + sizeof(ctrlHandler);
+ _PM_setRMvect(0x1B,((long)rseg << 16) | (roff+4));
+ _PM_setRMvect(0x23,((long)rseg << 16) | (roff+sizeof(ctrlHandler)+4));
+#endif
+}
+
+void PMAPI PM_installBreakHandler(void)
+{
+ PM_installAltBreakHandler(NULL);
+}
+
+void PMAPI PM_restoreBreakHandler(void)
+{
+ if (_PM_prevBreak.sel) {
+ restoreISR(0x1B, _PM_prevBreak, prevRealBreak);
+ restoreISR(0x23, _PM_prevCtrlC, prevRealCtrlC);
+ _PM_prevBreak.sel = 0;
+ _PM_breakHandler = NULL;
+#ifndef DOS4GW
+ PM_freeRealSeg(_PM_ctrlBPtr);
+#endif
+ }
+}
+
+/* Real mode Critical Error handler. This handler simply saves the AX and
+ * DI values in the real mode code segment and exits. We save the location
+ * of this flag in real mode memory so that both the real mode and
+ * protected mode code will be modifying the same flags.
+ */
+
+#ifndef DOS4GW
+static uchar criticalHandler[] = {
+ 0x00,0x00, /* axCode */
+ 0x00,0x00, /* diCode */
+ 0x2E,0xA3,0x00,0x00, /* mov [cs:axCode],ax */
+ 0x2E,0x89,0x3E,0x02,0x00, /* mov [cs:diCode],di */
+ 0xB8,0x03,0x00, /* mov ax,3 */
+ 0xCF, /* iretf */
+ };
+#endif
+
+void PMAPI PM_installAltCriticalHandler(PM_criticalHandler ch)
+{
+#ifndef DOS4GW
+ uint rseg,roff;
+#else
+ static short critBuf[2];
+
+ _PM_critPtr = (uchar*)critBuf;
+#endif
+
+ getISR(0x24, &_PM_prevCritical, &prevRealCritical);
+ _PM_critHandler = ch;
+ setISR(0x24, _PM_criticalISR);
+
+#ifndef DOS4GW
+ /* Hook the real mode vector, as this is not normally reflected by the
+ * DPMI server up to protected mode.
+ */
+ _PM_critPtr = PM_allocRealSeg(sizeof(criticalHandler)*2, &rseg, &roff);
+ memcpy(_PM_critPtr,criticalHandler,sizeof(criticalHandler));
+ _PM_setRMvect(0x24,((long)rseg << 16) | (roff+4));
+#endif
+}
+
+void PMAPI PM_installCriticalHandler(void)
+{
+ PM_installAltCriticalHandler(NULL);
+}
+
+void PMAPI PM_restoreCriticalHandler(void)
+{
+ if (_PM_prevCritical.sel) {
+ restoreISR(0x24, _PM_prevCritical, prevRealCritical);
+ PM_freeRealSeg(_PM_critPtr);
+ _PM_prevCritical.sel = 0;
+ _PM_critHandler = NULL;
+ }
+}
+
+int PMAPI PM_lockDataPages(void *p,uint len,PM_lockHandle *lh)
+{
+ PMSREGS sregs;
+ PM_segread(&sregs);
+ return DPMI_lockLinearPages((uint)p + DPMI_getSelectorBase(sregs.ds),len);
+}
+
+int PMAPI PM_unlockDataPages(void *p,uint len,PM_lockHandle *lh)
+{
+ PMSREGS sregs;
+ PM_segread(&sregs);
+ return DPMI_unlockLinearPages((uint)p + DPMI_getSelectorBase(sregs.ds),len);
+}
+
+int PMAPI PM_lockCodePages(void (*p)(),uint len,PM_lockHandle *lh)
+{
+ PMSREGS sregs;
+ PM_segread(&sregs);
+ return DPMI_lockLinearPages((uint)p + DPMI_getSelectorBase(sregs.cs),len);
+}
+
+int PMAPI PM_unlockCodePages(void (*p)(),uint len,PM_lockHandle *lh)
+{
+ PMSREGS sregs;
+ PM_segread(&sregs);
+ return DPMI_unlockLinearPages((uint)p + DPMI_getSelectorBase(sregs.cs),len);
+}
+
+#endif
diff --git a/board/MAI/bios_emulator/scitech/src/pm/dos/vflat.c b/board/MAI/bios_emulator/scitech/src/pm/dos/vflat.c
new file mode 100644
index 00000000000..2e78e25a8b5
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/pm/dos/vflat.c
@@ -0,0 +1,251 @@
+/****************************************************************************
+*
+* SciTech OS Portability Manager Library
+*
+* ========================================================================
+*
+* The contents of this file are subject to the SciTech MGL Public
+* License Version 1.0 (the "License"); you may not use this file
+* except in compliance with the License. You may obtain a copy of
+* the License at http://www.scitechsoft.com/mgl-license.txt
+*
+* Software distributed under the License is distributed on an
+* "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+* implied. See the License for the specific language governing
+* rights and limitations under the License.
+*
+* The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+*
+* The Initial Developer of the Original Code is SciTech Software, Inc.
+* All Rights Reserved.
+*
+* ========================================================================
+*
+* Language: ANSI C
+* Environment: 32-bit DOS
+*
+* Description: Main C module for the VFlat framebuffer routines. The page
+* fault handler is always installed to handle up to a 4Mb
+* framebuffer with a window size of 4Kb or 64Kb in size.
+*
+****************************************************************************/
+
+#include "pmapi.h"
+#include <stdlib.h>
+#include <dos.h>
+
+/*-------------------------------------------------------------------------*/
+/* DOS4G/W, PMODE/W and CauseWay support. */
+/*-------------------------------------------------------------------------*/
+
+#if defined(DOS4GW)
+
+#define VFLAT_START_ADDR 0xF0000000U
+#define VFLAT_END_ADDR 0xF03FFFFFU
+#define VFLAT_LIMIT (VFLAT_END_ADDR - VFLAT_START_ADDR)
+#define PAGE_PRESENT 1
+#define PAGE_NOTPRESENT 0
+#define PAGE_READ 0
+#define PAGE_WRITE 2
+
+PRIVATE ibool installed = false;
+PRIVATE ibool haveDPMI = false;
+PUBLIC ibool _ASMAPI VF_haveCauseWay = false;
+PUBLIC uchar * _ASMAPI VF_zeroPtr = NULL;
+
+/* Low level assembler code */
+
+int _ASMAPI InitPaging(void);
+void _ASMAPI ClosePaging(void);
+void _ASMAPI MapPhysical2Linear(ulong pAddr, ulong lAddr, int pages, int flags);
+void _ASMAPI InstallFaultHandler(ulong baseAddr,int bankSize);
+void _ASMAPI RemoveFaultHandler(void);
+void _ASMAPI InstallBankFunc(int codeLen,void *bankFunc);
+
+void * _ASMAPI VF_malloc(uint size)
+{ return PM_malloc(size); }
+
+void _ASMAPI VF_free(void *p)
+{ PM_free(p); }
+
+PRIVATE ibool CheckDPMI(void)
+/****************************************************************************
+*
+* Function: CheckDPMI
+* Returns: True if we are running under DPMI
+*
+****************************************************************************/
+{
+ PMREGS regs;
+
+ if (haveDPMI)
+ return true;
+
+ /* Check if we are running under DPMI in which case we will not be
+ * able to install our page fault handlers. We can however use the
+ * DVA.386 or VFLATD.386 virtual device drivers if they are present.
+ */
+ regs.x.ax = 0xFF00;
+ PM_int386(0x31,®s,®s);
+ if (!regs.x.cflag && (regs.e.edi & 8))
+ return (haveDPMI = true);
+ return false;
+}
+
+ibool PMAPI VF_available(void)
+/****************************************************************************
+*
+* Function: VF_available
+* Returns: True if virtual buffer is available, false if not.
+*
+****************************************************************************/
+{
+ if (!VF_zeroPtr)
+ VF_zeroPtr = PM_mapPhysicalAddr(0,0xFFFFFFFF,true);
+ if (CheckDPMI())
+ return false;
+
+ /* Standard DOS4GW, PMODE/W and Causeway */
+ if (InitPaging() == -1)
+ return false;
+ ClosePaging();
+ return true;
+}
+
+void * PMAPI InitDPMI(ulong baseAddr,int bankSize,int codeLen,void *bankFunc)
+/****************************************************************************
+*
+* Function: InitDOS4GW
+* Parameters: baseAddr - Base address of framebuffer bank window
+* bankSize - Physical size of banks in Kb (4 or 64)
+* codeLen - Length of 32 bit bank switch function
+* bankFunc - Pointer to protected mode bank function
+* Returns: Near pointer to virtual framebuffer, or NULL on failure.
+*
+* Description: Installs the virtual linear framebuffer handling for
+* DPMI environments. This requires the DVA.386 or VFLATD.386
+* virtual device drivers to be installed and functioning.
+*
+****************************************************************************/
+{
+ (void)baseAddr;
+ (void)bankSize;
+ (void)codeLen;
+ (void)bankFunc;
+ return NULL;
+}
+
+void * PMAPI InitDOS4GW(ulong baseAddr,int bankSize,int codeLen,void *bankFunc)
+/****************************************************************************
+*
+* Function: InitDOS4GW
+* Parameters: baseAddr - Base address of framebuffer bank window
+* bankSize - Physical size of banks in Kb (4 or 64)
+* codeLen - Length of 32 bit bank switch function
+* bankFunc - Pointer to protected mode bank function
+* Returns: Near pointer to virtual framebuffer, or NULL on failure.
+*
+* Description: Installs the virtual linear framebuffer handling for
+* the DOS4GW extender.
+*
+****************************************************************************/
+{
+ int i;
+
+ if (InitPaging() == -1)
+ return NULL; /* Cannot do hardware paging! */
+
+ /* Map 4MB of video memory into linear address space (read/write) */
+ if (bankSize == 64) {
+ for (i = 0; i < 64; i++) {
+ MapPhysical2Linear(baseAddr,VFLAT_START_ADDR+(i<<16),16,
+ PAGE_WRITE | PAGE_NOTPRESENT);
+ }
+ }
+ else {
+ for (i = 0; i < 1024; i++) {
+ MapPhysical2Linear(baseAddr,VFLAT_START_ADDR+(i<<12),1,
+ PAGE_WRITE | PAGE_NOTPRESENT);
+ }
+ }
+
+ /* Install our page fault handler and banks switch function */
+ InstallFaultHandler(baseAddr,bankSize);
+ InstallBankFunc(codeLen,bankFunc);
+ installed = true;
+ return (void*)VFLAT_START_ADDR;
+}
+
+void * PMAPI VF_init(ulong baseAddr,int bankSize,int codeLen,void *bankFunc)
+/****************************************************************************
+*
+* Function: VF_init
+* Parameters: baseAddr - Base address of framebuffer bank window
+* bankSize - Physical size of banks in Kb (4 or 64)
+* codeLen - Length of 32 bit bank switch function
+* bankFunc - Pointer to protected mode bank function
+* Returns: Near pointer to virtual framebuffer, or NULL on failure.
+*
+* Description: Installs the virtual linear framebuffer handling.
+*
+****************************************************************************/
+{
+ if (installed)
+ return (void*)VFLAT_START_ADDR;
+ if (codeLen > 100)
+ return NULL; /* Bank function is too large! */
+ if (!VF_zeroPtr)
+ VF_zeroPtr = PM_mapPhysicalAddr(0,0xFFFFFFFF,true);
+ if (CheckDPMI())
+ return InitDPMI(baseAddr,bankSize,codeLen,bankFunc);
+ return InitDOS4GW(baseAddr,bankSize,codeLen,bankFunc);
+}
+
+void PMAPI VF_exit(void)
+/****************************************************************************
+*
+* Function: VF_exit
+*
+* Description: Closes down the virtual framebuffer services and
+* restores the previous page fault handler.
+*
+****************************************************************************/
+{
+ if (installed) {
+ if (haveDPMI) {
+ /* DPMI support */
+ }
+ else {
+ /* Standard DOS4GW and PMODE/W support */
+ RemoveFaultHandler();
+ ClosePaging();
+ }
+ installed = false;
+ }
+}
+
+/*-------------------------------------------------------------------------*/
+/* Support mapped out for other compilers. */
+/*-------------------------------------------------------------------------*/
+
+#else
+
+ibool PMAPI VF_available(void)
+{
+ return false;
+}
+
+void * PMAPI VF_init(ulong baseAddr,int bankSize,int codeLen,void *bankFunc)
+{
+ (void)baseAddr;
+ (void)bankSize;
+ (void)codeLen;
+ (void)bankFunc;
+ return NULL;
+}
+
+void PMAPI VF_exit(void)
+{
+}
+
+#endif
diff --git a/board/MAI/bios_emulator/scitech/src/pm/dos/ztimer.c b/board/MAI/bios_emulator/scitech/src/pm/dos/ztimer.c
new file mode 100644
index 00000000000..960ed06cd74
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/pm/dos/ztimer.c
@@ -0,0 +1,111 @@
+/****************************************************************************
+*
+* Ultra Long Period Timer
+*
+* ========================================================================
+*
+* The contents of this file are subject to the SciTech MGL Public
+* License Version 1.0 (the "License"); you may not use this file
+* except in compliance with the License. You may obtain a copy of
+* the License at http://www.scitechsoft.com/mgl-license.txt
+*
+* Software distributed under the License is distributed on an
+* "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+* implied. See the License for the specific language governing
+* rights and limitations under the License.
+*
+* The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+*
+* The Initial Developer of the Original Code is SciTech Software, Inc.
+* All Rights Reserved.
+*
+* ========================================================================
+*
+* Language: ANSI C
+* Environment: MSDOS
+*
+* Description: OS specific implementation for the Zen Timer functions.
+*
+****************************************************************************/
+
+
+/*---------------------------- Global variables ---------------------------*/
+
+uchar * _VARAPI _ZTimerBIOSPtr;
+
+/*----------------------------- Implementation ----------------------------*/
+
+/* External assembler functions */
+
+void _ASMAPI LZ_timerOn(void);
+ulong _ASMAPI LZ_timerLap(void);
+void _ASMAPI LZ_timerOff(void);
+ulong _ASMAPI LZ_timerCount(void);
+void _ASMAPI LZ_disable(void);
+void _ASMAPI LZ_enable(void);
+
+/****************************************************************************
+REMARKS:
+Initialise the Zen Timer module internals.
+****************************************************************************/
+void __ZTimerInit(void)
+{
+ _ZTimerBIOSPtr = PM_getBIOSPointer();
+}
+
+/****************************************************************************
+REMARKS:
+Call the assembler Zen Timer functions to do the timing.
+****************************************************************************/
+#define __LZTimerOn(tm) LZ_timerOn()
+
+/****************************************************************************
+REMARKS:
+Call the assembler Zen Timer functions to do the timing.
+****************************************************************************/
+#define __LZTimerLap(tm) LZ_timerLap()
+
+/****************************************************************************
+REMARKS:
+Call the assembler Zen Timer functions to do the timing.
+****************************************************************************/
+#define __LZTimerOff(tm) LZ_timerOff()
+
+/****************************************************************************
+REMARKS:
+Call the assembler Zen Timer functions to do the timing.
+****************************************************************************/
+#define __LZTimerCount(tm) LZ_timerCount()
+
+/****************************************************************************
+REMARKS:
+Define the resolution of the long period timer as microseconds per timer tick.
+****************************************************************************/
+#define ULZTIMER_RESOLUTION 54925
+
+/****************************************************************************
+REMARKS:
+Read the Long Period timer value from the BIOS timer tick.
+****************************************************************************/
+static ulong __ULZReadTime(void)
+{
+ ulong ticks;
+ LZ_disable(); /* Turn of interrupts */
+ ticks = PM_getLong(_ZTimerBIOSPtr+0x6C);
+ LZ_enable(); /* Turn on interrupts again */
+ return ticks;
+}
+
+/****************************************************************************
+REMARKS:
+Compute the elapsed time from the BIOS timer tick. Note that we check to see
+whether a midnight boundary has passed, and if so adjust the finish time to
+account for this. We cannot detect if more that one midnight boundary has
+passed, so if this happens we will be generating erronous results.
+****************************************************************************/
+ulong __ULZElapsedTime(ulong start,ulong finish)
+{
+ if (finish < start)
+ finish += 1573040L; /* Number of ticks in 24 hours */
+ return finish - start;
+}
diff --git a/board/MAI/bios_emulator/scitech/src/pm/event.c b/board/MAI/bios_emulator/scitech/src/pm/event.c
new file mode 100644
index 00000000000..b284c68cfb0
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/pm/event.c
@@ -0,0 +1,1115 @@
+/****************************************************************************
+*
+* SciTech OS Portability Manager Library
+*
+* ========================================================================
+*
+* The contents of this file are subject to the SciTech MGL Public
+* License Version 1.0 (the "License"); you may not use this file
+* except in compliance with the License. You may obtain a copy of
+* the License at http://www.scitechsoft.com/mgl-license.txt
+*
+* Software distributed under the License is distributed on an
+* "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+* implied. See the License for the specific language governing
+* rights and limitations under the License.
+*
+* The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+*
+* The Initial Developer of the Original Code is SciTech Software, Inc.
+* All Rights Reserved.
+*
+* ========================================================================
+*
+* Language: ANSI C
+* Environment: Any
+*
+* Description: Main implementation for the SciTech cross platform event
+* library. This module contains all the generic cross platform
+* code, and pulls in modules specific to each target OS
+* environment.
+*
+****************************************************************************/
+
+#include "event.h"
+#include "pmapi.h"
+#include <time.h>
+#include <signal.h>
+#include <stdio.h>
+#include <stdlib.h>
+#include <string.h>
+#include "oshdr.h"
+
+/*--------------------------- Global variables ----------------------------*/
+
+#define EVENTQSIZE 100 /* Number of events in event queue */
+#define JOY_NUM_AXES 4 /* Number of joystick axes supported */
+
+static struct {
+ int mx,my; /* Current mouse position */
+ int head; /* Head of event queue */
+ int tail; /* Tail of event queue */
+ int freeHead; /* Head of free list */
+ int count; /* No. of items currently in queue */
+ event_t evtq[EVENTQSIZE]; /* The queue structure itself */
+ int oldMove; /* Previous movement event */
+ int oldKey; /* Previous key repeat event */
+ int oldJoyMove; /* Previous joystick movement event */
+ int joyMask; /* Mask of joystick axes present */
+ int joyMin[JOY_NUM_AXES];
+ int joyCenter[JOY_NUM_AXES];
+ int joyMax[JOY_NUM_AXES];
+ int joyPrev[JOY_NUM_AXES];
+ int joyButState;
+ ulong doubleClick;
+ ulong autoRepeat;
+ ulong autoDelay;
+ ulong autoTicks;
+ ulong doubleClickThresh;
+ ulong firstAuto;
+ int autoMouse_x;
+ int autoMouse_y;
+ event_t downMouse;
+ ulong keyModifiers; /* Current keyboard modifiers */
+ uchar keyTable[128]; /* Table of key up/down flags */
+ ibool allowLEDS; /* True if LEDS should change */
+ _EVT_userEventFilter userEventCallback;
+ _EVT_mouseMoveHandler mouseMove;
+ _EVT_heartBeatCallback heartBeat;
+ void *heartBeatParams;
+ codepage_t *codePage;
+ } EVT;
+
+/*---------------------------- Implementation -----------------------------*/
+
+#if defined(__REALDOS__) || defined(__SMX32__)
+/* {secret} */
+void EVTAPI _EVT_cCodeStart(void) {}
+#endif
+
+/* External assembler functions */
+
+int EVTAPI _EVT_readJoyAxis(int mask,int *axis);
+int EVTAPI _EVT_readJoyButtons(void);
+
+/* Forward declaration */
+
+ulong _EVT_getTicks(void);
+
+/****************************************************************************
+PARAMETERS:
+evt - Event to add to the event queue
+
+REMARKS:
+Adds an event to the event queue by tacking it onto the tail of the event
+queue. This routine assumes that at least one spot is available on the
+freeList for the event to be inserted.
+
+NOTE: Interrupts MUST be OFF while this routine is called to ensure we have
+ mutually exclusive access to our internal data structures for
+ interrupt driven systems (like under DOS).
+****************************************************************************/
+static void addEvent(
+ event_t *evt)
+{
+ int evtID;
+
+ /* Check for mouse double click events */
+ if (evt->what & EVT_MOUSEEVT) {
+ EVT.autoMouse_x = evt->where_x;
+ EVT.autoMouse_y = evt->where_y;
+ if ((evt->what & EVT_MOUSEDOWN) && !(evt->message & EVT_DBLCLICK)) {
+ /* Determine if the last mouse event was a double click event */
+ uint diff_x = ABS(evt->where_x - EVT.downMouse.where_x);
+ uint diff_y = ABS(evt->where_y - EVT.downMouse.where_y);
+ if ((evt->message == EVT.downMouse.message)
+ && ((evt->when - EVT.downMouse.when) <= EVT.doubleClick)
+ && (diff_x <= EVT.doubleClickThresh)
+ && (diff_y <= EVT.doubleClickThresh)) {
+ evt->message |= EVT_DBLCLICK;
+ EVT.downMouse = *evt;
+ EVT.downMouse.when = 0;
+ }
+ else
+ EVT.downMouse = *evt;
+ EVT.autoTicks = _EVT_getTicks();
+ }
+ else if (evt->what & EVT_MOUSEUP) {
+ EVT.downMouse.what = EVT_NULLEVT;
+ EVT.firstAuto = true;
+ }
+ }
+
+ /* Call user supplied callback to modify the event if desired */
+ if (EVT.userEventCallback) {
+ if (!EVT.userEventCallback(evt))
+ return;
+ }
+
+ /* Get spot to place the event from the free list */
+ evtID = EVT.freeHead;
+ EVT.freeHead = EVT.evtq[EVT.freeHead].next;
+
+ /* Add to the EVT.tail of the event queue */
+ evt->next = -1;
+ evt->prev = EVT.tail;
+ if (EVT.tail != -1)
+ EVT.evtq[EVT.tail].next = evtID;
+ else
+ EVT.head = evtID;
+ EVT.tail = evtID;
+ EVT.evtq[evtID] = *evt;
+ EVT.count++;
+}
+
+/****************************************************************************
+REMARKS:
+Internal function to initialise the event queue to the empty state.
+****************************************************************************/
+static void initEventQueue(void)
+{
+ int i;
+
+ /* Build free list, and initialize global data structures */
+ for (i = 0; i < EVENTQSIZE; i++)
+ EVT.evtq[i].next = i+1;
+ EVT.evtq[EVENTQSIZE-1].next = -1; /* Terminate list */
+ EVT.count = EVT.freeHead = 0;
+ EVT.head = EVT.tail = -1;
+ EVT.oldMove = -1;
+ EVT.oldKey = -1;
+ EVT.oldJoyMove = -1;
+ EVT.joyButState = 0;
+ EVT.mx = EVT.my = 0;
+ EVT.keyModifiers = 0;
+ EVT.allowLEDS = true;
+
+ /* Set default values for mouse double click and mouse auto events */
+ EVT.doubleClick = 440;
+ EVT.autoRepeat = 55;
+ EVT.autoDelay = 330;
+ EVT.autoTicks = 0;
+ EVT.doubleClickThresh = 5;
+ EVT.firstAuto = true;
+ EVT.autoMouse_x = EVT.autoMouse_y = 0;
+ memset(&EVT.downMouse,0,sizeof(EVT.downMouse));
+
+ /* Setup default pointers for event library */
+ EVT.userEventCallback = NULL;
+ EVT.codePage = &_CP_US_English;
+
+ /* Initialise the joystick module and do basic calibration (which assumes
+ * the joystick is centered.
+ */
+ EVT.joyMask = EVT_joyIsPresent();
+}
+
+#if defined(NEED_SCALE_JOY_AXIS) || !defined(USE_OS_JOYSTICK)
+/****************************************************************************
+REMARKS:
+This function scales a joystick axis value to normalised form.
+****************************************************************************/
+static int scaleJoyAxis(
+ int raw,
+ int axis)
+{
+ int scaled,range;
+
+ /* Make sure the joystick is calibrated properly */
+ if (EVT.joyCenter[axis] - EVT.joyMin[axis] < 5)
+ return raw;
+ if (EVT.joyMax[axis] - EVT.joyCenter[axis] < 5)
+ return raw;
+
+ /* Now scale the coordinates to -128 to 127 */
+ raw -= EVT.joyCenter[axis];
+ if (raw < 0)
+ range = EVT.joyCenter[axis]-EVT.joyMin[axis];
+ else
+ range = EVT.joyMax[axis]-EVT.joyCenter[axis];
+ scaled = (raw * 128) / range;
+ if (scaled < -128)
+ scaled = -128;
+ if (scaled > 127)
+ scaled = 127;
+ return scaled;
+}
+#endif
+
+#if defined(__SMX32__)
+#include "smx/event.c"
+#elif defined(__RTTARGET__)
+#include "rttarget/event.c"
+#elif defined(__REALDOS__)
+#include "dos/event.c"
+#elif defined(__WINDOWS32__)
+#include "win32/event.c"
+#elif defined(__OS2__)
+#if defined(__OS2_PM__)
+#include "os2pm/event.c"
+#else
+#include "os2/event.c"
+#endif
+#elif defined(__LINUX__)
+#if defined(__USE_X11__)
+#include "x11/event.c"
+#else
+#include "linux/event.c"
+#endif
+#elif defined(__QNX__)
+#if defined(__USE_PHOTON__)
+#include "photon/event.c"
+#elif defined(__USE_X11__)
+#include "x11/event.c"
+#else
+#include "qnx/event.c"
+#endif
+#elif defined(__BEOS__)
+#include "beos/event.c"
+#else
+#error Event library not ported to this platform yet!
+#endif
+
+/*------------------------ Public interface routines ----------------------*/
+
+/* If USE_OS_JOYSTICK is defined, the OS specific libraries will implement
+ * the joystick code rather than using the generic OS portable version.
+ */
+
+#ifndef USE_OS_JOYSTICK
+/****************************************************************************
+DESCRIPTION:
+Returns the mask indicating what joystick axes are attached.
+
+HEADER:
+event.h
+
+REMARKS:
+This function is used to detect the attached joysticks, and determine
+what axes are present and functioning. This function will re-detect any
+attached joysticks when it is called, so if the user forgot to attach
+the joystick when the application started, you can call this function to
+re-detect any newly attached joysticks.
+
+SEE ALSO:
+EVT_joySetLowerRight, EVT_joySetCenter, EVT_joyIsPresent
+****************************************************************************/
+int EVTAPI EVT_joyIsPresent(void)
+{
+ int mask,i;
+
+ memset(EVT.joyMin,0,sizeof(EVT.joyMin));
+ memset(EVT.joyCenter,0,sizeof(EVT.joyCenter));
+ memset(EVT.joyMax,0,sizeof(EVT.joyMax));
+ memset(EVT.joyPrev,0,sizeof(EVT.joyPrev));
+ EVT.joyButState = 0;
+#ifdef __LINUX__
+ PM_init();
+#endif
+ mask = _EVT_readJoyAxis(EVT_JOY_AXIS_ALL,EVT.joyCenter);
+ if (mask) {
+ for (i = 0; i < JOY_NUM_AXES; i++)
+ EVT.joyMax[i] = EVT.joyCenter[i]*2;
+ }
+ return mask;
+}
+
+/****************************************************************************
+DESCRIPTION:
+Polls the joystick for position and button information.
+
+HEADER:
+event.h
+
+REMARKS:
+This routine is used to poll analogue joysticks for button and position
+information. It should be called once for each main loop of the user
+application, just before processing all pending events via EVT_getNext.
+All information polled from the joystick will be posted to the event
+queue for later retrieval.
+
+Note: Most analogue joysticks will provide readings that change even
+ though the joystick has not moved. Hence if you call this routine
+ you will likely get an EVT_JOYMOVE event every time through your
+ event loop.
+
+SEE ALSO:
+EVT_getNext, EVT_peekNext, EVT_joySetUpperLeft, EVT_joySetLowerRight,
+EVT_joySetCenter, EVT_joyIsPresent
+****************************************************************************/
+void EVTAPI EVT_pollJoystick(void)
+{
+ event_t evt;
+ int i,axis[JOY_NUM_AXES],newButState,mask,moved,ps;
+
+ if (EVT.joyMask) {
+ /* Read joystick axes and post movement events if they have
+ * changed since the last time we polled. Until the events are
+ * actually flushed, we keep modifying the same joystick movement
+ * event, so you won't get multiple movement event
+ */
+ mask = _EVT_readJoyAxis(EVT.joyMask,axis);
+ newButState = _EVT_readJoyButtons();
+ moved = false;
+ for (i = 0; i < JOY_NUM_AXES; i++) {
+ if (mask & (EVT_JOY_AXIS_X1 << i))
+ axis[i] = scaleJoyAxis(axis[i],i);
+ else
+ axis[i] = EVT.joyPrev[i];
+ if (axis[i] != EVT.joyPrev[i])
+ moved = true;
+ }
+ if (moved) {
+ memcpy(EVT.joyPrev,axis,sizeof(EVT.joyPrev));
+ ps = _EVT_disableInt();
+ if (EVT.oldJoyMove != -1) {
+ /* Modify the existing joystick movement event */
+ EVT.evtq[EVT.oldJoyMove].message = newButState;
+ EVT.evtq[EVT.oldJoyMove].where_x = EVT.joyPrev[0];
+ EVT.evtq[EVT.oldJoyMove].where_y = EVT.joyPrev[1];
+ EVT.evtq[EVT.oldJoyMove].relative_x = EVT.joyPrev[2];
+ EVT.evtq[EVT.oldJoyMove].relative_y = EVT.joyPrev[3];
+ }
+ else if (EVT.count < EVENTQSIZE) {
+ /* Add a new joystick movement event */
+ EVT.oldJoyMove = EVT.freeHead;
+ memset(&evt,0,sizeof(evt));
+ evt.what = EVT_JOYMOVE;
+ evt.message = EVT.joyButState;
+ evt.where_x = EVT.joyPrev[0];
+ evt.where_y = EVT.joyPrev[1];
+ evt.relative_x = EVT.joyPrev[2];
+ evt.relative_y = EVT.joyPrev[3];
+ addEvent(&evt);
+ }
+ _EVT_restoreInt(ps);
+ }
+
+ /* Read the joystick buttons, and post events to reflect the change
+ * in state for the joystick buttons.
+ */
+ if (newButState != EVT.joyButState) {
+ if (EVT.count < EVENTQSIZE) {
+ /* Add a new joystick click event */
+ ps = _EVT_disableInt();
+ memset(&evt,0,sizeof(evt));
+ evt.what = EVT_JOYCLICK;
+ evt.message = newButState;
+ EVT.evtq[EVT.oldJoyMove].where_x = EVT.joyPrev[0];
+ EVT.evtq[EVT.oldJoyMove].where_y = EVT.joyPrev[1];
+ EVT.evtq[EVT.oldJoyMove].relative_x = EVT.joyPrev[2];
+ EVT.evtq[EVT.oldJoyMove].relative_y = EVT.joyPrev[3];
+ addEvent(&evt);
+ _EVT_restoreInt(ps);
+ }
+ EVT.joyButState = newButState;
+ }
+ }
+}
+
+/****************************************************************************
+DESCRIPTION:
+Calibrates the joystick upper left position
+
+HEADER:
+event.h
+
+REMARKS:
+This function can be used to zero in on better joystick calibration factors,
+which may work better than the default simplistic calibration (which assumes
+the joystick is centered when the event library is initialised).
+To use this function, ask the user to hold the stick in the upper left
+position and then have them press a key or button. and then call this
+function. This function will then read the joystick and update the
+calibration factors.
+
+Usually, assuming that the stick was centered when the event library was
+initialized, you really only need to call EVT_joySetLowerRight since the
+upper left position is usually always 0,0 on most joysticks. However, the
+safest procedure is to call all three calibration functions.
+
+SEE ALSO:
+EVT_joySetUpperLeft, EVT_joySetLowerRight, EVT_joyIsPresent
+****************************************************************************/
+void EVTAPI EVT_joySetUpperLeft(void)
+{
+ _EVT_readJoyAxis(EVT_JOY_AXIS_ALL,EVT.joyMin);
+}
+
+/****************************************************************************
+DESCRIPTION:
+Calibrates the joystick lower right position
+
+HEADER:
+event.h
+
+REMARKS:
+This function can be used to zero in on better joystick calibration factors,
+which may work better than the default simplistic calibration (which assumes
+the joystick is centered when the event library is initialised).
+To use this function, ask the user to hold the stick in the lower right
+position and then have them press a key or button. and then call this
+function. This function will then read the joystick and update the
+calibration factors.
+
+Usually, assuming that the stick was centered when the event library was
+initialized, you really only need to call EVT_joySetLowerRight since the
+upper left position is usually always 0,0 on most joysticks. However, the
+safest procedure is to call all three calibration functions.
+
+SEE ALSO:
+EVT_joySetUpperLeft, EVT_joySetCenter, EVT_joyIsPresent
+****************************************************************************/
+void EVTAPI EVT_joySetLowerRight(void)
+{
+ _EVT_readJoyAxis(EVT_JOY_AXIS_ALL,EVT.joyMax);
+}
+
+/****************************************************************************
+DESCRIPTION:
+Calibrates the joystick center position
+
+HEADER:
+event.h
+
+REMARKS:
+This function can be used to zero in on better joystick calibration factors,
+which may work better than the default simplistic calibration (which assumes
+the joystick is centered when the event library is initialised).
+To use this function, ask the user to hold the stick in the center
+position and then have them press a key or button. and then call this
+function. This function will then read the joystick and update the
+calibration factors.
+
+Usually, assuming that the stick was centered when the event library was
+initialized, you really only need to call EVT_joySetLowerRight since the
+upper left position is usually always 0,0 on most joysticks. However, the
+safest procedure is to call all three calibration functions.
+
+SEE ALSO:
+EVT_joySetUpperLeft, EVT_joySetLowerRight, EVT_joySetCenter
+****************************************************************************/
+void EVTAPI EVT_joySetCenter(void)
+{
+ _EVT_readJoyAxis(EVT_JOY_AXIS_ALL,EVT.joyCenter);
+}
+#endif
+
+/****************************************************************************
+DESCRIPTION:
+Posts a user defined event to the event queue
+
+HEADER:
+event.h
+
+RETURNS:
+True if event was posted, false if event queue is full.
+
+PARAMETERS:
+what - Type code for message to post
+message - Event specific message to post
+modifiers - Event specific modifier flags to post
+
+REMARKS:
+This routine is used to post user defined events to the event queue.
+
+SEE ALSO:
+EVT_flush, EVT_getNext, EVT_peekNext, EVT_halt
+****************************************************************************/
+ibool EVTAPI EVT_post(
+ ulong which,
+ ulong what,
+ ulong message,
+ ulong modifiers)
+{
+ event_t evt;
+ uint ps;
+
+ if (EVT.count < EVENTQSIZE) {
+ /* Save information in event record */
+ ps = _EVT_disableInt();
+ evt.which = which;
+ evt.when = _EVT_getTicks();
+ evt.what = what;
+ evt.message = message;
+ evt.modifiers = modifiers;
+ addEvent(&evt); /* Add to EVT.tail of event queue */
+ _EVT_restoreInt(ps);
+ return true;
+ }
+ else
+ return false;
+}
+
+/****************************************************************************
+DESCRIPTION:
+Flushes all events of a specified type from the event queue.
+
+PARAMETERS:
+mask - Mask specifying the types of events that should be removed
+
+HEADER:
+event.h
+
+REMARKS:
+Flushes (removes) all pending events of the specified type from the event
+queue. You may combine the masks for different event types with a simple
+logical OR.
+
+SEE ALSO:
+EVT_getNext, EVT_halt, EVT_peekNext
+****************************************************************************/
+void EVTAPI EVT_flush(
+ ulong mask)
+{
+ event_t evt;
+
+ do { /* Flush all events */
+ EVT_getNext(&evt,mask);
+ } while (evt.what != EVT_NULLEVT);
+}
+
+/****************************************************************************
+DESCRIPTION:
+Halts until and event of the specified type is recieved.
+
+HEADER:
+event.h
+
+PARAMETERS:
+evt - Pointer to
+mask - Mask specifying the types of events that should be removed
+
+REMARKS:
+This functions halts exceution until an event of the specified type is
+recieved into the event queue. It does not flush the event queue of events
+before performing the busy loop. However this function does throw away
+any events other than the ones you have requested via the event mask, to
+avoid the event queue filling up with unwanted events (like EVT_KEYUP or
+EVT_MOUSEMOVE events).
+
+SEE ALSO:
+EVT_getNext, EVT_flush, EVT_peekNext
+****************************************************************************/
+void EVTAPI EVT_halt(
+ event_t *evt,
+ ulong mask)
+{
+ do { /* Wait for an event */
+ if (mask & (EVT_JOYEVT))
+ EVT_pollJoystick();
+ EVT_getNext(evt,EVT_EVERYEVT);
+ } while (!(evt->what & mask));
+}
+
+/****************************************************************************
+DESCRIPTION:
+Peeks at the next pending event in the event queue.
+
+HEADER:
+event.h
+
+RETURNS:
+True if an event is pending, false if not.
+
+PARAMETERS:
+evt - Pointer to structure to return the event info in
+mask - Mask specifying the types of events that should be removed
+
+REMARKS:
+Peeks at the next pending event of the specified type in the event queue. The
+mask parameter is used to specify the type of events to be peeked at, and
+can be any logical combination of any of the flags defined by the
+EVT_eventType enumeration.
+
+In contrast to EVT_getNext, the event is not removed from the event queue.
+You may combine the masks for different event types with a simple logical OR.
+
+SEE ALSO:
+EVT_flush, EVT_getNext, EVT_halt
+****************************************************************************/
+ibool EVTAPI EVT_peekNext(
+ event_t *evt,
+ ulong mask)
+{
+ int evtID;
+ uint ps;
+
+ if (EVT.heartBeat)
+ EVT.heartBeat(EVT.heartBeatParams);
+ _EVT_pumpMessages(); /* Pump all messages into queue */
+ EVT.mouseMove(EVT.mx,EVT.my); /* Move the mouse cursor */
+ evt->what = EVT_NULLEVT; /* Default to null event */
+ if (EVT.count) {
+ /* It is possible that an event be posted while we are trying
+ * to access the event queue. This would create problems since
+ * we may end up with invalid data for our event queue pointers. To
+ * alleviate this, all interrupts are suspended while we manipulate
+ * our pointers.
+ */
+ ps = _EVT_disableInt(); /* disable interrupts */
+ for (evtID = EVT.head; evtID != -1; evtID = EVT.evtq[evtID].next) {
+ if (EVT.evtq[evtID].what & mask)
+ break; /* Found an event */
+ }
+ if (evtID == -1) {
+ _EVT_restoreInt(ps);
+ return false; /* Event was not found */
+ }
+ *evt = EVT.evtq[evtID]; /* Return the event */
+ _EVT_restoreInt(ps);
+ if (evt->what & EVT_KEYEVT)
+ _EVT_maskKeyCode(evt);
+ }
+ return evt->what != EVT_NULLEVT;
+}
+
+/****************************************************************************
+DESCRIPTION:
+Retrieves the next pending event from the event queue.
+
+PARAMETERS:
+evt - Pointer to structure to return the event info in
+mask - Mask specifying the types of events that should be removed
+
+HEADER:
+event.h
+
+RETURNS:
+True if an event was pending, false if not.
+
+REMARKS:
+Retrieves the next pending event from the event queue, and stores it in a
+event_t structure. The mask parameter is used to specify the type of events
+to be removed, and can be any logical combination of any of the flags defined
+by the EVT_eventType enumeration.
+
+The what field of the event contains the event code of the event that was
+extracted. All application specific events should begin with the EVT_USEREVT
+code and build from there. Since the event code is stored in an integer,
+there is a maximum of 32 different event codes that can be distinguished.
+You can store extra information about the event in the message field to
+distinguish between events of the same class (for instance the button used in
+a EVT_MOUSEDOWN event).
+
+If an event of the specified type was not in the event queue, the what field
+of the event will be set to NULLEVT, and the return value will return false.
+
+Note: You should /always/ use the EVT_EVERYEVT mask for extracting events
+ from your main event loop handler. Using a mask for only a specific
+ type of event for long periods of time will cause the event queue to
+ fill up with events of the type you are ignoring, eventually causing
+ the application to hang when the event queue becomes full.
+
+SEE ALSO:
+EVT_flush, EVT_halt, EVT_peekNext
+****************************************************************************/
+ibool EVTAPI EVT_getNext(
+ event_t *evt,
+ ulong mask)
+{
+ int evtID,next,prev;
+ uint ps;
+
+ if (EVT.heartBeat)
+ EVT.heartBeat(EVT.heartBeatParams);
+ _EVT_pumpMessages(); /* Pump all messages into queue */
+ EVT.mouseMove(EVT.mx,EVT.my); /* Move the mouse cursor */
+ evt->what = EVT_NULLEVT; /* Default to null event */
+ if (EVT.count) {
+ /* It is possible that an event be posted while we are trying
+ * to access the event queue. This would create problems since
+ * we may end up with invalid data for our event queue pointers. To
+ * alleviate this, all interrupts are suspended while we manipulate
+ * our pointers.
+ */
+ ps = _EVT_disableInt(); /* disable interrupts */
+ for (evtID = EVT.head; evtID != -1; evtID = EVT.evtq[evtID].next) {
+ if (EVT.evtq[evtID].what & mask)
+ break; /* Found an event */
+ }
+ if (evtID == -1) {
+ _EVT_restoreInt(ps);
+ return false; /* Event was not found */
+ }
+ next = EVT.evtq[evtID].next;
+ prev = EVT.evtq[evtID].prev;
+ if (prev != -1)
+ EVT.evtq[prev].next = next;
+ else
+ EVT.head = next;
+ if (next != -1)
+ EVT.evtq[next].prev = prev;
+ else
+ EVT.tail = prev;
+ *evt = EVT.evtq[evtID]; /* Return the event */
+ EVT.evtq[evtID].next = EVT.freeHead; /* and return to free list */
+ EVT.freeHead = evtID;
+ EVT.count--;
+ if (evt->what == EVT_MOUSEMOVE)
+ EVT.oldMove = -1;
+ if (evt->what == EVT_KEYREPEAT)
+ EVT.oldKey = -1;
+ if (evt->what == EVT_JOYMOVE)
+ EVT.oldJoyMove = -1;
+ _EVT_restoreInt(ps); /* enable interrupts */
+ if (evt->what & EVT_KEYEVT)
+ _EVT_maskKeyCode(evt);
+ }
+
+ /* If there is no event pending, check if we should generate an auto
+ * mouse down event if the mouse is still currently down.
+ */
+ if (evt->what == EVT_NULLEVT && EVT.autoRepeat && (mask & EVT_MOUSEAUTO) && (EVT.downMouse.what & EVT_MOUSEDOWN)) {
+ ulong ticks = _EVT_getTicks();
+ if ((ticks - EVT.autoTicks) >= (EVT.autoRepeat + (EVT.firstAuto ? EVT.autoDelay : 0))) {
+ evt->what = EVT_MOUSEAUTO;
+ evt->message = EVT.downMouse.message;
+ evt->modifiers = EVT.downMouse.modifiers;
+ evt->where_x = EVT.autoMouse_x;
+ evt->where_y = EVT.autoMouse_y;
+ evt->relative_x = 0;
+ evt->relative_y = 0;
+ EVT.autoTicks = evt->when = ticks;
+ EVT.firstAuto = false;
+ }
+ }
+ return evt->what != EVT_NULLEVT;
+}
+
+/****************************************************************************
+DESCRIPTION:
+Installs a user supplied event filter callback for event handling.
+
+HEADER:
+event.h
+
+PARAMETERS:
+userEventFilter - Address of user supplied event filter callback
+
+REMARKS:
+This function allows the application programmer to install an event filter
+callback for event handling. Once you install your callback, the MGL
+event handling routines will call your callback with a pointer to the
+new event that will be placed into the event queue. Your callback can the
+modify the contents of the event before it is placed into the queue (for
+instance adding custom information or perhaps high precision timing
+information).
+
+If your callback returns FALSE, the event will be ignore and will not be
+posted to the event queue. You should always return true from your event
+callback unless you plan to use the events immediately that they are
+recieved.
+
+Note: Your event callback may be called in response to a hardware
+ interrupt and will be executing in the context of the hardware
+ interrupt handler under MSDOS (ie: keyboard interrupt or mouse
+ interrupt). For this reason the code pages for the callback that
+ you register must be locked in memory with the PM_lockCodePages
+ function. You must also lock down any data pages that your function
+ needs to reference as well.
+
+Note: You can also use this filter callback to process events at the
+ time they are activated by the user (ie: when the user hits the
+ key or moves the mouse), but make sure your code runs as fast as
+ possible as it will be executing inside the context of an interrupt
+ handler on some systems.
+
+SEE ALSO:
+EVT_getNext, EVT_peekNext
+****************************************************************************/
+void EVTAPI EVT_setUserEventFilter(
+ _EVT_userEventFilter filter)
+{
+ EVT.userEventCallback = filter;
+}
+
+/****************************************************************************
+DESCRIPTION:
+Installs a user supplied event heartbeat callback function.
+
+HEADER:
+event.h
+
+PARAMETERS:
+callback - Address of user supplied event heartbeat callback
+params - Parameters to pass to the event heartbeat function
+
+REMARKS:
+This function allows the application programmer to install an event heatbeat
+function that gets called every time that EVT_getNext or EVT_peekNext
+is called. This is primarily useful for simulating text mode cursors inside
+event handling code when running in graphics modes as opposed to hardware
+text modes.
+
+SEE ALSO:
+EVT_getNext, EVT_peekNext, EVT_getHeartBeatCallback
+****************************************************************************/
+void EVTAPI EVT_setHeartBeatCallback(
+ _EVT_heartBeatCallback callback,
+ void *params)
+{
+ EVT.heartBeat = callback;
+ EVT.heartBeatParams = params;
+}
+
+
+/****************************************************************************
+DESCRIPTION:
+Returns the current user supplied event heartbeat callback function.
+
+HEADER:
+event.h
+
+PARAMETERS:
+callback - Place to store the address of user supplied event heartbeat callback
+params - Place to store the parameters to pass to the event heartbeat function
+
+REMARKS:
+This function retrieves the current event heatbeat function that gets called
+every time that EVT_getNext or EVT_peekNext is called.
+
+SEE ALSO:
+EVT_getNext, EVT_peekNext, EVT_setHeartBeatCallback
+****************************************************************************/
+void EVTAPI EVT_getHeartBeatCallback(
+ _EVT_heartBeatCallback *callback,
+ void **params)
+{
+ *callback = EVT.heartBeat;
+ *params = EVT.heartBeatParams;
+}
+
+/****************************************************************************
+DESCRIPTION:
+Determines if a specified key is currently down.
+
+PARAMETERS:
+scanCode - Scan code to test
+
+RETURNS:
+True of the specified key is currently held down.
+
+HEADER:
+event.h
+
+REMARKS:
+This function determines if a specified key is currently down at the
+time that the call is made. You simply need to pass in the scan code of
+the key that you wish to test, and the MGL will tell you if it is currently
+down or not. The MGL does this by keeping track of the up and down state
+of all the keys.
+****************************************************************************/
+ibool EVTAPI EVT_isKeyDown(
+ uchar scanCode)
+{
+ return _EVT_isKeyDown(scanCode);
+}
+
+/****************************************************************************
+DESCRIPTION:
+Set the mouse position for the event module
+
+PARAMETERS:
+x - X coordinate to move the mouse cursor position to
+y - Y coordinate to move the mouse cursor position to
+
+HEADER:
+event.h
+
+REMARKS:
+This function moves the mouse cursor position for the event module to the
+specified location.
+
+SEE ALSO:
+EVT_getMousePos
+****************************************************************************/
+void EVTAPI EVT_setMousePos(
+ int x,
+ int y)
+{
+ EVT.mx = x;
+ EVT.my = y;
+ _EVT_setMousePos(&EVT.mx,&EVT.my);
+ EVT.mouseMove(EVT.mx,EVT.my);
+}
+
+/****************************************************************************
+DESCRIPTION:
+Returns the current mouse cursor location.
+
+HEADER:
+event.h
+
+PARAMETERS:
+x - Place to store value for mouse x coordinate (screen coordinates)
+y - Place to store value for mouse y coordinate (screen coordinates)
+
+REMARKS:
+Obtains the current mouse cursor position in screen coordinates. Normally the
+mouse cursor location is tracked using the mouse movement events that are
+posted to the event queue when the mouse moves, however this routine
+provides an alternative method of polling the mouse cursor location.
+
+SEE ALSO:
+EVT_setMousePos
+****************************************************************************/
+void EVTAPI EVT_getMousePos(
+ int *x,
+ int *y)
+{
+ *x = EVT.mx;
+ *y = EVT.my;
+}
+
+/****************************************************************************
+DESCRIPTION:
+Returns the currently active code page for translation of keyboard characters.
+
+HEADER:
+event.h
+
+RETURNS:
+Pointer to the currently active code page translation table.
+
+REMARKS:
+This function is returns a pointer to the currently active code page
+translation table. See EVT_setCodePage for more information.
+
+SEE ALSO:
+EVT_setCodePage
+****************************************************************************/
+codepage_t * EVTAPI EVT_getCodePage(void)
+{
+ return EVT.codePage;
+}
+
+/****************************************************************************
+DESCRIPTION:
+Sets the currently active code page for translation of keyboard characters.
+
+HEADER:
+event.h
+
+PARAMETERS:
+page - New code page to make active
+
+REMARKS:
+This function is used to set a new code page translation table that is used
+to translate virtual scan code values to ASCII characters for different
+keyboard configurations. The default is usually US English, although if
+possible the PM library will auto-detect the correct code page translation
+for the target OS if OS services are available to determine what type of
+keyboard is currently attached.
+
+SEE ALSO:
+EVT_getCodePage
+****************************************************************************/
+void EVTAPI EVT_setCodePage(
+ codepage_t *page)
+{
+ EVT.codePage = page;
+}
+
+/* The following contains fake C prototypes and documentation for the
+ * macro functions in the event.h header file. These exist soley so
+ * that DocJet will correctly pull in the documentation for these functions.
+ */
+#ifdef INCLUDE_DOC_FUNCTIONS
+
+/****************************************************************************
+DESCRIPTION:
+Macro to extract the ASCII code from a message.
+
+PARAMETERS:
+message - Message to extract ASCII code from
+
+RETURNS:
+ASCII code extracted from the message.
+
+HEADER:
+event.h
+
+REMARKS:
+Macro to extract the ASCII code from the message field of the event_t
+structure. You pass the message field to the macro as the parameter and
+the ASCII code is the result, for example:
+
+ event_t EVT.myEvent;
+ uchar code;
+ code = EVT_asciiCode(EVT.myEvent.message);
+
+SEE ALSO:
+EVT_scanCode, EVT_repeatCount
+****************************************************************************/
+uchar EVT_asciiCode(
+ ulong message);
+
+/****************************************************************************
+DESCRIPTION:
+Macro to extract the keyboard scan code from a message.
+
+HEADER:
+event.h
+
+PARAMETERS:
+message - Message to extract scan code from
+
+RETURNS:
+Keyboard scan code extracted from the message.
+
+REMARKS:
+Macro to extract the keyboard scan code from the message field of the event
+structure. You pass the message field to the macro as the parameter and
+the scan code is the result, for example:
+
+ event_t EVT.myEvent;
+ uchar code;
+ code = EVT_scanCode(EVT.myEvent.message);
+
+NOTE: Scan codes in the event library are not really hardware scan codes,
+ but rather virtual scan codes as generated by a low level keyboard
+ interface driver. All virtual scan code values are defined by the
+ EVT_scanCodesType enumeration, and will be identical across all
+ supports OS'es and platforms.
+
+SEE ALSO:
+EVT_asciiCode, EVT_repeatCount
+****************************************************************************/
+uchar EVT_scanCode(
+ ulong message);
+
+/****************************************************************************
+DESCRIPTION:
+Macro to extract the repeat count from a message.
+
+HEADER:
+event.h
+
+PARAMETERS:
+message - Message to extract repeat count from
+
+RETURNS:
+Repeat count extracted from the message.
+
+REMARKS:
+Macro to extract the repeat count from the message field of the event
+structure. The repeat count is the number of times that the key repeated
+before there was another keyboard event to be place in the queue, and
+allows the event handling code to avoid keyboard buffer overflow
+conditions when a single key is held down by the user. If you are processing
+a key repeat code, you will probably want to check this field to see how
+many key repeats you should process for this message.
+
+SEE ALSO:
+EVT_asciiCode, EVT_repeatCount
+****************************************************************************/
+short EVT_repeatCount(
+ ulong message);
+
+#endif /* DOC FUNCTIONS */
+
+#if defined(__REALDOS__) || defined(__SMX32__)
+/* {secret} */
+void EVTAPI _EVT_cCodeEnd(void) {}
+#endif
diff --git a/board/MAI/bios_emulator/scitech/src/pm/linux/cpuinfo.c b/board/MAI/bios_emulator/scitech/src/pm/linux/cpuinfo.c
new file mode 100644
index 00000000000..e88d2109541
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/pm/linux/cpuinfo.c
@@ -0,0 +1,68 @@
+/****************************************************************************
+*
+* Ultra Long Period Timer
+*
+* ========================================================================
+*
+* The contents of this file are subject to the SciTech MGL Public
+* License Version 1.0 (the "License"); you may not use this file
+* except in compliance with the License. You may obtain a copy of
+* the License at http://www.scitechsoft.com/mgl-license.txt
+*
+* Software distributed under the License is distributed on an
+* "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+* implied. See the License for the specific language governing
+* rights and limitations under the License.
+*
+* The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+*
+* The Initial Developer of the Original Code is SciTech Software, Inc.
+* All Rights Reserved.
+*
+* ========================================================================
+*
+* Language: ANSI C
+* Environment: Linux
+*
+* Description: Linux specific code for the CPU detection module.
+*
+****************************************************************************/
+
+#include <ztimer.h>
+
+/*----------------------------- Implementation ----------------------------*/
+
+/****************************************************************************
+REMARKS:
+TODO: We should implement this for Linux!
+****************************************************************************/
+#define SetMaxThreadPriority() 0
+
+/****************************************************************************
+REMARKS:
+TODO: We should implement this for Linux!
+****************************************************************************/
+#define RestoreThreadPriority(i)
+
+/****************************************************************************
+REMARKS:
+Initialise the counter and return the frequency of the counter.
+****************************************************************************/
+static void GetCounterFrequency(
+ CPU_largeInteger *freq)
+{
+ freq->low = 1000000;
+ freq->high = 0;
+}
+
+/****************************************************************************
+REMARKS:
+Read the counter and return the counter value.
+****************************************************************************/
+#define GetCounter(t) \
+{ \
+ struct timeval tv; \
+ gettimeofday(&tv,NULL); \
+ (t)->low = tv.tv_sec*1000000 + tv.tv_usec; \
+ (t)->high = 0; \
+}
diff --git a/board/MAI/bios_emulator/scitech/src/pm/linux/event.c b/board/MAI/bios_emulator/scitech/src/pm/linux/event.c
new file mode 100644
index 00000000000..c2668ceb883
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/pm/linux/event.c
@@ -0,0 +1,1361 @@
+/****************************************************************************
+*
+* SciTech Multi-platform Graphics Library
+*
+* ========================================================================
+*
+* The contents of this file are subject to the SciTech MGL Public
+* License Version 1.0 (the "License"); you may not use this file
+* except in compliance with the License. You may obtain a copy of
+* the License at http://www.scitechsoft.com/mgl-license.txt
+*
+* Software distributed under the License is distributed on an
+* "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+* implied. See the License for the specific language governing
+* rights and limitations under the License.
+*
+* The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+*
+* The Initial Developer of the Original Code is SciTech Software, Inc.
+* All Rights Reserved.
+*
+* ========================================================================
+*
+* Language: ANSI C
+* Environment: Linux
+*
+* Description: Linux fullscreen console implementation for the SciTech
+* cross platform event library.
+* Portions ripped straigth from the gpm source code for mouse
+* handling.
+*
+****************************************************************************/
+
+/*---------------------------- Global Variables ---------------------------*/
+
+extern int _PM_console_fd;
+static ushort keyUpMsg[256] = {0};
+static int _EVT_mouse_fd = 0;
+static int range_x, range_y;
+static int opt_baud = 1200, opt_sample = 100;
+#ifdef USE_OS_JOYSTICK
+static short *axis0 = NULL, *axis1 = NULL;
+static uchar *buts0 = NULL, *buts1 = NULL;
+static int joystick0_fd = 0, joystick1_fd = 0;
+static int js_version = 0;
+#endif
+
+/* This defines the supported mouse drivers */
+
+typedef enum {
+ EVT_noMouse = -1,
+ EVT_microsoft = 0,
+ EVT_ps2,
+ EVT_mousesystems,
+ EVT_gpm,
+ EVT_MMseries,
+ EVT_logitech,
+ EVT_busmouse,
+ EVT_mouseman,
+ EVT_intellimouse,
+ EVT_intellimouse_ps2,
+ } mouse_drivers_t;
+
+static mouse_drivers_t mouse_driver = EVT_noMouse;
+static char mouse_dev[20] = "/dev/mouse";
+
+typedef struct {
+ char *name;
+ int flags;
+ void (*init)(void);
+ uchar proto[4];
+ int packet_len;
+ int read;
+ } mouse_info;
+
+#define STD_FLG (CREAD | CLOCAL | HUPCL)
+
+static void _EVT_mouse_init(void);
+static void _EVT_logitech_init(void);
+static void _EVT_pnpmouse_init(void);
+
+mouse_info mouse_infos[] = {
+ {"Microsoft", CS7 | B1200 | STD_FLG, _EVT_mouse_init, {0x40, 0x40, 0x40, 0x00}, 3, 1},
+ {"PS2", STD_FLG, NULL, {0xc0, 0x00, 0x00, 0x00}, 3, 1},
+ {"MouseSystems", CS8 | CSTOPB | STD_FLG, _EVT_mouse_init, {0xf8, 0x80, 0x00, 0x00}, 5, 5},
+ {"GPM", CS8 | CSTOPB | STD_FLG, NULL, {0xf8, 0x80, 0x00, 0x00}, 5, 5},
+ {"MMSeries", CS8 | PARENB | PARODD | STD_FLG, _EVT_mouse_init, {0xe0, 0x80, 0x80, 0x00}, 3, 1},
+ {"Logitech", CS8 | CSTOPB | STD_FLG, _EVT_logitech_init, {0xe0, 0x80, 0x80, 0x00}, 3, 3},
+ {"BusMouse", STD_FLG, NULL, {0xf8, 0x80, 0x00, 0x00}, 3, 3},
+ {"MouseMan", CS7 | STD_FLG, _EVT_mouse_init, {0x40, 0x40, 0x40, 0x00}, 3, 1},
+ {"IntelliMouse", CS7 | STD_FLG, _EVT_pnpmouse_init, {0xc0, 0x40, 0xc0, 0x00}, 4, 1},
+ {"IMPS2", CS7 | STD_FLG, NULL, {0xc0, 0x40, 0xc0, 0x00}, 4, 1}, // ?
+ };
+
+#define NB_MICE (sizeof(mouse_infos)/sizeof(mouse_info))
+
+/* The name of the environment variables that are used to change the defaults above */
+
+#define ENV_MOUSEDRV "MGL_MOUSEDRV"
+#define ENV_MOUSEDEV "MGL_MOUSEDEV"
+#define ENV_MOUSESPD "MGL_MOUSESPD"
+#define ENV_JOYDEV0 "MGL_JOYDEV1"
+#define ENV_JOYDEV1 "MGL_JOYDEV2"
+
+/* Scancode mappings on Linux for special keys */
+
+typedef struct {
+ int scan;
+ int map;
+ } keymap;
+
+// TODO: Fix this and set it up so we can do a binary search!
+
+keymap keymaps[] = {
+ {96, KB_padEnter},
+ {74, KB_padMinus},
+ {78, KB_padPlus},
+ {55, KB_padTimes},
+ {98, KB_padDivide},
+ {71, KB_padHome},
+ {72, KB_padUp},
+ {73, KB_padPageUp},
+ {75, KB_padLeft},
+ {76, KB_padCenter},
+ {77, KB_padRight},
+ {79, KB_padEnd},
+ {80, KB_padDown},
+ {81, KB_padPageDown},
+ {82, KB_padInsert},
+ {83, KB_padDelete},
+ {105,KB_left},
+ {108,KB_down},
+ {106,KB_right},
+ {103,KB_up},
+ {110,KB_insert},
+ {102,KB_home},
+ {104,KB_pageUp},
+ {111,KB_delete},
+ {107,KB_end},
+ {109,KB_pageDown},
+ {125,KB_leftWindows},
+ {126,KB_rightWindows},
+ {127,KB_menu},
+ {100,KB_rightAlt},
+ {97,KB_rightCtrl},
+ };
+
+/* And the keypad with num lock turned on (changes the ASCII code only) */
+
+keymap keypad[] = {
+ {71, ASCII_7},
+ {72, ASCII_8},
+ {73, ASCII_9},
+ {75, ASCII_4},
+ {76, ASCII_5},
+ {77, ASCII_6},
+ {79, ASCII_1},
+ {80, ASCII_2},
+ {81, ASCII_3},
+ {82, ASCII_0},
+ {83, ASCII_period},
+ };
+
+#define NB_KEYMAPS (sizeof(keymaps)/sizeof(keymaps[0]))
+#define NB_KEYPAD (sizeof(keypad)/sizeof(keypad[0]))
+
+typedef struct {
+ int sample;
+ char code[2];
+ } sample_rate;
+
+sample_rate sampletab[]={
+ { 0,"O"},
+ { 15,"J"},
+ { 27,"K"},
+ { 42,"L"},
+ { 60,"R"},
+ { 85,"M"},
+ {125,"Q"},
+ {1E9,"N"},
+ };
+
+/* Number of keycodes to read at a time from the console */
+
+#define KBDREADBUFFERSIZE 32
+
+/*---------------------------- Implementation -----------------------------*/
+
+/* These are not used under Linux */
+#define _EVT_disableInt() 1
+#define _EVT_restoreInt(flaps)
+
+/****************************************************************************
+PARAMETERS:
+scanCode - Scan code to test
+
+REMARKS:
+This macro determines if a specified key is currently down at the
+time that the call is made.
+****************************************************************************/
+#define _EVT_isKeyDown(scanCode) (keyUpMsg[scanCode] != 0)
+
+/****************************************************************************
+REMARKS:
+This function is used to return the number of ticks since system
+startup in milliseconds. This should be the same value that is placed into
+the time stamp fields of events, and is used to implement auto mouse down
+events.
+****************************************************************************/
+ulong _EVT_getTicks(void)
+{
+ static uint starttime = 0;
+ struct timeval t;
+
+ gettimeofday(&t, NULL);
+ if (starttime == 0)
+ starttime = t.tv_sec * 1000 + (t.tv_usec/1000);
+ return ((t.tv_sec * 1000 + (t.tv_usec/1000)) - starttime);
+}
+
+/****************************************************************************
+REMARKS:
+Small Unix function that checks for availability on a file using select()
+****************************************************************************/
+static ibool dataReady(
+ int fd)
+{
+ static struct timeval t = { 0L, 0L };
+ fd_set fds;
+
+ FD_ZERO(&fds);
+ FD_SET(fd, &fds);
+ return select(fd+1, &fds, NULL, NULL, &t) > 0;
+}
+
+/****************************************************************************
+REMARKS:
+Reads mouse data according to the selected mouse driver.
+****************************************************************************/
+static ibool readMouseData(
+ int *buttons,
+ int *dx,
+ int *dy)
+{
+ static uchar data[32],prev = 0;
+ int cnt = 0,ret;
+ mouse_info *drv;
+
+ /* Read the first byte to check for the protocol */
+ drv = &mouse_infos[mouse_driver];
+ if (read(_EVT_mouse_fd, data, drv->read) != drv->read) {
+ perror("read");
+ return false;
+ }
+ if ((data[0] & drv->proto[0]) != drv->proto[1])
+ return false;
+
+ /* Load a whole protocol packet */
+ cnt += drv->read;
+ while (cnt < drv->packet_len) {
+ ret = read(_EVT_mouse_fd, data+cnt, drv->read);
+ if (ret == drv->read)
+ cnt += ret;
+ else {
+ perror("read");
+ return false;
+ }
+ }
+ if ((data[1] & drv->proto[2]) != drv->proto[3])
+ return false;
+
+ /* Now decode the protocol packet */
+ switch (mouse_driver) {
+ case EVT_microsoft:
+ if (data[0] == 0x40 && !(prev|data[1]|data[2]))
+ *buttons = 2; /* Third button on MS compatible mouse */
+ else
+ *buttons= ((data[0] & 0x20) >> 3) | ((data[0] & 0x10) >> 4);
+ prev = *buttons;
+ *dx = (char)(((data[0] & 0x03) << 6) | (data[1] & 0x3F));
+ *dy = (char)(((data[0] & 0x0C) << 4) | (data[2] & 0x3F));
+ break;
+ case EVT_ps2:
+ *buttons = !!(data[0]&1) * 4 + !!(data[0]&2) * 1 + !!(data[0]&4) * 2;
+ if (data[1] != 0)
+ *dx = (data[0] & 0x10) ? data[1]-256 : data[1];
+ else
+ *dx = 0;
+ if (data[2] != 0)
+ *dy = -((data[0] & 0x20) ? data[2]-256 : data[2]);
+ else
+ *dy = 0;
+ break;
+ case EVT_mousesystems: case EVT_gpm:
+ *buttons = (~data[0]) & 0x07;
+ *dx = (char)(data[1]) + (char)(data[3]);
+ *dy = -((char)(data[2]) + (char)(data[4]));
+ break;
+ case EVT_logitech:
+ *buttons= data[0] & 0x07;
+ *dx = (data[0] & 0x10) ? data[1] : - data[1];
+ *dy = (data[0] & 0x08) ? - data[2] : data[2];
+ break;
+ case EVT_busmouse:
+ *buttons= (~data[0]) & 0x07;
+ *dx = (char)data[1];
+ *dy = -(char)data[2];
+ break;
+ case EVT_MMseries:
+ *buttons = data[0] & 0x07;
+ *dx = (data[0] & 0x10) ? data[1] : - data[1];
+ *dy = (data[0] & 0x08) ? - data[2] : data[2];
+ break;
+ case EVT_intellimouse:
+ *buttons = ((data[0] & 0x20) >> 3) /* left */
+ | ((data[3] & 0x10) >> 3) /* middle */
+ | ((data[0] & 0x10) >> 4); /* right */
+ *dx = (char)(((data[0] & 0x03) << 6) | (data[1] & 0x3F));
+ *dy = (char)(((data[0] & 0x0C) << 4) | (data[2] & 0x3F));
+ break;
+ case EVT_intellimouse_ps2:
+ *buttons = (data[0] & 0x04) >> 1 /* Middle */
+ | (data[0] & 0x02) >> 1 /* Right */
+ | (data[0] & 0x01) << 2; /* Left */
+ *dx = (data[0] & 0x10) ? data[1]-256 : data[1];
+ *dy = (data[0] & 0x20) ? -(data[2]-256) : -data[2];
+ break;
+ case EVT_mouseman: {
+ static int getextra;
+ static uchar prev=0;
+ uchar b;
+
+ /* The damned MouseMan has 3/4 bytes packets. The extra byte
+ * is only there if the middle button is active.
+ * I get the extra byte as a packet with magic numbers in it.
+ * and then switch to 4-byte mode.
+ */
+ if (data[1] == 0xAA && data[2] == 0x55) {
+ /* Got unexpected fourth byte */
+ if ((b = (*data>>4)) > 0x3)
+ return false; /* just a sanity check */
+ *dx = *dy = 0;
+ drv->packet_len=4;
+ getextra=0;
+ }
+ else {
+ /* Got 3/4, as expected */
+ /* Motion is independent of packetlen... */
+ *dx = (char)(((data[0] & 0x03) << 6) | (data[1] & 0x3F));
+ *dy = (char)(((data[0] & 0x0C) << 4) | (data[2] & 0x3F));
+ prev = ((data[0] & 0x20) >> 3) | ((data[0] & 0x10) >> 4);
+ if (drv->packet_len==4)
+ b = data[3]>>4;
+ }
+ if (drv->packet_len == 4) {
+ if (b == 0) {
+ drv->packet_len = 3;
+ getextra = 1;
+ }
+ else {
+ if (b & 0x2)
+ prev |= 2;
+ }
+ }
+ *buttons = prev;
+
+ /* This "chord-middle" behaviour was reported by David A. van Leeuwen */
+ if (((prev ^ *buttons) & 5) == 5)
+ *buttons = *buttons ? 2 : 0;
+ prev = *buttons;
+ break;
+ }
+ case EVT_noMouse:
+ return false;
+ break;
+ }
+ return true;
+}
+
+/****************************************************************************
+REMARKS:
+Map a keypress via the key mapping table
+****************************************************************************/
+static int getKeyMapping(
+ keymap *tab,
+ int nb,
+ int key)
+{
+ int i;
+
+ for(i = 0; i < nb; i++) {
+ if (tab[i].scan == key)
+ return tab[i].map;
+ }
+ return key;
+}
+
+#ifdef USE_OS_JOYSTICK
+
+static char js0_axes = 0, js0_buttons = 0;
+static char js1_axes = 0, js1_buttons = 0;
+static char joystick0_dev[20] = "/dev/js0";
+static char joystick1_dev[20] = "/dev/js1";
+
+/****************************************************************************
+REMARKS:
+Create a joystick event from the joystick data
+****************************************************************************/
+static void makeJoyEvent(
+ event_t *evt)
+{
+ evt->message = 0;
+ if (buts0 && axis0) {
+ if (buts0[0]) evt->message |= EVT_JOY1_BUTTONA;
+ if (buts0[1]) evt->message |= EVT_JOY1_BUTTONB;
+ evt->where_x = axis0[0];
+ evt->where_y = axis0[1];
+ }
+ else
+ evt->where_x = evt->where_y = 0;
+ if (buts1 && axis1) {
+ if (buts1[0]) evt->message |= EVT_JOY2_BUTTONA;
+ if (buts1[1]) evt->message |= EVT_JOY2_BUTTONB;
+ evt->where_x = axis1[0];
+ evt->where_y = axis1[1];
+ }
+ else
+ evt->where_x = evt->where_y = 0;
+}
+
+/****************************************************************************
+REMARKS:
+Read the joystick axis data
+****************************************************************************/
+int EVTAPI _EVT_readJoyAxis(
+ int jmask,
+ int *axis)
+{
+ int mask = 0;
+
+ if ((js_version & ~0xffff) == 0) {
+ /* Old 0.x driver */
+ struct JS_DATA_TYPE js;
+ if (joystick0_fd && read(joystick0_fd, &js, JS_RETURN) == JS_RETURN) {
+ if (jmask & EVT_JOY_AXIS_X1)
+ axis[0] = js.x;
+ if (jmask & EVT_JOY_AXIS_Y1)
+ axis[1] = js.y;
+ mask |= EVT_JOY_AXIS_X1|EVT_JOY_AXIS_Y1;
+ }
+ if (joystick1_fd && read(joystick1_fd, &js, JS_RETURN) == JS_RETURN) {
+ if (jmask & EVT_JOY_AXIS_X2)
+ axis[2] = js.x;
+ if (jmask & EVT_JOY_AXIS_Y2)
+ axis[3] = js.y;
+ mask |= EVT_JOY_AXIS_X2|EVT_JOY_AXIS_Y2;
+ }
+ }
+ else {
+ if (axis0) {
+ if (jmask & EVT_JOY_AXIS_X1)
+ axis[0] = axis0[0];
+ if (jmask & EVT_JOY_AXIS_Y1)
+ axis[1] = axis0[1];
+ mask |= EVT_JOY_AXIS_X1 | EVT_JOY_AXIS_Y1;
+ }
+ if (axis1) {
+ if (jmask & EVT_JOY_AXIS_X2)
+ axis[2] = axis1[0];
+ if (jmask & EVT_JOY_AXIS_Y2)
+ axis[3] = axis1[1];
+ mask |= EVT_JOY_AXIS_X2 | EVT_JOY_AXIS_Y2;
+ }
+ }
+ return mask;
+}
+
+/****************************************************************************
+REMARKS:
+Read the joystick button data
+****************************************************************************/
+int EVTAPI _EVT_readJoyButtons(void)
+{
+ int buts = 0;
+
+ if ((js_version & ~0xffff) == 0) {
+ /* Old 0.x driver */
+ struct JS_DATA_TYPE js;
+ if (joystick0_fd && read(joystick0_fd, &js, JS_RETURN) == JS_RETURN)
+ buts = js.buttons;
+ if (joystick1_fd && read(joystick1_fd, &js, JS_RETURN) == JS_RETURN)
+ buts |= js.buttons << 2;
+ }
+ else {
+ if (buts0)
+ buts |= EVT_JOY1_BUTTONA*buts0[0] + EVT_JOY1_BUTTONB*buts0[1];
+ if (buts1)
+ buts |= EVT_JOY2_BUTTONA*buts1[0] + EVT_JOY2_BUTTONB*buts1[1];
+ }
+ return buts;
+}
+
+/****************************************************************************
+DESCRIPTION:
+Returns the mask indicating what joystick axes are attached.
+
+HEADER:
+event.h
+
+REMARKS:
+This function is used to detect the attached joysticks, and determine
+what axes are present and functioning. This function will re-detect any
+attached joysticks when it is called, so if the user forgot to attach
+the joystick when the application started, you can call this function to
+re-detect any newly attached joysticks.
+
+SEE ALSO:
+EVT_joySetLowerRight, EVT_joySetCenter, EVT_joyIsPresent
+****************************************************************************/
+int EVTAPI EVT_joyIsPresent(void)
+{
+ static int mask = 0;
+ int i;
+ char *tmp, name0[128], name1[128];
+ static ibool inited = false;
+
+ if (inited)
+ return mask;
+ memset(EVT.joyMin,0,sizeof(EVT.joyMin));
+ memset(EVT.joyCenter,0,sizeof(EVT.joyCenter));
+ memset(EVT.joyMax,0,sizeof(EVT.joyMax));
+ memset(EVT.joyPrev,0,sizeof(EVT.joyPrev));
+ EVT.joyButState = 0;
+ if ((tmp = getenv(ENV_JOYDEV0)) != NULL)
+ strcpy(joystick0_dev,tmp);
+ if ((tmp = getenv(ENV_JOYDEV1)) != NULL)
+ strcpy(joystick1_dev,tmp);
+ if ((joystick0_fd = open(joystick0_dev, O_RDONLY)) < 0)
+ joystick0_fd = 0;
+ if ((joystick1_fd = open(joystick1_dev, O_RDONLY)) < 0)
+ joystick1_fd = 0;
+ if (!joystick0_fd && !joystick1_fd) // No joysticks detected
+ return 0;
+ inited = true;
+ if (ioctl(joystick0_fd ? joystick0_fd : joystick1_fd, JSIOCGVERSION, &js_version) < 0)
+ return 0;
+
+ /* Initialise joystick 0 */
+ if (joystick0_fd) {
+ ioctl(joystick0_fd, JSIOCGNAME(sizeof(name0)), name0);
+ if (js_version & ~0xffff) {
+ struct js_event js;
+
+ ioctl(joystick0_fd, JSIOCGAXES, &js0_axes);
+ ioctl(joystick0_fd, JSIOCGBUTTONS, &js0_buttons);
+ axis0 = PM_calloc((int)js0_axes, sizeof(short));
+ buts0 = PM_malloc((int)js0_buttons);
+ /* Read the initial events */
+ while(dataReady(joystick0_fd)
+ && read(joystick0_fd, &js, sizeof(struct js_event)) == sizeof(struct js_event)
+ && (js.type & JS_EVENT_INIT)
+ ) {
+ if (js.type & JS_EVENT_BUTTON)
+ buts0[js.number] = js.value;
+ else if (js.type & JS_EVENT_AXIS)
+ axis0[js.number] = scaleJoyAxis(js.value,js.number);
+ }
+ }
+ else {
+ js0_axes = 2;
+ js0_buttons = 2;
+ axis0 = PM_calloc((int)js0_axes, sizeof(short));
+ buts0 = PM_malloc((int)js0_buttons);
+ }
+ }
+
+ /* Initialise joystick 1 */
+ if (joystick1_fd) {
+ ioctl(joystick1_fd, JSIOCGNAME(sizeof(name1)), name1);
+ if (js_version & ~0xffff) {
+ struct js_event js;
+
+ ioctl(joystick1_fd, JSIOCGAXES, &js1_axes);
+ ioctl(joystick1_fd, JSIOCGBUTTONS, &js1_buttons);
+ axis1 = PM_calloc((int)js1_axes, sizeof(short));
+ buts1 = PM_malloc((int)js1_buttons);
+ /* Read the initial events */
+ while(dataReady(joystick1_fd)
+ && read(joystick1_fd, &js, sizeof(struct js_event))==sizeof(struct js_event)
+ && (js.type & JS_EVENT_INIT)
+ ) {
+ if (js.type & JS_EVENT_BUTTON)
+ buts1[js.number] = js.value;
+ else if (js.type & JS_EVENT_AXIS)
+ axis1[js.number] = scaleJoyAxis(js.value,js.number<<2);
+ }
+ }
+ else {
+ js1_axes = 2;
+ js1_buttons = 2;
+ axis1 = PM_calloc((int)js1_axes, sizeof(short));
+ buts1 = PM_malloc((int)js1_buttons);
+ }
+ }
+
+#ifdef CHECKED
+ fprintf(stderr,"Using joystick driver version %d.%d.%d\n",
+ js_version >> 16, (js_version >> 8) & 0xff, js_version & 0xff);
+ if (joystick0_fd)
+ fprintf(stderr,"Joystick 1 (%s): %s\n", joystick0_dev, name0);
+ if (joystick1_fd)
+ fprintf(stderr,"Joystick 2 (%s): %s\n", joystick1_dev, name1);
+#endif
+ mask = _EVT_readJoyAxis(EVT_JOY_AXIS_ALL,EVT.joyCenter);
+ if (mask) {
+ for (i = 0; i < JOY_NUM_AXES; i++)
+ EVT.joyMax[i] = EVT.joyCenter[i]*2;
+ }
+ return mask;
+}
+
+/****************************************************************************
+DESCRIPTION:
+Polls the joystick for position and button information.
+
+HEADER:
+event.h
+
+REMARKS:
+This routine is used to poll analogue joysticks for button and position
+information. It should be called once for each main loop of the user
+application, just before processing all pending events via EVT_getNext.
+All information polled from the joystick will be posted to the event
+queue for later retrieval.
+
+Note: Most analogue joysticks will provide readings that change even
+ though the joystick has not moved. Hence if you call this routine
+ you will likely get an EVT_JOYMOVE event every time through your
+ event loop.
+
+SEE ALSO:
+EVT_getNext, EVT_peekNext, EVT_joySetUpperLeft, EVT_joySetLowerRight,
+EVT_joySetCenter, EVT_joyIsPresent
+****************************************************************************/
+void EVTAPI EVT_pollJoystick(void)
+{
+ event_t evt;
+ int i,axis[JOY_NUM_AXES],newButState,mask,moved,ps;
+
+ if ((js_version & ~0xFFFF) == 0 && EVT.joyMask) {
+ /* Read joystick axes and post movement events if they have
+ * changed since the last time we polled. Until the events are
+ * actually flushed, we keep modifying the same joystick movement
+ * event, so you won't get multiple movement event
+ */
+ mask = _EVT_readJoyAxis(EVT.joyMask,axis);
+ newButState = _EVT_readJoyButtons();
+ moved = false;
+ for (i = 0; i < JOY_NUM_AXES; i++) {
+ if (mask & (EVT_JOY_AXIS_X1 << i))
+ axis[i] = scaleJoyAxis(axis[i],i);
+ else
+ axis[i] = EVT.joyPrev[i];
+ if (axis[i] != EVT.joyPrev[i])
+ moved = true;
+ }
+ if (moved) {
+ memcpy(EVT.joyPrev,axis,sizeof(EVT.joyPrev));
+ ps = _EVT_disableInt();
+ if (EVT.oldJoyMove != -1) {
+ /* Modify the existing joystick movement event */
+ EVT.evtq[EVT.oldJoyMove].message = newButState;
+ EVT.evtq[EVT.oldJoyMove].where_x = EVT.joyPrev[0];
+ EVT.evtq[EVT.oldJoyMove].where_y = EVT.joyPrev[1];
+ EVT.evtq[EVT.oldJoyMove].relative_x = EVT.joyPrev[2];
+ EVT.evtq[EVT.oldJoyMove].relative_y = EVT.joyPrev[3];
+ }
+ else if (EVT.count < EVENTQSIZE) {
+ /* Add a new joystick movement event */
+ EVT.oldJoyMove = EVT.freeHead;
+ memset(&evt,0,sizeof(evt));
+ evt.what = EVT_JOYMOVE;
+ evt.message = EVT.joyButState;
+ evt.where_x = EVT.joyPrev[0];
+ evt.where_y = EVT.joyPrev[1];
+ evt.relative_x = EVT.joyPrev[2];
+ evt.relative_y = EVT.joyPrev[3];
+ addEvent(&evt);
+ }
+ _EVT_restoreInt(ps);
+ }
+
+ /* Read the joystick buttons, and post events to reflect the change
+ * in state for the joystick buttons.
+ */
+ if (newButState != EVT.joyButState) {
+ if (EVT.count < EVENTQSIZE) {
+ /* Add a new joystick movement event */
+ ps = _EVT_disableInt();
+ memset(&evt,0,sizeof(evt));
+ evt.what = EVT_JOYCLICK;
+ evt.message = newButState;
+ EVT.evtq[EVT.oldJoyMove].where_x = EVT.joyPrev[0];
+ EVT.evtq[EVT.oldJoyMove].where_y = EVT.joyPrev[1];
+ EVT.evtq[EVT.oldJoyMove].relative_x = EVT.joyPrev[2];
+ EVT.evtq[EVT.oldJoyMove].relative_y = EVT.joyPrev[3];
+ addEvent(&evt);
+ _EVT_restoreInt(ps);
+ }
+ EVT.joyButState = newButState;
+ }
+ }
+}
+
+/****************************************************************************
+DESCRIPTION:
+Calibrates the joystick upper left position
+
+HEADER:
+event.h
+
+REMARKS:
+This function can be used to zero in on better joystick calibration factors,
+which may work better than the default simplistic calibration (which assumes
+the joystick is centered when the event library is initialised).
+To use this function, ask the user to hold the stick in the upper left
+position and then have them press a key or button. and then call this
+function. This function will then read the joystick and update the
+calibration factors.
+
+Usually, assuming that the stick was centered when the event library was
+initialized, you really only need to call EVT_joySetLowerRight since the
+upper left position is usually always 0,0 on most joysticks. However, the
+safest procedure is to call all three calibration functions.
+
+SEE ALSO:
+EVT_joySetUpperLeft, EVT_joySetLowerRight, EVT_joyIsPresent
+****************************************************************************/
+void EVTAPI EVT_joySetUpperLeft(void)
+{
+ _EVT_readJoyAxis(EVT_JOY_AXIS_ALL,EVT.joyMin);
+}
+
+/****************************************************************************
+DESCRIPTION:
+Calibrates the joystick lower right position
+
+HEADER:
+event.h
+
+REMARKS:
+This function can be used to zero in on better joystick calibration factors,
+which may work better than the default simplistic calibration (which assumes
+the joystick is centered when the event library is initialised).
+To use this function, ask the user to hold the stick in the lower right
+position and then have them press a key or button. and then call this
+function. This function will then read the joystick and update the
+calibration factors.
+
+Usually, assuming that the stick was centered when the event library was
+initialized, you really only need to call EVT_joySetLowerRight since the
+upper left position is usually always 0,0 on most joysticks. However, the
+safest procedure is to call all three calibration functions.
+
+SEE ALSO:
+EVT_joySetUpperLeft, EVT_joySetCenter, EVT_joyIsPresent
+****************************************************************************/
+void EVTAPI EVT_joySetLowerRight(void)
+{
+ _EVT_readJoyAxis(EVT_JOY_AXIS_ALL,EVT.joyMax);
+}
+
+/****************************************************************************
+DESCRIPTION:
+Calibrates the joystick center position
+
+HEADER:
+event.h
+
+REMARKS:
+This function can be used to zero in on better joystick calibration factors,
+which may work better than the default simplistic calibration (which assumes
+the joystick is centered when the event library is initialised).
+To use this function, ask the user to hold the stick in the center
+position and then have them press a key or button. and then call this
+function. This function will then read the joystick and update the
+calibration factors.
+
+Usually, assuming that the stick was centered when the event library was
+initialized, you really only need to call EVT_joySetLowerRight since the
+upper left position is usually always 0,0 on most joysticks. However, the
+safest procedure is to call all three calibration functions.
+
+SEE ALSO:
+EVT_joySetUpperLeft, EVT_joySetLowerRight, EVT_joySetCenter
+****************************************************************************/
+void EVTAPI EVT_joySetCenter(void)
+{
+ _EVT_readJoyAxis(EVT_JOY_AXIS_ALL,EVT.joyCenter);
+}
+#endif
+
+/****************************************************************************
+REMARKS:
+Pumps all messages in the message queue from Linux into our event queue.
+****************************************************************************/
+static void _EVT_pumpMessages(void)
+{
+ event_t evt;
+ int i,numkeys, c;
+ ibool release;
+ static struct kbentry ke;
+ static char buf[KBDREADBUFFERSIZE];
+ static ushort repeatKey[128] = {0};
+
+ /* Poll keyboard events */
+ while (dataReady(_PM_console_fd) && (numkeys = read(_PM_console_fd, buf, KBDREADBUFFERSIZE)) > 0) {
+ for (i = 0; i < numkeys; i++) {
+ c = buf[i];
+ release = c & 0x80;
+ c &= 0x7F;
+
+ // TODO: This is wrong! We need this to be the time stamp at
+ // ** interrupt ** time!! One solution would be to
+ // put the keyboard and mouse polling loops into
+ // a separate thread that can block on I/O to the
+ // necessay file descriptor.
+ evt.when = _EVT_getTicks();
+
+ if (release) {
+ /* Key released */
+ evt.what = EVT_KEYUP;
+ switch (c) {
+ case KB_leftShift:
+ _PM_modifiers &= ~EVT_LEFTSHIFT;
+ break;
+ case KB_rightShift:
+ _PM_modifiers &= ~EVT_RIGHTSHIFT;
+ break;
+ case 29:
+ _PM_modifiers &= ~(EVT_LEFTCTRL|EVT_CTRLSTATE);
+ break;
+ case 97: /* Control */
+ _PM_modifiers &= ~EVT_CTRLSTATE;
+ break;
+ case 56:
+ _PM_modifiers &= ~(EVT_LEFTALT|EVT_ALTSTATE);
+ break;
+ case 100:
+ _PM_modifiers &= ~EVT_ALTSTATE;
+ break;
+ default:
+ }
+ evt.modifiers = _PM_modifiers;
+ evt.message = keyUpMsg[c];
+ if (EVT.count < EVENTQSIZE)
+ addEvent(&evt);
+ keyUpMsg[c] = 0;
+ repeatKey[c] = 0;
+ }
+ else {
+ /* Key pressed */
+ evt.what = EVT_KEYDOWN;
+ switch (c) {
+ case KB_leftShift:
+ _PM_modifiers |= EVT_LEFTSHIFT;
+ break;
+ case KB_rightShift:
+ _PM_modifiers |= EVT_RIGHTSHIFT;
+ break;
+ case 29:
+ _PM_modifiers |= EVT_LEFTCTRL|EVT_CTRLSTATE;
+ break;
+ case 97: /* Control */
+ _PM_modifiers |= EVT_CTRLSTATE;
+ break;
+ case 56:
+ _PM_modifiers |= EVT_LEFTALT|EVT_ALTSTATE;
+ break;
+ case 100:
+ _PM_modifiers |= EVT_ALTSTATE;
+ break;
+ case KB_capsLock: /* Caps Lock */
+ _PM_leds ^= LED_CAP;
+ ioctl(_PM_console_fd, KDSETLED, _PM_leds);
+ break;
+ case KB_numLock: /* Num Lock */
+ _PM_leds ^= LED_NUM;
+ ioctl(_PM_console_fd, KDSETLED, _PM_leds);
+ break;
+ case KB_scrollLock: /* Scroll Lock */
+ _PM_leds ^= LED_SCR;
+ ioctl(_PM_console_fd, KDSETLED, _PM_leds);
+ break;
+ default:
+ }
+ evt.modifiers = _PM_modifiers;
+ if (keyUpMsg[c]) {
+ evt.what = EVT_KEYREPEAT;
+ evt.message = keyUpMsg[c] | (repeatKey[c]++ << 16);
+ }
+ else {
+ int asc;
+
+ evt.message = getKeyMapping(keymaps, NB_KEYMAPS, c) << 8;
+ ke.kb_index = c;
+ ke.kb_table = 0;
+ if ((_PM_modifiers & EVT_SHIFTKEY) || (_PM_leds & LED_CAP))
+ ke.kb_table |= K_SHIFTTAB;
+ if (_PM_modifiers & (EVT_LEFTALT | EVT_ALTSTATE))
+ ke.kb_table |= K_ALTTAB;
+ if (ioctl(_PM_console_fd, KDGKBENT, (unsigned long)&ke)<0)
+ perror("ioctl(KDGKBENT)");
+ if ((_PM_leds & LED_NUM) && (getKeyMapping(keypad, NB_KEYPAD, c)!=c)) {
+ asc = getKeyMapping(keypad, NB_KEYPAD, c);
+ }
+ else {
+ switch (c) {
+ case 14:
+ asc = ASCII_backspace;
+ break;
+ case 15:
+ asc = ASCII_tab;
+ break;
+ case 28:
+ case 96:
+ asc = ASCII_enter;
+ break;
+ case 1:
+ asc = ASCII_esc;
+ default:
+ asc = ke.kb_value & 0xFF;
+ if (asc < 0x1B)
+ asc = 0;
+ break;
+ }
+ }
+ if ((_PM_modifiers & (EVT_CTRLSTATE|EVT_LEFTCTRL)) && isalpha(asc))
+ evt.message |= toupper(asc) - 'A' + 1;
+ else
+ evt.message |= asc;
+ keyUpMsg[c] = evt.message;
+ repeatKey[c]++;
+ }
+ if (EVT.count < EVENTQSIZE)
+ addEvent(&evt);
+ }
+ }
+ }
+
+ /* Poll mouse events */
+ if (_EVT_mouse_fd) {
+ int dx, dy, buts;
+ static int oldbuts;
+
+ while (dataReady(_EVT_mouse_fd)) {
+ if (readMouseData(&buts, &dx, &dy)) {
+ EVT.mx += dx;
+ EVT.my += dy;
+ if (EVT.mx < 0) EVT.mx = 0;
+ if (EVT.my < 0) EVT.my = 0;
+ if (EVT.mx > range_x) EVT.mx = range_x;
+ if (EVT.my > range_y) EVT.my = range_y;
+ evt.where_x = EVT.mx;
+ evt.where_y = EVT.my;
+ evt.relative_x = dx;
+ evt.relative_y = dy;
+
+ // TODO: This is wrong! We need this to be the time stamp at
+ // ** interrupt ** time!! One solution would be to
+ // put the keyboard and mouse polling loops into
+ // a separate thread that can block on I/O to the
+ // necessay file descriptor.
+ evt.when = _EVT_getTicks();
+ evt.modifiers = _PM_modifiers;
+ if (buts & 4)
+ evt.modifiers |= EVT_LEFTBUT;
+ if (buts & 1)
+ evt.modifiers |= EVT_RIGHTBUT;
+ if (buts & 2)
+ evt.modifiers |= EVT_MIDDLEBUT;
+
+ /* Left click events */
+ if ((buts&4) != (oldbuts&4)) {
+ if (buts&4)
+ evt.what = EVT_MOUSEDOWN;
+ else
+ evt.what = EVT_MOUSEUP;
+ evt.message = EVT_LEFTBMASK;
+ EVT.oldMove = -1;
+ if (EVT.count < EVENTQSIZE)
+ addEvent(&evt);
+ }
+
+ /* Right click events */
+ if ((buts&1) != (oldbuts&1)) {
+ if (buts&1)
+ evt.what = EVT_MOUSEDOWN;
+ else
+ evt.what = EVT_MOUSEUP;
+ evt.message = EVT_RIGHTBMASK;
+ EVT.oldMove = -1;
+ if (EVT.count < EVENTQSIZE)
+ addEvent(&evt);
+ }
+
+ /* Middle click events */
+ if ((buts&2) != (oldbuts&2)) {
+ if (buts&2)
+ evt.what = EVT_MOUSEDOWN;
+ else
+ evt.what = EVT_MOUSEUP;
+ evt.message = EVT_MIDDLEBMASK;
+ EVT.oldMove = -1;
+ if (EVT.count < EVENTQSIZE)
+ addEvent(&evt);
+ }
+
+ /* Mouse movement event */
+ if (dx || dy) {
+ evt.what = EVT_MOUSEMOVE;
+ evt.message = 0;
+ if (EVT.oldMove != -1) {
+ /* Modify existing movement event */
+ EVT.evtq[EVT.oldMove].where_x = evt.where_x;
+ EVT.evtq[EVT.oldMove].where_y = evt.where_y;
+ }
+ else {
+ /* Save id of this movement event */
+ EVT.oldMove = EVT.freeHead;
+ if (EVT.count < EVENTQSIZE)
+ addEvent(&evt);
+ }
+ }
+ oldbuts = buts;
+ }
+ }
+ }
+
+#ifdef USE_OS_JOYSTICK
+ // Poll joystick events using the 1.x joystick driver API in the 2.2 kernels
+ if (js_version & ~0xffff) {
+ static struct js_event js;
+
+ /* Read joystick axis 0 */
+ evt.when = 0;
+ evt.modifiers = _PM_modifiers;
+ if (joystick0_fd && dataReady(joystick0_fd) &&
+ read(joystick0_fd, &js, sizeof(js)) == sizeof(js)) {
+ if (js.type & JS_EVENT_BUTTON) {
+ if (js.number < 2) { /* Only 2 buttons for now :( */
+ buts0[js.number] = js.value;
+ evt.what = EVT_JOYCLICK;
+ makeJoyEvent(&evt);
+ if (EVT.count < EVENTQSIZE)
+ addEvent(&evt);
+ }
+ }
+ else if (js.type & JS_EVENT_AXIS) {
+ axis0[js.number] = scaleJoyAxis(js.value,js.number);
+ evt.what = EVT_JOYMOVE;
+ if (EVT.oldJoyMove != -1) {
+ makeJoyEvent(&EVT.evtq[EVT.oldJoyMove]);
+ }
+ else if (EVT.count < EVENTQSIZE) {
+ EVT.oldJoyMove = EVT.freeHead;
+ makeJoyEvent(&evt);
+ addEvent(&evt);
+ }
+ }
+ }
+
+ /* Read joystick axis 1 */
+ if (joystick1_fd && dataReady(joystick1_fd) &&
+ read(joystick1_fd, &js, sizeof(js))==sizeof(js)) {
+ if (js.type & JS_EVENT_BUTTON) {
+ if (js.number < 2) { /* Only 2 buttons for now :( */
+ buts1[js.number] = js.value;
+ evt.what = EVT_JOYCLICK;
+ makeJoyEvent(&evt);
+ if (EVT.count < EVENTQSIZE)
+ addEvent(&evt);
+ }
+ }
+ else if (js.type & JS_EVENT_AXIS) {
+ axis1[js.number] = scaleJoyAxis(js.value,js.number<<2);
+ evt.what = EVT_JOYMOVE;
+ if (EVT.oldJoyMove != -1) {
+ makeJoyEvent(&EVT.evtq[EVT.oldJoyMove]);
+ }
+ else if (EVT.count < EVENTQSIZE) {
+ EVT.oldJoyMove = EVT.freeHead;
+ makeJoyEvent(&evt);
+ addEvent(&evt);
+ }
+ }
+ }
+ }
+#endif
+}
+
+/****************************************************************************
+REMARKS:
+This macro/function is used to converts the scan codes reported by the
+keyboard to our event libraries normalised format. We only have one scan
+code for the 'A' key, and use shift _PM_modifiers to determine if it is a
+Ctrl-F1, Alt-F1 etc. The raw scan codes from the keyboard work this way,
+but the OS gives us 'cooked' scan codes, we have to translate them back
+to the raw format.
+****************************************************************************/
+#define _EVT_maskKeyCode(evt)
+
+/****************************************************************************
+REMARKS:
+Set the speed of the serial port
+****************************************************************************/
+static int setspeed(
+ int fd,
+ int old,
+ int new,
+ unsigned short flags)
+{
+ struct termios tty;
+ char *c;
+
+ tcgetattr(fd, &tty);
+ tty.c_iflag = IGNBRK | IGNPAR;
+ tty.c_oflag = 0;
+ tty.c_lflag = 0;
+ tty.c_line = 0;
+ tty.c_cc[VTIME] = 0;
+ tty.c_cc[VMIN] = 1;
+ switch (old) {
+ case 9600: tty.c_cflag = flags | B9600; break;
+ case 4800: tty.c_cflag = flags | B4800; break;
+ case 2400: tty.c_cflag = flags | B2400; break;
+ case 1200:
+ default: tty.c_cflag = flags | B1200; break;
+ }
+ tcsetattr(fd, TCSAFLUSH, &tty);
+ switch (new) {
+ case 9600: c = "*q"; tty.c_cflag = flags | B9600; break;
+ case 4800: c = "*p"; tty.c_cflag = flags | B4800; break;
+ case 2400: c = "*o"; tty.c_cflag = flags | B2400; break;
+ case 1200:
+ default: c = "*n"; tty.c_cflag = flags | B1200; break;
+ }
+ write(fd, c, 2);
+ usleep(100000);
+ tcsetattr(fd, TCSAFLUSH, &tty);
+ return 0;
+}
+
+/****************************************************************************
+REMARKS:
+Generic mouse driver init code
+****************************************************************************/
+static void _EVT_mouse_init(void)
+{
+ int i;
+
+ /* Change from any available speed to the chosen one */
+ for (i = 9600; i >= 1200; i /= 2)
+ setspeed(_EVT_mouse_fd, i, opt_baud, mouse_infos[mouse_driver].flags);
+}
+
+/****************************************************************************
+REMARKS:
+Logitech mouse driver init code
+****************************************************************************/
+static void _EVT_logitech_init(void)
+{
+ int i;
+ struct stat buf;
+ int busmouse;
+
+ /* is this a serial- or a bus- mouse? */
+ if (fstat(_EVT_mouse_fd,&buf) == -1)
+ perror("fstat");
+ i = MAJOR(buf.st_rdev);
+ if (stat("/dev/ttyS0",&buf) == -1)
+ perror("stat");
+ busmouse=(i != MAJOR(buf.st_rdev));
+
+ /* Fix the howmany field, so that serial mice have 1, while busmice have 3 */
+ mouse_infos[mouse_driver].read = busmouse ? 3 : 1;
+
+ /* Change from any available speed to the chosen one */
+ for (i = 9600; i >= 1200; i /= 2)
+ setspeed(_EVT_mouse_fd, i, opt_baud, mouse_infos[mouse_driver].flags);
+
+ /* This stuff is peculiar of logitech mice, also for the serial ones */
+ write(_EVT_mouse_fd, "S", 1);
+ setspeed(_EVT_mouse_fd, opt_baud, opt_baud,CS8 |PARENB |PARODD |CREAD |CLOCAL |HUPCL);
+
+ /* Configure the sample rate */
+ for (i = 0; opt_sample <= sampletab[i].sample; i++)
+ ;
+ write(_EVT_mouse_fd,sampletab[i].code,1);
+}
+
+/****************************************************************************
+REMARKS:
+Microsoft Intellimouse init code
+****************************************************************************/
+static void _EVT_pnpmouse_init(void)
+{
+ struct termios tty;
+
+ tcgetattr(_EVT_mouse_fd, &tty);
+ tty.c_iflag = IGNBRK | IGNPAR;
+ tty.c_oflag = 0;
+ tty.c_lflag = 0;
+ tty.c_line = 0;
+ tty.c_cc[VTIME] = 0;
+ tty.c_cc[VMIN] = 1;
+ tty.c_cflag = mouse_infos[mouse_driver].flags | B1200;
+ tcsetattr(_EVT_mouse_fd, TCSAFLUSH, &tty); /* set parameters */
+}
+
+/****************************************************************************
+PARAMETERS:
+mouseMove - Callback function to call wheneve the mouse needs to be moved
+
+REMARKS:
+Initiliase the event handling module. Here we install our mouse handling ISR
+to be called whenever any button's are pressed or released. We also build
+the free list of events in the event queue.
+
+We use handler number 2 of the mouse libraries interrupt handlers for our
+event handling routines.
+****************************************************************************/
+void EVTAPI EVT_init(
+ _EVT_mouseMoveHandler mouseMove)
+{
+ int i;
+ char *tmp;
+
+ /* Initialise the event queue */
+ EVT.mouseMove = mouseMove;
+ initEventQueue();
+ for (i = 0; i < 256; i++)
+ keyUpMsg[i] = 0;
+
+ /* Keyboard initialization */
+ if (_PM_console_fd == -1)
+ PM_fatalError("You must first call PM_openConsole to use the EVT functions!");
+ _PM_keyboard_rawmode();
+ fcntl(_PM_console_fd,F_SETFL,fcntl(_PM_console_fd,F_GETFL) | O_NONBLOCK);
+
+ /* Mouse initialization */
+ if ((tmp = getenv(ENV_MOUSEDRV)) != NULL) {
+ for (i = 0; i < NB_MICE; i++) {
+ if (!strcasecmp(tmp, mouse_infos[i].name)) {
+ mouse_driver = i;
+ break;
+ }
+ }
+ if (i == NB_MICE) {
+ fprintf(stderr,"Unknown mouse driver: %s\n", tmp);
+ mouse_driver = EVT_noMouse;
+ _EVT_mouse_fd = 0;
+ }
+ }
+ if (mouse_driver != EVT_noMouse) {
+ if (mouse_driver == EVT_gpm)
+ strcpy(mouse_dev,"/dev/gpmdata");
+ if ((tmp = getenv(ENV_MOUSEDEV)) != NULL)
+ strcpy(mouse_dev,tmp);
+#ifdef CHECKED
+ fprintf(stderr,"Using the %s MGL mouse driver on %s.\n", mouse_infos[mouse_driver].name, mouse_dev);
+#endif
+ if ((_EVT_mouse_fd = open(mouse_dev, O_RDWR)) < 0) {
+ perror("open");
+ fprintf(stderr, "Unable to open mouse device %s, dropping mouse support.\n", mouse_dev);
+ sleep(1);
+ mouse_driver = EVT_noMouse;
+ _EVT_mouse_fd = 0;
+ }
+ else {
+ char c;
+
+ /* Init and flush the mouse pending input queue */
+ if (mouse_infos[mouse_driver].init)
+ mouse_infos[mouse_driver].init();
+ while(dataReady(_EVT_mouse_fd) && read(_EVT_mouse_fd, &c, 1) == 1)
+ ;
+ }
+ }
+}
+
+/****************************************************************************
+REMARKS
+Changes the range of coordinates returned by the mouse functions to the
+specified range of values. This is used when changing between graphics
+modes set the range of mouse coordinates for the new display mode.
+****************************************************************************/
+void EVTAPI EVT_setMouseRange(
+ int xRes,
+ int yRes)
+{
+ range_x = xRes;
+ range_y = yRes;
+}
+
+/****************************************************************************
+REMARKS
+Modifes the mouse coordinates as necessary if scaling to OS coordinates,
+and sets the OS mouse cursor position.
+****************************************************************************/
+#define _EVT_setMousePos(x,y)
+
+/****************************************************************************
+REMARKS:
+Initiailises the internal event handling modules. The EVT_suspend function
+can be called to suspend event handling (such as when shelling out to DOS),
+and this function can be used to resume it again later.
+****************************************************************************/
+void EVT_resume(void)
+{
+ // Do nothing for Linux
+}
+
+/****************************************************************************
+REMARKS
+Suspends all of our event handling operations. This is also used to
+de-install the event handling code.
+****************************************************************************/
+void EVT_suspend(void)
+{
+ // Do nothing for Linux
+}
+
+/****************************************************************************
+REMARKS
+Exits the event module for program terminatation.
+****************************************************************************/
+void EVT_exit(void)
+{
+ /* Restore signal handlers */
+ _PM_restore_kb_mode();
+ if (_EVT_mouse_fd) {
+ close(_EVT_mouse_fd);
+ _EVT_mouse_fd = 0;
+ }
+#ifdef USE_OS_JOYSTICK
+ if (joystick0_fd) {
+ close(joystick0_fd);
+ free(axis0);
+ free(buts0);
+ joystick0_fd = 0;
+ }
+ if (joystick1_fd) {
+ close(joystick1_fd);
+ free(axis1);
+ free(buts1);
+ joystick1_fd = 0;
+ }
+#endif
+}
+
diff --git a/board/MAI/bios_emulator/scitech/src/pm/linux/event.svga b/board/MAI/bios_emulator/scitech/src/pm/linux/event.svga
new file mode 100644
index 00000000000..c0358a0f8ac
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/pm/linux/event.svga
@@ -0,0 +1,1058 @@
+/****************************************************************************
+*
+* The SuperVGA Kit - UniVBE Software Development Kit
+*
+* ========================================================================
+*
+* The contents of this file are subject to the SciTech MGL Public
+* License Version 1.0 (the "License"); you may not use this file
+* except in compliance with the License. You may obtain a copy of
+* the License at http://www.scitechsoft.com/mgl-license.txt
+*
+* Software distributed under the License is distributed on an
+* "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+* implied. See the License for the specific language governing
+* rights and limitations under the License.
+*
+* The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+*
+* The Initial Developer of the Original Code is SciTech Software, Inc.
+* All Rights Reserved.
+*
+* ========================================================================
+*
+* Language: ANSI C
+* Environment: IBM PC (MS DOS)
+*
+* Description: Routines to provide a Linux event queue, which automatically
+* handles keyboard and mouse events for the Linux compatability
+* libraries. Based on the event handling code in the MGL.
+*
+****************************************************************************/
+
+#include <stdio.h>
+#include <stdlib.h>
+#include <string.h>
+#include <time.h>
+#include <ctype.h>
+#include <termios.h>
+#include <signal.h>
+#include <fcntl.h>
+#include <unistd.h>
+#include <errno.h>
+#include <sys/time.h>
+#include <sys/stat.h>
+#include <sys/types.h>
+#include <linux/keyboard.h>
+#include <linux/kd.h>
+#include <linux/vt.h>
+#include <gpm.h>
+#include "pm.h"
+#include "vesavbe.h"
+#include "wdirect.h"
+
+/*--------------------------- Global variables ----------------------------*/
+
+#define EVENTQSIZE 100 /* Number of events in event queue */
+
+static int head = -1; /* Head of event queue */
+static int tail = -1; /* Tail of event queue */
+static int freeHead = -1; /* Head of free list */
+static int count = 0; /* No. of items currently in queue */
+static WD_event evtq[EVENTQSIZE]; /* The queue structure itself */
+static int oldMove = -1; /* Previous movement event */
+static int oldKey = -1; /* Previous key repeat event */
+static int mx,my; /* Current mouse position */
+static int xRes,yRes; /* Screen resolution coordinates */
+static void *stateBuf; /* Pointer to console state buffer */
+static int conn; /* GPM file descriptor for mouse handling */
+static int tty_fd; /* File descriptor for /dev/console */
+extern int tty_vc; /* Virtual console ID, from the PM/Pro library */
+static ibool key_down[128]; /* State of all keyboard keys */
+static struct termios old_conf; /* Saved terminal configuration */
+static int oldkbmode; /* and previous keyboard mode */
+struct vt_mode oldvtmode; /* Old virtual terminal mode */
+static int old_flags; /* Old flags for fcntl */
+static ulong key_modifiers; /* Keyboard modifiers */
+static int forbid_vt_release=0;/* Flag to forbid release of VT */
+static int forbid_vt_acquire=0;/* Flag to forbid cature of VT */
+static int oldmode; /* Old SVGA mode saved for VT switch*/
+static int initmode; /* Initial text mode */
+static ibool installed = false; /* True if we are installed */
+static void (_ASMAPI *moveCursor)(int x,int y) = NULL;
+static int (_ASMAPI *suspendAppCallback)(int flags) = NULL;
+
+#if 0
+/* Keyboard Translation table from scancodes to ASCII */
+
+static uchar keyTable[128] =
+"\0\0331234567890-=\010"
+"\011qwertyuiop[]\015"
+"\0asdfghjkl;'`\0\\"
+"zxcvbnm,./\0*\0 \0"
+"\0\0\0\0\0\0\0\0\0\0\0\0" /* Function keys */
+"789-456+1230.\0\0\0\0\0" /* Keypad keys */
+"\0\0\0\0\0\0\0\015\0/";
+
+static uchar keyTableShifted[128] =
+"\0\033!@#$%^&*()_+\010"
+"\011QWERTYUIOP{}\015"
+"\0ASDFGHJKL:\"~\0|"
+"ZXCVBNM<>?\0*\0 \0"
+"\0\0\0\0\0\0\0\0\0\0\0\0" /* Function keys */
+"789-456+1230.\0\0\0\0\0" /* Keypad keys */
+"\0\0\0\0\0\0\0\015\0/";
+#endif
+
+/* Macros to keep track of the CAPS and NUM lock states */
+
+#define EVT_CAPSSTATE 0x0100
+#define EVT_NUMSTATE 0x0200
+
+/* Helper macros for dealing with timers */
+
+#define TICKS_TO_USEC(t) ((t)*65536.0/1.193180)
+#define USEC_TO_TICKS(u) ((u)*1.193180/65536.0)
+
+/* Number of keycodes to read at a time from the console */
+
+#define KBDREADBUFFERSIZE 32
+
+/*---------------------------- Implementation -----------------------------*/
+
+/****************************************************************************
+REMARKS:
+Returns the current time stamp in units of 18.2 ticks per second.
+****************************************************************************/
+static ulong getTimeStamp(void)
+{
+ return (ulong)(clock() / (CLOCKS_PER_SEC / 18.2));
+}
+
+/****************************************************************************
+PARAMETERS:
+evt - Event to place onto event queue
+
+REMARKS:
+Adds an event to the event queue by tacking it onto the tail of the event
+queue. This routine assumes that at least one spot is available on the
+freeList for the event to be inserted.
+****************************************************************************/
+static void addEvent(
+ WD_event *evt)
+{
+ int evtID;
+
+ /* Get spot to place the event from the free list */
+ evtID = freeHead;
+ freeHead = evtq[freeHead].next;
+
+ /* Add to the tail of the event queue */
+ evt->next = -1;
+ evt->prev = tail;
+ if (tail != -1)
+ evtq[tail].next = evtID;
+ else
+ head = evtID;
+ tail = evtID;
+ evtq[evtID] = *evt;
+ count++;
+}
+
+/****************************************************************************
+PARAMETERS:
+what - Event code
+message - Event message
+modifiers - keyboard modifiers
+x - Mouse X position at time of event
+y - Mouse Y position at time of event
+but_stat - Mouse button status at time of event
+
+REMARKS:
+Adds a new mouse event to the event queue. This routine is called from
+within the mouse interrupt subroutine, so it must be efficient.
+****************************************************************************/
+static void addMouseEvent(
+ uint what,
+ uint message,
+ int x,
+ int y,
+ uint but_stat)
+{
+ WD_event evt;
+
+ if (count < EVENTQSIZE) {
+ evt.what = what;
+ evt.when = getTimeStamp();
+ evt.message = message;
+ evt.modifiers = but_stat | key_modifiers;
+ evt.where_x = x;
+ evt.where_y = y;
+ fprintf(stderr, "(%d,%d), buttons %ld\n", x,y, evt.modifiers);
+ addEvent(&evt); /* Add to tail of event queue */
+ }
+}
+
+/****************************************************************************
+PARAMETERS:
+scancode - Raw keyboard scan code
+modifiers - Keyboard modifiers flags
+
+REMARKS:
+Converts the raw scan code into the appropriate ASCII code using the scan
+code and the keyboard modifier flags.
+****************************************************************************/
+static ulong getKeyMessage(
+ uint scancode,
+ ulong modifiers)
+{
+ ushort code = scancode << 8;
+ ushort ascii;
+ struct kbentry ke;
+
+ ke.kb_index = scancode;
+
+ /* Find the basic ASCII code for the scan code */
+ if (modifiers & EVT_CAPSSTATE) {
+ if (modifiers & EVT_SHIFTKEY)
+ ke.kb_table = K_NORMTAB;
+ // ascii = tolower(keyTableShifted[scancode]);
+ else
+ ke.kb_table = K_SHIFTTAB;
+ // ascii = toupper(keyTable[scancode]);
+ }
+ else {
+ if (modifiers & EVT_SHIFTKEY)
+ ke.kb_table = K_SHIFTTAB;
+ // ascii = keyTableShifted[scancode];
+ else
+ ke.kb_table = K_NORMTAB;
+ // ascii = keyTable[scancode];
+ }
+ if(modifiers & EVT_ALTSTATE)
+ ke.kb_table |= K_ALTTAB;
+
+ if (ioctl(tty_fd, KDGKBENT, (unsigned long)&ke)) {
+ fprintf(stderr, "KDGKBENT at index %d in table %d: ",
+ scancode, ke.kb_table);
+ return 0;
+ }
+ ascii = ke.kb_value;
+
+ /* Add ASCII code if key is not alt'ed or ctrl'ed */
+ if (!(modifiers & (EVT_ALTSTATE | EVT_CTRLSTATE)))
+ code |= ascii;
+
+ return code;
+}
+
+/****************************************************************************
+PARAMETERS:
+what - Event code
+scancode - Raw scancode of keyboard event to add
+
+REMARKS:
+Adds a new keyboard event to the event queue. We only take KEYUP and
+KEYDOWN event codes, however if a key is already down we convert the KEYDOWN
+to a KEYREPEAT.
+****************************************************************************/
+static void addKeyEvent(
+ uint what,
+ uint scancode)
+{
+ WD_event evt;
+
+ if (count < EVENTQSIZE) {
+ evt.what = what;
+ evt.when = getTimeStamp();
+ evt.message = getKeyMessage(scancode,key_modifiers) | 0x10000UL;
+ evt.where_x = evt.where_y = 0;
+ evt.modifiers = key_modifiers;
+ if (evt.what == EVT_KEYUP)
+ key_down[scancode] = false;
+ else if (evt.what == EVT_KEYDOWN) {
+ if (key_down[scancode]) {
+ if (oldKey != -1) {
+ evtq[oldKey].message += 0x10000UL;
+ }
+ else {
+ evt.what = EVT_KEYREPEAT;
+ oldKey = freeHead;
+ addEvent(&evt);
+ oldMove = -1;
+ }
+ return;
+ }
+ key_down[scancode] = true;
+ }
+
+ addEvent(&evt);
+ oldMove = -1;
+ }
+}
+
+/****************************************************************************
+PARAMETERS:
+sig - Signal being sent to this signal handler
+
+REMARKS:
+Signal handler for the timer. This routine takes care of periodically
+posting timer events to the event queue.
+****************************************************************************/
+void timerHandler(
+ int sig)
+{
+ WD_event evt;
+
+ if (sig == SIGALRM) {
+ if (count < EVENTQSIZE) {
+ evt.when = getTimeStamp();
+ evt.what = EVT_TIMERTICK;
+ evt.message = 0;
+ evt.where_x = evt.where_y = 0;
+ evt.modifiers = 0;
+ addEvent(&evt);
+ oldMove = -1;
+ oldKey = -1;
+ }
+ signal(SIGALRM, timerHandler);
+ }
+}
+
+/****************************************************************************
+REMARKS:
+Restore the terminal to normal operation on exit
+****************************************************************************/
+static void restore_term(void)
+{
+ RMREGS regs;
+
+ if (installed) {
+ /* Restore text mode and the state of the console */
+ regs.x.ax = 0x3;
+ PM_int86(0x10,®s,®s);
+ PM_restoreConsoleState(stateBuf,tty_fd);
+
+ /* Restore console to normal operation */
+ ioctl(tty_fd, VT_SETMODE, &oldvtmode);
+ ioctl(tty_fd, KDSKBMODE, oldkbmode);
+ tcsetattr(tty_fd, TCSAFLUSH, &old_conf);
+ fcntl(tty_fd,F_SETFL,old_flags &= ~O_NONBLOCK);
+ PM_closeConsole(tty_fd);
+
+ /* Close the mouse driver */
+ close(conn);
+
+ /* Flag that we are not no longer installed */
+ installed = false;
+ }
+}
+
+/****************************************************************************
+REMARKS:
+Signal handler to capture forced program termination conditions so that
+we can clean up properly.
+****************************************************************************/
+static void exitHandler(int sig)
+{
+ exit(-1);
+}
+
+/****************************************************************************
+REMARKS:
+Sleep until the virtual terminal is active
+****************************************************************************/
+void wait_vt_active(void)
+{
+ while (ioctl(tty_fd, VT_WAITACTIVE, tty_vc) < 0) {
+ if ((errno != EAGAIN) && (errno != EINTR)) {
+ perror("ioctl(VT_WAITACTIVE)");
+ exit(1);
+ }
+ usleep(150000);
+ }
+}
+
+/****************************************************************************
+REMARKS:
+Signal handler called when our virtual terminal has been released and we are
+losing the active focus.
+****************************************************************************/
+static void release_vt_signal(int n)
+{
+ forbid_vt_acquire = 1;
+ if (forbid_vt_release) {
+ forbid_vt_acquire = 0;
+ ioctl(tty_fd, VT_RELDISP, 0);
+ return;
+ }
+
+ // TODO: Call the user supplied suspendAppCallback and restore text
+ // mode (saving the existing mode so we can restore it).
+ //
+ // Also if the suspendAppCallback is NULL then we have to
+ // ignore the switch request!
+ if(suspendAppCallback){
+ oldmode = VBE_getVideoMode();
+ suspendAppCallback(true);
+ VBE_setVideoMode(initmode);
+ }
+
+ ioctl(tty_fd, VT_RELDISP, 1);
+ forbid_vt_acquire = 0;
+ wait_vt_active();
+}
+
+/****************************************************************************
+REMARKS:
+Signal handler called when our virtual terminal has been re-aquired and we
+are now regaiing the active focus.
+****************************************************************************/
+static void acquire_vt_signal(int n)
+{
+ forbid_vt_release = 1;
+ if (forbid_vt_acquire) {
+ forbid_vt_release = 0;
+ return;
+ }
+
+ // TODO: Restore the old display mode, call the user suspendAppCallback
+ // and and we will be back in graphics mode.
+
+ if(suspendAppCallback){
+ VBE_setVideoMode(oldmode);
+ suspendAppCallback(false);
+ }
+
+ ioctl(tty_fd, VT_RELDISP, VT_ACKACQ);
+ forbid_vt_release = 0;
+}
+
+/****************************************************************************
+REMARKS:
+Function to set the action for a specific signal to call our signal handler.
+****************************************************************************/
+static void set_sigaction(int sig,void (*handler)(int))
+{
+ struct sigaction siga;
+
+ siga.sa_handler = handler;
+ siga.sa_flags = SA_RESTART;
+ memset(&(siga.sa_mask), 0, sizeof(sigset_t));
+ sigaction(sig, &siga, NULL);
+}
+
+/****************************************************************************
+REMARKS:
+Function to take over control of VT switching so that we can capture
+virtual terminal release and aquire signals, allowing us to properly
+support VT switching while in graphics modes.
+****************************************************************************/
+static void take_vt_control(void)
+{
+ struct vt_mode vtmode;
+
+ ioctl(tty_fd, VT_GETMODE, &vtmode);
+ oldvtmode = vtmode;
+ vtmode.mode = VT_PROCESS;
+ vtmode.relsig = SIGUSR1;
+ vtmode.acqsig = SIGUSR2;
+ set_sigaction(SIGUSR1, release_vt_signal);
+ set_sigaction(SIGUSR2, acquire_vt_signal);
+ ioctl(tty_fd, VT_SETMODE, &oldvtmode);
+}
+
+/****************************************************************************
+REMARKS:
+Set the shift keyboard LED's based on the current keyboard modifiers flags.
+****************************************************************************/
+static void updateLEDStatus(void)
+{
+ int state = 0;
+ if (key_modifiers & EVT_CAPSSTATE)
+ state |= LED_CAP;
+ if (key_modifiers & EVT_NUMSTATE)
+ state |= LED_NUM;
+ ioctl(tty_fd,KDSETLED,state);
+}
+
+/****************************************************************************
+PARAMETERS:
+scancode - Raw scan code to handle
+
+REMARKS:
+Handles the shift key modifiers and keeps track of the shift key states
+so that we can return the correct ASCII codes for the keyboard.
+****************************************************************************/
+static void toggleModifiers(
+ int scancode)
+{
+ static int caps_down = 0,num_down = 0;
+
+ if (scancode & 0x80) {
+ /* Handle key-release function */
+ scancode &= 0x7F;
+ if (scancode == 0x2A || scancode == 0x36)
+ key_modifiers &= ~EVT_SHIFTKEY;
+ else if (scancode == 0x1D || scancode == 0x61)
+ key_modifiers &= ~EVT_CTRLSTATE;
+ else if (scancode == 0x38 || scancode == 0x64)
+ key_modifiers &= ~EVT_ALTSTATE;
+ else if (scancode == 0x3A)
+ caps_down = false;
+ else if (scancode == 0x45)
+ num_down = false;
+ }
+ else {
+ /* Handle key-down function */
+ scancode &= 0x7F;
+ if (scancode == 0x2A || scancode == 0x36)
+ key_modifiers |= EVT_SHIFTKEY;
+ else if (scancode == 0x1D || scancode == 0x61)
+ key_modifiers |= EVT_CTRLSTATE;
+ else if (scancode == 0x38 || scancode == 0x64)
+ key_modifiers |= EVT_ALTSTATE;
+ else if (scancode == 0x3A) {
+ if (!caps_down) {
+ key_modifiers ^= EVT_CAPSSTATE;
+ updateLEDStatus();
+ }
+ caps_down = true;
+ }
+ else if (scancode == 0x45) {
+ if (!num_down) {
+ key_modifiers ^= EVT_NUMSTATE;
+ updateLEDStatus();
+ }
+ num_down = true;
+ }
+ }
+}
+
+/***************************************************************************
+REMARKS:
+Returns the number of bits that have changed from 0 to 1
+(a negative value means the number of bits that have changed from 1 to 0)
+ **************************************************************************/
+static int compareBits(short a, short b)
+{
+ int ret = 0;
+ if( (a&1) != (b&1) ) ret += (b&1) ? 1 : -1;
+ if( (a&2) != (b&2) ) ret += (b&2) ? 1 : -1;
+ if( (a&4) != (b&4) ) ret += (b&4) ? 1 : -1;
+ return ret;
+}
+
+/***************************************************************************
+REMARKS:
+Turns off all keyboard state because we can't rely on them anymore as soon
+as we switch VT's
+***************************************************************************/
+static void keyboard_clearstate(void)
+{
+ key_modifiers = 0;
+ memset(key_down, 0, sizeof(key_down));
+}
+
+/****************************************************************************
+REMARKS:
+Pumps all events from the console event queue into the WinDirect event queue.
+****************************************************************************/
+static void pumpEvents(void)
+{
+ static uchar buf[KBDREADBUFFERSIZE];
+ static char data[5];
+ static int old_buts, old_mx, old_my;
+ static struct timeval t;
+ fd_set fds;
+ int numkeys,i;
+ int dx, dy, buts;
+
+ /* Read all pending keypresses from keyboard buffer and process */
+ while ((numkeys = read(tty_fd, buf, KBDREADBUFFERSIZE)) > 0) {
+ for (i = 0; i < numkeys; i++) {
+ toggleModifiers(buf[i]);
+ if (key_modifiers & EVT_ALTSTATE){
+ int fkey = 0;
+
+ // Do VT switching here for Alt+Fx keypresses
+ switch(buf[i] & 0x7F){
+ case 59 ... 68: /* F1 to F10 */
+ fkey = (buf[i] & 0x7F) - 58;
+ break;
+ case 87: /* F11 */
+ case 88: /* F12 */
+ fkey = (buf[i] & 0x7F) - 76;
+ break;
+ }
+ if(fkey){
+ struct vt_stat vts;
+ ioctl(tty_fd, VT_GETSTATE, &vts);
+
+ if(fkey != vts.v_active){
+ keyboard_clearstate();
+ ioctl(tty_fd, VT_ACTIVATE, fkey);
+ }
+ }
+ }
+
+ if (buf[i] & 0x80)
+ addKeyEvent(EVT_KEYUP,buf[i] & 0x7F);
+ else
+ addKeyEvent(EVT_KEYDOWN,buf[i] & 0x7F);
+ }
+
+ // TODO: If we want to handle VC switching we will need to do it
+ // in here so that we can switch away from the VC and then
+ // switch back to it later. Right now VC switching is disabled
+ // and in order to enable it we need to save/restore the state
+ // of the graphics screen (using the suspendAppCallback and
+ // saving/restoring the state of the current display mode).
+
+ }
+
+ /* Read all pending mouse events and process them */
+ if(conn > 0){
+ FD_ZERO(&fds);
+ FD_SET(conn, &fds);
+ t.tv_sec = t.tv_usec = 0L;
+ while (select(conn+1, &fds, NULL, NULL, &t) > 0) {
+ if(read(conn, data, 5) == 5){
+ buts = (~data[0]) & 0x07;
+ dx = (char)(data[1]) + (char)(data[3]);
+ dy = -((char)(data[2]) + (char)(data[4]));
+
+ mx += dx; my += dy;
+
+ if (dx || dy)
+ addMouseEvent(EVT_MOUSEMOVE, 0, mx, my, buts);
+
+ if (buts != old_buts){
+ int c = compareBits(buts,old_buts);
+ if(c>0)
+ addMouseEvent(EVT_MOUSEDOWN, 0, mx, my, buts);
+ else if(c<0)
+ addMouseEvent(EVT_MOUSEUP, 0, mx, my, buts);
+ }
+ old_mx = mx; old_my = my;
+ old_buts = buts;
+ FD_SET(conn, &fds);
+ t.tv_sec = t.tv_usec = 0L;
+ }
+ }
+ }
+}
+
+/*------------------------ Public interface routines ----------------------*/
+
+/****************************************************************************
+PARAMETERS:
+which - Which code for event to post
+what - Event code for event to post
+message - Event message
+modifiers - Shift key/mouse button modifiers
+
+RETURNS:
+True if the event was posted, false if queue is full.
+
+REMARKS:
+Posts an event to the event queue. This routine can be used to post any type
+of event into the queue.
+****************************************************************************/
+ibool _WDAPI WD_postEvent(
+ ulong which,
+ uint what,
+ ulong message,
+ ulong modifiers)
+{
+ WD_event evt;
+
+ if (count < EVENTQSIZE) {
+ /* Save information in event record */
+ evt.which = which;
+ evt.what = what;
+ evt.when = getTimeStamp();
+ evt.message = message;
+ evt.modifiers = modifiers;
+ addEvent(&evt); /* Add to tail of event queue */
+ return true;
+ }
+ else
+ return false;
+}
+
+/****************************************************************************
+PARAMETERS:
+mask - Event mask to use
+
+REMARKS:
+Flushes all the event specified in 'mask' from the event queue.
+****************************************************************************/
+void _WDAPI WD_flushEvent(
+ uint mask)
+{
+ WD_event evt;
+
+ do { /* Flush all events */
+ WD_getEvent(&evt,mask);
+ } while (evt.what != EVT_NULLEVT);
+}
+
+/****************************************************************************
+PARAMETERS:
+evt - Place to store event
+mask - Event mask to use
+
+REMARKS:
+Halts program execution until a specified event occurs. The event is
+returned. All pending events not in the specified mask will be ignored and
+removed from the queue.
+****************************************************************************/
+void _WDAPI WD_haltEvent(
+ WD_event *evt,
+ uint mask)
+{
+ do { /* Wait for an event */
+ WD_getEvent(evt,EVT_EVERYEVT);
+ } while (!(evt->what & mask));
+}
+
+/****************************************************************************
+PARAMETERS:
+evt - Place to store event
+mask - Event mask to use
+
+RETURNS:
+True if an event was pending.
+
+REMARKS:
+Retrieves the next pending event defined in 'mask' from the event queue.
+The event queue is adjusted to reflect the new state after the event has
+been removed.
+****************************************************************************/
+ibool _WDAPI WD_getEvent(
+ WD_event *evt,
+ uint mask)
+{
+ int evtID,next,prev;
+
+ pumpEvents();
+ if (moveCursor)
+ moveCursor(mx,my); /* Move the mouse cursor */
+ evt->what = EVT_NULLEVT; /* Default to null event */
+
+ if (count) {
+ for (evtID = head; evtID != -1; evtID = evtq[evtID].next) {
+ if (evtq[evtID].what & mask)
+ break; /* Found an event */
+ }
+ if (evtID == -1)
+ return false; /* Event was not found */
+ next = evtq[evtID].next;
+ prev = evtq[evtID].prev;
+ if (prev != -1)
+ evtq[prev].next = next;
+ else
+ head = next;
+ if (next != -1)
+ evtq[next].prev = prev;
+ else
+ tail = prev;
+ *evt = evtq[evtID]; /* Return the event */
+ evtq[evtID].next = freeHead; /* and return to free list */
+ freeHead = evtID;
+ count--;
+ if (evt->what == EVT_MOUSEMOVE)
+ oldMove = -1;
+ if (evt->what == EVT_KEYREPEAT)
+ oldKey = -1;
+ }
+ return evt->what != EVT_NULLEVT;
+}
+
+/****************************************************************************
+PARAMETERS:
+evt - Place to store event
+mask - Event mask to use
+
+RETURNS:
+True if an event is pending.
+
+REMARKS:
+Peeks at the next pending event defined in 'mask' in the event queue. The
+event is not removed from the event queue.
+****************************************************************************/
+ibool _WDAPI WD_peekEvent(
+ WD_event *evt,
+ uint mask)
+{
+ int evtID;
+
+ pumpEvents();
+ if (moveCursor)
+ moveCursor(mx,my); /* Move the mouse cursor */
+ evt->what = EVT_NULLEVT; /* Default to null event */
+
+ if (count) {
+ for (evtID = head; evtID != -1; evtID = evtq[evtID].next) {
+ if (evtq[evtID].what & mask)
+ break; /* Found an event */
+ }
+ if (evtID == -1)
+ return false; /* Event was not found */
+
+ *evt = evtq[evtID]; /* Return the event */
+ }
+ return evt->what != EVT_NULLEVT;
+}
+
+/****************************************************************************
+PARAMETERS:
+hwndMain - Handle to main window
+_xRes - X resolution of graphics mode to be used
+_yRes - Y resolulion of graphics mode to be used
+
+RETURNS:
+Handle to the fullscreen event window if (we return hwndMain on Linux)
+
+REMARKS:
+Initiliase the event handling module. Here we install our mouse handling
+ISR to be called whenever any button's are pressed or released. We also
+build the free list of events in the event queue.
+****************************************************************************/
+WD_HWND _WDAPI WD_startFullScreen(
+ WD_HWND hwndMain,
+ int _xRes,
+ int _yRes)
+{
+ int i;
+ struct termios conf;
+ if (!installed) {
+ Gpm_Connect gpm;
+
+ /* Build free list, and initialise global data structures */
+ for (i = 0; i < EVENTQSIZE; i++)
+ evtq[i].next = i+1;
+ evtq[EVENTQSIZE-1].next = -1; /* Terminate list */
+ count = freeHead = 0;
+ head = tail = -1;
+ oldMove = -1;
+ oldKey = -1;
+ xRes = _xRes;
+ yRes = _yRes;
+
+ /* Open the console device and initialise it for raw mode */
+ tty_fd = PM_openConsole();
+
+ /* Wait until virtual terminal is active and take over control */
+ wait_vt_active();
+ take_vt_control();
+
+ /* Initialise keyboard handling to raw mode */
+ if (ioctl(tty_fd, KDGKBMODE, &oldkbmode)) {
+ printf("WD_startFullScreen: cannot get keyboard mode.\n");
+ exit(-1);
+ }
+ old_flags = fcntl(tty_fd,F_GETFL);
+ fcntl(tty_fd,F_SETFL,old_flags |= O_NONBLOCK);
+ tcgetattr(tty_fd, &conf);
+ old_conf = conf;
+ conf.c_lflag &= ~(ICANON | ECHO | ECHOE | ECHOK | ECHONL | NOFLSH | ISIG);
+ conf.c_iflag &= ~(ISTRIP | IGNCR | ICRNL | INLCR | BRKINT | PARMRK | INPCK | IUCLC | IXON | IXOFF);
+ conf.c_iflag |= (IGNBRK | IGNPAR);
+ conf.c_cc[VMIN] = 1;
+ conf.c_cc[VTIME] = 0;
+ conf.c_cc[VSUSP] = 0;
+ tcsetattr(tty_fd, TCSAFLUSH, &conf);
+ ioctl(tty_fd, KDSKBMODE, K_MEDIUMRAW);
+
+ /* Clear the keyboard state information */
+ memset(key_down, 0, sizeof(key_down));
+ ioctl(tty_fd,KDSETLED,key_modifiers = 0);
+
+ /* Initialize the mouse connection
+ The user *MUST* run gpm with the option -R for this to work (or have a MouseSystems mouse)
+ */
+ if(Gpm_Open(&gpm,0) > 0){ /* GPM available */
+ if ((conn = open(GPM_NODE_FIFO,O_RDONLY|O_SYNC)) < 0)
+ fprintf(stderr,"WD_startFullScreen: Can't open mouse connection.\n");
+ }else{
+ fprintf(stderr,"Warning: when not using gpm -R, only MouseSystems mice are currently supported.\n");
+ if ((conn = open("/dev/mouse",O_RDONLY|O_SYNC)) < 0)
+ fprintf(stderr,"WD_startFullScreen: Can't open /dev/mouse.\n");
+ }
+ Gpm_Close();
+
+ /* TODO: Scale the mouse coordinates to the specific resolution */
+
+ /* Save the state of the console */
+ if ((stateBuf = malloc(PM_getConsoleStateSize())) == NULL) {
+ printf("Out of memory!\n");
+ exit(-1);
+ }
+ PM_saveConsoleState(stateBuf,tty_fd);
+ initmode = VBE_getVideoMode();
+
+ /* Initialize the signal handler for timer events */
+ signal(SIGALRM, timerHandler);
+
+ /* Capture termination signals so we can clean up properly */
+ signal(SIGTERM, exitHandler);
+ signal(SIGINT, exitHandler);
+ signal(SIGQUIT, exitHandler);
+ atexit(restore_term);
+
+ /* Signal that we are installed */
+ installed = true;
+ }
+ return hwndMain;
+}
+
+/****************************************************************************
+REMARKS:
+Lets the library know when fullscreen graphics mode has been initialized so
+that we can properly scale the mouse driver coordinates.
+****************************************************************************/
+void _WDAPI WD_inFullScreen(void)
+{
+ /* Nothing to do in here */
+}
+
+/****************************************************************************
+REMARKS:
+Suspends all of our event handling operations. This is also used to
+de-install the event handling code.
+****************************************************************************/
+void _WDAPI WD_restoreGDI(void)
+{
+ restore_term();
+}
+
+/****************************************************************************
+PARAMETERS:
+ticks - Number of ticks between timer tick messages
+
+RETURNS:
+Previous value for the timer tick event spacing.
+
+REMARKS:
+The event module will automatically generate periodic timer tick events for
+you, with 'ticks' between each event posting. If you set the value of
+'ticks' to 0, the timer tick events are turned off.
+****************************************************************************/
+int _WDAPI WD_setTimerTick(
+ int ticks)
+{
+ int old;
+ struct itimerval tim;
+ long ms = TICKS_TO_USEC(ticks);
+
+ getitimer(ITIMER_REAL, &tim);
+ old = USEC_TO_TICKS(tim.it_value.tv_sec*1000000.0 + tim.it_value.tv_usec);
+ tim.it_interval.tv_sec = ms / 1000000;
+ tim.it_interval.tv_usec = ms % 1000000;
+ setitimer(ITIMER_REAL, &tim, NULL);
+ return old;
+}
+
+/****************************************************************************
+PARAMETERS:
+saveState - Address of suspend app callback to register
+
+REMARKS:
+Registers a user application supplied suspend application callback so that
+we can properly handle virtual terminal switching.
+****************************************************************************/
+void _WDAPI WD_setSuspendAppCallback(
+ int (_ASMAPI *saveState)(int flags))
+{
+ suspendAppCallback = saveState;
+}
+
+/****************************************************************************
+PARAMETERS:
+x - New X coordinate to move the mouse cursor to
+y - New Y coordinate to move the mouse cursor to
+
+REMARKS:
+Moves to mouse cursor to the specified coordinate.
+****************************************************************************/
+void _WDAPI WD_setMousePos(
+ int x,
+ int y)
+{
+ mx = x;
+ my = y;
+}
+
+/****************************************************************************
+PARAMETERS:
+x - Place to store X coordinate of mouse cursor
+y - Place to store Y coordinate of mouse cursor
+
+REMARKS:
+Reads the current mouse cursor location int *screen* coordinates.
+****************************************************************************/
+void _WDAPI WD_getMousePos(
+ int *x,
+ int *y)
+{
+ *x = mx;
+ *y = my;
+}
+
+/****************************************************************************
+PARAMETERS:
+mcb - Address of mouse callback function
+
+REMARKS:
+Registers an application supplied mouse callback function that is called
+whenever the mouse cursor moves.
+****************************************************************************/
+void _WDAPI WD_setMouseCallback(
+ void (_ASMAPI *mcb)(int x,int y))
+{
+ moveCursor = mcb;
+}
+
+/****************************************************************************
+PARAMETERS:
+xRes - New X resolution of graphics mode
+yRes - New Y resolution of graphics mode
+
+REMARKS:
+This is called to inform the event handling code that the screen resolution
+has changed so that the mouse coordinates can be scaled appropriately.
+****************************************************************************/
+void _WDAPI WD_changeResolution(
+ int xRes,
+ int yRes)
+{
+ // Gpm_FitValues(xRes, yRes); // ??
+}
+
+/****************************************************************************
+PARAMETERS:
+scancode - Scan code to check if a key is down
+
+REMARKS:
+Determines if a particular key is down based on the scan code for the key.
+****************************************************************************/
+ibool _WDAPI WD_isKeyDown(
+ uchar scancode)
+{
+ return key_down[scancode];
+}
+
+/****************************************************************************
+REMARKS:
+Determines if the application needs to run in safe mode. Not necessary for
+anything but broken Windows 95 display drivers so we return false for
+Linux.
+****************************************************************************/
+int _WDAPI WD_isSafeMode(void)
+{
+ return false;
+}
+
+
diff --git a/board/MAI/bios_emulator/scitech/src/pm/linux/oshdr.h b/board/MAI/bios_emulator/scitech/src/pm/linux/oshdr.h
new file mode 100644
index 00000000000..6023dff1098
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/pm/linux/oshdr.h
@@ -0,0 +1,61 @@
+/****************************************************************************
+*
+* SciTech Multi-platform Graphics Library
+*
+* ========================================================================
+*
+* The contents of this file are subject to the SciTech MGL Public
+* License Version 1.0 (the "License"); you may not use this file
+* except in compliance with the License. You may obtain a copy of
+* the License at http://www.scitechsoft.com/mgl-license.txt
+*
+* Software distributed under the License is distributed on an
+* "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+* implied. See the License for the specific language governing
+* rights and limitations under the License.
+*
+* The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+*
+* The Initial Developer of the Original Code is SciTech Software, Inc.
+* All Rights Reserved.
+*
+* ========================================================================
+*
+* Language: ANSI C
+* Environment: Linux
+*
+* Description: Include all the OS specific header files.
+*
+****************************************************************************/
+
+#include <fcntl.h>
+#include <sys/time.h>
+#include <sys/ioctl.h>
+#include <sys/stat.h>
+#include <time.h>
+#include <linux/keyboard.h>
+#include <linux/kd.h>
+#include <linux/vt.h>
+#include <linux/fs.h>
+#ifdef USE_OS_JOYSTICK
+#include <linux/joystick.h>
+#endif
+#include <termios.h>
+#include <signal.h>
+#include <unistd.h>
+#include <ctype.h>
+#include <stdlib.h>
+
+/* Internal global variables */
+
+extern int _PM_console_fd,_PM_leds,_PM_modifiers;
+
+/* Internal function prototypes */
+
+void _PM_restore_kb_mode(void);
+void _PM_keyboard_rawmode(void);
+
+/* Linux needs the generic joystick scaling code */
+
+#define NEED_SCALE_JOY_AXIS
+
diff --git a/board/MAI/bios_emulator/scitech/src/pm/linux/pm.c b/board/MAI/bios_emulator/scitech/src/pm/linux/pm.c
new file mode 100644
index 00000000000..1d52984a6a6
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/pm/linux/pm.c
@@ -0,0 +1,1810 @@
+;/****************************************************************************
+*
+* SciTech OS Portability Manager Library
+*
+* ========================================================================
+*
+* The contents of this file are subject to the SciTech MGL Public
+* License Version 1.0 (the "License"); you may not use this file
+* except in compliance with the License. You may obtain a copy of
+* the License at http://www.scitechsoft.com/mgl-license.txt
+*
+* Software distributed under the License is distributed on an
+* "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+* implied. See the License for the specific language governing
+* rights and limitations under the License.
+*
+* The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+*
+* The Initial Developer of the Original Code is SciTech Software, Inc.
+* All Rights Reserved.
+*
+* ========================================================================
+*
+* Portions copyright (C) Josh Vanderhoof
+*
+* Language: ANSI C
+* Environment: Linux
+*
+* Description: Implementation for the OS Portability Manager Library, which
+* contains functions to implement OS specific services in a
+* generic, cross platform API. Porting the OS Portability
+* Manager library is the first step to porting any SciTech
+* products to a new platform.
+*
+****************************************************************************/
+
+#include "pmapi.h"
+#include "drvlib/os/os.h"
+#include <stdio.h>
+#include <stdlib.h>
+#include <string.h>
+#include <sys/mman.h>
+#include <sys/kd.h>
+#include <sys/ioctl.h>
+#include <sys/stat.h>
+#include <sys/vt.h>
+#include <sys/wait.h>
+#include <sys/types.h>
+#include <sys/time.h>
+#include <unistd.h>
+#include <termios.h>
+#include <fcntl.h>
+#include <syscall.h>
+#include <signal.h>
+#include <time.h>
+#include <ctype.h>
+#include <errno.h>
+#include <asm/io.h>
+#include <asm/types.h>
+#ifdef ENABLE_MTRR
+#include <asm/mtrr.h>
+#endif
+#include <asm/vm86.h>
+#ifdef __GLIBC__
+#include <sys/perm.h>
+#endif
+
+/*--------------------------- Global variables ----------------------------*/
+
+#define REAL_MEM_BASE ((void *)0x10000)
+#define REAL_MEM_SIZE 0x10000
+#define REAL_MEM_BLOCKS 0x100
+#define DEFAULT_VM86_FLAGS (IF_MASK | IOPL_MASK)
+#define DEFAULT_STACK_SIZE 0x1000
+#define RETURN_TO_32_INT 255
+
+/* Quick and dirty fix for vm86() syscall from lrmi 0.6 */
+static int
+vm86(struct vm86_struct *vm)
+ {
+ int r;
+#ifdef __PIC__
+ asm volatile (
+ "pushl %%ebx\n\t"
+ "movl %2, %%ebx\n\t"
+ "int $0x80\n\t"
+ "popl %%ebx"
+ : "=a" (r)
+ : "0" (113), "r" (vm));
+#else
+ asm volatile (
+ "int $0x80"
+ : "=a" (r)
+ : "0" (113), "b" (vm));
+#endif
+ return r;
+ }
+
+
+static struct {
+ int ready;
+ unsigned short ret_seg, ret_off;
+ unsigned short stack_seg, stack_off;
+ struct vm86_struct vm;
+ } context = {0};
+
+struct mem_block {
+ unsigned int size : 20;
+ unsigned int free : 1;
+ };
+
+static struct {
+ int ready;
+ int count;
+ struct mem_block blocks[REAL_MEM_BLOCKS];
+ } mem_info = {0};
+
+int _PM_console_fd = -1;
+int _PM_leds = 0,_PM_modifiers = 0;
+static ibool inited = false;
+static int tty_vc = 0;
+static int console_count = 0;
+static int startup_vc;
+static int fd_mem = 0;
+static ibool in_raw_mode = false;
+#ifdef ENABLE_MTRR
+static int mtrr_fd;
+#endif
+static uint VESABuf_len = 1024; /* Length of the VESABuf buffer */
+static void *VESABuf_ptr = NULL; /* Near pointer to VESABuf */
+static uint VESABuf_rseg; /* Real mode segment of VESABuf */
+static uint VESABuf_roff; /* Real mode offset of VESABuf */
+#ifdef TRACE_IO
+static ulong traceAddr;
+#endif
+
+static void (PMAPIP fatalErrorCleanup)(void) = NULL;
+
+/*----------------------------- Implementation ----------------------------*/
+
+#ifdef TRACE_IO
+extern void printk(char *msg,...);
+#endif
+
+static inline void port_out(int value, int port)
+{
+#ifdef TRACE_IO
+ printk("%04X:%04X: outb.%04X <- %02X\n", traceAddr >> 16, traceAddr & 0xFFFF, (ushort)port, (uchar)value);
+#endif
+ asm volatile ("outb %0,%1"
+ ::"a" ((unsigned char) value), "d"((unsigned short) port));
+}
+
+static inline void port_outw(int value, int port)
+{
+#ifdef TRACE_IO
+ printk("%04X:%04X: outw.%04X <- %04X\n", traceAddr >> 16,traceAddr & 0xFFFF, (ushort)port, (ushort)value);
+#endif
+ asm volatile ("outw %0,%1"
+ ::"a" ((unsigned short) value), "d"((unsigned short) port));
+}
+
+static inline void port_outl(int value, int port)
+{
+#ifdef TRACE_IO
+ printk("%04X:%04X: outl.%04X <- %08X\n", traceAddr >> 16,traceAddr & 0xFFFF, (ushort)port, (ulong)value);
+#endif
+ asm volatile ("outl %0,%1"
+ ::"a" ((unsigned long) value), "d"((unsigned short) port));
+}
+
+static inline unsigned int port_in(int port)
+{
+ unsigned char value;
+ asm volatile ("inb %1,%0"
+ :"=a" ((unsigned char)value)
+ :"d"((unsigned short) port));
+#ifdef TRACE_IO
+ printk("%04X:%04X: inb.%04X -> %02X\n", traceAddr >> 16,traceAddr & 0xFFFF, (ushort)port, (uchar)value);
+#endif
+ return value;
+}
+
+static inline unsigned int port_inw(int port)
+{
+ unsigned short value;
+ asm volatile ("inw %1,%0"
+ :"=a" ((unsigned short)value)
+ :"d"((unsigned short) port));
+#ifdef TRACE_IO
+ printk("%04X:%04X: inw.%04X -> %04X\n", traceAddr >> 16,traceAddr & 0xFFFF, (ushort)port, (ushort)value);
+#endif
+ return value;
+}
+
+static inline unsigned int port_inl(int port)
+{
+ unsigned long value;
+ asm volatile ("inl %1,%0"
+ :"=a" ((unsigned long)value)
+ :"d"((unsigned short) port));
+#ifdef TRACE_IO
+ printk("%04X:%04X: inl.%04X -> %08X\n", traceAddr >> 16,traceAddr & 0xFFFF, (ushort)port, (ulong)value);
+#endif
+ return value;
+}
+
+static int real_mem_init(void)
+{
+ void *m;
+ int fd_zero;
+
+ if (mem_info.ready)
+ return 1;
+
+ if ((fd_zero = open("/dev/zero", O_RDONLY)) == -1)
+ PM_fatalError("You must have root privledges to run this program!");
+ if ((m = mmap((void *)REAL_MEM_BASE, REAL_MEM_SIZE,
+ PROT_READ | PROT_WRITE | PROT_EXEC,
+ MAP_FIXED | MAP_PRIVATE, fd_zero, 0)) == (void *)-1) {
+ close(fd_zero);
+ PM_fatalError("You must have root privledges to run this program!");
+ }
+ mem_info.ready = 1;
+ mem_info.count = 1;
+ mem_info.blocks[0].size = REAL_MEM_SIZE;
+ mem_info.blocks[0].free = 1;
+ return 1;
+}
+
+static void insert_block(int i)
+{
+ memmove(
+ mem_info.blocks + i + 1,
+ mem_info.blocks + i,
+ (mem_info.count - i) * sizeof(struct mem_block));
+ mem_info.count++;
+}
+
+static void delete_block(int i)
+{
+ mem_info.count--;
+
+ memmove(
+ mem_info.blocks + i,
+ mem_info.blocks + i + 1,
+ (mem_info.count - i) * sizeof(struct mem_block));
+}
+
+static inline void set_bit(unsigned int bit, void *array)
+{
+ unsigned char *a = array;
+ a[bit / 8] |= (1 << (bit % 8));
+}
+
+static inline unsigned int get_int_seg(int i)
+{
+ return *(unsigned short *)(i * 4 + 2);
+}
+
+static inline unsigned int get_int_off(int i)
+{
+ return *(unsigned short *)(i * 4);
+}
+
+static inline void pushw(unsigned short i)
+{
+ struct vm86_regs *r = &context.vm.regs;
+ r->esp -= 2;
+ *(unsigned short *)(((unsigned int)r->ss << 4) + r->esp) = i;
+}
+
+ibool PMAPI PM_haveBIOSAccess(void)
+{ return true; }
+
+void PMAPI PM_init(void)
+{
+ void *m;
+ uint r_seg,r_off;
+
+ if (inited)
+ return;
+
+ /* Map the Interrupt Vectors (0x0 - 0x400) + BIOS data (0x400 - 0x502)
+ * and the physical framebuffer and ROM images from (0xa0000 - 0x100000)
+ */
+ real_mem_init();
+ if (!fd_mem && (fd_mem = open("/dev/mem", O_RDWR)) == -1) {
+ PM_fatalError("You must have root privileges to run this program!");
+ }
+ if ((m = mmap((void *)0, 0x502,
+ PROT_READ | PROT_WRITE | PROT_EXEC,
+ MAP_FIXED | MAP_PRIVATE, fd_mem, 0)) == (void *)-1) {
+ PM_fatalError("You must have root privileges to run this program!");
+ }
+ if ((m = mmap((void *)0xA0000, 0xC0000 - 0xA0000,
+ PROT_READ | PROT_WRITE,
+ MAP_FIXED | MAP_SHARED, fd_mem, 0xA0000)) == (void *)-1) {
+ PM_fatalError("You must have root privileges to run this program!");
+ }
+ if ((m = mmap((void *)0xC0000, 0xD0000 - 0xC0000,
+ PROT_READ | PROT_WRITE | PROT_EXEC,
+ MAP_FIXED | MAP_PRIVATE, fd_mem, 0xC0000)) == (void *)-1) {
+ PM_fatalError("You must have root privileges to run this program!");
+ }
+ if ((m = mmap((void *)0xD0000, 0x100000 - 0xD0000,
+ PROT_READ | PROT_WRITE,
+ MAP_FIXED | MAP_SHARED, fd_mem, 0xD0000)) == (void *)-1) {
+ PM_fatalError("You must have root privileges to run this program!");
+ }
+ inited = 1;
+
+ /* Allocate a stack */
+ m = PM_allocRealSeg(DEFAULT_STACK_SIZE,&r_seg,&r_off);
+ context.stack_seg = r_seg;
+ context.stack_off = r_off+DEFAULT_STACK_SIZE;
+
+ /* Allocate the return to 32 bit routine */
+ m = PM_allocRealSeg(2,&r_seg,&r_off);
+ context.ret_seg = r_seg;
+ context.ret_off = r_off;
+ ((uchar*)m)[0] = 0xCD; /* int opcode */
+ ((uchar*)m)[1] = RETURN_TO_32_INT;
+ memset(&context.vm, 0, sizeof(context.vm));
+
+ /* Enable kernel emulation of all ints except RETURN_TO_32_INT */
+ memset(&context.vm.int_revectored, 0, sizeof(context.vm.int_revectored));
+ set_bit(RETURN_TO_32_INT, &context.vm.int_revectored);
+ context.ready = 1;
+#ifdef ENABLE_MTRR
+ mtrr_fd = open("/dev/cpu/mtrr", O_RDWR, 0);
+ if (mtrr_fd < 0)
+ mtrr_fd = open("/proc/mtrr", O_RDWR, 0);
+#endif
+ /* Enable I/O permissions to directly access I/O ports. We break the
+ * allocation into two parts, one for the ports from 0-0x3FF and
+ * another for the remaining ports up to 0xFFFF. Standard Linux kernels
+ * only allow the first 0x400 ports to be enabled, so to enable all
+ * 65536 ports you need a patched kernel that will enable the full
+ * 8Kb I/O permissions bitmap.
+ */
+#ifndef TRACE_IO
+ ioperm(0x0,0x400,1);
+ ioperm(0x400,0x10000-0x400,1);
+#endif
+ iopl(3);
+}
+
+long PMAPI PM_getOSType(void)
+{ return _OS_LINUX; }
+
+int PMAPI PM_getModeType(void)
+{ return PM_386; }
+
+void PMAPI PM_backslash(char *s)
+{
+ uint pos = strlen(s);
+ if (s[pos-1] != '/') {
+ s[pos] = '/';
+ s[pos+1] = '\0';
+ }
+}
+
+void PMAPI PM_setFatalErrorCleanup(
+ void (PMAPIP cleanup)(void))
+{
+ fatalErrorCleanup = cleanup;
+}
+
+void PMAPI PM_fatalError(const char *msg)
+{
+ if (fatalErrorCleanup)
+ fatalErrorCleanup();
+ fprintf(stderr,"%s\n", msg);
+ fflush(stderr);
+ exit(1);
+}
+
+static void ExitVBEBuf(void)
+{
+ if (VESABuf_ptr)
+ PM_freeRealSeg(VESABuf_ptr);
+ VESABuf_ptr = 0;
+}
+
+void * PMAPI PM_getVESABuf(uint *len,uint *rseg,uint *roff)
+{
+ if (!VESABuf_ptr) {
+ /* Allocate a global buffer for communicating with the VESA VBE */
+ if ((VESABuf_ptr = PM_allocRealSeg(VESABuf_len, &VESABuf_rseg, &VESABuf_roff)) == NULL)
+ return NULL;
+ atexit(ExitVBEBuf);
+ }
+ *len = VESABuf_len;
+ *rseg = VESABuf_rseg;
+ *roff = VESABuf_roff;
+ return VESABuf_ptr;
+}
+
+/* New raw console based getch and kbhit functions */
+
+#define KB_CAPS LED_CAP /* 4 */
+#define KB_NUMLOCK LED_NUM /* 2 */
+#define KB_SCROLL LED_SCR /* 1 */
+#define KB_SHIFT 8
+#define KB_CONTROL 16
+#define KB_ALT 32
+
+/* Structure used to save the keyboard mode to disk. We save it to disk
+ * so that we can properly restore the mode later if the program crashed.
+ */
+
+typedef struct {
+ struct termios termios;
+ int kb_mode;
+ int leds;
+ int flags;
+ int startup_vc;
+ } keyboard_mode;
+
+/* Name of the file used to save keyboard mode information */
+
+#define KBMODE_DAT "kbmode.dat"
+
+/****************************************************************************
+REMARKS:
+Open the keyboard mode file on disk.
+****************************************************************************/
+static FILE *open_kb_mode(
+ char *mode,
+ char *path)
+{
+ if (!PM_findBPD("graphics.bpd",path))
+ return NULL;
+ PM_backslash(path);
+ strcat(path,KBMODE_DAT);
+ return fopen(path,mode);
+}
+
+/****************************************************************************
+REMARKS:
+Restore the keyboard to normal mode
+****************************************************************************/
+void _PM_restore_kb_mode(void)
+{
+ FILE *kbmode;
+ keyboard_mode mode;
+ char path[PM_MAX_PATH];
+
+ if (_PM_console_fd != -1 && (kbmode = open_kb_mode("rb",path)) != NULL) {
+ if (fread(&mode,1,sizeof(mode),kbmode) == sizeof(mode)) {
+ if (mode.startup_vc > 0)
+ ioctl(_PM_console_fd, VT_ACTIVATE, mode.startup_vc);
+ ioctl(_PM_console_fd, KDSKBMODE, mode.kb_mode);
+ ioctl(_PM_console_fd, KDSETLED, mode.leds);
+ tcsetattr(_PM_console_fd, TCSAFLUSH, &mode.termios);
+ fcntl(_PM_console_fd,F_SETFL,mode.flags);
+ }
+ fclose(kbmode);
+ unlink(path);
+ in_raw_mode = false;
+ }
+}
+
+/****************************************************************************
+REMARKS:
+Safely abort the event module upon catching a fatal error.
+****************************************************************************/
+void _PM_abort(
+ int signo)
+{
+ char buf[80];
+
+ sprintf(buf,"Terminating on signal %d",signo);
+ _PM_restore_kb_mode();
+ PM_fatalError(buf);
+}
+
+/****************************************************************************
+REMARKS:
+Put the keyboard into raw mode
+****************************************************************************/
+void _PM_keyboard_rawmode(void)
+{
+ struct termios conf;
+ FILE *kbmode;
+ keyboard_mode mode;
+ char path[PM_MAX_PATH];
+ int i;
+ static int sig_list[] = {
+ SIGHUP,
+ SIGINT,
+ SIGQUIT,
+ SIGILL,
+ SIGTRAP,
+ SIGABRT,
+ SIGIOT,
+ SIGBUS,
+ SIGFPE,
+ SIGKILL,
+ SIGSEGV,
+ SIGTERM,
+ };
+
+ if ((kbmode = open_kb_mode("rb",path)) == NULL) {
+ if ((kbmode = open_kb_mode("wb",path)) == NULL)
+ PM_fatalError("Unable to open kbmode.dat file for writing!");
+ if (ioctl(_PM_console_fd, KDGKBMODE, &mode.kb_mode))
+ perror("KDGKBMODE");
+ ioctl(_PM_console_fd, KDGETLED, &mode.leds);
+ _PM_leds = mode.leds & 0xF;
+ _PM_modifiers = 0;
+ tcgetattr(_PM_console_fd, &mode.termios);
+ conf = mode.termios;
+ conf.c_lflag &= ~(ICANON | ECHO | ISIG);
+ conf.c_iflag &= ~(ISTRIP | IGNCR | ICRNL | INLCR | BRKINT | PARMRK | INPCK | IUCLC | IXON | IXOFF);
+ conf.c_iflag |= (IGNBRK | IGNPAR);
+ conf.c_cc[VMIN] = 1;
+ conf.c_cc[VTIME] = 0;
+ conf.c_cc[VSUSP] = 0;
+ tcsetattr(_PM_console_fd, TCSAFLUSH, &conf);
+ mode.flags = fcntl(_PM_console_fd,F_GETFL);
+ if (ioctl(_PM_console_fd, KDSKBMODE, K_MEDIUMRAW))
+ perror("KDSKBMODE");
+ atexit(_PM_restore_kb_mode);
+ for (i = 0; i < sizeof(sig_list)/sizeof(sig_list[0]); i++)
+ signal(sig_list[i], _PM_abort);
+ mode.startup_vc = startup_vc;
+ if (fwrite(&mode,1,sizeof(mode),kbmode) != sizeof(mode))
+ PM_fatalError("Error writing kbmode.dat!");
+ fclose(kbmode);
+ in_raw_mode = true;
+ }
+}
+
+int PMAPI PM_kbhit(void)
+{
+ fd_set s;
+ struct timeval tv = { 0, 0 };
+
+ if (console_count == 0)
+ PM_fatalError("You *must* open a console before using PM_kbhit!");
+ if (!in_raw_mode)
+ _PM_keyboard_rawmode();
+ FD_ZERO(&s);
+ FD_SET(_PM_console_fd, &s);
+ return select(_PM_console_fd+1, &s, NULL, NULL, &tv) > 0;
+}
+
+int PMAPI PM_getch(void)
+{
+ static uchar c;
+ int release;
+ static struct kbentry ke;
+
+ if (console_count == 0)
+ PM_fatalError("You *must* open a console before using PM_getch!");
+ if (!in_raw_mode)
+ _PM_keyboard_rawmode();
+ while (read(_PM_console_fd, &c, 1) > 0) {
+ release = c & 0x80;
+ c &= 0x7F;
+ if (release) {
+ switch(c){
+ case 42: case 54: // Shift
+ _PM_modifiers &= ~KB_SHIFT;
+ break;
+ case 29: case 97: // Control
+ _PM_modifiers &= ~KB_CONTROL;
+ break;
+ case 56: case 100: // Alt / AltGr
+ _PM_modifiers &= ~KB_ALT;
+ break;
+ }
+ continue;
+ }
+ switch (c) {
+ case 42: case 54: // Shift
+ _PM_modifiers |= KB_SHIFT;
+ break;
+ case 29: case 97: // Control
+ _PM_modifiers |= KB_CONTROL;
+ break;
+ case 56: case 100: // Alt / AltGr
+ _PM_modifiers |= KB_ALT;
+ break;
+ case 58: // Caps Lock
+ _PM_modifiers ^= KB_CAPS;
+ ioctl(_PM_console_fd, KDSETLED, _PM_modifiers & 7);
+ break;
+ case 69: // Num Lock
+ _PM_modifiers ^= KB_NUMLOCK;
+ ioctl(_PM_console_fd, KDSETLED, _PM_modifiers & 7);
+ break;
+ case 70: // Scroll Lock
+ _PM_modifiers ^= KB_SCROLL;
+ ioctl(_PM_console_fd, KDSETLED, _PM_modifiers & 7);
+ break;
+ case 28:
+ return 0x1C;
+ default:
+ ke.kb_index = c;
+ ke.kb_table = 0;
+ if ((_PM_modifiers & KB_SHIFT) || (_PM_modifiers & KB_CAPS))
+ ke.kb_table |= K_SHIFTTAB;
+ if (_PM_modifiers & KB_ALT)
+ ke.kb_table |= K_ALTTAB;
+ ioctl(_PM_console_fd, KDGKBENT, (ulong)&ke);
+ c = ke.kb_value & 0xFF;
+ return c;
+ }
+ }
+ return 0;
+}
+
+/****************************************************************************
+REMARKS:
+Sleep until the virtual terminal is active
+****************************************************************************/
+static void wait_vt_active(
+ int _PM_console_fd)
+{
+ while (ioctl(_PM_console_fd, VT_WAITACTIVE, tty_vc) < 0) {
+ if ((errno != EAGAIN) && (errno != EINTR)) {
+ perror("ioctl(VT_WAITACTIVE)");
+ exit(1);
+ }
+ usleep(150000);
+ }
+}
+
+/****************************************************************************
+REMARKS:
+Checks the owner of the specified virtual console.
+****************************************************************************/
+static int check_owner(
+ int vc)
+{
+ struct stat sbuf;
+ char fname[30];
+
+ sprintf(fname, "/dev/tty%d", vc);
+ if ((stat(fname, &sbuf) >= 0) && (getuid() == sbuf.st_uid))
+ return 1;
+ printf("You must be the owner of the current console to use this program.\n");
+ return 0;
+}
+
+/****************************************************************************
+REMARKS:
+Checks if the console is currently in graphics mode, and if so we forcibly
+restore it back to text mode again. This handles the case when a Nucleus or
+MGL program crashes and leaves the console in graphics mode. Running the
+textmode utility (or any other Nucleus/MGL program) via a telnet session
+into the machine will restore it back to normal.
+****************************************************************************/
+static void restore_text_console(
+ int console_id)
+{
+ if (ioctl(console_id, KDSETMODE, KD_TEXT) < 0)
+ LOGWARN("ioctl(KDSETMODE) failed");
+ _PM_restore_kb_mode();
+}
+
+/****************************************************************************
+REMARKS:
+Opens up the console device for output by finding an appropriate virutal
+console that we can run on.
+****************************************************************************/
+PM_HWND PMAPI PM_openConsole(
+ PM_HWND hwndUser,
+ int device,
+ int xRes,
+ int yRes,
+ int bpp,
+ ibool fullScreen)
+{
+ struct vt_mode vtm;
+ struct vt_stat vts;
+ struct stat sbuf;
+ char fname[30];
+
+ /* Check if we have already opened the console */
+ if (console_count++)
+ return _PM_console_fd;
+
+ /* Now, it would be great if we could use /dev/tty and see what it is
+ * connected to. Alas, we cannot find out reliably what VC /dev/tty is
+ * bound to. Thus we parse stdin through stderr for a reliable VC.
+ */
+ startup_vc = 0;
+ for (_PM_console_fd = 0; _PM_console_fd < 3; _PM_console_fd++) {
+ if (fstat(_PM_console_fd, &sbuf) < 0)
+ continue;
+ if (ioctl(_PM_console_fd, VT_GETMODE, &vtm) < 0)
+ continue;
+ if ((sbuf.st_rdev & 0xFF00) != 0x400)
+ continue;
+ if (!(sbuf.st_rdev & 0xFF))
+ continue;
+ tty_vc = sbuf.st_rdev & 0xFF;
+ restore_text_console(_PM_console_fd);
+ return _PM_console_fd;
+ }
+ if ((_PM_console_fd = open("/dev/console", O_RDWR)) < 0) {
+ printf("open_dev_console: can't open /dev/console \n");
+ exit(1);
+ }
+ if (ioctl(_PM_console_fd, VT_OPENQRY, &tty_vc) < 0)
+ goto Error;
+ if (tty_vc <= 0)
+ goto Error;
+ sprintf(fname, "/dev/tty%d", tty_vc);
+ close(_PM_console_fd);
+
+ /* Change our control terminal */
+ setsid();
+
+ /* We must use RDWR to allow for output... */
+ if (((_PM_console_fd = open(fname, O_RDWR)) >= 0) &&
+ (ioctl(_PM_console_fd, VT_GETSTATE, &vts) >= 0)) {
+ if (!check_owner(vts.v_active))
+ goto Error;
+ restore_text_console(_PM_console_fd);
+
+ /* Success, redirect all stdios */
+ fflush(stdin);
+ fflush(stdout);
+ fflush(stderr);
+ close(0);
+ close(1);
+ close(2);
+ dup(_PM_console_fd);
+ dup(_PM_console_fd);
+ dup(_PM_console_fd);
+
+ /* clear screen and switch to it */
+ fwrite("\e[H\e[J", 6, 1, stderr);
+ fflush(stderr);
+ if (tty_vc != vts.v_active) {
+ startup_vc = vts.v_active;
+ ioctl(_PM_console_fd, VT_ACTIVATE, tty_vc);
+ wait_vt_active(_PM_console_fd);
+ }
+ }
+ return _PM_console_fd;
+
+Error:
+ if (_PM_console_fd > 2)
+ close(_PM_console_fd);
+ console_count = 0;
+ PM_fatalError(
+ "Not running in a graphics capable console,\n"
+ "and unable to find one.\n");
+ return -1;
+}
+
+#define FONT_C 0x10000 /* 64KB for font data */
+
+/****************************************************************************
+REMARKS:
+Returns the size of the console state buffer.
+****************************************************************************/
+int PMAPI PM_getConsoleStateSize(void)
+{
+ if (!inited)
+ PM_init();
+ return PM_getVGAStateSize() + FONT_C*2;
+}
+
+/****************************************************************************
+REMARKS:
+Save the state of the Linux console.
+****************************************************************************/
+void PMAPI PM_saveConsoleState(void *stateBuf,int console_id)
+{
+ uchar *regs = stateBuf;
+
+ /* Save the current console font */
+ if (ioctl(console_id,GIO_FONT,®s[PM_getVGAStateSize()]) < 0)
+ perror("ioctl(GIO_FONT)");
+
+ /* Inform the Linux console that we are going into graphics mode */
+ if (ioctl(console_id, KDSETMODE, KD_GRAPHICS) < 0)
+ perror("ioctl(KDSETMODE)");
+
+ /* Save state of VGA registers */
+ PM_saveVGAState(stateBuf);
+}
+
+void PMAPI PM_setSuspendAppCallback(int (_ASMAPIP saveState)(int flags))
+{
+ /* TODO: Implement support for allowing console switching! */
+}
+
+/****************************************************************************
+REMARKS:
+Restore the state of the Linux console.
+****************************************************************************/
+void PMAPI PM_restoreConsoleState(const void *stateBuf,PM_HWND console_id)
+{
+ const uchar *regs = stateBuf;
+
+ /* Restore the state of the VGA compatible registers */
+ PM_restoreVGAState(stateBuf);
+
+ /* Inform the Linux console that we are back from graphics modes */
+ if (ioctl(console_id, KDSETMODE, KD_TEXT) < 0)
+ LOGWARN("ioctl(KDSETMODE) failed");
+
+ /* Restore the old console font */
+ if (ioctl(console_id,PIO_FONT,®s[PM_getVGAStateSize()]) < 0)
+ LOGWARN("ioctl(KDSETMODE) failed");
+
+ /* Coming back from graphics mode on Linux also restored the previous
+ * text mode console contents, so we need to clear the screen to get
+ * around this since the cursor does not get homed by our code.
+ */
+ fflush(stdout);
+ fflush(stderr);
+ printf("\033[H\033[J");
+ fflush(stdout);
+}
+
+/****************************************************************************
+REMARKS:
+Close the Linux console and put it back to normal.
+****************************************************************************/
+void PMAPI PM_closeConsole(PM_HWND _PM_console_fd)
+{
+ /* Restore console to normal operation */
+ if (--console_count == 0) {
+ /* Re-activate the original virtual console */
+ if (startup_vc > 0)
+ ioctl(_PM_console_fd, VT_ACTIVATE, startup_vc);
+
+ /* Close the console file descriptor */
+ if (_PM_console_fd > 2)
+ close(_PM_console_fd);
+ _PM_console_fd = -1;
+ }
+}
+
+void PM_setOSCursorLocation(int x,int y)
+{
+ /* Nothing to do in here */
+}
+
+/****************************************************************************
+REMARKS:
+Set the screen width and height for the Linux console.
+****************************************************************************/
+void PM_setOSScreenWidth(int width,int height)
+{
+ struct winsize ws;
+ struct vt_sizes vs;
+
+ // Resize the software terminal
+ ws.ws_col = width;
+ ws.ws_row = height;
+ ioctl(_PM_console_fd, TIOCSWINSZ, &ws);
+
+ // And the hardware
+ vs.v_rows = height;
+ vs.v_cols = width;
+ vs.v_scrollsize = 0;
+ ioctl(_PM_console_fd, VT_RESIZE, &vs);
+}
+
+ibool PMAPI PM_setRealTimeClockHandler(PM_intHandler ih, int frequency)
+{
+ // TODO: Implement this for Linux
+ return false;
+}
+
+void PMAPI PM_setRealTimeClockFrequency(int frequency)
+{
+ // TODO: Implement this for Linux
+}
+
+void PMAPI PM_restoreRealTimeClockHandler(void)
+{
+ // TODO: Implement this for Linux
+}
+
+char * PMAPI PM_getCurrentPath(
+ char *path,
+ int maxLen)
+{
+ return getcwd(path,maxLen);
+}
+
+char PMAPI PM_getBootDrive(void)
+{ return '/'; }
+
+const char * PMAPI PM_getVBEAFPath(void)
+{ return PM_getNucleusConfigPath(); }
+
+const char * PMAPI PM_getNucleusPath(void)
+{
+ char *env = getenv("NUCLEUS_PATH");
+ return env ? env : "/usr/lib/nucleus";
+}
+
+const char * PMAPI PM_getNucleusConfigPath(void)
+{
+ static char path[256];
+ strcpy(path,PM_getNucleusPath());
+ PM_backslash(path);
+ strcat(path,"config");
+ return path;
+}
+
+const char * PMAPI PM_getUniqueID(void)
+{
+ static char buf[128];
+ gethostname(buf, 128);
+ return buf;
+}
+
+const char * PMAPI PM_getMachineName(void)
+{
+ static char buf[128];
+ gethostname(buf, 128);
+ return buf;
+}
+
+void * PMAPI PM_getBIOSPointer(void)
+{
+ static uchar *zeroPtr = NULL;
+ if (!zeroPtr)
+ zeroPtr = PM_mapPhysicalAddr(0,0xFFFFF,true);
+ return (void*)(zeroPtr + 0x400);
+}
+
+void * PMAPI PM_getA0000Pointer(void)
+{
+ /* PM_init maps in the 0xA0000 framebuffer region 1:1 with our
+ * address mapping, so we can return the address here.
+ */
+ if (!inited)
+ PM_init();
+ return (void*)(0xA0000);
+}
+
+void * PMAPI PM_mapPhysicalAddr(ulong base,ulong limit,ibool isCached)
+{
+ uchar *p;
+ ulong baseAddr,baseOfs;
+
+ if (!inited)
+ PM_init();
+ if (base >= 0xA0000 && base < 0x100000)
+ return (void*)base;
+ if (!fd_mem && (fd_mem = open("/dev/mem", O_RDWR)) == -1)
+ return NULL;
+
+ /* Round the physical address to a 4Kb boundary and the limit to a
+ * 4Kb-1 boundary before passing the values to mmap. If we round the
+ * physical address, then we also add an extra offset into the address
+ * that we return.
+ */
+ baseOfs = base & 4095;
+ baseAddr = base & ~4095;
+ limit = ((limit+baseOfs+1+4095) & ~4095)-1;
+ if ((p = mmap(0, limit+1,
+ PROT_READ | PROT_WRITE, MAP_SHARED,
+ fd_mem, baseAddr)) == (void *)-1)
+ return NULL;
+ return (void*)(p+baseOfs);
+}
+
+void PMAPI PM_freePhysicalAddr(void *ptr,ulong limit)
+{
+ if ((ulong)ptr >= 0x100000)
+ munmap(ptr,limit+1);
+}
+
+ulong PMAPI PM_getPhysicalAddr(void *p)
+{
+ // TODO: This function should find the physical address of a linear
+ // address.
+ return 0xFFFFFFFFUL;
+}
+
+ibool PMAPI PM_getPhysicalAddrRange(void *p,ulong length,ulong *physAddress)
+{
+ // TODO: This function should find a range of physical addresses
+ // for a linear address.
+ return false;
+}
+
+void PMAPI PM_sleep(ulong milliseconds)
+{
+ // TODO: Put the process to sleep for milliseconds
+}
+
+int PMAPI PM_getCOMPort(int port)
+{
+ // TODO: Re-code this to determine real values using the Plug and Play
+ // manager for the OS.
+ switch (port) {
+ case 0: return 0x3F8;
+ case 1: return 0x2F8;
+ }
+ return 0;
+}
+
+int PMAPI PM_getLPTPort(int port)
+{
+ // TODO: Re-code this to determine real values using the Plug and Play
+ // manager for the OS.
+ switch (port) {
+ case 0: return 0x3BC;
+ case 1: return 0x378;
+ case 2: return 0x278;
+ }
+ return 0;
+}
+
+void * PMAPI PM_mallocShared(long size)
+{
+ return PM_malloc(size);
+}
+
+void PMAPI PM_freeShared(void *ptr)
+{
+ PM_free(ptr);
+}
+
+void * PMAPI PM_mapToProcess(void *base,ulong limit)
+{ return (void*)base; }
+
+void * PMAPI PM_mapRealPointer(uint r_seg,uint r_off)
+{
+ /* PM_init maps in the 0xA0000-0x100000 region 1:1 with our
+ * address mapping, as well as all memory blocks in a 1:1 address
+ * mapping so we can simply return the physical address in here.
+ */
+ if (!inited)
+ PM_init();
+ return (void*)MK_PHYS(r_seg,r_off);
+}
+
+void * PMAPI PM_allocRealSeg(uint size,uint *r_seg,uint *r_off)
+{
+ int i;
+ char *r = (char *)REAL_MEM_BASE;
+
+ if (!inited)
+ PM_init();
+ if (!mem_info.ready)
+ return NULL;
+ if (mem_info.count == REAL_MEM_BLOCKS)
+ return NULL;
+ size = (size + 15) & ~15;
+ for (i = 0; i < mem_info.count; i++) {
+ if (mem_info.blocks[i].free && size < mem_info.blocks[i].size) {
+ insert_block(i);
+ mem_info.blocks[i].size = size;
+ mem_info.blocks[i].free = 0;
+ mem_info.blocks[i + 1].size -= size;
+ *r_seg = (uint)(r) >> 4;
+ *r_off = (uint)(r) & 0xF;
+ return (void *)r;
+ }
+ r += mem_info.blocks[i].size;
+ }
+ return NULL;
+}
+
+void PMAPI PM_freeRealSeg(void *mem)
+{
+ int i;
+ char *r = (char *)REAL_MEM_BASE;
+
+ if (!mem_info.ready)
+ return;
+ i = 0;
+ while (mem != (void *)r) {
+ r += mem_info.blocks[i].size;
+ i++;
+ if (i == mem_info.count)
+ return;
+ }
+ mem_info.blocks[i].free = 1;
+ if (i + 1 < mem_info.count && mem_info.blocks[i + 1].free) {
+ mem_info.blocks[i].size += mem_info.blocks[i + 1].size;
+ delete_block(i + 1);
+ }
+ if (i - 1 >= 0 && mem_info.blocks[i - 1].free) {
+ mem_info.blocks[i - 1].size += mem_info.blocks[i].size;
+ delete_block(i);
+ }
+}
+
+#define DIRECTION_FLAG (1 << 10)
+
+static void em_ins(int size)
+{
+ unsigned int edx, edi;
+
+ edx = context.vm.regs.edx & 0xffff;
+ edi = context.vm.regs.edi & 0xffff;
+ edi += (unsigned int)context.vm.regs.ds << 4;
+ if (context.vm.regs.eflags & DIRECTION_FLAG) {
+ if (size == 4)
+ asm volatile ("std; insl; cld"
+ : "=D" (edi) : "d" (edx), "0" (edi));
+ else if (size == 2)
+ asm volatile ("std; insw; cld"
+ : "=D" (edi) : "d" (edx), "0" (edi));
+ else
+ asm volatile ("std; insb; cld"
+ : "=D" (edi) : "d" (edx), "0" (edi));
+ }
+ else {
+ if (size == 4)
+ asm volatile ("cld; insl"
+ : "=D" (edi) : "d" (edx), "0" (edi));
+ else if (size == 2)
+ asm volatile ("cld; insw"
+ : "=D" (edi) : "d" (edx), "0" (edi));
+ else
+ asm volatile ("cld; insb"
+ : "=D" (edi) : "d" (edx), "0" (edi));
+ }
+ edi -= (unsigned int)context.vm.regs.ds << 4;
+ context.vm.regs.edi &= 0xffff0000;
+ context.vm.regs.edi |= edi & 0xffff;
+}
+
+static void em_rep_ins(int size)
+{
+ unsigned int ecx, edx, edi;
+
+ ecx = context.vm.regs.ecx & 0xffff;
+ edx = context.vm.regs.edx & 0xffff;
+ edi = context.vm.regs.edi & 0xffff;
+ edi += (unsigned int)context.vm.regs.ds << 4;
+ if (context.vm.regs.eflags & DIRECTION_FLAG) {
+ if (size == 4)
+ asm volatile ("std; rep; insl; cld"
+ : "=D" (edi), "=c" (ecx)
+ : "d" (edx), "0" (edi), "1" (ecx));
+ else if (size == 2)
+ asm volatile ("std; rep; insw; cld"
+ : "=D" (edi), "=c" (ecx)
+ : "d" (edx), "0" (edi), "1" (ecx));
+ else
+ asm volatile ("std; rep; insb; cld"
+ : "=D" (edi), "=c" (ecx)
+ : "d" (edx), "0" (edi), "1" (ecx));
+ }
+ else {
+ if (size == 4)
+ asm volatile ("cld; rep; insl"
+ : "=D" (edi), "=c" (ecx)
+ : "d" (edx), "0" (edi), "1" (ecx));
+ else if (size == 2)
+ asm volatile ("cld; rep; insw"
+ : "=D" (edi), "=c" (ecx)
+ : "d" (edx), "0" (edi), "1" (ecx));
+ else
+ asm volatile ("cld; rep; insb"
+ : "=D" (edi), "=c" (ecx)
+ : "d" (edx), "0" (edi), "1" (ecx));
+ }
+
+ edi -= (unsigned int)context.vm.regs.ds << 4;
+ context.vm.regs.edi &= 0xffff0000;
+ context.vm.regs.edi |= edi & 0xffff;
+ context.vm.regs.ecx &= 0xffff0000;
+ context.vm.regs.ecx |= ecx & 0xffff;
+}
+
+static void em_outs(int size)
+{
+ unsigned int edx, esi;
+
+ edx = context.vm.regs.edx & 0xffff;
+ esi = context.vm.regs.esi & 0xffff;
+ esi += (unsigned int)context.vm.regs.ds << 4;
+ if (context.vm.regs.eflags & DIRECTION_FLAG) {
+ if (size == 4)
+ asm volatile ("std; outsl; cld"
+ : "=S" (esi) : "d" (edx), "0" (esi));
+ else if (size == 2)
+ asm volatile ("std; outsw; cld"
+ : "=S" (esi) : "d" (edx), "0" (esi));
+ else
+ asm volatile ("std; outsb; cld"
+ : "=S" (esi) : "d" (edx), "0" (esi));
+ }
+ else {
+ if (size == 4)
+ asm volatile ("cld; outsl"
+ : "=S" (esi) : "d" (edx), "0" (esi));
+ else if (size == 2)
+ asm volatile ("cld; outsw"
+ : "=S" (esi) : "d" (edx), "0" (esi));
+ else
+ asm volatile ("cld; outsb"
+ : "=S" (esi) : "d" (edx), "0" (esi));
+ }
+
+ esi -= (unsigned int)context.vm.regs.ds << 4;
+ context.vm.regs.esi &= 0xffff0000;
+ context.vm.regs.esi |= esi & 0xffff;
+}
+
+static void em_rep_outs(int size)
+{
+ unsigned int ecx, edx, esi;
+
+ ecx = context.vm.regs.ecx & 0xffff;
+ edx = context.vm.regs.edx & 0xffff;
+ esi = context.vm.regs.esi & 0xffff;
+ esi += (unsigned int)context.vm.regs.ds << 4;
+ if (context.vm.regs.eflags & DIRECTION_FLAG) {
+ if (size == 4)
+ asm volatile ("std; rep; outsl; cld"
+ : "=S" (esi), "=c" (ecx)
+ : "d" (edx), "0" (esi), "1" (ecx));
+ else if (size == 2)
+ asm volatile ("std; rep; outsw; cld"
+ : "=S" (esi), "=c" (ecx)
+ : "d" (edx), "0" (esi), "1" (ecx));
+ else
+ asm volatile ("std; rep; outsb; cld"
+ : "=S" (esi), "=c" (ecx)
+ : "d" (edx), "0" (esi), "1" (ecx));
+ }
+ else {
+ if (size == 4)
+ asm volatile ("cld; rep; outsl"
+ : "=S" (esi), "=c" (ecx)
+ : "d" (edx), "0" (esi), "1" (ecx));
+ else if (size == 2)
+ asm volatile ("cld; rep; outsw"
+ : "=S" (esi), "=c" (ecx)
+ : "d" (edx), "0" (esi), "1" (ecx));
+ else
+ asm volatile ("cld; rep; outsb"
+ : "=S" (esi), "=c" (ecx)
+ : "d" (edx), "0" (esi), "1" (ecx));
+ }
+
+ esi -= (unsigned int)context.vm.regs.ds << 4;
+ context.vm.regs.esi &= 0xffff0000;
+ context.vm.regs.esi |= esi & 0xffff;
+ context.vm.regs.ecx &= 0xffff0000;
+ context.vm.regs.ecx |= ecx & 0xffff;
+}
+
+static int emulate(void)
+{
+ unsigned char *insn;
+ struct {
+ unsigned int size : 1;
+ unsigned int rep : 1;
+ } prefix = { 0, 0 };
+ int i = 0;
+
+ insn = (unsigned char *)((unsigned int)context.vm.regs.cs << 4);
+ insn += context.vm.regs.eip;
+
+ while (1) {
+#ifdef TRACE_IO
+ traceAddr = ((ulong)context.vm.regs.cs << 16) + context.vm.regs.eip + i;
+#endif
+ if (insn[i] == 0x66) {
+ prefix.size = 1 - prefix.size;
+ i++;
+ }
+ else if (insn[i] == 0xf3) {
+ prefix.rep = 1;
+ i++;
+ }
+ else if (insn[i] == 0xf0 || insn[i] == 0xf2
+ || insn[i] == 0x26 || insn[i] == 0x2e
+ || insn[i] == 0x36 || insn[i] == 0x3e
+ || insn[i] == 0x64 || insn[i] == 0x65
+ || insn[i] == 0x67) {
+ /* these prefixes are just ignored */
+ i++;
+ }
+ else if (insn[i] == 0x6c) {
+ if (prefix.rep)
+ em_rep_ins(1);
+ else
+ em_ins(1);
+ i++;
+ break;
+ }
+ else if (insn[i] == 0x6d) {
+ if (prefix.rep) {
+ if (prefix.size)
+ em_rep_ins(4);
+ else
+ em_rep_ins(2);
+ }
+ else {
+ if (prefix.size)
+ em_ins(4);
+ else
+ em_ins(2);
+ }
+ i++;
+ break;
+ }
+ else if (insn[i] == 0x6e) {
+ if (prefix.rep)
+ em_rep_outs(1);
+ else
+ em_outs(1);
+ i++;
+ break;
+ }
+ else if (insn[i] == 0x6f) {
+ if (prefix.rep) {
+ if (prefix.size)
+ em_rep_outs(4);
+ else
+ em_rep_outs(2);
+ }
+ else {
+ if (prefix.size)
+ em_outs(4);
+ else
+ em_outs(2);
+ }
+ i++;
+ break;
+ }
+ else if (insn[i] == 0xec) {
+ *((uchar*)&context.vm.regs.eax) = port_in(context.vm.regs.edx);
+ i++;
+ break;
+ }
+ else if (insn[i] == 0xed) {
+ if (prefix.size)
+ *((ulong*)&context.vm.regs.eax) = port_inl(context.vm.regs.edx);
+ else
+ *((ushort*)&context.vm.regs.eax) = port_inw(context.vm.regs.edx);
+ i++;
+ break;
+ }
+ else if (insn[i] == 0xee) {
+ port_out(context.vm.regs.eax,context.vm.regs.edx);
+ i++;
+ break;
+ }
+ else if (insn[i] == 0xef) {
+ if (prefix.size)
+ port_outl(context.vm.regs.eax,context.vm.regs.edx);
+ else
+ port_outw(context.vm.regs.eax,context.vm.regs.edx);
+ i++;
+ break;
+ }
+ else
+ return 0;
+ }
+
+ context.vm.regs.eip += i;
+ return 1;
+}
+
+static void debug_info(int vret)
+{
+ int i;
+ unsigned char *p;
+
+ fputs("vm86() failed\n", stderr);
+ fprintf(stderr, "return = 0x%x\n", vret);
+ fprintf(stderr, "eax = 0x%08lx\n", context.vm.regs.eax);
+ fprintf(stderr, "ebx = 0x%08lx\n", context.vm.regs.ebx);
+ fprintf(stderr, "ecx = 0x%08lx\n", context.vm.regs.ecx);
+ fprintf(stderr, "edx = 0x%08lx\n", context.vm.regs.edx);
+ fprintf(stderr, "esi = 0x%08lx\n", context.vm.regs.esi);
+ fprintf(stderr, "edi = 0x%08lx\n", context.vm.regs.edi);
+ fprintf(stderr, "ebp = 0x%08lx\n", context.vm.regs.ebp);
+ fprintf(stderr, "eip = 0x%08lx\n", context.vm.regs.eip);
+ fprintf(stderr, "cs = 0x%04x\n", context.vm.regs.cs);
+ fprintf(stderr, "esp = 0x%08lx\n", context.vm.regs.esp);
+ fprintf(stderr, "ss = 0x%04x\n", context.vm.regs.ss);
+ fprintf(stderr, "ds = 0x%04x\n", context.vm.regs.ds);
+ fprintf(stderr, "es = 0x%04x\n", context.vm.regs.es);
+ fprintf(stderr, "fs = 0x%04x\n", context.vm.regs.fs);
+ fprintf(stderr, "gs = 0x%04x\n", context.vm.regs.gs);
+ fprintf(stderr, "eflags = 0x%08lx\n", context.vm.regs.eflags);
+ fputs("cs:ip = [ ", stderr);
+ p = (unsigned char *)((context.vm.regs.cs << 4) + (context.vm.regs.eip & 0xffff));
+ for (i = 0; i < 16; ++i)
+ fprintf(stderr, "%02x ", (unsigned int)p[i]);
+ fputs("]\n", stderr);
+ fflush(stderr);
+}
+
+static int run_vm86(void)
+{
+ unsigned int vret;
+
+ for (;;) {
+ vret = vm86(&context.vm);
+ if (VM86_TYPE(vret) == VM86_INTx) {
+ unsigned int v = VM86_ARG(vret);
+ if (v == RETURN_TO_32_INT)
+ return 1;
+ pushw(context.vm.regs.eflags);
+ pushw(context.vm.regs.cs);
+ pushw(context.vm.regs.eip);
+ context.vm.regs.cs = get_int_seg(v);
+ context.vm.regs.eip = get_int_off(v);
+ context.vm.regs.eflags &= ~(VIF_MASK | TF_MASK);
+ continue;
+ }
+ if (VM86_TYPE(vret) != VM86_UNKNOWN)
+ break;
+ if (!emulate())
+ break;
+ }
+ debug_info(vret);
+ return 0;
+}
+
+#define IND(ereg) context.vm.regs.ereg = regs->ereg
+#define OUTD(ereg) regs->ereg = context.vm.regs.ereg
+
+void PMAPI DPMI_int86(int intno, DPMI_regs *regs)
+{
+ if (!inited)
+ PM_init();
+ memset(&context.vm.regs, 0, sizeof(context.vm.regs));
+ IND(eax); IND(ebx); IND(ecx); IND(edx); IND(esi); IND(edi);
+ context.vm.regs.eflags = DEFAULT_VM86_FLAGS;
+ context.vm.regs.cs = get_int_seg(intno);
+ context.vm.regs.eip = get_int_off(intno);
+ context.vm.regs.ss = context.stack_seg;
+ context.vm.regs.esp = context.stack_off;
+ pushw(DEFAULT_VM86_FLAGS);
+ pushw(context.ret_seg);
+ pushw(context.ret_off);
+ run_vm86();
+ OUTD(eax); OUTD(ebx); OUTD(ecx); OUTD(edx); OUTD(esi); OUTD(edi);
+ regs->flags = context.vm.regs.eflags;
+}
+
+#define IN(ereg) context.vm.regs.ereg = in->e.ereg
+#define OUT(ereg) out->e.ereg = context.vm.regs.ereg
+
+int PMAPI PM_int86(int intno, RMREGS *in, RMREGS *out)
+{
+ if (!inited)
+ PM_init();
+ memset(&context.vm.regs, 0, sizeof(context.vm.regs));
+ IN(eax); IN(ebx); IN(ecx); IN(edx); IN(esi); IN(edi);
+ context.vm.regs.eflags = DEFAULT_VM86_FLAGS;
+ context.vm.regs.cs = get_int_seg(intno);
+ context.vm.regs.eip = get_int_off(intno);
+ context.vm.regs.ss = context.stack_seg;
+ context.vm.regs.esp = context.stack_off;
+ pushw(DEFAULT_VM86_FLAGS);
+ pushw(context.ret_seg);
+ pushw(context.ret_off);
+ run_vm86();
+ OUT(eax); OUT(ebx); OUT(ecx); OUT(edx); OUT(esi); OUT(edi);
+ out->x.cflag = context.vm.regs.eflags & 1;
+ return out->x.ax;
+}
+
+int PMAPI PM_int86x(int intno, RMREGS *in, RMREGS *out,
+ RMSREGS *sregs)
+{
+ if (!inited)
+ PM_init();
+ if (intno == 0x21) {
+ time_t today = time(NULL);
+ struct tm *t;
+ t = localtime(&today);
+ out->x.cx = t->tm_year + 1900;
+ out->h.dh = t->tm_mon + 1;
+ out->h.dl = t->tm_mday;
+ }
+ else {
+ unsigned int seg, off;
+ seg = get_int_seg(intno);
+ off = get_int_off(intno);
+ memset(&context.vm.regs, 0, sizeof(context.vm.regs));
+ IN(eax); IN(ebx); IN(ecx); IN(edx); IN(esi); IN(edi);
+ context.vm.regs.eflags = DEFAULT_VM86_FLAGS;
+ context.vm.regs.cs = seg;
+ context.vm.regs.eip = off;
+ context.vm.regs.es = sregs->es;
+ context.vm.regs.ds = sregs->ds;
+ context.vm.regs.fs = sregs->fs;
+ context.vm.regs.gs = sregs->gs;
+ context.vm.regs.ss = context.stack_seg;
+ context.vm.regs.esp = context.stack_off;
+ pushw(DEFAULT_VM86_FLAGS);
+ pushw(context.ret_seg);
+ pushw(context.ret_off);
+ run_vm86();
+ OUT(eax); OUT(ebx); OUT(ecx); OUT(edx); OUT(esi); OUT(edi);
+ sregs->es = context.vm.regs.es;
+ sregs->ds = context.vm.regs.ds;
+ sregs->fs = context.vm.regs.fs;
+ sregs->gs = context.vm.regs.gs;
+ out->x.cflag = context.vm.regs.eflags & 1;
+ }
+ return out->e.eax;
+}
+
+#define OUTR(ereg) in->e.ereg = context.vm.regs.ereg
+
+void PMAPI PM_callRealMode(uint seg,uint off, RMREGS *in,
+ RMSREGS *sregs)
+{
+ if (!inited)
+ PM_init();
+ memset(&context.vm.regs, 0, sizeof(context.vm.regs));
+ IN(eax); IN(ebx); IN(ecx); IN(edx); IN(esi); IN(edi);
+ context.vm.regs.eflags = DEFAULT_VM86_FLAGS;
+ context.vm.regs.cs = seg;
+ context.vm.regs.eip = off;
+ context.vm.regs.ss = context.stack_seg;
+ context.vm.regs.esp = context.stack_off;
+ context.vm.regs.es = sregs->es;
+ context.vm.regs.ds = sregs->ds;
+ context.vm.regs.fs = sregs->fs;
+ context.vm.regs.gs = sregs->gs;
+ pushw(DEFAULT_VM86_FLAGS);
+ pushw(context.ret_seg);
+ pushw(context.ret_off);
+ run_vm86();
+ OUTR(eax); OUTR(ebx); OUTR(ecx); OUTR(edx); OUTR(esi); OUTR(edi);
+ sregs->es = context.vm.regs.es;
+ sregs->ds = context.vm.regs.ds;
+ sregs->fs = context.vm.regs.fs;
+ sregs->gs = context.vm.regs.gs;
+ in->x.cflag = context.vm.regs.eflags & 1;
+}
+
+void PMAPI PM_availableMemory(ulong *physical,ulong *total)
+{
+ FILE *mem = fopen("/proc/meminfo","r");
+ char buf[1024];
+
+ fgets(buf,1024,mem);
+ fgets(buf,1024,mem);
+ sscanf(buf,"Mem: %*d %*d %ld", physical);
+ fgets(buf,1024,mem);
+ sscanf(buf,"Swap: %*d %*d %ld", total);
+ fclose(mem);
+ *total += *physical;
+}
+
+void * PMAPI PM_allocLockedMem(uint size,ulong *physAddr,ibool contiguous,ibool below16M)
+{
+ // TODO: Implement this for Linux
+ return NULL;
+}
+
+void PMAPI PM_freeLockedMem(void *p,uint size,ibool contiguous)
+{
+ // TODO: Implement this for Linux
+}
+
+void * PMAPI PM_allocPage(
+ ibool locked)
+{
+ // TODO: Implement this for Linux
+ return NULL;
+}
+
+void PMAPI PM_freePage(
+ void *p)
+{
+ // TODO: Implement this for Linux
+}
+
+void PMAPI PM_setBankA(int bank)
+{
+ if (!inited)
+ PM_init();
+ memset(&context.vm.regs, 0, sizeof(context.vm.regs));
+ context.vm.regs.eax = 0x4F05;
+ context.vm.regs.ebx = 0x0000;
+ context.vm.regs.edx = bank;
+ context.vm.regs.eflags = DEFAULT_VM86_FLAGS;
+ context.vm.regs.cs = get_int_seg(0x10);
+ context.vm.regs.eip = get_int_off(0x10);
+ context.vm.regs.ss = context.stack_seg;
+ context.vm.regs.esp = context.stack_off;
+ pushw(DEFAULT_VM86_FLAGS);
+ pushw(context.ret_seg);
+ pushw(context.ret_off);
+ run_vm86();
+}
+
+void PMAPI PM_setBankAB(int bank)
+{
+ if (!inited)
+ PM_init();
+ memset(&context.vm.regs, 0, sizeof(context.vm.regs));
+ context.vm.regs.eax = 0x4F05;
+ context.vm.regs.ebx = 0x0000;
+ context.vm.regs.edx = bank;
+ context.vm.regs.eflags = DEFAULT_VM86_FLAGS;
+ context.vm.regs.cs = get_int_seg(0x10);
+ context.vm.regs.eip = get_int_off(0x10);
+ context.vm.regs.ss = context.stack_seg;
+ context.vm.regs.esp = context.stack_off;
+ pushw(DEFAULT_VM86_FLAGS);
+ pushw(context.ret_seg);
+ pushw(context.ret_off);
+ run_vm86();
+ context.vm.regs.eax = 0x4F05;
+ context.vm.regs.ebx = 0x0001;
+ context.vm.regs.edx = bank;
+ context.vm.regs.eflags = DEFAULT_VM86_FLAGS;
+ context.vm.regs.cs = get_int_seg(0x10);
+ context.vm.regs.eip = get_int_off(0x10);
+ context.vm.regs.ss = context.stack_seg;
+ context.vm.regs.esp = context.stack_off;
+ pushw(DEFAULT_VM86_FLAGS);
+ pushw(context.ret_seg);
+ pushw(context.ret_off);
+ run_vm86();
+}
+
+void PMAPI PM_setCRTStart(int x,int y,int waitVRT)
+{
+ if (!inited)
+ PM_init();
+ memset(&context.vm.regs, 0, sizeof(context.vm.regs));
+ context.vm.regs.eax = 0x4F07;
+ context.vm.regs.ebx = waitVRT;
+ context.vm.regs.ecx = x;
+ context.vm.regs.edx = y;
+ context.vm.regs.eflags = DEFAULT_VM86_FLAGS;
+ context.vm.regs.cs = get_int_seg(0x10);
+ context.vm.regs.eip = get_int_off(0x10);
+ context.vm.regs.ss = context.stack_seg;
+ context.vm.regs.esp = context.stack_off;
+ pushw(DEFAULT_VM86_FLAGS);
+ pushw(context.ret_seg);
+ pushw(context.ret_off);
+ run_vm86();
+}
+
+int PMAPI PM_enableWriteCombine(ulong base,ulong length,uint type)
+{
+#ifdef ENABLE_MTRR
+ struct mtrr_sentry sentry;
+
+ if (mtrr_fd < 0)
+ return PM_MTRR_ERR_NO_OS_SUPPORT;
+ sentry.base = base;
+ sentry.size = length;
+ sentry.type = type;
+ if (ioctl(mtrr_fd, MTRRIOC_ADD_ENTRY, &sentry) == -1) {
+ // TODO: Need to decode MTRR error codes!!
+ return PM_MTRR_NOT_SUPPORTED;
+ }
+ return PM_MTRR_ERR_OK;
+#else
+ return PM_MTRR_ERR_NO_OS_SUPPORT;
+#endif
+}
+
+/****************************************************************************
+PARAMETERS:
+callback - Function to callback with write combine information
+
+REMARKS:
+Function to enumerate all write combine regions currently enabled for the
+processor.
+****************************************************************************/
+int PMAPI PM_enumWriteCombine(
+ PM_enumWriteCombine_t callback)
+{
+#ifdef ENABLE_MTRR
+ struct mtrr_gentry gentry;
+
+ if (mtrr_fd < 0)
+ return PM_MTRR_ERR_NO_OS_SUPPORT;
+
+ for (gentry.regnum = 0; ioctl (mtrr_fd, MTRRIOC_GET_ENTRY, &gentry) == 0;
+ ++gentry.regnum) {
+ if (gentry.size > 0) {
+ // WARNING: This code assumes that the types in pmapi.h match the ones
+ // in the Linux kernel (mtrr.h)
+ callback(gentry.base, gentry.size, gentry.type);
+ }
+ }
+
+ return PM_MTRR_ERR_OK;
+#else
+ return PM_MTRR_ERR_NO_OS_SUPPORT;
+#endif
+}
+
+ibool PMAPI PM_doBIOSPOST(
+ ushort axVal,
+ ulong BIOSPhysAddr,
+ void *copyOfBIOS,
+ ulong BIOSLen)
+{
+ char *bios_ptr = (char*)0xC0000;
+ char *old_bios;
+ ulong Current10, Current6D, *rvec = 0;
+ RMREGS regs;
+ RMSREGS sregs;
+
+ /* The BIOS is mapped to 0xC0000 with a private memory mapping enabled
+ * which means we have a copy on write scheme. Hence we simply copy
+ * the secondary BIOS image over the top of the old one.
+ */
+ if (!inited)
+ PM_init();
+ if ((old_bios = PM_malloc(BIOSLen)) == NULL)
+ return false;
+ if (BIOSPhysAddr != 0xC0000) {
+ memcpy(old_bios,bios_ptr,BIOSLen);
+ memcpy(bios_ptr,copyOfBIOS,BIOSLen);
+ }
+
+ /* The interrupt vectors should already be mmap()'ed from 0-0x400 in PM_init */
+ Current10 = rvec[0x10];
+ Current6D = rvec[0x6D];
+
+ /* POST the secondary BIOS */
+ rvec[0x10] = rvec[0x42]; /* Restore int 10h to STD-BIOS */
+ regs.x.ax = axVal;
+ PM_callRealMode(0xC000,0x0003,®s,&sregs);
+
+ /* Restore interrupt vectors */
+ rvec[0x10] = Current10;
+ rvec[0x6D] = Current6D;
+
+ /* Restore original BIOS image */
+ if (BIOSPhysAddr != 0xC0000)
+ memcpy(bios_ptr,old_bios,BIOSLen);
+ PM_free(old_bios);
+ return true;
+}
+
+int PMAPI PM_lockDataPages(void *p,uint len,PM_lockHandle *lh)
+{
+ p = p; len = len;
+ return 1;
+}
+
+int PMAPI PM_unlockDataPages(void *p,uint len,PM_lockHandle *lh)
+{
+ p = p; len = len;
+ return 1;
+}
+
+int PMAPI PM_lockCodePages(void (*p)(),uint len,PM_lockHandle *lh)
+{
+ p = p; len = len;
+ return 1;
+}
+
+int PMAPI PM_unlockCodePages(void (*p)(),uint len,PM_lockHandle *lh)
+{
+ p = p; len = len;
+ return 1;
+}
+
+PM_MODULE PMAPI PM_loadLibrary(
+ const char *szDLLName)
+{
+ // TODO: Implement this to load shared libraries!
+ (void)szDLLName;
+ return NULL;
+}
+
+void * PMAPI PM_getProcAddress(
+ PM_MODULE hModule,
+ const char *szProcName)
+{
+ // TODO: Implement this!
+ (void)hModule;
+ (void)szProcName;
+ return NULL;
+}
+
+void PMAPI PM_freeLibrary(
+ PM_MODULE hModule)
+{
+ // TODO: Implement this!
+ (void)hModule;
+}
+
+int PMAPI PM_setIOPL(
+ int level)
+{
+ // TODO: Move the IOPL switching into this function!!
+ return level;
+}
+
+void PMAPI PM_flushTLB(void)
+{
+ // Do nothing on Linux.
+}
+
diff --git a/board/MAI/bios_emulator/scitech/src/pm/linux/vflat.c b/board/MAI/bios_emulator/scitech/src/pm/linux/vflat.c
new file mode 100644
index 00000000000..579ef2c95c4
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/pm/linux/vflat.c
@@ -0,0 +1,49 @@
+/****************************************************************************
+*
+* SciTech OS Portability Manager Library
+*
+* ========================================================================
+*
+* The contents of this file are subject to the SciTech MGL Public
+* License Version 1.0 (the "License"); you may not use this file
+* except in compliance with the License. You may obtain a copy of
+* the License at http://www.scitechsoft.com/mgl-license.txt
+*
+* Software distributed under the License is distributed on an
+* "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+* implied. See the License for the specific language governing
+* rights and limitations under the License.
+*
+* The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+*
+* The Initial Developer of the Original Code is SciTech Software, Inc.
+* All Rights Reserved.
+*
+* ========================================================================
+*
+* Language: ANSI C
+* Environment: Any
+*
+* Description: Dummy module; no virtual framebuffer for this OS
+*
+****************************************************************************/
+
+#include "pmapi.h"
+
+ibool PMAPI VF_available(void)
+{
+ return false;
+}
+
+void * PMAPI VF_init(ulong baseAddr,int bankSize,int codeLen,void *bankFunc)
+{
+ baseAddr = baseAddr;
+ bankSize = bankSize;
+ codeLen = codeLen;
+ bankFunc = bankFunc;
+ return NULL;
+}
+
+void PMAPI VF_exit(void)
+{
+}
diff --git a/board/MAI/bios_emulator/scitech/src/pm/linux/ztimer.c b/board/MAI/bios_emulator/scitech/src/pm/linux/ztimer.c
new file mode 100644
index 00000000000..1b9bae28a65
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/pm/linux/ztimer.c
@@ -0,0 +1,95 @@
+/****************************************************************************
+*
+* Ultra Long Period Timer
+*
+* ========================================================================
+*
+* The contents of this file are subject to the SciTech MGL Public
+* License Version 1.0 (the "License"); you may not use this file
+* except in compliance with the License. You may obtain a copy of
+* the License at http://www.scitechsoft.com/mgl-license.txt
+*
+* Software distributed under the License is distributed on an
+* "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+* implied. See the License for the specific language governing
+* rights and limitations under the License.
+*
+* The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+*
+* The Initial Developer of the Original Code is SciTech Software, Inc.
+* All Rights Reserved.
+*
+* ========================================================================
+*
+* Language: ANSI C
+* Environment: Linux
+*
+* Description: Linux specific implementation for the Zen Timer functions.
+*
+****************************************************************************/
+
+#include <unistd.h>
+#include <sys/time.h>
+#include "pmapi.h"
+
+/*----------------------------- Implementation ----------------------------*/
+
+/****************************************************************************
+REMARKS:
+Initialise the Zen Timer module internals.
+****************************************************************************/
+void __ZTimerInit(void)
+{
+}
+
+/****************************************************************************
+REMARKS:
+Use the gettimeofday() function to get microsecond precision (probably less
+though)
+****************************************************************************/
+static inline ulong __ULZReadTime(void)
+{
+ struct timeval t;
+ gettimeofday(&t, NULL);
+ return t.tv_sec*1000000 + t.tv_usec;
+}
+
+/****************************************************************************
+REMARKS:
+Start the Zen Timer counting.
+****************************************************************************/
+#define __LZTimerOn(tm) tm->start.low = __ULZReadTime()
+
+/****************************************************************************
+REMARKS:
+Compute the lap time since the timer was started.
+****************************************************************************/
+#define __LZTimerLap(tm) (__ULZReadTime() - tm->start.low)
+
+/****************************************************************************
+REMARKS:
+Call the assembler Zen Timer functions to do the timing.
+****************************************************************************/
+#define __LZTimerOff(tm) tm->end.low = __ULZReadTime()
+
+/****************************************************************************
+REMARKS:
+Call the assembler Zen Timer functions to do the timing.
+****************************************************************************/
+#define __LZTimerCount(tm) (tm->end.low - tm->start.low)
+
+/****************************************************************************
+REMARKS:
+Define the resolution of the long period timer as microseconds per timer tick.
+****************************************************************************/
+#define ULZTIMER_RESOLUTION 1
+
+/****************************************************************************
+REMARKS:
+Compute the elapsed time from the BIOS timer tick. Note that we check to see
+whether a midnight boundary has passed, and if so adjust the finish time to
+account for this. We cannot detect if more that one midnight boundary has
+passed, so if this happens we will be generating erronous results.
+****************************************************************************/
+ulong __ULZElapsedTime(ulong start,ulong finish)
+{ return finish - start; }
diff --git a/board/MAI/bios_emulator/scitech/src/pm/makefile b/board/MAI/bios_emulator/scitech/src/pm/makefile
new file mode 100644
index 00000000000..265f0e36d05
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/pm/makefile
@@ -0,0 +1,290 @@
+#############################################################################
+#
+# Copyright (C) 1996 SciTech Software.
+# All rights reserved.
+#
+# Descripton: Generic makefile for the PM library. Builds the library
+# file and all test programs.
+#
+#############################################################################
+
+.IMPORT .IGNORE : DEBUG_AGP_DRIVER TEST_HARNESS DEBUG_SDDPMI
+
+#----------------------------------------------------------------------------
+# Add DOS extender dependant flags to command line
+#----------------------------------------------------------------------------
+
+CFLAGS += $(DX_CFLAGS)
+ASFLAGS += $(DX_ASFLAGS)
+NO_PMLIB := 1
+
+#----------------------------------------------------------------------------
+# Include definitions specific for the target system
+#----------------------------------------------------------------------------
+
+.IF $(USE_VXD)
+
+# Building for Win32 VxD (minimal PM library implementation)
+
+LIBNAME = pm
+OBJECTS = pm$O vflat$O ztimer$O cpuinfo$O mtrr$O fileio$O pcilib$O \
+ agp$O malloc$O vgastate$O gavxd$O _pm$O _mtrr$O _cpuinfo$O \
+ _int64$O _pcihelp$O
+DEPEND_SRC := vxd;common;codepage;tests
+.SOURCE: vxd common codepage tests
+
+.ELIF $(USE_NTDRV)
+
+# Building for NT device drivers (minimal PM library implementation)
+
+LIBNAME = pm
+OBJECTS = pm$O vflat$O ztimer$O cpuinfo$O mtrr$O mem$O irq$O int86$O \
+ stdio$O stdlib$O pcilib$O agp$O malloc$O vgastate$O gantdrv$O \
+ _pm$O _mtrr$O _cpuinfo$O _int64$O _pcihelp$O _irq$O
+DEPEND_SRC := ntdrv;common;codepage;tests
+.SOURCE: ntdrv common codepage tests
+
+.ELIF $(USE_WIN32)
+
+# Building for Win32
+
+CFLAGS += -DUSE_OS_JOYSTICK
+LIBNAME = pm
+OBJECTS = pm$O vflat$O event$O ddraw$O ztimer$O cpuinfo$O pcilib$O \
+ agp$O malloc$O vgastate$O gawin32$O ntservc$O _joy$O _cpuinfo$O \
+ _int64$O _pcihelp$O
+DEPEND_SRC := win32;common;codepage;tests
+.SOURCE: win32 common codepage tests
+
+.ELIF $(USE_OS232)
+
+# Building for OS/2
+
+.IF $(USE_OS2GUI)
+LIBNAME = pm_pm
+.ELSE
+LIBNAME = pm
+.ENDIF
+OBJECTS = pm$O vflat$O event$O ztimer$O cpuinfo$O mtrr$O pcilib$O \
+ agp$O malloc$O vgastate$O gaos2$O _pmos2$O _joy$O _cpuinfo$O \
+ _int64$O _pcihelp$O dossctl$O
+DEPEND_SRC := os2;common;codepage;tests
+.SOURCE: os2 common codepage tests
+
+.ELIF $(USE_QNX)
+
+# Building for QNX
+
+USE_BIOS := 1
+.IF $(USE_PHOTON)
+LIBNAME = pm_ph
+.ELIF $(USE_X11)
+LIBNAME = pm_x11
+.ELSE
+LIBNAME = pm
+.ENDIF
+OBJECTS = pm$O vflat$O event$O ztimer$O cpuinfo$O mtrr$O pcilib$O \
+ agp$O malloc$O mtrrqnx$O unixio$O vgastate$O gaqnx$O _joy$O \
+ _mtrrqnx$O _cpuinfo$O _int64$O _pcihelp$O
+DEPEND_SRC := qnx;common;codepage;tests
+.SOURCE: qnx common codepage tests
+
+# Indicate that this program uses Nucleus device drivers (so needs I/O access)
+USE_NUCLEUS := 1
+
+.ELIF $(USE_LINUX)
+
+# Building for Linux
+
+CFLAGS += -DENABLE_MTRR -DUSE_OS_JOYSTICK
+.IF $(USE_X11)
+LIBNAME = pm_x11
+.ELSE
+LIBNAME = pm
+.ENDIF
+OBJECTS = pm$O vflat$O event$O ztimer$O cpuinfo$O pcilib$O \
+ agp$O malloc$O unixio$O vgastate$O galinux$O _cpuinfo$O \
+ _int64$O _pcihelp$O
+DEPEND_SRC := linux;common;codepage;tests;x11
+.SOURCE: linux common codepage tests x11
+
+# Building a shared library
+.IF $(SOFILE)
+LIB := ld
+LIBFLAGS := -r -o
+CFLAGS += -fPIC
+.ENDIF
+
+.ELIF $(USE_BEOS)
+
+# Building for BeOS GUI
+
+LIBNAME = pm
+OBJECTS = pm$O vflat$O event$O ztimer$O cpuinfo$O pcilib$O \
+ agp$O malloc$O vgastate$O gabeos$O _joy$O _cpuinfo$O \
+ _int64$O _pcihelp$O
+DEPEND_SRC := beos;common;codepage;tests
+.SOURCE: beos common codepage tests
+
+.ELIF $(USE_SMX32)
+
+# Building for SMX
+
+LIBNAME = pm
+OBJECTS = pm$O pmsmx$O vflat$O event$O ztimer$O cpuinfo$O mtrr$O pcilib$O \
+ agp$O malloc$O vgastate$O gasmx$O _pm$O _pmsmx$O _mtrr$O _event$O \
+ _joy$O _cpuinfo$O _int64$O _pcihelp$O _lztimer$O
+DEPEND_SRC := smx;common;codepage;tests
+.SOURCE: smx common codepage tests
+
+.ELIF $(USE_RTTARGET)
+
+# Building for RTTarget-32
+
+LIBNAME = pm
+OBJECTS = pm$O vflat$O event$O ztimer$O cpuinfo$O mtrr$O pcilib$O \
+ agp$O malloc$O vgastate$O gartt$O _mtrr$O _joy$O _cpuinfo$O \
+ _int64$O _pcihelp$O
+DEPEND_SRC := rttarget;common;codepage;tests
+.SOURCE: rttarget common codepage tests
+
+.ELSE
+
+# Building for MSDOS
+
+LIBNAME = pm
+OBJECTS = pm$O pmdos$O vflat$O event$O ztimer$O cpuinfo$O mtrr$O \
+ agp$O malloc$O pcilib$O vgastate$O gados$O \
+ _pm$O _pmdos$O _mtrr$O _vflat$O _event$O _joy$O _pcihelp$O \
+ _cpuinfo$O _int64$O _lztimer$O _dma$O
+DEPEND_SRC := dos;common;codepage;tests
+.SOURCE: dos common codepage tests
+
+.ENDIF
+
+# Object modules for keyboard code pages
+
+OBJECTS += us_eng$O
+
+# Common object modules
+
+OBJECTS += common$O
+.IF $(CHECKED)
+OBJECTS += debug$O
+.ENDIF
+
+# Nucleus loader library object modules. Note that when compiling a test harness
+# library we need to exclude the Nucleus loader library.
+
+.IF $(TEST_HARNESS)
+CFLAGS += -DTEST_HARNESS -DPMLIB
+LIBNAME = pm_test
+.ELSE
+OBJECTS += galib$O _ga_imp$O
+.ENDIF
+
+.IF $(DEBUG_SDDPMI)
+CFLAGS += -DDEBUG_SDDPMI
+.ENDIF
+
+# AGP library object modules
+
+.IF $(DEBUG_AGP_DRIVER)
+CFLAGS += -DDEBUG_AGP_DRIVER
+OBJECTS += agplib$O
+.ELSE
+OBJECTS += agplib$O peloader$O libcimp$O _gatimer$O
+.ENDIF
+
+#----------------------------------------------------------------------------
+# Name of library and generic object files required to build it
+#----------------------------------------------------------------------------
+
+.IF $(STKCALL)
+LIBFILE = s$(LP)$(LIBNAME)$L
+.ELSE
+LIBFILE = $(LP)$(LIBNAME)$L
+.ENDIF
+LIBCLEAN = *.lib *.a
+
+#----------------------------------------------------------------------------
+# Change destination for library file depending the extender being used. This
+# is only necessary for DOS extender since the file go into a subdirectory
+# in the normal library directory, one for each supported extender. Other
+# OS'es put the file into the regular library directory, since there is
+# only one per OS in this case.
+#----------------------------------------------------------------------------
+
+MK_PMODE = 1
+
+.IF $(TEST_HARNESS)
+LIB_DEST := $(LIB_BASE)
+.ELIF $(USE_TNT)
+LIB_DEST := $(LIB_BASE)\tnt
+.ELIF $(USE_DOS4GW)
+LIB_DEST := $(LIB_BASE)\dos4gw
+.ELIF $(USE_X32)
+LIB_DEST := $(LIB_BASE)\x32
+.ELIF $(USE_DPMI16)
+LIB_DEST := $(LIB_BASE)\dpmi16
+.ELIF $(USE_DPMI32)
+LIB_DEST := $(LIB_BASE)\dpmi32
+.ELIF $(USE_DOSX)
+LIB_DEST := $(LIB_BASE)\dosx
+.END
+
+#----------------------------------------------------------------------------
+# Names of all executable files built
+#----------------------------------------------------------------------------
+
+.IF $(USE_REALDOS)
+EXEFILES = memtest$E biosptr$E video$E isvesa$E callreal$E \
+ mouse$E tick$E key$E key15$E brk$E altbrk$E \
+ critical$E altcrit$E vftest$E rtc$E getch$E \
+ cpu$E timerc$E timercpp$E showpci$E uswc$E block$E
+.ELSE
+EXEFILES = memtest$E video$E isvesa$E callreal$E vftest$E getch$E \
+ cpu$E timerc$E timercpp$E showpci$E uswc$E block$E \
+ save$E restore$E
+.ENDIF
+
+all: $(EXEFILES)
+
+$(EXEFILES): $(LIBFILE)
+
+memtest$E: memtest$O
+biosptr$E: biosptr$O
+video$E: video$O
+isvesa$E: isvesa$O
+mouse$E: mouse$O
+tick$E: tick$O
+key$E: key$O
+key15$E: key15$O
+brk$E: brk$O
+altbrk$E: altbrk$O
+critical$E: critical$O
+altcrit$E: altcrit$O
+callreal$E: callreal$O
+vftest$E: vftest$O
+rtc$E: rtc$O
+getch$E: getch$O
+cpu$E: cpu$O
+timerc$E: timerc$O
+timercpp$E: timercpp$O
+showpci$E: showpci$O
+uswc$E: uswc$O
+block$E: block$O
+save$E: save$O
+restore$E: restore$O
+test$E: test$O _test$O
+
+#----------------------------------------------------------------------------
+# Define the list of object files to create dependency information for
+#----------------------------------------------------------------------------
+
+DEPEND_OBJ := $(OBJECTS) memtest$O biosptr$O video$O isvesa$O mouse$O \
+ tick$O key$O key$O brk$O altbrk$O critical$O altcrit$O \
+ callreal$O vftest$O getch$O timercpp$O
+
+.INCLUDE: "$(SCITECH)/makedefs/common.mk"
+
diff --git a/board/MAI/bios_emulator/scitech/src/pm/ntdrv/_irq.asm b/board/MAI/bios_emulator/scitech/src/pm/ntdrv/_irq.asm
new file mode 100644
index 00000000000..11824a0afc5
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/pm/ntdrv/_irq.asm
@@ -0,0 +1,288 @@
+;****************************************************************************
+;*
+;* SciTech OS Portability Manager Library
+;*
+;* ========================================================================
+;*
+;* The contents of this file are subject to the SciTech MGL Public
+;* License Version 1.0 (the "License"); you may not use this file
+;* except in compliance with the License. You may obtain a copy of
+;* the License at http://www.scitechsoft.com/mgl-license.txt
+;*
+;* Software distributed under the License is distributed on an
+;* "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+;* implied. See the License for the specific language governing
+;* rights and limitations under the License.
+;*
+;* The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+;*
+;* The Initial Developer of the Original Code is SciTech Software, Inc.
+;* All Rights Reserved.
+;*
+;* ========================================================================
+;*
+;* Language: 80386 Assembler, TASM 4.0 or NASM
+;* Environment: 32-bit Windows NT device driver
+;*
+;* Description: Low level assembly support for the PM library specific to
+;* Windows NT device drivers.
+;*
+;****************************************************************************
+
+ IDEAL
+
+include "scitech.mac" ; Memory model macros
+
+header _irq ; Set up memory model
+
+begdataseg _irq
+
+ cextern _PM_rtcHandler,CPTR
+ cextern _PM_prevRTC,FCPTR
+
+RtcInside dw 0 ; Are we still handling current interrupt
+sidtBuf df 0 ; Buffer for sidt instruction
+
+enddataseg _irq
+
+begcodeseg _irq ; Start of code segment
+
+cpublic _PM_irqCodeStart
+
+; Macro to delay briefly to ensure that enough time has elapsed between
+; successive I/O accesses so that the device being accessed can respond
+; to both accesses even on a very fast PC.
+
+ifdef USE_NASM
+%macro DELAY 0
+ jmp short $+2
+ jmp short $+2
+ jmp short $+2
+%endmacro
+%macro IODELAYN 1
+%rep %1
+ DELAY
+%endrep
+%endmacro
+else
+macro DELAY
+ jmp short $+2
+ jmp short $+2
+ jmp short $+2
+endm
+macro IODELAYN N
+ rept N
+ DELAY
+ endm
+endm
+endif
+
+;----------------------------------------------------------------------------
+; PM_rtcISR - Real time clock interrupt subroutine dispatcher
+;----------------------------------------------------------------------------
+; Hardware interrupt handler for the timer interrupt, to dispatch control
+; to high level C based subroutines. We save the state of all registers
+; in this routine, and switch to a local stack. Interrupts are *off*
+; when we call the user code.
+;
+; NOTE: This routine switches to a local stack before calling any C code,
+; and hence is _not_ re-entrant. Make sure your C code executes as
+; quickly as possible, since a timer overrun will simply hang the
+; system.
+;----------------------------------------------------------------------------
+cprocfar _PM_rtcISR
+
+;++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+; If we enable interrupts and call into any C based interrupt handling code,
+; we need to setup a bunch of important information for the NT kernel. The
+; code below takes care of this housekeeping for us (see Undocumented NT for
+; details). If we don't do this housekeeping and interrupts are enabled,
+; the kernel will become very unstable and crash within 10 seconds or so.
+;++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+
+ pushad
+ pushfd
+ push fs
+
+ mov ebx,00000030h
+ mov fs,bx
+ sub esp,50h
+ mov ebp,esp
+
+; Setup the exception frame to NULL
+
+ mov ebx,[DWORD cs:0FFDFF000h]
+ mov [DWORD ds:0FFDFF000h], 0FFFFFFFFh
+ mov [DWORD ebp],ebx
+
+; Save away the existing KSS ebp
+
+ mov esi,[DWORD cs:0FFDFF124h]
+ mov ebx,[DWORD esi+00000128h]
+ mov [DWORD ebp+4h],ebx
+ mov [DWORD esi+00000128h],ebp
+
+; Save away the kernel time and the thread mode (kernel/user)
+
+ mov edi,[DWORD esi+00000137h]
+ mov [DWORD ebp+8h],edi
+
+; Set the thread mode (kernel/user) based on the code selector
+
+ mov ebx,[DWORD ebp+7Ch]
+ and ebx,01
+ mov [BYTE esi+00000137h],bl
+
+;++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+; End of special interrupt Prolog code
+;++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+
+; Clear priority interrupt controller and re-enable interrupts so we
+; dont lock things up for long.
+
+ mov al,20h
+ out 0A0h,al
+ out 020h,al
+
+; Clear real-time clock timeout
+
+ in al,70h ; Read CMOS index register
+ push eax ; and save for later
+ IODELAYN 3
+ mov al,0Ch
+ out 70h,al
+ IODELAYN 5
+ in al,71h
+
+; Call the C interrupt handler function
+
+ cmp [BYTE RtcInside],1 ; Check for mutual exclusion
+ je @@Exit
+ mov [BYTE RtcInside],1
+ sti ; Enable interrupts
+ cld ; Clear direction flag for C code
+ call [CPTR _PM_rtcHandler]
+ cli ; Disable interrupts on exit!
+ mov [BYTE RtcInside],0
+
+@@Exit: pop eax
+ out 70h,al ; Restore CMOS index register
+
+;++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+; Start of special epilog code to restore stuff on exit from handler
+;++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+
+; Restore the KSS ebp
+
+ mov esi,[DWORD cs:0FFDFF124h]
+ mov ebx,[DWORD ebp+4]
+ mov [DWORD esi+00000128h],ebx
+
+; Restore the exception frame
+
+ mov ebx,[DWORD ebp]
+ mov [DWORD fs:00000000],ebx
+
+; Restore the thread mode
+
+ mov ebx,[DWORD ebp+8h]
+ mov esi,[DWORD fs:00000124h]
+ mov [BYTE esi+00000137h],bl
+ add esp, 50h
+ pop fs
+ popfd
+ popad
+
+; Return from interrupt
+
+ iret
+
+cprocend
+
+cpublic _PM_irqCodeEnd
+
+;----------------------------------------------------------------------------
+; void _PM_getISR(int irq,PMFARPTR *handler);
+;----------------------------------------------------------------------------
+; Function to return the specific IRQ handler direct from the IDT.
+;----------------------------------------------------------------------------
+cprocstart _PM_getISR
+
+ ARG idtEntry:UINT, handler:DPTR
+
+ enter_c 0
+ mov ecx,[handler] ; Get address of handler to fill in
+ sidt [sidtBuf] ; Get IDTR register into sidtBuf
+ mov eax,[DWORD sidtBuf+2] ; Get address of IDT into EAX
+ mov ebx,[idtEntry]
+ lea eax,[eax+ebx*8] ; Get entry in the IDT
+ movzx edx,[WORD eax+6] ; Get high order 16-bits
+ shl edx,16 ; Move into top 16-bits of address
+ mov dx,[WORD eax] ; Get low order 16-bits
+ mov [DWORD ecx],edx ; Store linear address of handler
+ mov dx,[WORD eax+2] ; Get selector value
+ mov [WORD ecx+4],dx ; Store selector value
+ leave_c
+ ret
+
+cprocend _PM_getISR
+
+;----------------------------------------------------------------------------
+; void _PM_setISR(int irq,void *handler);
+;----------------------------------------------------------------------------
+; Function to set the specific IRQ handler direct in the IDT.
+;----------------------------------------------------------------------------
+cprocstart _PM_setISR
+
+ ARG irq:UINT, handler:CPTR
+
+ enter_c 0
+ mov ecx,[handler] ; Get address of new handler
+ mov dx,cs ; Get selector for new handler
+ sidt [sidtBuf] ; Get IDTR register into sidtBuf
+ mov eax,[DWORD sidtBuf+2] ; Get address of IDT into EAX
+ mov ebx,[idtEntry]
+ lea eax,[eax+ebx*8] ; Get entry in the IDT
+ cli
+ mov [WORD eax+2],dx ; Store code segment selector
+ mov [WORD eax],cx ; Store low order bits of handler
+ shr ecx,16
+ mov [WORD eax+6],cx ; Store high order bits of handler
+ sti
+ leave_c
+ ret
+
+cprocend _PM_setISR
+
+;----------------------------------------------------------------------------
+; void _PM_restoreISR(int irq,PMFARPTR *handler);
+;----------------------------------------------------------------------------
+; Function to set the specific IRQ handler direct in the IDT.
+;----------------------------------------------------------------------------
+cprocstart _PM_restoreISR
+
+ ARG irq:UINT, handler:CPTR
+
+ enter_c 0
+ mov ecx,[handler]
+ mov dx,[WORD ecx+4] ; Get selector for old handler
+ mov ecx,[DWORD ecx] ; Get address of old handler
+ sidt [sidtBuf] ; Get IDTR register into sidtBuf
+ mov eax,[DWORD sidtBuf+2] ; Get address of IDT into EAX
+ mov ebx,[idtEntry]
+ lea eax,[eax+ebx*8] ; Get entry in the IDT
+ cli
+ mov [WORD eax+2],dx ; Store code segment selector
+ mov [WORD eax],cx ; Store low order bits of handler
+ shr ecx,16
+ mov [WORD eax+6],cx ; Store high order bits of handler
+ sti
+ leave_c
+ ret
+
+cprocend _PM_restoreISR
+
+endcodeseg _irq
+
+ END ; End of module
+
diff --git a/board/MAI/bios_emulator/scitech/src/pm/ntdrv/_pm.asm b/board/MAI/bios_emulator/scitech/src/pm/ntdrv/_pm.asm
new file mode 100644
index 00000000000..6cb276d25e8
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/pm/ntdrv/_pm.asm
@@ -0,0 +1,281 @@
+;****************************************************************************
+;*
+;* SciTech OS Portability Manager Library
+;*
+;* ========================================================================
+;*
+;* The contents of this file are subject to the SciTech MGL Public
+;* License Version 1.0 (the "License"); you may not use this file
+;* except in compliance with the License. You may obtain a copy of
+;* the License at http://www.scitechsoft.com/mgl-license.txt
+;*
+;* Software distributed under the License is distributed on an
+;* "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+;* implied. See the License for the specific language governing
+;* rights and limitations under the License.
+;*
+;* The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+;*
+;* The Initial Developer of the Original Code is SciTech Software, Inc.
+;* All Rights Reserved.
+;*
+;* ========================================================================
+;*
+;* Language: 80386 Assembler, TASM 4.0 or NASM
+;* Environment: 32-bit Windows NT device driver
+;*
+;* Description: Low level assembly support for the PM library specific to
+;* Windows NT device drivers.
+;*
+;****************************************************************************
+
+ IDEAL
+
+include "scitech.mac" ; Memory model macros
+
+header _pm ; Set up memory model
+
+P586
+
+begdataseg
+
+; Watcom C++ externals required to link when compiling floating point
+; C code. They are not actually used in the code because we compile with
+; inline floating point instructions, however the compiler still generates
+; the references in the object modules.
+
+__8087 dd 0
+ PUBLIC __8087
+__imthread:
+__fltused:
+_fltused_ dd 0
+ PUBLIC __imthread
+ PUBLIC _fltused_
+ PUBLIC __fltused
+
+enddataseg
+
+begcodeseg _pm ; Start of code segment
+
+;----------------------------------------------------------------------------
+; void PM_segread(PMSREGS *sregs)
+;----------------------------------------------------------------------------
+; Read the current value of all segment registers
+;----------------------------------------------------------------------------
+cprocstart PM_segread
+
+ ARG sregs:DPTR
+
+ enter_c
+
+ mov ax,es
+ _les _si,[sregs]
+ mov [_ES _si],ax
+ mov [_ES _si+2],cs
+ mov [_ES _si+4],ss
+ mov [_ES _si+6],ds
+ mov [_ES _si+8],fs
+ mov [_ES _si+10],gs
+
+ leave_c
+ ret
+
+cprocend
+
+;----------------------------------------------------------------------------
+; int PM_int386x(int intno, PMREGS *in, PMREGS *out,PMSREGS *sregs)
+;----------------------------------------------------------------------------
+; Issues a software interrupt in protected mode. This routine has been
+; written to allow user programs to load CS and DS with different values
+; other than the default.
+;----------------------------------------------------------------------------
+cprocstart PM_int386x
+
+; Not used for NT device drivers
+
+ ret
+
+cprocend
+
+;----------------------------------------------------------------------------
+; void PM_setBankA(int bank)
+;----------------------------------------------------------------------------
+cprocstart PM_setBankA
+
+; Not used for NT device drivers
+
+ ret
+
+cprocend
+
+;----------------------------------------------------------------------------
+; void PM_setBankAB(int bank)
+;----------------------------------------------------------------------------
+cprocstart PM_setBankAB
+
+; Not used for NT device drivers
+
+ ret
+
+cprocend
+
+;----------------------------------------------------------------------------
+; void PM_setCRTStart(int x,int y,int waitVRT)
+;----------------------------------------------------------------------------
+cprocstart PM_setCRTStart
+
+; Not used for NT device drivers
+
+ ret
+
+cprocend
+
+; Macro to delay briefly to ensure that enough time has elapsed between
+; successive I/O accesses so that the device being accessed can respond
+; to both accesses even on a very fast PC.
+
+ifdef USE_NASM
+%macro DELAY 0
+ jmp short $+2
+ jmp short $+2
+ jmp short $+2
+%endmacro
+%macro IODELAYN 1
+%rep %1
+ DELAY
+%endrep
+%endmacro
+else
+macro DELAY
+ jmp short $+2
+ jmp short $+2
+ jmp short $+2
+endm
+macro IODELAYN N
+ rept N
+ DELAY
+ endm
+endm
+endif
+
+;----------------------------------------------------------------------------
+; uchar _PM_readCMOS(int index)
+;----------------------------------------------------------------------------
+; Read the value of a specific CMOS register. We do this with both
+; normal interrupts and NMI disabled.
+;----------------------------------------------------------------------------
+cprocstart _PM_readCMOS
+
+ ARG index:UINT
+
+ push _bp
+ mov _bp,_sp
+ pushfd
+ mov al,[BYTE index]
+ or al,80h ; Add disable NMI flag
+ cli
+ out 70h,al
+ IODELAYN 5
+ in al,71h
+ mov ah,al
+ xor al,al
+ IODELAYN 5
+ out 70h,al ; Re-enable NMI
+ mov al,ah ; Return value in AL
+ popfd
+ pop _bp
+ ret
+
+cprocend
+
+;----------------------------------------------------------------------------
+; void _PM_writeCMOS(int index,uchar value)
+;----------------------------------------------------------------------------
+; Read the value of a specific CMOS register. We do this with both
+; normal interrupts and NMI disabled.
+;----------------------------------------------------------------------------
+cprocstart _PM_writeCMOS
+
+ ARG index:UINT, value:UCHAR
+
+ push _bp
+ mov _bp,_sp
+ pushfd
+ mov al,[BYTE index]
+ or al,80h ; Add disable NMI flag
+ cli
+ out 70h,al
+ IODELAYN 5
+ mov al,[value]
+ out 71h,al
+ xor al,al
+ IODELAYN 5
+ out 70h,al ; Re-enable NMI
+ popfd
+ pop _bp
+ ret
+
+cprocend
+
+;----------------------------------------------------------------------------
+; double _ftol(double f)
+;----------------------------------------------------------------------------
+; Calls to __ftol are generated by the Borland C++ compiler for code
+; that needs to convert a floating point type to an integral type.
+;
+; Input: floating point number on the top of the '87.
+;
+; Output: a (signed or unsigned) long in EAX
+; All other registers preserved.
+;-----------------------------------------------------------------------
+cprocstart _ftol
+
+ LOCAL temp1:WORD, temp2:QWORD = LocalSize
+
+ push ebp
+ mov ebp,esp
+ sub esp,LocalSize
+
+ fstcw [temp1] ; save the control word
+ fwait
+ mov al,[BYTE temp1+1]
+ or [BYTE temp1+1],0Ch ; set rounding control to chop
+ fldcw [temp1]
+ fistp [temp2] ; convert to 64-bit integer
+ mov [BYTE temp1+1],al
+ fldcw [temp1] ; restore the control word
+ mov eax,[DWORD temp2] ; return LS 32 bits
+ mov edx,[DWORD temp2+4] ; MS 32 bits
+
+ mov esp,ebp
+ pop ebp
+ ret
+
+cprocend
+
+;----------------------------------------------------------------------------
+; _PM_getPDB - Return the Page Table Directory Base address
+;----------------------------------------------------------------------------
+cprocstart _PM_getPDB
+
+ mov eax,cr3
+ and eax,0FFFFF000h
+ ret
+
+cprocend
+
+;----------------------------------------------------------------------------
+; Flush the Translation Lookaside buffer
+;----------------------------------------------------------------------------
+cprocstart PM_flushTLB
+
+ wbinvd ; Flush the CPU cache
+ mov eax,cr3
+ mov cr3,eax ; Flush the TLB
+ ret
+
+cprocend
+
+endcodeseg _pm
+
+ END ; End of module
diff --git a/board/MAI/bios_emulator/scitech/src/pm/ntdrv/cpuinfo.c b/board/MAI/bios_emulator/scitech/src/pm/ntdrv/cpuinfo.c
new file mode 100644
index 00000000000..e72a856019e
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/pm/ntdrv/cpuinfo.c
@@ -0,0 +1,65 @@
+/****************************************************************************
+*
+* Ultra Long Period Timer
+*
+* ========================================================================
+*
+* The contents of this file are subject to the SciTech MGL Public
+* License Version 1.0 (the "License"); you may not use this file
+* except in compliance with the License. You may obtain a copy of
+* the License at http://www.scitechsoft.com/mgl-license.txt
+*
+* Software distributed under the License is distributed on an
+* "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+* implied. See the License for the specific language governing
+* rights and limitations under the License.
+*
+* The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+*
+* The Initial Developer of the Original Code is SciTech Software, Inc.
+* All Rights Reserved.
+*
+* ========================================================================
+*
+* Language: ANSI C
+* Environment: 32-bit Windows VxD
+*
+* Description: VxD specific code for the CPU detection module.
+*
+****************************************************************************/
+
+/*----------------------------- Implementation ----------------------------*/
+
+/****************************************************************************
+REMARKS:
+Do nothing for VxD's
+****************************************************************************/
+#define SetMaxThreadPriority() 0
+
+/****************************************************************************
+REMARKS:
+Do nothing for VxD's
+****************************************************************************/
+#define RestoreThreadPriority(i) (void)(i)
+
+/****************************************************************************
+REMARKS:
+Initialise the counter and return the frequency of the counter.
+****************************************************************************/
+static void GetCounterFrequency(
+ CPU_largeInteger *freq)
+{
+ KeQueryPerformanceCounter((LARGE_INTEGER*)freq);
+}
+
+/****************************************************************************
+REMARKS:
+Read the counter and return the counter value.
+****************************************************************************/
+#define GetCounter(t) \
+{ \
+ LARGE_INTEGER lt = KeQueryPerformanceCounter(NULL); \
+ (t)->low = lt.LowPart; \
+ (t)->high = lt.HighPart; \
+}
+
diff --git a/board/MAI/bios_emulator/scitech/src/pm/ntdrv/int86.c b/board/MAI/bios_emulator/scitech/src/pm/ntdrv/int86.c
new file mode 100644
index 00000000000..f93d9c22e78
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/pm/ntdrv/int86.c
@@ -0,0 +1,252 @@
+/****************************************************************************
+*
+* SciTech OS Portability Manager Library
+*
+* ========================================================================
+*
+* The contents of this file are subject to the SciTech MGL Public
+* License Version 1.0 (the "License"); you may not use this file
+* except in compliance with the License. You may obtain a copy of
+* the License at http://www.scitechsoft.com/mgl-license.txt
+*
+* Software distributed under the License is distributed on an
+* "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+* implied. See the License for the specific language governing
+* rights and limitations under the License.
+*
+* The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+*
+* The Initial Developer of the Original Code is SciTech Software, Inc.
+* All Rights Reserved.
+*
+* ========================================================================
+*
+* Language: ANSI C
+* Environment: 32-bit Windows NT device drivers.
+*
+* Description: Implementation for the real mode software interrupt
+* handling functions.
+*
+****************************************************************************/
+
+#include "pmapi.h"
+#include "drvlib/os/os.h"
+#include "sdd/sddhelp.h"
+#include "mtrr.h"
+#include "oshdr.h"
+
+/*----------------------------- Implementation ----------------------------*/
+
+/****************************************************************************
+REMARKS:
+We do have limited BIOS access under Windows NT device drivers.
+****************************************************************************/
+ibool PMAPI PM_haveBIOSAccess(void)
+{
+ // Return false unless we have full buffer passing!
+ return false;
+}
+
+/****************************************************************************
+PARAMETERS:
+len - Place to store the length of the buffer
+rseg - Place to store the real mode segment of the buffer
+roff - Place to store the real mode offset of the buffer
+
+REMARKS:
+This function returns the address and length of the global VESA transfer
+buffer that is used for communicating with the VESA BIOS functions from
+Win16 and Win32 programs under Windows.
+****************************************************************************/
+void * PMAPI PM_getVESABuf(
+ uint *len,
+ uint *rseg,
+ uint *roff)
+{
+ // No buffers supported under Windows NT (Windows XP has them however if
+ // we ever decide to support this!)
+ return NULL;
+}
+
+/****************************************************************************
+REMARKS:
+Issue a protected mode software interrupt.
+****************************************************************************/
+int PMAPI PM_int386(
+ int intno,
+ PMREGS *in,
+ PMREGS *out)
+{
+ PMSREGS sregs;
+ PM_segread(&sregs);
+ return PM_int386x(intno,in,out,&sregs);
+}
+
+/****************************************************************************
+REMARKS:
+Map a real mode pointer to a protected mode pointer.
+****************************************************************************/
+void * PMAPI PM_mapRealPointer(
+ uint r_seg,
+ uint r_off)
+{
+ // Not used for Windows NT drivers!
+ return NULL;
+}
+
+/****************************************************************************
+REMARKS:
+Allocate a block of real mode memory
+****************************************************************************/
+void * PMAPI PM_allocRealSeg(
+ uint size,
+ uint *r_seg,
+ uint *r_off)
+{
+ // Not supported in NT drivers
+ (void)size;
+ (void)r_seg;
+ (void)r_off;
+ return NULL;
+}
+
+/****************************************************************************
+REMARKS:
+Free a block of real mode memory.
+****************************************************************************/
+void PMAPI PM_freeRealSeg(
+ void *mem)
+{
+ // Not supported in NT drivers
+ (void)mem;
+}
+
+/****************************************************************************
+REMARKS:
+Issue a real mode interrupt (parameters in DPMI compatible structure)
+****************************************************************************/
+void PMAPI DPMI_int86(
+ int intno,
+ DPMI_regs *regs)
+{
+ // Not used in NT drivers
+}
+
+/****************************************************************************
+REMARKS:
+Call a V86 real mode function with the specified register values
+loaded before the call. The call returns with a far ret.
+****************************************************************************/
+void PMAPI PM_callRealMode(
+ uint seg,
+ uint off,
+ RMREGS *regs,
+ RMSREGS *sregs)
+{
+ // TODO!!
+#if 0
+ CLIENT_STRUCT saveRegs;
+
+ /* Bail if we do not have BIOS access (ie: the VxD was dynamically
+ * loaded, and not statically loaded.
+ */
+ if (!_PM_haveBIOS)
+ return;
+
+ TRACE("SDDHELP: Entering PM_callRealMode()\n");
+ Begin_Nest_V86_Exec();
+ LoadV86Registers(&saveRegs,regs,sregs);
+ Simulate_Far_Call(seg, off);
+ Resume_Exec();
+ ReadV86Registers(&saveRegs,regs,sregs);
+ End_Nest_Exec();
+ TRACE("SDDHELP: Exiting PM_callRealMode()\n");
+#endif
+}
+
+/****************************************************************************
+REMARKS:
+Issue a V86 real mode interrupt with the specified register values
+loaded before the interrupt.
+****************************************************************************/
+int PMAPI PM_int86(
+ int intno,
+ RMREGS *in,
+ RMREGS *out)
+{
+ // TODO!!
+#if 0
+ RMSREGS sregs = {0};
+ CLIENT_STRUCT saveRegs;
+ ushort oldDisable;
+
+ /* Disable pass-up to our VxD handler so we directly call BIOS */
+ TRACE("SDDHELP: Entering PM_int86()\n");
+ if (disableTSRFlag) {
+ oldDisable = *disableTSRFlag;
+ *disableTSRFlag = 0;
+ }
+ Begin_Nest_V86_Exec();
+ LoadV86Registers(&saveRegs,in,&sregs);
+ Exec_Int(intno);
+ ReadV86Registers(&saveRegs,out,&sregs);
+ End_Nest_Exec();
+
+ /* Re-enable pass-up to our VxD handler if previously enabled */
+ if (disableTSRFlag)
+ *disableTSRFlag = oldDisable;
+
+ TRACE("SDDHELP: Exiting PM_int86()\n");
+#else
+ *out = *in;
+#endif
+ return out->x.ax;
+}
+
+/****************************************************************************
+REMARKS:
+Issue a V86 real mode interrupt with the specified register values
+loaded before the interrupt.
+****************************************************************************/
+int PMAPI PM_int86x(
+ int intno,
+ RMREGS *in,
+ RMREGS *out,
+ RMSREGS *sregs)
+{
+ // TODO!!
+#if 0
+ CLIENT_STRUCT saveRegs;
+ ushort oldDisable;
+
+ /* Bail if we do not have BIOS access (ie: the VxD was dynamically
+ * loaded, and not statically loaded.
+ */
+ if (!_PM_haveBIOS) {
+ *out = *in;
+ return out->x.ax;
+ }
+
+ /* Disable pass-up to our VxD handler so we directly call BIOS */
+ TRACE("SDDHELP: Entering PM_int86x()\n");
+ if (disableTSRFlag) {
+ oldDisable = *disableTSRFlag;
+ *disableTSRFlag = 0;
+ }
+ Begin_Nest_V86_Exec();
+ LoadV86Registers(&saveRegs,in,sregs);
+ Exec_Int(intno);
+ ReadV86Registers(&saveRegs,out,sregs);
+ End_Nest_Exec();
+
+ /* Re-enable pass-up to our VxD handler if previously enabled */
+ if (disableTSRFlag)
+ *disableTSRFlag = oldDisable;
+
+ TRACE("SDDHELP: Exiting PM_int86x()\n");
+#else
+ *out = *in;
+#endif
+ return out->x.ax;
+}
+
diff --git a/board/MAI/bios_emulator/scitech/src/pm/ntdrv/irq.c b/board/MAI/bios_emulator/scitech/src/pm/ntdrv/irq.c
new file mode 100644
index 00000000000..bc6b4274df3
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/pm/ntdrv/irq.c
@@ -0,0 +1,143 @@
+/****************************************************************************
+*
+* SciTech OS Portability Manager Library
+*
+* ========================================================================
+*
+* The contents of this file are subject to the SciTech MGL Public
+* License Version 1.0 (the "License"); you may not use this file
+* except in compliance with the License. You may obtain a copy of
+* the License at http://www.scitechsoft.com/mgl-license.txt
+*
+* Software distributed under the License is distributed on an
+* "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+* implied. See the License for the specific language governing
+* rights and limitations under the License.
+*
+* The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+*
+* The Initial Developer of the Original Code is SciTech Software, Inc.
+* All Rights Reserved.
+*
+* ========================================================================
+*
+* Language: ANSI C
+* Environment: 32-bit Windows NT device drivers.
+*
+* Description: Implementation for the NT driver IRQ management functions
+* for the PM library.
+*
+****************************************************************************/
+
+#include "pmapi.h"
+#include "pmint.h"
+#include "drvlib/os/os.h"
+#include "sdd/sddhelp.h"
+#include "mtrr.h"
+#include "oshdr.h"
+
+/*--------------------------- Global variables ----------------------------*/
+
+static int globalDataStart;
+static uchar _PM_oldCMOSRegA;
+static uchar _PM_oldCMOSRegB;
+static uchar _PM_oldRTCPIC2;
+static ulong RTC_idtEntry;
+PM_intHandler _PM_rtcHandler = NULL;
+PMFARPTR _VARAPI _PM_prevRTC = PMNULL;
+
+/*----------------------------- Implementation ----------------------------*/
+
+/* Functions to read and write CMOS registers */
+
+uchar _ASMAPI _PM_readCMOS(int index);
+void _ASMAPI _PM_writeCMOS(int index,uchar value);
+void _ASMAPI _PM_rtcISR(void);
+void _ASMAPI _PM_getISR(int irq,PMFARPTR *handler);
+void _ASMAPI _PM_setISR(int irq,void *handler);
+void _ASMAPI _PM_restoreISR(int irq,PMFARPTR *handler);
+void _ASMAPI _PM_irqCodeStart(void);
+void _ASMAPI _PM_irqCodeEnd(void);
+
+/****************************************************************************
+REMARKS:
+Set the real time clock frequency (for stereo modes).
+****************************************************************************/
+void PMAPI PM_setRealTimeClockFrequency(
+ int frequency)
+{
+ static short convert[] = {
+ 8192,
+ 4096,
+ 2048,
+ 1024,
+ 512,
+ 256,
+ 128,
+ 64,
+ 32,
+ 16,
+ 8,
+ 4,
+ 2,
+ -1,
+ };
+ int i;
+
+ /* First clear any pending RTC timeout if not cleared */
+ _PM_readCMOS(0x0C);
+ if (frequency == 0) {
+ /* Disable RTC timout */
+ _PM_writeCMOS(0x0A,(uchar)_PM_oldCMOSRegA);
+ _PM_writeCMOS(0x0B,(uchar)(_PM_oldCMOSRegB & 0x0F));
+ }
+ else {
+ /* Convert frequency value to RTC clock indexes */
+ for (i = 0; convert[i] != -1; i++) {
+ if (convert[i] == frequency)
+ break;
+ }
+
+ /* Set RTC timout value and enable timeout */
+ _PM_writeCMOS(0x0A,(uchar)(0x20 | (i+3)));
+ _PM_writeCMOS(0x0B,(uchar)((_PM_oldCMOSRegB & 0x0F) | 0x40));
+ }
+}
+
+ibool PMAPI PM_setRealTimeClockHandler(PM_intHandler th,int frequency)
+{
+ static ibool locked = false;
+
+ /* Save the old CMOS real time clock values */
+ _PM_oldCMOSRegA = _PM_readCMOS(0x0A);
+ _PM_oldCMOSRegB = _PM_readCMOS(0x0B);
+
+ /* Install the interrupt handler */
+ RTC_idtEntry = 0x38;
+ _PM_getISR(RTC_idtEntry, &_PM_prevRTC);
+ _PM_rtcHandler = th;
+ _PM_setISR(RTC_idtEntry, _PM_rtcISR);
+
+ /* Program the real time clock default frequency */
+ PM_setRealTimeClockFrequency(frequency);
+
+ /* Unmask IRQ8 in the PIC2 */
+ _PM_oldRTCPIC2 = PM_inpb(0xA1);
+ PM_outpb(0xA1,(uchar)(_PM_oldRTCPIC2 & 0xFE));
+ return true;
+}
+
+void PMAPI PM_restoreRealTimeClockHandler(void)
+{
+ if (_PM_rtcHandler) {
+ /* Restore CMOS registers and mask RTC clock */
+ _PM_writeCMOS(0x0A,_PM_oldCMOSRegA);
+ _PM_writeCMOS(0x0B,_PM_oldCMOSRegB);
+ PM_outpb(0xA1,(uchar)((PM_inpb(0xA1) & 0xFE) | (_PM_oldRTCPIC2 & ~0xFE)));
+
+ /* Restore the interrupt vector */
+ _PM_restoreISR(RTC_idtEntry, &_PM_prevRTC);
+ _PM_rtcHandler = NULL;
+ }
+}
+
diff --git a/board/MAI/bios_emulator/scitech/src/pm/ntdrv/mem.c b/board/MAI/bios_emulator/scitech/src/pm/ntdrv/mem.c
new file mode 100644
index 00000000000..b30d2be8609
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/pm/ntdrv/mem.c
@@ -0,0 +1,519 @@
+/****************************************************************************
+*
+* SciTech OS Portability Manager Library
+*
+* ========================================================================
+*
+* The contents of this file are subject to the SciTech MGL Public
+* License Version 1.0 (the "License"); you may not use this file
+* except in compliance with the License. You may obtain a copy of
+* the License at http://www.scitechsoft.com/mgl-license.txt
+*
+* Software distributed under the License is distributed on an
+* "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+* implied. See the License for the specific language governing
+* rights and limitations under the License.
+*
+* The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+*
+* The Initial Developer of the Original Code is SciTech Software, Inc.
+* All Rights Reserved.
+*
+* ========================================================================
+*
+* Language: ANSI C
+* Environment: 32-bit Windows NT device drivers.
+*
+* Description: Implementation for the NT driver memory management functions
+* for the PM library.
+*
+****************************************************************************/
+
+#include "pmapi.h"
+#include "drvlib/os/os.h"
+#include "sdd/sddhelp.h"
+#include "mtrr.h"
+#include "oshdr.h"
+
+/*--------------------------- Global variables ----------------------------*/
+
+#define MAX_MEMORY_SHARED 100
+#define MAX_MEMORY_MAPPINGS 100
+#define MAX_MEMORY_LOCKED 100
+
+typedef struct {
+ void *linear;
+ ulong length;
+ PMDL pMdl;
+ } memshared;
+
+typedef struct {
+ void *linear;
+ void *mmIoMapped;
+ ulong length;
+ PMDL pMdl;
+ } memlocked;
+
+typedef struct {
+ ulong physical;
+ ulong linear;
+ ulong length;
+ ibool isCached;
+ } mmapping;
+
+static int numMappings = 0;
+static memshared shared[MAX_MEMORY_MAPPINGS] = {0};
+static mmapping maps[MAX_MEMORY_MAPPINGS];
+static memlocked locked[MAX_MEMORY_LOCKED];
+
+/*----------------------------- Implementation ----------------------------*/
+
+ulong PMAPI _PM_getPDB(void);
+
+// Page table entry flags
+
+#define PAGE_FLAGS_PRESENT 0x00000001
+#define PAGE_FLAGS_WRITEABLE 0x00000002
+#define PAGE_FLAGS_USER 0x00000004
+#define PAGE_FLAGS_WRITE_THROUGH 0x00000008
+#define PAGE_FLAGS_CACHE_DISABLE 0x00000010
+#define PAGE_FLAGS_ACCESSED 0x00000020
+#define PAGE_FLAGS_DIRTY 0x00000040
+#define PAGE_FLAGS_4MB 0x00000080
+
+/****************************************************************************
+PARAMETERS:
+base - Physical base address of the memory to maps in
+limit - Limit of physical memory to region to maps in
+
+RETURNS:
+Linear address of the newly mapped memory.
+
+REMARKS:
+Maps a physical memory range to a linear memory range.
+****************************************************************************/
+static ulong _PM_mapPhysicalToLinear(
+ ulong base,
+ ulong limit,
+ ibool isCached)
+{
+ ulong length = limit+1;
+ PHYSICAL_ADDRESS paIoBase = {0};
+
+ // NT loves large Ints
+ paIoBase = RtlConvertUlongToLargeInteger( base );
+
+ // Map IO space into Kernel
+ if (isCached)
+ return (ULONG)MmMapIoSpace(paIoBase, length, MmCached );
+ else
+ return (ULONG)MmMapIoSpace(paIoBase, length, MmNonCached );
+}
+
+/****************************************************************************
+REMARKS:
+Adjust the page table caching bits directly. Requires ring 0 access and
+only works with DOS4GW and compatible extenders (CauseWay also works since
+it has direct support for the ring 0 instructions we need from ring 3). Will
+not work in a DOS box, but we call into the ring 0 helper VxD so we should
+never get here in a DOS box anyway (assuming the VxD is present). If we
+do get here and we are in windows, this code will be skipped.
+****************************************************************************/
+static void _PM_adjustPageTables(
+ ulong linear,
+ ulong limit,
+ ibool isGlobal,
+ ibool isCached)
+{
+ int startPDB,endPDB,iPDB,startPage,endPage,start,end,iPage;
+ ulong pageTable,*pPDB,*pPageTable;
+ ulong mask = 0xFFFFFFFF;
+ ulong bits = 0x00000000;
+
+ /* Enable user level access for page table entry */
+ if (isGlobal) {
+ mask &= ~PAGE_FLAGS_USER;
+ bits |= PAGE_FLAGS_USER;
+ }
+
+ /* Disable PCD bit if page table entry should be uncached */
+ if (!isCached) {
+ mask &= ~(PAGE_FLAGS_CACHE_DISABLE | PAGE_FLAGS_WRITE_THROUGH);
+ bits |= (PAGE_FLAGS_CACHE_DISABLE | PAGE_FLAGS_WRITE_THROUGH);
+ }
+
+ pPDB = (ulong*)_PM_mapPhysicalToLinear(_PM_getPDB(),0xFFF,true);
+ if (pPDB) {
+ startPDB = (linear >> 22) & 0x3FF;
+ startPage = (linear >> 12) & 0x3FF;
+ endPDB = ((linear+limit) >> 22) & 0x3FF;
+ endPage = ((linear+limit) >> 12) & 0x3FF;
+ for (iPDB = startPDB; iPDB <= endPDB; iPDB++) {
+ // Set the bits in the page directory entry - required as per
+ // Pentium 4 manual. This also takes care of the 4MB page entries
+ pPDB[iPDB] = (pPDB[iPDB] & mask) | bits;
+ if (!(pPDB[iPDB] & PAGE_FLAGS_4MB)) {
+ // If we are dealing with 4KB pages then we need to iterate
+ // through each of the page table entries
+ pageTable = pPDB[iPDB] & ~0xFFF;
+ pPageTable = (ulong*)_PM_mapPhysicalToLinear(pageTable,0xFFF,true);
+ start = (iPDB == startPDB) ? startPage : 0;
+ end = (iPDB == endPDB) ? endPage : 0x3FF;
+ for (iPage = start; iPage <= end; iPage++) {
+ pPageTable[iPage] = (pPageTable[iPage] & mask) | bits;
+ }
+ MmUnmapIoSpace(pPageTable,0xFFF);
+ }
+ }
+ MmUnmapIoSpace(pPDB,0xFFF);
+ PM_flushTLB();
+ }
+}
+
+/****************************************************************************
+REMARKS:
+Allocate a block of shared memory. For NT we allocate shared memory
+as locked, global memory that is accessible from any memory context
+(including interrupt time context), which allows us to load our important
+data structure and code such that we can access it directly from a ring
+0 interrupt context.
+****************************************************************************/
+void * PMAPI PM_mallocShared(
+ long size)
+{
+ int i;
+
+ // First find a free slot in our shared memory table
+ for (i = 0; i < MAX_MEMORY_SHARED; i++) {
+ if (shared[i].linear == 0)
+ break;
+ }
+ if (i == MAX_MEMORY_SHARED)
+ return NULL;
+
+ // Allocate the paged pool
+ shared[i].linear = ExAllocatePool(PagedPool, size);
+
+ // Create a list to manage this allocation
+ shared[i].pMdl = IoAllocateMdl(shared[i].linear,size,FALSE,FALSE,(PIRP) NULL);
+
+ // Lock this allocation in memory
+ MmProbeAndLockPages(shared[i].pMdl,KernelMode,IoModifyAccess);
+
+ // Modify bits to grant user access
+ _PM_adjustPageTables((ulong)shared[i].linear, size, true, true);
+ return (void*)shared[i].linear;
+}
+
+/****************************************************************************
+REMARKS:
+Free a block of shared memory
+****************************************************************************/
+void PMAPI PM_freeShared(
+ void *p)
+{
+ int i;
+
+ // Find a shared memory block in our table and free it
+ for (i = 0; i < MAX_MEMORY_SHARED; i++) {
+ if (shared[i].linear == p) {
+ // Unlock what we locked
+ MmUnlockPages(shared[i].pMdl);
+
+ // Free our MDL
+ IoFreeMdl(shared[i].pMdl);
+
+ // Free our mem
+ ExFreePool(shared[i].linear);
+
+ // Flag that is entry is available
+ shared[i].linear = 0;
+ break;
+ }
+ }
+}
+
+/****************************************************************************
+REMARKS:
+Map a physical address to a linear address in the callers process.
+****************************************************************************/
+void * PMAPI PM_mapPhysicalAddr(
+ ulong base,
+ ulong limit,
+ ibool isCached)
+{
+ ulong linear,length = limit+1;
+ int i;
+
+ // Search table of existing mappings to see if we have already mapped
+ // a region of memory that will serve this purpose.
+ for (i = 0; i < numMappings; i++) {
+ if (maps[i].physical == base && maps[i].length == length && maps[i].isCached == isCached) {
+ _PM_adjustPageTables((ulong)maps[i].linear, maps[i].length, true, isCached);
+ return (void*)maps[i].linear;
+ }
+ }
+ if (numMappings == MAX_MEMORY_MAPPINGS)
+ return NULL;
+
+ // We did not find any previously mapped memory region, so maps it in.
+ if ((linear = _PM_mapPhysicalToLinear(base,limit,isCached)) == 0xFFFFFFFF)
+ return NULL;
+ maps[numMappings].physical = base;
+ maps[numMappings].length = length;
+ maps[numMappings].linear = linear;
+ maps[numMappings].isCached = isCached;
+ numMappings++;
+
+ // Grant user access to this I/O space
+ _PM_adjustPageTables((ulong)linear, length, true, isCached);
+ return (void*)linear;
+}
+
+/****************************************************************************
+REMARKS:
+Free a physical address mapping allocated by PM_mapPhysicalAddr.
+****************************************************************************/
+void PMAPI PM_freePhysicalAddr(
+ void *ptr,
+ ulong limit)
+{
+ // We don't free the memory mappings in here because we cache all
+ // the memory mappings we create in the system for later use.
+}
+
+/****************************************************************************
+REMARKS:
+Called when the device driver unloads to free all the page table mappings!
+****************************************************************************/
+void PMAPI _PM_freeMemoryMappings(void)
+{
+ int i;
+
+ for (i = 0; i < numMappings; i++)
+ MmUnmapIoSpace((void *)maps[i].linear,maps[i].length);
+}
+
+/****************************************************************************
+REMARKS:
+Find the physical address of a linear memory address in current process.
+****************************************************************************/
+ulong PMAPI PM_getPhysicalAddr(
+ void *p)
+{
+ PHYSICAL_ADDRESS paOurAddress;
+
+ paOurAddress = MmGetPhysicalAddress(p);
+ return paOurAddress.LowPart;
+}
+
+/****************************************************************************
+REMARKS:
+Find the physical address of a linear memory address in current process.
+****************************************************************************/
+ibool PMAPI PM_getPhysicalAddrRange(
+ void *p,
+ ulong length,
+ ulong *physAddress)
+{
+ int i;
+ ulong linear = (ulong)p & ~0xFFF;
+
+ for (i = (length + 0xFFF) >> 12; i > 0; i--) {
+ if ((*physAddress++ = PM_getPhysicalAddr((void*)linear)) == 0xFFFFFFFF)
+ return false;
+ linear += 4096;
+ }
+ return true;
+}
+
+/****************************************************************************
+REMARKS:
+Allocates a block of locked physical memory.
+****************************************************************************/
+void * PMAPI PM_allocLockedMem(
+ uint size,
+ ulong *physAddr,
+ ibool contiguous,
+ ibool below16M)
+{
+ int i;
+ PHYSICAL_ADDRESS paOurAddress;
+
+ // First find a free slot in our shared memory table
+ for (i = 0; i < MAX_MEMORY_LOCKED; i++) {
+ if (locked[i].linear == 0)
+ break;
+ }
+ if (i == MAX_MEMORY_LOCKED)
+ return NULL;
+
+ // HighestAcceptableAddress - Specifies the highest valid physical address
+ // the driver can use. For example, if a device can only reference physical
+ // memory in the lower 16MB, this value would be set to 0x00000000FFFFFF.
+ paOurAddress.HighPart = 0;
+ if (below16M)
+ paOurAddress.LowPart = 0x00FFFFFF;
+ else
+ paOurAddress.LowPart = 0xFFFFFFFF;
+
+ if (contiguous) {
+ // Allocate from the non-paged pool (unfortunately 4MB pages)
+ locked[i].linear = MmAllocateContiguousMemory(size, paOurAddress);
+ if (!locked[i].linear)
+ return NULL;
+
+ // Flag no MDL
+ locked[i].pMdl = NULL;
+
+ // Map the physical address for the memory so we can manage
+ // the page tables in 4KB chunks mapped into user space.
+
+ // TODO: Map this with the physical address to the linear addresss
+ locked[i].mmIoMapped = locked[i].linear;
+
+ // Modify bits to grant user access, flag not cached
+ _PM_adjustPageTables((ulong)locked[i].mmIoMapped, size, true, false);
+ return (void*)locked[i].mmIoMapped;
+ }
+ else {
+ // Allocate from the paged pool
+ locked[i].linear = ExAllocatePool(PagedPool, size);
+ if (!locked[i].linear)
+ return NULL;
+
+ // Create a list to manage this allocation
+ locked[i].pMdl = IoAllocateMdl(locked[i].linear,size,FALSE,FALSE,(PIRP) NULL);
+
+ // Lock this allocation in memory
+ MmProbeAndLockPages(locked[i].pMdl,KernelMode,IoModifyAccess);
+
+ // Modify bits to grant user access, flag not cached
+ _PM_adjustPageTables((ulong)locked[i].linear, size, true, false);
+ return (void*)locked[i].linear;
+ }
+}
+
+/****************************************************************************
+REMARKS:
+Frees a block of locked physical memory.
+****************************************************************************/
+void PMAPI PM_freeLockedMem(
+ void *p,
+ uint size,
+ ibool contiguous)
+{
+ int i;
+
+ /* Find a locked memory block in our table and free it */
+ for (i = 0; i < MAX_MEMORY_LOCKED; i++) {
+ if (locked[i].linear == p) {
+ // An Mdl indicates that we used the paged pool, and locked it,
+ // so now we have to unlock, free the MDL, and free paged
+ if (locked[i].pMdl) {
+ // Unlock what we locked and free the Mdl
+ MmUnlockPages(locked[i].pMdl);
+ IoFreeMdl(locked[i].pMdl);
+ ExFreePool(locked[i].linear);
+ }
+ else {
+ // TODO: Free the mmIoMap mapping for the memory!
+
+ // Free non-paged pool
+ MmFreeContiguousMemory(locked[i].linear);
+ }
+
+ // Flag that is entry is available
+ locked[i].linear = 0;
+ break;
+ }
+ }
+}
+
+/****************************************************************************
+REMARKS:
+Allocates a page aligned and page sized block of memory
+****************************************************************************/
+void * PMAPI PM_allocPage(
+ ibool locked)
+{
+ // Allocate the memory from the non-paged pool if we want the memory
+ // to be locked.
+ return ExAllocatePool(
+ locked ? NonPagedPoolCacheAligned : PagedPoolCacheAligned,
+ PAGE_SIZE);
+}
+
+/****************************************************************************
+REMARKS:
+Free a page aligned and page sized block of memory
+****************************************************************************/
+void PMAPI PM_freePage(
+ void *p)
+{
+ if (p) ExFreePool(p);
+}
+
+/****************************************************************************
+REMARKS:
+Lock linear memory so it won't be paged.
+****************************************************************************/
+int PMAPI PM_lockDataPages(
+ void *p,
+ uint len,
+ PM_lockHandle *lh)
+{
+ MDL *pMdl;
+
+ // Create a list to manage this allocation
+ if ((pMdl = IoAllocateMdl(p,len,FALSE,FALSE,(PIRP)NULL)) == NULL)
+ return false;
+
+ // Lock this allocation in memory
+ MmProbeAndLockPages(pMdl,KernelMode,IoModifyAccess);
+ *((PMDL*)(&lh->h)) = pMdl;
+ return true;
+}
+
+/****************************************************************************
+REMARKS:
+Unlock linear memory so it won't be paged.
+****************************************************************************/
+int PMAPI PM_unlockDataPages(
+ void *p,
+ uint len,
+ PM_lockHandle *lh)
+{
+ if (p && lh) {
+ // Unlock what we locked
+ MDL *pMdl = *((PMDL*)(&lh->h));
+ MmUnlockPages(pMdl);
+ IoFreeMdl(pMdl);
+ }
+ return true;
+}
+
+/****************************************************************************
+REMARKS:
+Lock linear memory so it won't be paged.
+****************************************************************************/
+int PMAPI PM_lockCodePages(
+ void (*p)(),
+ uint len,
+ PM_lockHandle *lh)
+{
+ return PM_lockDataPages((void*)p,len,lh);
+}
+
+/****************************************************************************
+REMARKS:
+Unlock linear memory so it won't be paged.
+****************************************************************************/
+int PMAPI PM_unlockCodePages(
+ void (*p)(),
+ uint len,
+ PM_lockHandle *lh)
+{
+ return PM_unlockDataPages((void*)p,len,lh);
+}
+
diff --git a/board/MAI/bios_emulator/scitech/src/pm/ntdrv/oshdr.h b/board/MAI/bios_emulator/scitech/src/pm/ntdrv/oshdr.h
new file mode 100644
index 00000000000..3f747bb9cec
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/pm/ntdrv/oshdr.h
@@ -0,0 +1,46 @@
+/****************************************************************************
+*
+* SciTech OS Portability Manager Library
+*
+* ========================================================================
+*
+* The contents of this file are subject to the SciTech MGL Public
+* License Version 1.0 (the "License"); you may not use this file
+* except in compliance with the License. You may obtain a copy of
+* the License at http://www.scitechsoft.com/mgl-license.txt
+*
+* Software distributed under the License is distributed on an
+* "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+* implied. See the License for the specific language governing
+* rights and limitations under the License.
+*
+* The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+*
+* The Initial Developer of the Original Code is SciTech Software, Inc.
+* All Rights Reserved.
+*
+* ========================================================================
+*
+* Language: ANSI C
+* Environment: 32-bit Windows NT drivers
+*
+* Description: Include file to include all OS specific header files.
+*
+****************************************************************************/
+
+#ifndef __NTDRV_OSHDR_H
+#define __NTDRV_OSHDR_H
+
+/*--------------------------- Macros and Typedefs -------------------------*/
+
+/*---------------------------- Global variables ---------------------------*/
+
+/*--------------------------- Function Prototypes -------------------------*/
+
+/* Internal unicode string handling functions */
+
+UNICODE_STRING * _PM_CStringToUnicodeString(const char *cstr);
+void _PM_FreeUnicodeString(UNICODE_STRING *uniStr);
+
+#endif // __NTDRV_OSHDR_H
+
diff --git a/board/MAI/bios_emulator/scitech/src/pm/ntdrv/pm.c b/board/MAI/bios_emulator/scitech/src/pm/ntdrv/pm.c
new file mode 100644
index 00000000000..d4bbe228b72
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/pm/ntdrv/pm.c
@@ -0,0 +1,934 @@
+/****************************************************************************
+*
+* SciTech OS Portability Manager Library
+*
+* ========================================================================
+*
+* The contents of this file are subject to the SciTech MGL Public
+* License Version 1.0 (the "License"); you may not use this file
+* except in compliance with the License. You may obtain a copy of
+* the License at http://www.scitechsoft.com/mgl-license.txt
+*
+* Software distributed under the License is distributed on an
+* "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+* implied. See the License for the specific language governing
+* rights and limitations under the License.
+*
+* The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+*
+* The Initial Developer of the Original Code is SciTech Software, Inc.
+* All Rights Reserved.
+*
+* ========================================================================
+*
+* Language: ANSI C
+* Environment: 32-bit Windows NT device drivers.
+*
+* Description: Implementation for the OS Portability Manager Library, which
+* contains functions to implement OS specific services in a
+* generic, cross platform API. Porting the OS Portability
+* Manager library is the first step to porting any SciTech
+* products to a new platform.
+*
+****************************************************************************/
+
+#include "pmapi.h"
+#include "drvlib/os/os.h"
+#include "sdd/sddhelp.h"
+#include "mtrr.h"
+#include "oshdr.h"
+
+/*--------------------------- Global variables ----------------------------*/
+
+char _PM_cntPath[PM_MAX_PATH] = "";
+char _PM_nucleusPath[PM_MAX_PATH] = "";
+static void (PMAPIP fatalErrorCleanup)(void) = NULL;
+
+static char *szNTWindowsKey = "\\REGISTRY\\Machine\\Software\\Microsoft\\Windows NT\\CurrentVersion";
+static char *szNTSystemRoot = "SystemRoot";
+static char *szMachineNameKey = "\\REGISTRY\\Machine\\System\\CurrentControlSet\\control\\ComputerName\\ComputerName";
+static char *szMachineNameKeyNT = "\\REGISTRY\\Machine\\System\\CurrentControlSet\\control\\ComputerName\\ActiveComputerName";
+static char *szMachineName = "ComputerName";
+
+/*----------------------------- Implementation ----------------------------*/
+
+/****************************************************************************
+REMARKS:
+Initialise the PM library.
+****************************************************************************/
+void PMAPI PM_init(void)
+{
+ /* Initialiase the MTRR module */
+ MTRR_init();
+}
+
+/****************************************************************************
+REMARKS:
+Return the operating system type identifier.
+****************************************************************************/
+long PMAPI PM_getOSType(void)
+{
+ return _OS_WINNTDRV;
+}
+
+/****************************************************************************
+REMARKS:
+Return the runtime type identifier.
+****************************************************************************/
+int PMAPI PM_getModeType(void)
+{
+ return PM_386;
+}
+
+/****************************************************************************
+REMARKS:
+Add a file directory separator to the end of the filename.
+****************************************************************************/
+void PMAPI PM_backslash(char *s)
+{
+ uint pos = strlen(s);
+ if (s[pos-1] != '\\') {
+ s[pos] = '\\';
+ s[pos+1] = '\0';
+ }
+}
+
+/****************************************************************************
+REMARKS:
+Add a user defined PM_fatalError cleanup function.
+****************************************************************************/
+void PMAPI PM_setFatalErrorCleanup(
+ void (PMAPIP cleanup)(void))
+{
+ fatalErrorCleanup = cleanup;
+}
+
+/****************************************************************************
+REMARKS:
+Handle fatal errors internally in the driver.
+****************************************************************************/
+void PMAPI PM_fatalError(
+ const char *msg)
+{
+ ULONG BugCheckCode = 0;
+ ULONG MoreBugCheckData[4] = {0};
+ char *p;
+ ULONG len;
+
+ if (fatalErrorCleanup)
+ fatalErrorCleanup();
+
+#ifdef DBG // Send output to debugger, just return so as not to force a reboot
+#pragma message("INFO: building for debug, PM_fatalError() re-routed")
+ DBGMSG2("SDDHELP> PM_fatalError(): ERROR: %s\n", msg);
+ return ;
+#endif
+ // KeBugCheckEx brings down the system in a controlled
+ // manner when the caller discovers an unrecoverable
+ // inconsistency that would corrupt the system if
+ // the caller continued to run.
+ //
+ // hack - dump the first 20 chars in hex using the variables
+ // provided - Each ULONG is equal to four characters...
+ for(len = 0; len < 20; len++)
+ if (msg[len] == (char)0)
+ break;
+
+ // This looks bad but it's quick and reliable...
+ p = (char *)&BugCheckCode;
+ if(len > 0) p[3] = msg[0];
+ if(len > 1) p[2] = msg[1];
+ if(len > 2) p[1] = msg[2];
+ if(len > 3) p[0] = msg[3];
+
+ p = (char *)&MoreBugCheckData[0];
+ if(len > 4) p[3] = msg[4];
+ if(len > 5) p[2] = msg[5];
+ if(len > 6) p[1] = msg[6];
+ if(len > 7) p[0] = msg[7];
+
+ p = (char *)&MoreBugCheckData[1];
+ if(len > 8) p[3] = msg[8];
+ if(len > 9) p[2] = msg[9];
+ if(len > 10) p[1] = msg[10];
+ if(len > 11) p[0] = msg[11];
+
+ p = (char *)&MoreBugCheckData[2];
+ if(len > 12) p[3] = msg[12];
+ if(len > 13) p[2] = msg[13];
+ if(len > 14) p[1] = msg[14];
+ if(len > 15) p[0] = msg[15];
+
+ p = (char *)&MoreBugCheckData[3];
+ if(len > 16) p[3] = msg[16];
+ if(len > 17) p[2] = msg[17];
+ if(len > 18) p[1] = msg[18];
+ if(len > 19) p[0] = msg[19];
+
+ // Halt the system!
+ KeBugCheckEx(BugCheckCode, MoreBugCheckData[0], MoreBugCheckData[1], MoreBugCheckData[2], MoreBugCheckData[3]);
+}
+
+/****************************************************************************
+REMARKS:
+Return the current operating system path or working directory.
+****************************************************************************/
+char * PMAPI PM_getCurrentPath(
+ char *path,
+ int maxLen)
+{
+ strncpy(path,_PM_cntPath,maxLen);
+ path[maxLen-1] = 0;
+ return path;
+}
+
+/****************************************************************************
+PARAMETERS:
+szKey - Key to query (can contain version number formatting)
+szValue - Value to get information for
+value - Place to store the registry key data read
+size - Size of the string buffer to read into
+
+RETURNS:
+true if the key was found, false if not.
+****************************************************************************/
+static ibool REG_queryString(
+ char *szKey,
+ const char *szValue,
+ char *value,
+ DWORD size)
+{
+ ibool status;
+ NTSTATUS rval;
+ ULONG length;
+ HANDLE Handle;
+ OBJECT_ATTRIBUTES keyAttributes;
+ UNICODE_STRING *uniKey = NULL;
+ UNICODE_STRING *uniValue = NULL;
+ PKEY_VALUE_FULL_INFORMATION fullInfo = NULL;
+ STRING stringdata;
+ UNICODE_STRING unidata;
+
+ // Convert strings to UniCode
+ status = false;
+ if ((uniKey = _PM_CStringToUnicodeString(szKey)) == NULL)
+ goto Exit;
+ if ((uniValue = _PM_CStringToUnicodeString(szValue)) == NULL)
+ goto Exit;
+
+ // Open the key
+ InitializeObjectAttributes( &keyAttributes,
+ uniKey,
+ OBJ_CASE_INSENSITIVE,
+ NULL,
+ NULL );
+ rval = ZwOpenKey( &Handle,
+ KEY_ALL_ACCESS,
+ &keyAttributes );
+ if (!NT_SUCCESS(rval))
+ goto Exit;
+
+ // Query the value
+ length = sizeof (KEY_VALUE_FULL_INFORMATION)
+ + size * sizeof(WCHAR);
+ if ((fullInfo = ExAllocatePool (PagedPool, length)) == NULL)
+ goto Exit;
+ RtlZeroMemory(fullInfo, length);
+ rval = ZwQueryValueKey (Handle,
+ uniValue,
+ KeyValueFullInformation,
+ fullInfo,
+ length,
+ &length);
+ if (NT_SUCCESS (rval)) {
+ // Create the UniCode string so we can convert it
+ unidata.Buffer = (PWCHAR)(((PCHAR)fullInfo) + fullInfo->DataOffset);
+ unidata.Length = (USHORT)fullInfo->DataLength;
+ unidata.MaximumLength = (USHORT)fullInfo->DataLength + sizeof(WCHAR);
+
+ // Convert unicode univalue to ansi string.
+ rval = RtlUnicodeStringToAnsiString(&stringdata, &unidata, TRUE);
+ if (NT_SUCCESS(rval)) {
+ strcpy(value,stringdata.Buffer);
+ status = true;
+ }
+ }
+
+Exit:
+ if (fullInfo) ExFreePool(fullInfo);
+ if (uniKey) _PM_FreeUnicodeString(uniKey);
+ if (uniValue) _PM_FreeUnicodeString(uniValue);
+ return status;
+}
+
+/****************************************************************************
+REMARKS:
+Return the drive letter for the boot drive.
+****************************************************************************/
+char PMAPI PM_getBootDrive(void)
+{
+ char path[256];
+ if (REG_queryString(szNTWindowsKey,szNTSystemRoot,path,sizeof(path)))
+ return 'c';
+ return path[0];
+}
+
+/****************************************************************************
+REMARKS:
+Return the path to the VBE/AF driver files.
+****************************************************************************/
+const char * PMAPI PM_getVBEAFPath(void)
+{
+ return "c:\\";
+}
+
+/****************************************************************************
+REMARKS:
+Return the path to the Nucleus driver files.
+****************************************************************************/
+const char * PMAPI PM_getNucleusPath(void)
+{
+ static char path[256];
+
+ if (strlen(_PM_nucleusPath) > 0) {
+ strcpy(path,_PM_nucleusPath);
+ PM_backslash(path);
+ return path;
+ }
+ if (!REG_queryString(szNTWindowsKey,szNTSystemRoot,path,sizeof(path)))
+ strcpy(path,"c:\\winnt");
+ PM_backslash(path);
+ strcat(path,"system32\\nucleus");
+ return path;
+}
+
+/****************************************************************************
+REMARKS:
+Return the path to the Nucleus configuration files.
+****************************************************************************/
+const char * PMAPI PM_getNucleusConfigPath(void)
+{
+ static char path[256];
+ strcpy(path,PM_getNucleusPath());
+ PM_backslash(path);
+ strcat(path,"config");
+ return path;
+}
+
+/****************************************************************************
+REMARKS:
+Return a unique identifier for the machine if possible.
+****************************************************************************/
+const char * PMAPI PM_getUniqueID(void)
+{
+ return PM_getMachineName();
+}
+
+/****************************************************************************
+REMARKS:
+Get the name of the machine on the network.
+****************************************************************************/
+const char * PMAPI PM_getMachineName(void)
+{
+ static char name[256];
+
+ if (REG_queryString(szMachineNameKey,szMachineName,name,sizeof(name)))
+ return name;
+ if (REG_queryString(szMachineNameKeyNT,szMachineName,name,sizeof(name)))
+ return name;
+ return "Unknown";
+}
+
+/****************************************************************************
+REMARKS:
+Check if a key has been pressed.
+****************************************************************************/
+int PMAPI PM_kbhit(void)
+{
+ // Not used in NT drivers
+ return true;
+}
+
+/****************************************************************************
+REMARKS:
+Wait for and return the next keypress.
+****************************************************************************/
+int PMAPI PM_getch(void)
+{
+ // Not used in NT drivers
+ return 0xD;
+}
+
+/****************************************************************************
+REMARKS:
+Open a console for output to the screen, creating the main event handling
+window if necessary.
+****************************************************************************/
+PM_HWND PMAPI PM_openConsole(
+ PM_HWND hwndUser,
+ int device,
+ int xRes,
+ int yRes,
+ int bpp,
+ ibool fullScreen)
+{
+ // Not used in NT drivers
+ (void)hwndUser;
+ (void)device;
+ (void)xRes;
+ (void)yRes;
+ (void)bpp;
+ (void)fullScreen;
+ return NULL;
+}
+
+/****************************************************************************
+REMARKS:
+Find the size of the console state buffer.
+****************************************************************************/
+int PMAPI PM_getConsoleStateSize(void)
+{
+ // Not used in NT drivers
+ return 1;
+}
+
+/****************************************************************************
+REMARKS:
+Save the state of the console.
+****************************************************************************/
+void PMAPI PM_saveConsoleState(
+ void *stateBuf,
+ PM_HWND hwndConsole)
+{
+ // Not used in NT drivers
+ (void)stateBuf;
+ (void)hwndConsole;
+}
+
+/****************************************************************************
+REMARKS:
+Set the suspend application callback for the fullscreen console.
+****************************************************************************/
+void PMAPI PM_setSuspendAppCallback(
+ PM_saveState_cb saveState)
+{
+ // Not used in NT drivers
+ (void)saveState;
+}
+
+/****************************************************************************
+REMARKS:
+Restore the console state.
+****************************************************************************/
+void PMAPI PM_restoreConsoleState(
+ const void *stateBuf,
+ PM_HWND hwndConsole)
+{
+ // Not used in NT drivers
+ (void)stateBuf;
+ (void)hwndConsole;
+}
+
+/****************************************************************************
+REMARKS:
+Close the fullscreen console.
+****************************************************************************/
+void PMAPI PM_closeConsole(
+ PM_HWND hwndConsole)
+{
+ // Not used in NT drivers
+ (void)hwndConsole;
+}
+
+/****************************************************************************
+REMARKS:
+Set the location of the OS console cursor.
+****************************************************************************/
+void PMAPI PM_setOSCursorLocation(
+ int x,
+ int y)
+{
+ /* Nothing to do for Windows */
+ (void)x;
+ (void)y;
+}
+
+/****************************************************************************
+REMARKS:
+Set the width of the OS console.
+****************************************************************************/
+void PMAPI PM_setOSScreenWidth(
+ int width,
+ int height)
+{
+ /* Nothing to do for Windows */
+ (void)width;
+ (void)height;
+}
+
+/****************************************************************************
+REMARKS:
+Maps a shared memory block into process address space. Does nothing since
+the memory blocks are already globally mapped into all processes.
+****************************************************************************/
+void * PMAPI PM_mapToProcess(
+ void *base,
+ ulong limit)
+{
+ // Not used anymore
+ (void)base;
+ (void)limit;
+ return NULL;
+}
+
+/****************************************************************************
+REMARKS:
+Execute the POST on the secondary BIOS for a controller.
+****************************************************************************/
+ibool PMAPI PM_doBIOSPOST(
+ ushort axVal,
+ ulong BIOSPhysAddr,
+ void *mappedBIOS,
+ ulong BIOSLen)
+{
+ // This may not be possible in NT and should be done by the OS anyway
+ (void)axVal;
+ (void)BIOSPhysAddr;
+ (void)mappedBIOS;
+ (void)BIOSLen;
+ return false;
+}
+
+/****************************************************************************
+REMARKS:
+Return a pointer to the real mode BIOS data area.
+****************************************************************************/
+void * PMAPI PM_getBIOSPointer(void)
+{
+ // Note that on NT this probably does not do what we expect!
+ return PM_mapPhysicalAddr(0x400, 0x1000, true);
+}
+
+/****************************************************************************
+REMARKS:
+Return a pointer to 0xA0000 physical VGA graphics framebuffer.
+****************************************************************************/
+void * PMAPI PM_getA0000Pointer(void)
+{
+ return PM_mapPhysicalAddr(0xA0000,0xFFFF,false);
+}
+
+/****************************************************************************
+REMARKS:
+Sleep for the specified number of milliseconds.
+****************************************************************************/
+void PMAPI PM_sleep(
+ ulong milliseconds)
+{
+ // We never use this in NT drivers
+ (void)milliseconds;
+}
+
+/****************************************************************************
+REMARKS:
+Return the base I/O port for the specified COM port.
+****************************************************************************/
+int PMAPI PM_getCOMPort(int port)
+{
+ // TODO: Re-code this to determine real values using the Plug and Play
+ // manager for the OS.
+ switch (port) {
+ case 0: return 0x3F8;
+ case 1: return 0x2F8;
+ case 2: return 0x3E8;
+ case 3: return 0x2E8;
+ }
+ return 0;
+}
+
+/****************************************************************************
+REMARKS:
+Return the base I/O port for the specified LPT port.
+****************************************************************************/
+int PMAPI PM_getLPTPort(int port)
+{
+ // TODO: Re-code this to determine real values using the Plug and Play
+ // manager for the OS.
+ switch (port) {
+ case 0: return 0x3BC;
+ case 1: return 0x378;
+ case 2: return 0x278;
+ }
+ return 0;
+}
+
+/****************************************************************************
+REMARKS:
+Returns available memory. Not possible under Windows.
+****************************************************************************/
+void PMAPI PM_availableMemory(
+ ulong *physical,
+ ulong *total)
+{
+ *physical = *total = 0;
+}
+
+/****************************************************************************
+REMARKS:
+OS specific shared libraries not supported inside a VxD
+****************************************************************************/
+PM_MODULE PMAPI PM_loadLibrary(
+ const char *szDLLName)
+{
+ // Not used in NT drivers
+ (void)szDLLName;
+ return NULL;
+}
+
+/****************************************************************************
+REMARKS:
+OS specific shared libraries not supported inside a VxD
+****************************************************************************/
+void * PMAPI PM_getProcAddress(
+ PM_MODULE hModule,
+ const char *szProcName)
+{
+ // Not used in NT drivers
+ (void)hModule;
+ (void)szProcName;
+ return NULL;
+}
+
+/****************************************************************************
+REMARKS:
+OS specific shared libraries not supported inside a VxD
+****************************************************************************/
+void PMAPI PM_freeLibrary(
+ PM_MODULE hModule)
+{
+ // Not used in NT drivers
+ (void)hModule;
+}
+
+/****************************************************************************
+REMARKS:
+Function to find the first file matching a search criteria in a directory.
+****************************************************************************/
+void *PMAPI PM_findFirstFile(
+ const char *filename,
+ PM_findData *findData)
+{
+ // TODO: This function should start a directory enumeration search
+ // given the filename (with wildcards). The data should be
+ // converted and returned in the findData standard form.
+ (void)filename;
+ (void)findData;
+ return PM_FILE_INVALID;
+}
+
+/****************************************************************************
+REMARKS:
+Function to find the next file matching a search criteria in a directory.
+****************************************************************************/
+ibool PMAPI PM_findNextFile(
+ void *handle,
+ PM_findData *findData)
+{
+ // TODO: This function should find the next file in directory enumeration
+ // search given the search criteria defined in the call to
+ // PM_findFirstFile. The data should be converted and returned
+ // in the findData standard form.
+ (void)handle;
+ (void)findData;
+ return false;
+}
+
+/****************************************************************************
+REMARKS:
+Function to close the find process
+****************************************************************************/
+void PMAPI PM_findClose(
+ void *handle)
+{
+ // TODO: This function should close the find process. This may do
+ // nothing for some OS'es.
+ (void)handle;
+}
+
+/****************************************************************************
+REMARKS:
+Function to determine if a drive is a valid drive or not. Under Unix this
+function will return false for anything except a value of 3 (considered
+the root drive, and equivalent to C: for non-Unix systems). The drive
+numbering is:
+
+ 1 - Drive A:
+ 2 - Drive B:
+ 3 - Drive C:
+ etc
+
+****************************************************************************/
+ibool PMAPI PM_driveValid(
+ char drive)
+{
+ // Not supported in NT drivers
+ (void)drive;
+ return false;
+}
+
+/****************************************************************************
+REMARKS:
+Function to get the current working directory for the specififed drive.
+Under Unix this will always return the current working directory regardless
+of what the value of 'drive' is.
+****************************************************************************/
+void PMAPI PM_getdcwd(
+ int drive,
+ char *dir,
+ int len)
+{
+ // Not supported in NT drivers
+ (void)drive;
+ (void)dir;
+ (void)len;
+}
+
+/****************************************************************************
+PARAMETERS:
+base - The starting physical base address of the region
+size - The size in bytes of the region
+type - Type to place into the MTRR register
+
+RETURNS:
+Error code describing the result.
+
+REMARKS:
+Function to enable write combining for the specified region of memory.
+****************************************************************************/
+int PMAPI PM_enableWriteCombine(
+ ulong base,
+ ulong size,
+ uint type)
+{
+ return MTRR_enableWriteCombine(base,size,type);
+}
+
+/****************************************************************************
+REMARKS:
+Function to change the file attributes for a specific file.
+****************************************************************************/
+void PMAPI PM_setFileAttr(
+ const char *filename,
+ uint attrib)
+{
+ NTSTATUS status;
+ ACCESS_MASK DesiredAccess = GENERIC_READ | GENERIC_WRITE;
+ OBJECT_ATTRIBUTES ObjectAttributes;
+ ULONG ShareAccess = FILE_SHARE_READ;
+ ULONG CreateDisposition = FILE_OPEN;
+ HANDLE FileHandle = NULL;
+ UNICODE_STRING *uniFile = NULL;
+ IO_STATUS_BLOCK IoStatusBlock;
+ FILE_BASIC_INFORMATION FileBasic;
+ char kernelFilename[PM_MAX_PATH+5];
+ ULONG FileAttributes = 0;
+
+ // Convert file attribute flags
+ if (attrib & PM_FILE_READONLY)
+ FileAttributes |= FILE_ATTRIBUTE_READONLY;
+ if (attrib & PM_FILE_ARCHIVE)
+ FileAttributes |= FILE_ATTRIBUTE_ARCHIVE;
+ if (attrib & PM_FILE_HIDDEN)
+ FileAttributes |= FILE_ATTRIBUTE_HIDDEN;
+ if (attrib & PM_FILE_SYSTEM)
+ FileAttributes |= FILE_ATTRIBUTE_SYSTEM;
+
+ // Add prefix for addressing the file system. "\??\" is short for "\DosDevices\"
+ strcpy(kernelFilename, "\\??\\");
+ strcat(kernelFilename, filename);
+
+ // Convert filename string to ansi string
+ if ((uniFile = _PM_CStringToUnicodeString(kernelFilename)) == NULL)
+ goto Exit;
+
+ // Must open a file to query it's attributes
+ InitializeObjectAttributes (&ObjectAttributes,
+ uniFile,
+ OBJ_CASE_INSENSITIVE,
+ NULL,
+ NULL );
+ status = ZwCreateFile( &FileHandle,
+ DesiredAccess | SYNCHRONIZE,
+ &ObjectAttributes,
+ &IoStatusBlock,
+ NULL, //AllocationSize OPTIONAL,
+ FILE_ATTRIBUTE_NORMAL,
+ ShareAccess,
+ CreateDisposition,
+ FILE_RANDOM_ACCESS, //CreateOptions,
+ NULL, //EaBuffer OPTIONAL,
+ 0 //EaLength (required if EaBuffer)
+ );
+ if (!NT_SUCCESS (status))
+ goto Exit;
+
+ // Query timestamps
+ status = ZwQueryInformationFile(FileHandle,
+ &IoStatusBlock,
+ &FileBasic,
+ sizeof(FILE_BASIC_INFORMATION),
+ FileBasicInformation
+ );
+ if (!NT_SUCCESS (status))
+ goto Exit;
+
+ // Change the four bits we change
+ FileBasic.FileAttributes &= ~(FILE_ATTRIBUTE_READONLY | FILE_ATTRIBUTE_ARCHIVE
+ | FILE_ATTRIBUTE_HIDDEN | FILE_ATTRIBUTE_SYSTEM);
+ FileBasic.FileAttributes |= FileAttributes;
+
+ // Set timestamps
+ ZwSetInformationFile( FileHandle,
+ &IoStatusBlock,
+ &FileBasic,
+ sizeof(FILE_BASIC_INFORMATION),
+ FileBasicInformation
+ );
+
+Exit:
+ if (FileHandle) ZwClose(FileHandle);
+ if (uniFile) _PM_FreeUnicodeString(uniFile);
+ return;
+}
+
+/****************************************************************************
+REMARKS:
+Function to get the file attributes for a specific file.
+****************************************************************************/
+uint PMAPI PM_getFileAttr(
+ const char *filename)
+{
+ NTSTATUS status;
+ ACCESS_MASK DesiredAccess = GENERIC_READ | GENERIC_WRITE;
+ OBJECT_ATTRIBUTES ObjectAttributes;
+ ULONG ShareAccess = FILE_SHARE_READ;
+ ULONG CreateDisposition = FILE_OPEN;
+ HANDLE FileHandle = NULL;
+ UNICODE_STRING *uniFile = NULL;
+ IO_STATUS_BLOCK IoStatusBlock;
+ FILE_BASIC_INFORMATION FileBasic;
+ char kernelFilename[PM_MAX_PATH+5];
+ ULONG FileAttributes = 0;
+ uint retval = 0;
+
+ // Add prefix for addressing the file system. "\??\" is short for "\DosDevices\"
+ strcpy(kernelFilename, "\\??\\");
+ strcat(kernelFilename, filename);
+
+ // Convert filename string to ansi string
+ if ((uniFile = _PM_CStringToUnicodeString(kernelFilename)) == NULL)
+ goto Exit;
+
+ // Must open a file to query it's attributes
+ InitializeObjectAttributes (&ObjectAttributes,
+ uniFile,
+ OBJ_CASE_INSENSITIVE,
+ NULL,
+ NULL );
+ status = ZwCreateFile( &FileHandle,
+ DesiredAccess | SYNCHRONIZE,
+ &ObjectAttributes,
+ &IoStatusBlock,
+ NULL, //AllocationSize OPTIONAL,
+ FILE_ATTRIBUTE_NORMAL,
+ ShareAccess,
+ CreateDisposition,
+ FILE_RANDOM_ACCESS, //CreateOptions,
+ NULL, //EaBuffer OPTIONAL,
+ 0 //EaLength (required if EaBuffer)
+ );
+ if (!NT_SUCCESS (status))
+ goto Exit;
+
+ // Query timestamps
+ status = ZwQueryInformationFile(FileHandle,
+ &IoStatusBlock,
+ &FileBasic,
+ sizeof(FILE_BASIC_INFORMATION),
+ FileBasicInformation
+ );
+ if (!NT_SUCCESS (status))
+ goto Exit;
+
+ // Translate the file attributes
+ if (FileBasic.FileAttributes & FILE_ATTRIBUTE_READONLY)
+ retval |= PM_FILE_READONLY;
+ if (FileBasic.FileAttributes & FILE_ATTRIBUTE_ARCHIVE)
+ retval |= PM_FILE_ARCHIVE;
+ if (FileBasic.FileAttributes & FILE_ATTRIBUTE_HIDDEN)
+ retval |= PM_FILE_HIDDEN;
+ if (FileBasic.FileAttributes & FILE_ATTRIBUTE_SYSTEM)
+ retval |= PM_FILE_SYSTEM;
+
+Exit:
+ if (FileHandle) ZwClose(FileHandle);
+ if (uniFile) _PM_FreeUnicodeString(uniFile);
+ return retval;
+}
+
+/****************************************************************************
+REMARKS:
+Function to create a directory.
+****************************************************************************/
+ibool PMAPI PM_mkdir(
+ const char *filename)
+{
+ // Not supported in NT drivers
+ (void)filename;
+ return false;
+}
+
+/****************************************************************************
+REMARKS:
+Function to remove a directory.
+****************************************************************************/
+ibool PMAPI PM_rmdir(
+ const char *filename)
+{
+ // Not supported in NT drivers
+ (void)filename;
+ return false;
+}
+
+/****************************************************************************
+REMARKS:
+Function to get the file time and date for a specific file.
+****************************************************************************/
+ibool PMAPI PM_getFileTime(
+ const char *filename,
+ ibool gmTime,
+ PM_time *time)
+{
+ // Not supported in NT drivers
+ (void)filename;
+ (void)gmTime;
+ (void)time;
+ return false;
+}
+
+/****************************************************************************
+REMARKS:
+Function to set the file time and date for a specific file.
+****************************************************************************/
+ibool PMAPI PM_setFileTime(
+ const char *filename,
+ ibool gmTime,
+ PM_time *time)
+{
+ // Not supported in NT drivers
+ (void)filename;
+ (void)gmTime;
+ (void)time;
+ return false;
+}
+
diff --git a/board/MAI/bios_emulator/scitech/src/pm/ntdrv/stdio.c b/board/MAI/bios_emulator/scitech/src/pm/ntdrv/stdio.c
new file mode 100644
index 00000000000..856215206ff
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/pm/ntdrv/stdio.c
@@ -0,0 +1,331 @@
+/****************************************************************************
+*
+* SciTech OS Portability Manager Library
+*
+* ========================================================================
+*
+* The contents of this file are subject to the SciTech MGL Public
+* License Version 1.0 (the "License"); you may not use this file
+* except in compliance with the License. You may obtain a copy of
+* the License at http://www.scitechsoft.com/mgl-license.txt
+*
+* Software distributed under the License is distributed on an
+* "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+* implied. See the License for the specific language governing
+* rights and limitations under the License.
+*
+* The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+*
+* The Initial Developer of the Original Code is SciTech Software, Inc.
+* All Rights Reserved.
+*
+* ========================================================================
+*
+* Language: ANSI C
+* Environment: 32-bit Windows NT driver
+*
+* Description: C library compatible I/O functions for use within a Windows
+* NT driver.
+*
+****************************************************************************/
+
+#include "pmapi.h"
+#include "oshdr.h"
+
+/*------------------------ Main Code Implementation -----------------------*/
+
+/****************************************************************************
+REMARKS:
+NT driver implementation of the ANSI C fopen function.
+****************************************************************************/
+FILE * fopen(
+ const char *filename,
+ const char *mode)
+{
+ ACCESS_MASK DesiredAccess; // for ZwCreateFile...
+ OBJECT_ATTRIBUTES ObjectAttributes;
+ ULONG ShareAccess;
+ ULONG CreateDisposition;
+ NTSTATUS status;
+ HANDLE FileHandle;
+ UNICODE_STRING *uniFile = NULL;
+ PWCHAR bufFile = NULL;
+ IO_STATUS_BLOCK IoStatusBlock;
+ FILE_STANDARD_INFORMATION FileInformation;
+ FILE_POSITION_INFORMATION FilePosition;
+ char kernelFilename[PM_MAX_PATH+5];
+ FILE *f;
+
+ // Add prefix for addressing the file system. "\??\" is short for "\DosDevices\"
+ strcpy(kernelFilename, "\\??\\");
+ strcat(kernelFilename, filename);
+ if ((f = PM_malloc(sizeof(FILE))) == NULL)
+ goto Error;
+ f->offset = 0;
+ f->text = (mode[1] == 't' || mode[2] == 't');
+ f->writemode = (mode[0] == 'w') || (mode[0] == 'a');
+ if (mode[0] == 'r') {
+ // omode = OPEN_ACCESS_READONLY | OPEN_SHARE_COMPATIBLE;
+ // action = ACTION_IFEXISTS_OPEN | ACTION_IFNOTEXISTS_FAIL;
+ DesiredAccess = GENERIC_READ;
+ ShareAccess = FILE_SHARE_READ | FILE_SHARE_WRITE;
+ CreateDisposition = FILE_OPEN;
+ }
+ else if (mode[0] == 'w') {
+ // omode = OPEN_ACCESS_WRITEONLY | OPEN_SHARE_COMPATIBLE;
+ // action = ACTION_IFEXISTS_TRUNCATE | ACTION_IFNOTEXISTS_CREATE;
+ DesiredAccess = GENERIC_WRITE;
+ ShareAccess = FILE_SHARE_READ | FILE_SHARE_WRITE;
+ CreateDisposition = FILE_SUPERSEDE;
+ }
+ else {
+ // omode = OPEN_ACCESS_READWRITE | OPEN_SHARE_COMPATIBLE;
+ // action = ACTION_IFEXISTS_OPEN | ACTION_IFNOTEXISTS_CREATE;
+ DesiredAccess = GENERIC_READ | GENERIC_WRITE;
+ ShareAccess = FILE_SHARE_READ;
+ CreateDisposition = FILE_OPEN_IF;
+ }
+
+ // Convert filename string to ansi string and then to UniCode string
+ if ((uniFile = _PM_CStringToUnicodeString(kernelFilename)) == NULL)
+ return NULL;
+
+ // Create the file
+ InitializeObjectAttributes (&ObjectAttributes,
+ uniFile,
+ OBJ_CASE_INSENSITIVE,
+ NULL,
+ NULL);
+ status = ZwCreateFile( &FileHandle,
+ DesiredAccess | SYNCHRONIZE,
+ &ObjectAttributes,
+ &IoStatusBlock,
+ NULL, // AllocationSize OPTIONAL,
+ FILE_ATTRIBUTE_NORMAL,
+ ShareAccess,
+ CreateDisposition,
+ FILE_RANDOM_ACCESS, // CreateOptions,
+ NULL, // EaBuffer OPTIONAL,
+ 0 // EaLength (required if EaBuffer)
+ );
+ if (!NT_SUCCESS (status))
+ goto Error;
+ f->handle = (int)FileHandle;
+
+ // Determine size of the file
+ status = ZwQueryInformationFile( FileHandle,
+ &IoStatusBlock,
+ &FileInformation,
+ sizeof(FILE_STANDARD_INFORMATION),
+ FileStandardInformation
+ );
+ if (!NT_SUCCESS (status))
+ goto Error;
+ f->filesize = FileInformation.EndOfFile.LowPart;
+
+ // Move to the end of the file if we are appending
+ if (mode[0] == 'a') {
+ FilePosition.CurrentByteOffset.HighPart = 0;
+ FilePosition.CurrentByteOffset.LowPart = f->filesize;
+ status = ZwSetInformationFile( FileHandle,
+ &IoStatusBlock,
+ &FilePosition,
+ sizeof(FILE_POSITION_INFORMATION),
+ FilePositionInformation
+ );
+ if (!NT_SUCCESS (status))
+ goto Error;
+ }
+ return f;
+
+Error:
+ if (f) PM_free(f);
+ if (uniFile) _PM_FreeUnicodeString(uniFile);
+ return NULL;
+}
+
+/****************************************************************************
+REMARKS:
+NT driver implementation of the ANSI C fread function.
+****************************************************************************/
+size_t fread(
+ void *ptr,
+ size_t size,
+ size_t n,
+ FILE *f)
+{
+ NTSTATUS status;
+ IO_STATUS_BLOCK IoStatusBlock;
+ LARGE_INTEGER ByteOffset;
+
+ // Read any extra bytes from the file
+ ByteOffset.HighPart = 0;
+ ByteOffset.LowPart = f->offset;
+ status = ZwReadFile( (HANDLE)f->handle,
+ NULL, //IN HANDLE Event OPTIONAL,
+ NULL, // IN PIO_APC_ROUTINE ApcRoutine OPTIONAL,
+ NULL, // IN PVOID ApcContext OPTIONAL,
+ &IoStatusBlock,
+ ptr, // OUT PVOID Buffer,
+ size * n, //IN ULONG Length,
+ &ByteOffset, //OPTIONAL,
+ NULL //IN PULONG Key OPTIONAL
+ );
+ if (!NT_SUCCESS (status))
+ return 0;
+ f->offset += IoStatusBlock.Information;
+ return IoStatusBlock.Information / size;
+}
+
+/****************************************************************************
+REMARKS:
+NT driver implementation of the ANSI C fwrite function.
+****************************************************************************/
+size_t fwrite(
+ const void *ptr,
+ size_t size,
+ size_t n,
+ FILE *f)
+{
+ NTSTATUS status;
+ IO_STATUS_BLOCK IoStatusBlock;
+ LARGE_INTEGER ByteOffset;
+
+ if (!f->writemode)
+ return 0;
+ ByteOffset.HighPart = 0;
+ ByteOffset.LowPart = f->offset;
+ status = ZwWriteFile( (HANDLE)f->handle,
+ NULL, //IN HANDLE Event OPTIONAL,
+ NULL, // IN PIO_APC_ROUTINE ApcRoutine OPTIONAL,
+ NULL, // IN PVOID ApcContext OPTIONAL,
+ &IoStatusBlock,
+ (void*)ptr, // OUT PVOID Buffer,
+ size * n, //IN ULONG Length,
+ &ByteOffset, //OPTIONAL,
+ NULL //IN PULONG Key OPTIONAL
+ );
+ if (!NT_SUCCESS (status))
+ return 0;
+ f->offset += IoStatusBlock.Information;
+ if (f->offset > f->filesize)
+ f->filesize = f->offset;
+ return IoStatusBlock.Information / size;
+}
+
+/****************************************************************************
+REMARKS:
+NT driver implementation of the ANSI C fflush function.
+****************************************************************************/
+int fflush(
+ FILE *f)
+{
+ // Nothing to do here as we are not doing buffered I/O
+ (void)f;
+ return 0;
+}
+
+/****************************************************************************
+REMARKS:
+NT driver implementation of the ANSI C fseek function.
+****************************************************************************/
+int fseek(
+ FILE *f,
+ long int offset,
+ int whence)
+{
+ NTSTATUS status;
+ FILE_POSITION_INFORMATION FilePosition;
+ IO_STATUS_BLOCK IoStatusBlock;
+
+ if (whence == 0)
+ f->offset = offset;
+ else if (whence == 1)
+ f->offset += offset;
+ else if (whence == 2)
+ f->offset = f->filesize + offset;
+ FilePosition.CurrentByteOffset.HighPart = 0;
+ FilePosition.CurrentByteOffset.LowPart = f->offset;
+ status = ZwSetInformationFile( (HANDLE)f->handle,
+ &IoStatusBlock,
+ &FilePosition,
+ sizeof(FILE_POSITION_INFORMATION),
+ FilePositionInformation
+ );
+ if (!NT_SUCCESS (status))
+ return -1;
+ return 0;
+}
+
+/****************************************************************************
+REMARKS:
+NT driver implementation of the ANSI C ftell function.
+****************************************************************************/
+long ftell(
+ FILE *f)
+{
+ return f->offset;
+}
+
+/****************************************************************************
+REMARKS:
+NT driver implementation of the ANSI C feof function.
+****************************************************************************/
+int feof(
+ FILE *f)
+{
+ return (f->offset == f->filesize);
+}
+
+/****************************************************************************
+REMARKS:
+NT driver implementation of the ANSI C fgets function.
+****************************************************************************/
+char *fgets(
+ char *s,
+ int n,
+ FILE *f)
+{
+ int len;
+ char *cs;
+
+ // Read the entire buffer into memory (our functions are unbuffered!)
+ if ((len = fread(s,1,n,f)) == 0)
+ return NULL;
+
+ // Search for '\n' or end of string
+ if (n > len)
+ n = len;
+ cs = s;
+ while (--n > 0) {
+ if (*cs == '\n')
+ break;
+ cs++;
+ }
+ *cs = '\0';
+ return s;
+}
+
+/****************************************************************************
+REMARKS:
+NT driver implementation of the ANSI C fputs function.
+****************************************************************************/
+int fputs(
+ const char *s,
+ FILE *f)
+{
+ return fwrite(s,1,strlen(s),f);
+}
+
+/****************************************************************************
+REMARKS:
+NT driver implementation of the ANSI C fclose function.
+****************************************************************************/
+int fclose(
+ FILE *f)
+{
+ ZwClose((HANDLE)f->handle);
+ PM_free(f);
+ return 0;
+}
+
diff --git a/board/MAI/bios_emulator/scitech/src/pm/ntdrv/stdlib.c b/board/MAI/bios_emulator/scitech/src/pm/ntdrv/stdlib.c
new file mode 100644
index 00000000000..d7705130b73
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/pm/ntdrv/stdlib.c
@@ -0,0 +1,140 @@
+/****************************************************************************
+*
+* SciTech OS Portability Manager Library
+*
+* ========================================================================
+*
+* The contents of this file are subject to the SciTech MGL Public
+* License Version 1.0 (the "License"); you may not use this file
+* except in compliance with the License. You may obtain a copy of
+* the License at http://www.scitechsoft.com/mgl-license.txt
+*
+* Software distributed under the License is distributed on an
+* "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+* implied. See the License for the specific language governing
+* rights and limitations under the License.
+*
+* The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+*
+* The Initial Developer of the Original Code is SciTech Software, Inc.
+* All Rights Reserved.
+*
+* ========================================================================
+*
+* Language: ANSI C
+* Environment: 32-bit Windows NT driver
+*
+* Description: C library compatible stdlib.h functions for use within a
+* Windows NT driver.
+*
+****************************************************************************/
+
+#include "pmapi.h"
+#include "oshdr.h"
+
+/*------------------------ Main Code Implementation -----------------------*/
+
+/****************************************************************************
+REMARKS:
+PM_malloc override function for Nucleus drivers loaded in NT drivers's.
+****************************************************************************/
+void * malloc(
+ size_t size)
+{
+ return PM_mallocShared(size);
+}
+
+/****************************************************************************
+REMARKS:
+calloc library function for Nucleus drivers loaded in NT drivers's.
+****************************************************************************/
+void * calloc(
+ size_t nelem,
+ size_t size)
+{
+ void *p = PM_mallocShared(nelem * size);
+ if (p)
+ memset(p,0,nelem * size);
+ return p;
+}
+
+/****************************************************************************
+REMARKS:
+PM_realloc override function for Nucleus drivers loaded in VxD's.
+****************************************************************************/
+void * realloc(
+ void *ptr,
+ size_t size)
+{
+ void *p = PM_mallocShared(size);
+ if (p) {
+ memcpy(p,ptr,size);
+ PM_freeShared(ptr);
+ }
+ return p;
+}
+
+/****************************************************************************
+REMARKS:
+PM_free override function for Nucleus drivers loaded in VxD's.
+****************************************************************************/
+void free(
+ void *p)
+{
+ PM_freeShared(p);
+}
+
+/****************************************************************************
+PARAMETERS:
+cstr - C style ANSI string to convert
+
+RETURNS:
+Pointer to the UniCode string structure or NULL on failure to allocate memory
+
+REMARKS:
+Converts a C style string to a UniCode string structure that can be passed
+directly to NT kernel functions.
+****************************************************************************/
+UNICODE_STRING *_PM_CStringToUnicodeString(
+ const char *cstr)
+{
+ int length;
+ ANSI_STRING ansiStr;
+ UNICODE_STRING *uniStr;
+
+ // Allocate memory for the string structure
+ if ((uniStr = ExAllocatePool(NonPagedPool, sizeof(UNICODE_STRING))) == NULL)
+ return NULL;
+
+ // Allocate memory for the wide string itself
+ length = (strlen(cstr) * sizeof(WCHAR)) + sizeof(WCHAR);
+ if ((uniStr->Buffer = ExAllocatePool(NonPagedPool, length)) == NULL) {
+ ExFreePool(uniStr);
+ return NULL;
+ }
+ RtlZeroMemory(uniStr->Buffer, length);
+ uniStr->Length = 0;
+ uniStr->MaximumLength = (USHORT)length;
+
+ // Convert filename string to ansi string and then to UniCode string
+ RtlInitAnsiString(&ansiStr, cstr);
+ RtlAnsiStringToUnicodeString(uniStr, &ansiStr, FALSE);
+ return uniStr;
+}
+
+/****************************************************************************
+PARAMETERS:
+uniStr - UniCode string structure to free
+
+REMARKS:
+Frees a string allocated by the above _PM_CStringToUnicodeString function.
+****************************************************************************/
+void _PM_FreeUnicodeString(
+ UNICODE_STRING *uniStr)
+{
+ if (uniStr) {
+ ExFreePool(uniStr->Buffer);
+ ExFreePool(uniStr);
+ }
+}
+
diff --git a/board/MAI/bios_emulator/scitech/src/pm/ntdrv/vflat.c b/board/MAI/bios_emulator/scitech/src/pm/ntdrv/vflat.c
new file mode 100644
index 00000000000..901ce1cf037
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/pm/ntdrv/vflat.c
@@ -0,0 +1,45 @@
+/****************************************************************************
+*
+* SciTech OS Portability Manager Library
+*
+* ========================================================================
+*
+* The contents of this file are subject to the SciTech MGL Public
+* License Version 1.0 (the "License"); you may not use this file
+* except in compliance with the License. You may obtain a copy of
+* the License at http://www.scitechsoft.com/mgl-license.txt
+*
+* Software distributed under the License is distributed on an
+* "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+* implied. See the License for the specific language governing
+* rights and limitations under the License.
+*
+* The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+*
+* The Initial Developer of the Original Code is SciTech Software, Inc.
+* All Rights Reserved.
+*
+* ========================================================================
+*
+* Language: ANSI C
+* Environment: Any
+*
+* Description: Dummy module; no virtual framebuffer for this OS
+*
+****************************************************************************/
+
+#include "pmapi.h"
+
+ibool PMAPI VF_available(void)
+{
+ return false;
+}
+
+void * PMAPI VF_init(ulong baseAddr,int bankSize,int codeLen,void *bankFunc)
+{
+ return NULL;
+}
+
+void PMAPI VF_exit(void)
+{
+}
diff --git a/board/MAI/bios_emulator/scitech/src/pm/ntdrv/ztimer.c b/board/MAI/bios_emulator/scitech/src/pm/ntdrv/ztimer.c
new file mode 100644
index 00000000000..ef272941073
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/pm/ntdrv/ztimer.c
@@ -0,0 +1,124 @@
+/****************************************************************************
+*
+* Ultra Long Period Timer
+*
+* ========================================================================
+*
+* The contents of this file are subject to the SciTech MGL Public
+* License Version 1.0 (the "License"); you may not use this file
+* except in compliance with the License. You may obtain a copy of
+* the License at http://www.scitechsoft.com/mgl-license.txt
+*
+* Software distributed under the License is distributed on an
+* "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+* implied. See the License for the specific language governing
+* rights and limitations under the License.
+*
+* The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+*
+* The Initial Developer of the Original Code is SciTech Software, Inc.
+* All Rights Reserved.
+*
+* ========================================================================
+*
+* Language: ANSI C
+* Environment: 32-bit Windows VxD
+*
+* Description: OS specific implementation for the Zen Timer functions.
+*
+****************************************************************************/
+
+/*---------------------------- Global variables ---------------------------*/
+
+static CPU_largeInteger countFreq;
+static ulong start,finish;
+
+/*----------------------------- Implementation ----------------------------*/
+
+/****************************************************************************
+REMARKS:
+Initialise the Zen Timer module internals.
+****************************************************************************/
+static void __ZTimerInit(void)
+{
+ KeQueryPerformanceCounter((LARGE_INTEGER*)&countFreq);
+}
+
+/****************************************************************************
+REMARKS:
+Call the assembler Zen Timer functions to do the timing.
+****************************************************************************/
+static void __LZTimerOn(
+ LZTimerObject *tm)
+{
+ LARGE_INTEGER lt = KeQueryPerformanceCounter(NULL);
+ tm->start.low = lt.LowPart;
+ tm->start.high = lt.HighPart;
+}
+
+/****************************************************************************
+REMARKS:
+Call the assembler Zen Timer functions to do the timing.
+****************************************************************************/
+static ulong __LZTimerLap(
+ LZTimerObject *tm)
+{
+ LARGE_INTEGER tmLap = KeQueryPerformanceCounter(NULL);
+ CPU_largeInteger tmCount;
+
+ _CPU_diffTime64(&tm->start,(CPU_largeInteger*)&tmLap,&tmCount);
+ return _CPU_calcMicroSec(&tmCount,countFreq.low);
+}
+
+/****************************************************************************
+REMARKS:
+Call the assembler Zen Timer functions to do the timing.
+****************************************************************************/
+static void __LZTimerOff(
+ LZTimerObject *tm)
+{
+ LARGE_INTEGER lt = KeQueryPerformanceCounter(NULL);
+ tm->end.low = lt.LowPart;
+ tm->end.high = lt.HighPart;
+}
+
+/****************************************************************************
+REMARKS:
+Call the assembler Zen Timer functions to do the timing.
+****************************************************************************/
+static ulong __LZTimerCount(
+ LZTimerObject *tm)
+{
+ CPU_largeInteger tmCount;
+
+ _CPU_diffTime64(&tm->start,&tm->end,&tmCount);
+ return _CPU_calcMicroSec(&tmCount,countFreq.low);
+}
+
+/****************************************************************************
+REMARKS:
+Define the resolution of the long period timer as microseconds per timer tick.
+****************************************************************************/
+#define ULZTIMER_RESOLUTION 1
+
+/****************************************************************************
+REMARKS:
+Read the Long Period timer value from the BIOS timer tick.
+****************************************************************************/
+static ulong __ULZReadTime(void)
+{
+ LARGE_INTEGER count;
+ KeQuerySystemTime(&count);
+ return (ulong)(*((_int64*)&count) / 10);
+}
+
+/****************************************************************************
+REMARKS:
+Compute the elapsed time from the BIOS timer tick. Note that we check to see
+whether a midnight boundary has passed, and if so adjust the finish time to
+account for this. We cannot detect if more that one midnight boundary has
+passed, so if this happens we will be generating erronous results.
+****************************************************************************/
+ulong __ULZElapsedTime(ulong start,ulong finish)
+{ return finish - start; }
+
diff --git a/board/MAI/bios_emulator/scitech/src/pm/os2/_pmos2.asm b/board/MAI/bios_emulator/scitech/src/pm/os2/_pmos2.asm
new file mode 100644
index 00000000000..761f0f42e1e
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/pm/os2/_pmos2.asm
@@ -0,0 +1,180 @@
+;****************************************************************************
+;*
+;* SciTech OS Portability Manager Library
+;*
+;* ========================================================================
+;*
+;* The contents of this file are subject to the SciTech MGL Public
+;* License Version 1.0 (the "License"); you may not use this file
+;* except in compliance with the License. You may obtain a copy of
+;* the License at http://www.scitechsoft.com/mgl-license.txt
+;*
+;* Software distributed under the License is distributed on an
+;* "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+;* implied. See the License for the specific language governing
+;* rights and limitations under the License.
+;*
+;* The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+;*
+;* The Initial Developer of the Original Code is SciTech Software, Inc.
+;* All Rights Reserved.
+;*
+;* ========================================================================
+;*
+;* Language: 80386 Assembler, TASM 4.0 or NASM
+;* Environment: OS/2 32 bit protected mode
+;*
+;* Description: Low level assembly support for the PM library specific
+;* to OS/2
+;*
+;****************************************************************************
+
+ IDEAL
+
+include "scitech.mac" ; Memory model macros
+
+header _pmos2 ; Set up memory model
+
+begdataseg _pmos2
+
+ cglobal _PM_ioentry
+ cglobal _PM_gdt
+_PM_ioentry dd 0 ; Offset to call gate
+_PM_gdt dw 0 ; Selector to call gate
+
+enddataseg _pmos2
+
+begcodeseg _pmos2 ; Start of code segment
+
+;----------------------------------------------------------------------------
+; int PM_setIOPL(int iopl)
+;----------------------------------------------------------------------------
+; Change the IOPL level for the 32-bit task. Returns the previous level
+; so it can be restored for the task correctly.
+;----------------------------------------------------------------------------
+cprocstart PM_setIOPL
+
+ ARG iopl:UINT
+
+ enter_c
+ pushfd ; Save the old EFLAGS for later
+ mov ecx,[iopl] ; ECX := IOPL level
+ xor ebx,ebx ; Change IOPL level function code (0)
+ifdef USE_NASM
+ call far dword [_PM_ioentry]
+else
+ call [FWORD _PM_ioentry]
+endif
+ pop eax
+ and eax,0011000000000000b
+ shr eax,12
+ leave_c
+ ret
+
+cprocend
+
+;----------------------------------------------------------------------------
+; void _PM_setGDTSelLimit(ushort selector, ulong limit);
+;----------------------------------------------------------------------------
+; Change the GDT selector limit to given value. Used to change selector
+; limits to address the entire system address space.
+;----------------------------------------------------------------------------
+cprocstart _PM_setGDTSelLimit
+
+ ARG selector:USHORT, limit:UINT
+
+ enter_c
+ sub esp,20 ; Make room for selector data on stack
+ mov ecx,esp ; ECX := selector data structure
+ mov bx,[selector] ; Fill out the data structure
+ and bx,0FFF8h ; Kick out the LDT/GDT and DPL bits
+ mov [WORD ecx],bx
+ mov ebx,[limit]
+ mov [DWORD ecx+4],ebx
+ mov ebx,5 ; Set GDT selector limit function code
+ifdef USE_NASM
+ call far dword [_PM_ioentry]
+else
+ call [FWORD _PM_ioentry]
+endif
+ add esp,20
+ leave_c
+ ret
+
+cprocend
+
+;----------------------------------------------------------------------------
+; uchar _MTRR_getCx86(uchar reg);
+;----------------------------------------------------------------------------
+; Read a Cyrix CPU indexed register
+;----------------------------------------------------------------------------
+cprocstart _MTRR_getCx86
+
+ ARG reg:UCHAR
+
+ enter_c
+ mov al,[reg]
+ out 22h,al
+ in al,23h
+ leave_c
+ ret
+
+cprocend
+
+;----------------------------------------------------------------------------
+; uchar _MTRR_setCx86(uchar reg,uchar val);
+;----------------------------------------------------------------------------
+; Write a Cyrix CPU indexed register
+;----------------------------------------------------------------------------
+cprocstart _MTRR_setCx86
+
+ ARG reg:UCHAR, val:UCHAR
+
+ enter_c
+ mov al,[reg]
+ out 22h,al
+ mov al,[val]
+ out 23h,al
+ leave_c
+ ret
+
+cprocend
+
+;----------------------------------------------------------------------------
+; ulong _MTRR_disableInt(void);
+;----------------------------------------------------------------------------
+; Return processor interrupt status and disable interrupts.
+;----------------------------------------------------------------------------
+cprocstart _MTRR_disableInt
+
+; Do nothing!
+ ret
+
+cprocend
+
+;----------------------------------------------------------------------------
+; void _MTRR_restoreInt(ulong ps);
+;----------------------------------------------------------------------------
+; Restore processor interrupt status.
+;----------------------------------------------------------------------------
+cprocstart _MTRR_restoreInt
+
+; Do nothing!
+ ret
+
+cprocend
+
+;----------------------------------------------------------------------------
+; void DebugInt(void)
+;----------------------------------------------------------------------------
+cprocstart DebugInt
+
+ int 3
+ ret
+
+cprocend
+
+endcodeseg _pmos2
+
+ END ; End of module
+
diff --git a/board/MAI/bios_emulator/scitech/src/pm/os2/cpuinfo.c b/board/MAI/bios_emulator/scitech/src/pm/os2/cpuinfo.c
new file mode 100644
index 00000000000..7de400d0674
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/pm/os2/cpuinfo.c
@@ -0,0 +1,66 @@
+/****************************************************************************
+*
+* Ultra Long Period Timer
+*
+* ========================================================================
+*
+* The contents of this file are subject to the SciTech MGL Public
+* License Version 1.0 (the "License"); you may not use this file
+* except in compliance with the License. You may obtain a copy of
+* the License at http://www.scitechsoft.com/mgl-license.txt
+*
+* Software distributed under the License is distributed on an
+* "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+* implied. See the License for the specific language governing
+* rights and limitations under the License.
+*
+* The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+*
+* The Initial Developer of the Original Code is SciTech Software, Inc.
+* All Rights Reserved.
+*
+* ========================================================================
+*
+* Language: ANSI C
+* Environment: OS/2
+*
+* Description: OS/2 specific code for the CPU detection module.
+*
+****************************************************************************/
+
+/*----------------------------- Implementation ----------------------------*/
+
+/****************************************************************************
+REMARKS:
+TODO: This should be implemented for OS/2!
+****************************************************************************/
+#define SetMaxThreadPriority() 0
+
+/****************************************************************************
+REMARKS:
+TODO: This should be implemented for OS/2!
+****************************************************************************/
+#define RestoreThreadPriority(i)
+
+/****************************************************************************
+REMARKS:
+Initialise the counter and return the frequency of the counter.
+****************************************************************************/
+static void GetCounterFrequency(
+ CPU_largeInteger *freq)
+{
+ freq->low = 100000;
+ freq->high = 0;
+}
+
+/****************************************************************************
+REMARKS:
+Read the counter and return the counter value.
+****************************************************************************/
+#define GetCounter(t) \
+{ \
+ ULONG count; \
+ DosQuerySysInfo( QSV_MS_COUNT, QSV_MS_COUNT, &count, sizeof(ULONG) ); \
+ (t)->low = count * 100; \
+ (t)->high = 0; \
+}
diff --git a/board/MAI/bios_emulator/scitech/src/pm/os2/event.c b/board/MAI/bios_emulator/scitech/src/pm/os2/event.c
new file mode 100644
index 00000000000..706e84d6f34
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/pm/os2/event.c
@@ -0,0 +1,566 @@
+/****************************************************************************
+*
+* SciTech OS Portability Manager Library
+*
+* ========================================================================
+*
+* The contents of this file are subject to the SciTech MGL Public
+* License Version 1.0 (the "License"); you may not use this file
+* except in compliance with the License. You may obtain a copy of
+* the License at http://www.scitechsoft.com/mgl-license.txt
+*
+* Software distributed under the License is distributed on an
+* "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+* implied. See the License for the specific language governing
+* rights and limitations under the License.
+*
+* The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+*
+* The Initial Developer of the Original Code is SciTech Software, Inc.
+* All Rights Reserved.
+*
+* ========================================================================
+*
+* Language: ANSI C
+* Environment: IBM PC (OS/2)
+*
+* Description: OS/2 implementation for the SciTech cross platform
+* event library.
+*
+****************************************************************************/
+
+/*---------------------------- Global Variables ---------------------------*/
+
+/* Define generous keyboard monitor circular buffer size to minimize
+ * the danger of losing keystrokes
+ */
+#define KEYBUFSIZE (EVENTQSIZE + 10)
+
+static int oldMouseState; /* Old mouse state */
+static ulong oldKeyMessage; /* Old keyboard state */
+static ushort keyUpMsg[256] = {0}; /* Table of key up messages */
+static int rangeX,rangeY; /* Range of mouse coordinates */
+HMOU _EVT_hMouse; /* Handle to the mouse driver */
+HMONITOR _EVT_hKbdMon; /* Handle to the keyboard driver */
+TID kbdMonTID = 0; /* Keyboard monitor thread ID */
+HEV hevStart; /* Start event semaphore handle */
+BOOL bMonRunning; /* Flag set if monitor thread OK */
+HMTX hmtxKeyBuf; /* Mutex protecting key buffer */
+KEYPACKET keyMonPkts[KEYBUFSIZE]; /* Array of monitor key packets */
+int kpHead = 0; /* Key packet buffer head */
+int kpTail = 0; /* Key packet buffer tail */
+
+/*---------------------------- Implementation -----------------------------*/
+
+/* These are not used under OS/2 */
+#define _EVT_disableInt() 1
+#define _EVT_restoreInt(flags)
+
+/****************************************************************************
+PARAMETERS:
+scanCode - Scan code to test
+
+REMARKS:
+This macro determines if a specified key is currently down at the
+time that the call is made.
+****************************************************************************/
+#define _EVT_isKeyDown(scanCode) (keyUpMsg[scanCode] != 0)
+
+/****************************************************************************
+REMARKS:
+This function is used to return the number of ticks since system
+startup in milliseconds. This should be the same value that is placed into
+the time stamp fields of events, and is used to implement auto mouse down
+events.
+****************************************************************************/
+ulong _EVT_getTicks(void)
+{
+ ULONG count;
+ DosQuerySysInfo( QSV_MS_COUNT, QSV_MS_COUNT, &count, sizeof(ULONG) );
+ return count;
+}
+
+/****************************************************************************
+REMARKS:
+Converts a mickey movement value to a pixel adjustment value.
+****************************************************************************/
+static int MickeyToPixel(
+ int mickey)
+{
+ // TODO: We can add some code in here to handle 'acceleration' for
+ // the mouse cursor. For now just use the mickeys.
+ return mickey;
+}
+
+/* Some useful defines any typedefs used in the keyboard handling */
+#define KEY_RELEASE 0x40
+
+/****************************************************************************
+REMARKS:
+Pumps all messages in the message queue from OS/2 into our event queue.
+****************************************************************************/
+static void _EVT_pumpMessages(void)
+{
+ KBDINFO keyInfo; /* Must not cross a 64K boundary */
+ KBDKEYINFO key; /* Must not cross a 64K boundary */
+ MOUQUEINFO mqueue; /* Must not cross a 64K boundary */
+ MOUEVENTINFO mouse; /* Must not cross a 64K boundary */
+ ushort mWait; /* Must not cross a 64K boundary */
+ KEYPACKET kp; /* Must not cross a 64K boundary */
+ event_t evt;
+ int scan;
+ ibool noInput = TRUE; /* Flag to determine if any input was available */
+
+ /* First of all, check if we should do any session switch work */
+ __PM_checkConsoleSwitch();
+
+ /* Pump all keyboard messages from our circular buffer */
+ for (;;) {
+ /* Check that the monitor thread is still running */
+ if (!bMonRunning)
+ PM_fatalError("Keyboard monitor thread died!");
+
+ /* Protect keypacket buffer with mutex */
+ DosRequestMutexSem(hmtxKeyBuf, SEM_INDEFINITE_WAIT);
+ if (kpHead == kpTail) {
+ DosReleaseMutexSem(hmtxKeyBuf);
+ break;
+ }
+
+ noInput = FALSE;
+
+ /* Read packet from circular buffer and remove it */
+ memcpy(&kp, &keyMonPkts[kpTail], sizeof(KEYPACKET));
+ if (++kpTail == KEYBUFSIZE)
+ kpTail = 0;
+ DosReleaseMutexSem(hmtxKeyBuf);
+
+ /* Compensate for the 0xE0 character */
+ if (kp.XlatedScan && kp.XlatedChar == 0xE0)
+ kp.XlatedChar = 0;
+
+ /* Determine type of keyboard event */
+ memset(&evt,0,sizeof(evt));
+ if (kp.KbdDDFlagWord & KEY_RELEASE)
+ evt.what = EVT_KEYUP;
+ else
+ evt.what = EVT_KEYDOWN;
+
+ /* Convert keyboard codes */
+ scan = kp.MonFlagWord >> 8;
+ if (evt.what == EVT_KEYUP) {
+ /* Get message for keyup code from table of cached down values */
+ evt.message = keyUpMsg[scan];
+ keyUpMsg[scan] = 0;
+ oldKeyMessage = -1;
+ }
+ else {
+ evt.message = ((ulong)scan << 8) | kp.XlatedChar;
+ if (evt.message == keyUpMsg[scan]) {
+ evt.what = EVT_KEYREPEAT;
+ evt.message |= 0x10000;
+ }
+ oldKeyMessage = evt.message & 0x0FFFF;
+ keyUpMsg[scan] = (ushort)evt.message;
+ }
+
+ /* Convert shift state modifiers */
+ if (kp.u.ShiftState & 0x0001)
+ evt.modifiers |= EVT_RIGHTSHIFT;
+ if (kp.u.ShiftState & 0x0002)
+ evt.modifiers |= EVT_LEFTSHIFT;
+ if (kp.u.ShiftState & 0x0100)
+ evt.modifiers |= EVT_LEFTCTRL;
+ if (kp.u.ShiftState & 0x0200)
+ evt.modifiers |= EVT_LEFTALT;
+ if (kp.u.ShiftState & 0x0400)
+ evt.modifiers |= EVT_RIGHTCTRL;
+ if (kp.u.ShiftState & 0x0800)
+ evt.modifiers |= EVT_RIGHTALT;
+ EVT.oldMove = -1;
+
+ /* Add time stamp and add the event to the queue */
+ evt.when = key.time;
+ if (EVT.count < EVENTQSIZE)
+ addEvent(&evt);
+ }
+
+ /* Don't just flush because that terminally confuses the monitor */
+ do {
+ KbdCharIn(&key, IO_NOWAIT, 0);
+ } while (key.fbStatus & KBDTRF_FINAL_CHAR_IN);
+
+ /* Pump all mouse messages */
+ KbdGetStatus(&keyInfo,0);
+ /* Check return code - mouse may not be operational!! */
+ if (MouGetNumQueEl(&mqueue,_EVT_hMouse) == NO_ERROR) {
+ while (mqueue.cEvents) {
+ while (mqueue.cEvents--) {
+ memset(&evt,0,sizeof(evt));
+ mWait = MOU_NOWAIT;
+ MouReadEventQue(&mouse,&mWait,_EVT_hMouse);
+
+ /* Update the mouse position. We get the mouse coordinates
+ * in mickeys so we have to translate these into pixels and
+ * move our mouse position. If we don't do this, OS/2 gives
+ * us the coordinates in character positions since it still
+ * thinks we are in text mode!
+ */
+ EVT.mx += MickeyToPixel(mouse.col);
+ EVT.my += MickeyToPixel(mouse.row);
+ if (EVT.mx < 0) EVT.mx = 0;
+ if (EVT.my < 0) EVT.my = 0;
+ if (EVT.mx > rangeX) EVT.mx = rangeX;
+ if (EVT.my > rangeY) EVT.my = rangeY;
+ evt.where_x = EVT.mx;
+ evt.where_y = EVT.my;
+ evt.relative_x = mouse.col;
+ evt.relative_y = mouse.row;
+ evt.when = key.time;
+ if (mouse.fs & (MOUSE_BN1_DOWN | MOUSE_MOTION_WITH_BN1_DOWN))
+ evt.modifiers |= EVT_LEFTBUT;
+ if (mouse.fs & (MOUSE_BN2_DOWN | MOUSE_MOTION_WITH_BN2_DOWN))
+ evt.modifiers |= EVT_RIGHTBUT;
+ if (mouse.fs & (MOUSE_BN3_DOWN | MOUSE_MOTION_WITH_BN3_DOWN))
+ evt.modifiers |= EVT_MIDDLEBUT;
+ if (keyInfo.fsState & 0x0001)
+ evt.modifiers |= EVT_RIGHTSHIFT;
+ if (keyInfo.fsState & 0x0002)
+ evt.modifiers |= EVT_LEFTSHIFT;
+ if (keyInfo.fsState & 0x0100)
+ evt.modifiers |= EVT_LEFTCTRL;
+ if (keyInfo.fsState & 0x0200)
+ evt.modifiers |= EVT_LEFTALT;
+ if (keyInfo.fsState & 0x0400)
+ evt.modifiers |= EVT_RIGHTCTRL;
+ if (keyInfo.fsState & 0x0800)
+ evt.modifiers |= EVT_RIGHTALT;
+
+ /* Check for left mouse click events */
+ /* 0x06 == (MOUSE_BN1_DOWN | MOUSE_MOTION_WITH_BN1_DOWN) */
+ if (((mouse.fs & 0x0006) && !(oldMouseState & 0x0006))
+ || (!(mouse.fs & 0x0006) && (oldMouseState & 0x0006))) {
+ if (mouse.fs & 0x0006)
+ evt.what = EVT_MOUSEDOWN;
+ else
+ evt.what = EVT_MOUSEUP;
+ evt.message = EVT_LEFTBMASK;
+ EVT.oldMove = -1;
+ if (EVT.count < EVENTQSIZE)
+ addEvent(&evt);
+ }
+
+ /* Check for right mouse click events */
+ /* 0x0018 == (MOUSE_BN2_DOWN | MOUSE_MOTION_WITH_BN2_DOWN) */
+ if (((mouse.fs & 0x0018) && !(oldMouseState & 0x0018))
+ || (!(mouse.fs & 0x0018) && (oldMouseState & 0x0018))) {
+ if (mouse.fs & 0x0018)
+ evt.what = EVT_MOUSEDOWN;
+ else
+ evt.what = EVT_MOUSEUP;
+ evt.message = EVT_RIGHTBMASK;
+ EVT.oldMove = -1;
+ if (EVT.count < EVENTQSIZE)
+ addEvent(&evt);
+ }
+
+ /* Check for middle mouse click events */
+ /* 0x0060 == (MOUSE_BN3_DOWN | MOUSE_MOTION_WITH_BN3_DOWN) */
+ if (((mouse.fs & 0x0060) && !(oldMouseState & 0x0060))
+ || (!(mouse.fs & 0x0060) && (oldMouseState & 0x0060))) {
+ if (mouse.fs & 0x0060)
+ evt.what = EVT_MOUSEDOWN;
+ else
+ evt.what = EVT_MOUSEUP;
+ evt.message = EVT_MIDDLEBMASK;
+ EVT.oldMove = -1;
+ if (EVT.count < EVENTQSIZE)
+ addEvent(&evt);
+ }
+
+ /* Check for mouse movement event */
+ if (mouse.fs & 0x002B) {
+ evt.what = EVT_MOUSEMOVE;
+ if (EVT.oldMove != -1) {
+ EVT.evtq[EVT.oldMove].where_x = evt.where_x;/* Modify existing one */
+ EVT.evtq[EVT.oldMove].where_y = evt.where_y;
+ }
+ else {
+ EVT.oldMove = EVT.freeHead; /* Save id of this move event */
+ if (EVT.count < EVENTQSIZE)
+ addEvent(&evt);
+ }
+ }
+
+ /* Save current mouse state */
+ oldMouseState = mouse.fs;
+ }
+ MouGetNumQueEl(&mqueue,_EVT_hMouse);
+ }
+ noInput = FALSE;
+ }
+
+ /* If there was no input available, give up the current timeslice
+ * Note: DosSleep(0) will effectively do nothing if no other thread is ready. Hence
+ * DosSleep(0) will still use 100% CPU _but_ should not interfere with other programs.
+ */
+ if (noInput)
+ DosSleep(0);
+}
+
+/****************************************************************************
+REMARKS:
+This macro/function is used to converts the scan codes reported by the
+keyboard to our event libraries normalised format. We only have one scan
+code for the 'A' key, and use shift modifiers to determine if it is a
+Ctrl-F1, Alt-F1 etc. The raw scan codes from the keyboard work this way,
+but the OS gives us 'cooked' scan codes, we have to translate them back
+to the raw format.
+****************************************************************************/
+#define _EVT_maskKeyCode(evt)
+
+/****************************************************************************
+REMARKS:
+Keyboard monitor thread. Needed to catch both keyup and keydown events.
+****************************************************************************/
+static void _kbdMonThread(
+ void *params)
+{
+ APIRET rc;
+ KEYPACKET kp;
+ USHORT count = sizeof(KEYPACKET);
+ MONBUF monInbuf;
+ MONBUF monOutbuf;
+ int kpNew;
+
+ /* Raise thread priority for higher responsiveness */
+ DosSetPriority(PRTYS_THREAD, PRTYC_TIMECRITICAL, 0, 0);
+ monInbuf.cb = sizeof(monInbuf) - sizeof(monInbuf.cb);
+ monOutbuf.cb = sizeof(monOutbuf) - sizeof(monOutbuf.cb);
+ bMonRunning = FALSE;
+
+ /* Register the buffers to be used for monitoring for current session */
+ if (DosMonReg(_EVT_hKbdMon, &monInbuf, (ULONG*)&monOutbuf,MONITOR_END, -1)) {
+ DosPostEventSem(hevStart); /* unblock the main thread */
+ return;
+ }
+
+ /* Unblock the main thread and tell it we're OK*/
+ bMonRunning = TRUE;
+ DosPostEventSem(hevStart);
+ while (bMonRunning) { /* Start an endless loop */
+ /* Read data from keyboard driver */
+ rc = DosMonRead((PBYTE)&monInbuf, IO_WAIT, (PBYTE)&kp, (PUSHORT)&count);
+ if (rc) {
+#ifdef CHECKED
+ if (bMonRunning)
+ printf("Error in DosMonRead, rc = %ld\n", rc);
+#endif
+ bMonRunning = FALSE;
+ return;
+ }
+
+ /* Pass FLUSH packets immediately */
+ if (kp.MonFlagWord & 4) {
+#ifdef CHECKED
+ printf("Flush packet!\n");
+#endif
+ DosMonWrite((PBYTE)&monOutbuf, (PBYTE)&kp, count);
+ continue;
+ }
+
+ //TODO: to be removed
+ /* Skip extended scancodes & some others */
+ if (((kp.MonFlagWord >> 8) == 0xE0) || ((kp.KbdDDFlagWord & 0x0F) == 0x0F)) {
+ DosMonWrite((PBYTE)&monOutbuf, (PBYTE)&kp, count);
+ continue;
+ }
+
+// printf("RawScan = %X, XlatedScan = %X, fbStatus = %X, KbdDDFlags = %X\n",
+// kp.MonFlagWord >> 8, kp.XlatedScan, kp.u.ShiftState, kp.KbdDDFlagWord);
+
+ /* Protect access to buffer with mutex semaphore */
+ rc = DosRequestMutexSem(hmtxKeyBuf, 1000);
+ if (rc) {
+#ifdef CHECKED
+ printf("Can't get access to mutex, rc = %ld\n", rc);
+#endif
+ bMonRunning = FALSE;
+ return;
+ }
+
+ /* Store packet in circular buffer, drop it if it's full */
+ kpNew = kpHead + 1;
+ if (kpNew == KEYBUFSIZE)
+ kpNew = 0;
+ if (kpNew != kpTail) {
+ memcpy(&keyMonPkts[kpHead], &kp, sizeof(KEYPACKET));
+ // TODO: fix this!
+ /* Convert break to make code */
+ keyMonPkts[kpHead].MonFlagWord &= 0x7FFF;
+ kpHead = kpNew;
+ }
+ DosReleaseMutexSem(hmtxKeyBuf);
+
+ /* Finally write the packet */
+ rc = DosMonWrite((PBYTE)&monOutbuf, (PBYTE)&kp, count);
+ if (rc) {
+#ifdef CHECKED
+ if (bMonRunning)
+ printf("Error in DosMonWrite, rc = %ld\n", rc);
+#endif
+ bMonRunning = FALSE;
+ return;
+ }
+ }
+ (void)params;
+}
+
+/****************************************************************************
+REMARKS:
+Safely abort the event module upon catching a fatal error.
+****************************************************************************/
+void _EVT_abort(
+ int signal)
+{
+ EVT_exit();
+ PM_fatalError("Unhandled exception!");
+}
+
+/****************************************************************************
+PARAMETERS:
+mouseMove - Callback function to call wheneve the mouse needs to be moved
+
+REMARKS:
+Initiliase the event handling module. Here we install our mouse handling ISR
+to be called whenever any button's are pressed or released. We also build
+the free list of events in the event queue.
+
+We use handler number 2 of the mouse libraries interrupt handlers for our
+event handling routines.
+****************************************************************************/
+void EVTAPI EVT_init(
+ _EVT_mouseMoveHandler mouseMove)
+{
+ ushort stat;
+
+ /* Initialise the event queue */
+ PM_init();
+ EVT.mouseMove = mouseMove;
+ initEventQueue();
+ oldMouseState = 0;
+ oldKeyMessage = 0;
+ memset(keyUpMsg,0,sizeof(keyUpMsg));
+
+ /* Open the mouse driver, and set it up to report events in mickeys */
+ MouOpen(NULL,&_EVT_hMouse);
+ stat = 0x7F;
+ MouSetEventMask(&stat,_EVT_hMouse);
+ stat = (MOU_NODRAW | MOU_MICKEYS) << 8;
+ MouSetDevStatus(&stat,_EVT_hMouse);
+
+ /* Open the keyboard monitor */
+ if (DosMonOpen((PSZ)"KBD$", &_EVT_hKbdMon))
+ PM_fatalError("Unable to open keyboard monitor!");
+
+ /* Create event semaphore, the monitor will post it when it's initalized */
+ if (DosCreateEventSem(NULL, &hevStart, 0, FALSE))
+ PM_fatalError("Unable to create event semaphore!");
+
+ /* Create mutex semaphore protecting the keypacket buffer */
+ if (DosCreateMutexSem(NULL, &hmtxKeyBuf, 0, FALSE))
+ PM_fatalError("Unable to create mutex semaphore!");
+
+ /* Start keyboard monitor thread, use 32K stack */
+ kbdMonTID = _beginthread(_kbdMonThread, NULL, 0x8000, NULL);
+
+ /* Now block until the monitor thread is up and running */
+ /* Give the thread one second */
+ DosWaitEventSem(hevStart, 1000);
+ if (!bMonRunning) { /* Check the thread is OK */
+ DosMonClose(_EVT_hKbdMon);
+ PM_fatalError("Keyboard monitor thread didn't initialize!");
+ }
+
+ /* Catch program termination signals so we can clean up properly */
+ signal(SIGABRT, _EVT_abort);
+ signal(SIGFPE, _EVT_abort);
+ signal(SIGINT, _EVT_abort);
+}
+
+/****************************************************************************
+REMARKS
+Changes the range of coordinates returned by the mouse functions to the
+specified range of values. This is used when changing between graphics
+modes set the range of mouse coordinates for the new display mode.
+****************************************************************************/
+void EVTAPI EVT_setMouseRange(
+ int xRes,
+ int yRes)
+{
+ rangeX = xRes;
+ rangeY = yRes;
+}
+
+/****************************************************************************
+REMARKS
+Modifes the mouse coordinates as necessary if scaling to OS coordinates,
+and sets the OS mouse cursor position.
+****************************************************************************/
+#define _EVT_setMousePos(x,y)
+
+/****************************************************************************
+REMARKS:
+Initiailises the internal event handling modules. The EVT_suspend function
+can be called to suspend event handling (such as when shelling out to DOS),
+and this function can be used to resume it again later.
+****************************************************************************/
+void EVT_resume(void)
+{
+ // Do nothing for OS/2
+}
+
+/****************************************************************************
+REMARKS
+Suspends all of our event handling operations. This is also used to
+de-install the event handling code.
+****************************************************************************/
+void EVT_suspend(void)
+{
+ // Do nothing for OS/2
+}
+
+/****************************************************************************
+REMARKS
+Exits the event module for program terminatation.
+****************************************************************************/
+void EVT_exit(void)
+{
+ APIRET rc;
+
+ /* Restore signal handlers */
+ signal(SIGABRT, SIG_DFL);
+ signal(SIGFPE, SIG_DFL);
+ signal(SIGINT, SIG_DFL);
+
+ /* Close the mouse driver */
+ MouClose(_EVT_hMouse);
+
+ /* Stop the keyboard monitor thread and close the monitor */
+ bMonRunning = FALSE;
+ rc = DosKillThread(kbdMonTID);
+#ifdef CHECKED
+ if (rc)
+ printf("DosKillThread failed, rc = %ld\n", rc);
+#endif
+ rc = DosMonClose(_EVT_hKbdMon);
+#ifdef CHECKED
+ if (rc) {
+ printf("DosMonClose failed, rc = %ld\n", rc);
+ }
+#endif
+ DosCloseEventSem(hevStart);
+ DosCloseMutexSem(hmtxKeyBuf);
+ KbdFlushBuffer(0);
+}
+
diff --git a/board/MAI/bios_emulator/scitech/src/pm/os2/mon.h b/board/MAI/bios_emulator/scitech/src/pm/os2/mon.h
new file mode 100644
index 00000000000..52f12f0d2dc
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/pm/os2/mon.h
@@ -0,0 +1,165 @@
+/****************************************************************************
+*
+* SciTech OS Portability Manager Library
+*
+* ========================================================================
+*
+* The contents of this file are subject to the SciTech MGL Public
+* License Version 1.0 (the "License"); you may not use this file
+* except in compliance with the License. You may obtain a copy of
+* the License at http://www.scitechsoft.com/mgl-license.txt
+*
+* Software distributed under the License is distributed on an
+* "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+* implied. See the License for the specific language governing
+* rights and limitations under the License.
+*
+* The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+*
+* The Initial Developer of the Original Code is SciTech Software, Inc.
+* All Rights Reserved.
+*
+* ========================================================================
+*
+* Language: ANSI C
+* Environment: 32-bit OS/2
+*
+* Description: Include file to include all OS/2 keyboard monitor stuff.
+*
+****************************************************************************/
+
+/* Monitors stuff */
+
+#define MONITOR_DEFAULT 0x0000
+#define MONITOR_BEGIN 1
+#define MONITOR_END 2
+
+typedef SHANDLE HMONITOR;
+typedef HMONITOR *PHMONITOR;
+
+typedef struct _KEYPACKET {
+ USHORT MonFlagWord;
+ UCHAR XlatedChar;
+ UCHAR XlatedScan;
+ UCHAR DBCSStatus;
+ UCHAR DBCSShift;
+
+ union
+ {
+ USHORT ShiftState;
+ USHORT LayerIndex;
+ } u;
+
+ ULONG Milliseconds;
+ USHORT KbdDDFlagWord;
+} KEYPACKET;
+
+typedef struct _MLNPACKET {
+ USHORT MonFlagWord;
+ USHORT IOCTL;
+ USHORT CPId;
+ USHORT CPIndex;
+ ULONG Reserved;
+ USHORT KbdDDFlagWord;
+} MLNPACKET;
+
+// DBCSStatus
+
+#define SF_SHIFTS 1 // If set to 1, shift status returned without a character
+#define SF_NOTCHAR 2 // 0 - Scan code is a character
+ // 1 - Scan code is not a character;
+ // instead it is an extended key code from the keyboard.
+#define SF_IMMEDIATE 32 // If set to 1, immediate conversion requested
+#define SF_TYPEMASK 192 // Has the following values:
+ // 00 - Undefined
+ // 01 - Final character; interim character flag is turned off
+ // 10 - Interim character
+ // 11 - Final character; interim character flag is turned on.
+// MonFlagWord
+
+#define MF_OPEN 1 // open
+#define MF_CLOSE 2 // close
+#define MF_FLUSH 4 // is flush packet
+
+// KbdDDFlagWord
+
+#define KF_NOTSQPACKET 1024 // Don't put this packet in SQ buffer
+#define KF_ACCENTEDKEY 512 // Key was translated using previous accent.
+#define KF_MULTIMAKE 256 // Key was repeated make of a toggle key.
+#define KF_SECONDARYKEY 128 // Previous scan code was the E0 prefix code.
+#define KF_KEYBREAK 64 // This is the break of the key.
+#define KF_KEYTYPEMASK 63 // Isolates the Key Type field of DDFlags.
+#define KF_UNDEFKEY 63 // Key packet is undefined
+#define KF_SYSREQKEY 23 // This key packet is the SysReq key (4990)
+#define KF_PRINTFLUSHKEY 22 // This packet is Ct-Alt-PrtScr
+#define KF_PSPRINTECHOKEY 21 // This packet is Ctl-P
+#define KF_PRINTECHOKEY 20 // This packet is Ctl-PrtScr
+#define KF_PRTSCRKEY 19 // This packet is PrtScr
+#define KF_PSBREAKKEY 18 // This packet is Ctl-C
+#define KF_BREAKKEY 17 // This packet is Ctl-Break
+#define KF_ACCENTKEY 16 // This packet is an accent key
+#define KF_XRORPNOT 13 // This packet is a Read or Peek Notification Pct.
+#define KF_MLNOTIFICATION 14 // packet is a Multi-Layer NLS packet
+#define KF_HOTKEYPACKET 12 // This packet is the hot key.
+#define KF_BADKEYCOMBO 11 // Accent/char combo undefined, beep only.
+#define KF_WAKEUPKEY 10 // This packet is one following PAUSEKEY
+#define KF_PSPAUSEKEY 9 // This packet is Ctl-S
+#define KF_PAUSEKEY 8 // This packet is Ctl-Numlock or PAUSE
+#define KF_SHIFTMASK 7 // Key is a shift Key
+#define KF_DUMPKEY 6 // This packet is Ctl-Numlock-NumLock
+#define KF_REBOOTKEY 5 // This packet is Ctl-Alt-Del
+#define KF_RESENDCODE 4 // This packet is resend code from controller
+#define KF_OVERRUNCODE 3 // This packet is overrun code from controller
+#define KF_SECPREFIXCODE 2 // This packet is E0/E1 scan code
+#define KF_ACKCODE 1 // This packet is ack code from keyboard
+
+
+typedef struct _MONBUF {
+ USHORT cb;
+ KEYPACKET Buffer;
+ BYTE Reserved[20];
+} MONBUF;
+
+#define RS_SYSREG 32768 // Bit 15 SysReq key down
+#define RS_CAPSLOCK 16384 // Bit 14 Caps Lock key down
+#define RS_NUMLOCK 8192 // Bit 13 NumLock key down
+#define RS_SCROLLLOCK 4096 // Bit 12 Scroll Lock key down
+#define RS_RALT 2048 // Bit 11 Right Alt key down
+#define RS_RCONTROL 1024 // Bit 10 Right Ctrl key down
+#define RS_LALT 512 // Bit 9 Left Alt key down
+#define RS_LCONTROL 256 // Bit 8 Left Ctrl key down
+#define RS_INSERT 128 // Bit 7 Insert on
+#define RS_CAPS 64 // Bit 6 Caps Lock on
+#define RS_NUM 32 // Bit 5 NumLock on
+#define RS_SCROLL 16 // Bit 4 Scroll Lock on
+#define RS_ALT 8 // Bit 3 Either Alt key down
+#define RS_CONTROL 4 // Bit 2 Either Ctrl key down
+#define RS_LSHIFT 2 // Bit 1 Left Shift key down
+#define RS_RSHIFT 1 // Bit 0 Right Shift key down
+
+
+#define CS_RCONTROL 91 // Right Control
+#define CS_LSHIFT 42 // Left Shift
+#define CS_RSHIFT 54 // Right Shift
+#define CS_LALT 56 // Left Alt
+#define CS_RALT 94 // Right Alt
+
+
+/* DosMon* prototypes */
+#ifdef __EMX__
+ #define APIRET16 USHORT
+ #define APIENTRY16
+#else
+ #define DosMonOpen DOS16MONOPEN
+ #define DosMonClose DOS16MONCLOSE
+ #define DosMonReg DOS16MONREG
+ #define DosMonRead DOS16MONREAD
+ #define DosMonWrite DOS16MONWRITE
+ #define DosGetInfoSeg DOS16GETINFOSEG
+#endif
+
+APIRET16 APIENTRY16 DosMonOpen (PSZ pszDevName, PHMONITOR phmon);
+APIRET16 APIENTRY16 DosMonClose (HMONITOR hmon);
+APIRET16 APIENTRY16 DosMonReg (HMONITOR hmon, MONBUF *pbInBuf, /*MONBUF*/ULONG *pbOutBuf, USHORT fPosition, USHORT usIndex);
+APIRET16 APIENTRY16 DosMonRead (PBYTE pbInBuf, USHORT fWait, PBYTE pbDataBuf, PUSHORT pcbData);
+APIRET16 APIENTRY16 DosMonWrite (PBYTE pbOutBuf, PBYTE pbDataBuf, USHORT cbData);
diff --git a/board/MAI/bios_emulator/scitech/src/pm/os2/oshdr.h b/board/MAI/bios_emulator/scitech/src/pm/os2/oshdr.h
new file mode 100644
index 00000000000..ae1f97a06c0
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/pm/os2/oshdr.h
@@ -0,0 +1,42 @@
+/****************************************************************************
+*
+* SciTech OS Portability Manager Library
+*
+* ========================================================================
+*
+* The contents of this file are subject to the SciTech MGL Public
+* License Version 1.0 (the "License"); you may not use this file
+* except in compliance with the License. You may obtain a copy of
+* the License at http://www.scitechsoft.com/mgl-license.txt
+*
+* Software distributed under the License is distributed on an
+* "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+* implied. See the License for the specific language governing
+* rights and limitations under the License.
+*
+* The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+*
+* The Initial Developer of the Original Code is SciTech Software, Inc.
+* All Rights Reserved.
+*
+* ========================================================================
+*
+* Language: ANSI C
+* Environment: 32-bit OS/2
+*
+* Description: Include file to include all OS specific header files.
+*
+****************************************************************************/
+
+#define INCL_DOSPROFILE
+#define INCL_DOSERRORS
+#define INCL_DOS
+#define INCL_SUB
+#define INCL_VIO
+#define INCL_KBD
+#include <os2.h>
+#include <process.h>
+#include "os2/mon.h"
+
+void __PM_checkConsoleSwitch(void);
+
diff --git a/board/MAI/bios_emulator/scitech/src/pm/os2/pm.c b/board/MAI/bios_emulator/scitech/src/pm/os2/pm.c
new file mode 100644
index 00000000000..50251028062
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/pm/os2/pm.c
@@ -0,0 +1,2008 @@
+/****************************************************************************
+*
+* SciTech OS Portability Manager Library
+*
+* ========================================================================
+*
+* The contents of this file are subject to the SciTech MGL Public
+* License Version 1.0 (the "License"); you may not use this file
+* except in compliance with the License. You may obtain a copy of
+* the License at http://www.scitechsoft.com/mgl-license.txt
+*
+* Software distributed under the License is distributed on an
+* "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+* implied. See the License for the specific language governing
+* rights and limitations under the License.
+*
+* The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+*
+* The Initial Developer of the Original Code is SciTech Software, Inc.
+* All Rights Reserved.
+*
+* ========================================================================
+*
+* Language: ANSI C
+* Environment: 32-bit OS/2
+*
+* Description: Implementation for the OS Portability Manager Library, which
+* contains functions to implement OS specific services in a
+* generic, cross platform API. Porting the OS Portability
+* Manager library is the first step to porting any SciTech
+* products to a new platform.
+*
+****************************************************************************/
+
+#include "pmapi.h"
+#include "drvlib/os/os.h"
+#include "pm_help.h"
+#include "mtrr.h"
+#include <stdio.h>
+#include <stdlib.h>
+#include <string.h>
+#include <process.h>
+#ifndef __EMX__
+#include <direct.h>
+#endif
+#define INCL_DOSERRORS
+#define INCL_DOS
+#define INCL_SUB
+#define INCL_VIO
+#define INCL_KBD
+#include <os2.h>
+
+/* Semaphore for communication with our background daemon */
+#define SHAREDSEM ((PSZ)"\\SEM32\\SDD\\DAEMON")
+#define DAEMON_NAME "SDDDAEMN.EXE"
+
+/*--------------------------- Global variables ----------------------------*/
+
+/* Public structures used to communicate with VIDEOPMI for implementing
+ * the ability to call the real mode BIOS functions.
+ */
+
+typedef struct _VIDEOMODEINFO {
+ ULONG miModeId;
+ USHORT usType;
+ USHORT usInt10ModeSet;
+ USHORT usXResolution;
+ USHORT usYResolution;
+ ULONG ulBufferAddress;
+ ULONG ulApertureSize;
+ BYTE bBitsPerPixel;
+ BYTE bBitPlanes;
+ BYTE bXCharSize;
+ BYTE bYCharSize;
+ USHORT usBytesPerScanLine;
+ USHORT usTextRows;
+ ULONG ulPageLength;
+ ULONG ulSaveSize;
+ BYTE bVrtRefresh;
+ BYTE bHrtRefresh;
+ BYTE bVrtPolPos;
+ BYTE bHrtPolPos;
+ CHAR bRedMaskSize;
+ CHAR bRedFieldPosition;
+ CHAR bGreenMaskSize;
+ CHAR bGreenFieldPosition;
+ CHAR bBlueMaskSize;
+ CHAR bBlueFieldPosition;
+ CHAR bRsvdMaskSize;
+ CHAR bRsvdFieldPosition;
+ ULONG ulColors;
+ ULONG ulReserved[3];
+ } VIDEOMODEINFO, FAR *PVIDEOMODEINFO;
+
+typedef struct _ADAPTERINFO {
+ ULONG ulAdapterID;
+ CHAR szOEMString[128];
+ CHAR szDACString[128];
+ CHAR szRevision[128];
+ ULONG ulTotalMemory;
+ ULONG ulMMIOBaseAddress;
+ ULONG ulPIOBaseAddress;
+ BYTE bBusType;
+ BYTE bEndian;
+ USHORT usDeviceBusID;
+ USHORT usVendorBusID;
+ USHORT SlotID;
+ } ADAPTERINFO, FAR *PADAPTERINFO;
+
+typedef struct _VIDEO_ADAPTER {
+ void *hvideo;
+ ADAPTERINFO Adapter;
+ VIDEOMODEINFO ModeInfo;
+ } VIDEO_ADAPTER, FAR *PVIDEO_ADAPTER;
+
+/* PMIREQUEST_SOFTWAREINT structures from OS/2 DDK */
+
+typedef struct {
+ ULONG ulFlags; // VDM initialization type
+#define VDM_POSTLOAD 0x1 // adapter just loaded, used internally for initialization
+#define VDM_INITIALIZE 0x2 // force initialization of a permanently open VDM, even if previously initialized
+#define VDM_TERMINATE_POSTINITIALIZE 0x6 //start VDM with initialization, but close it afterwards (includes VDM_INITIALIZE)
+#define VDM_QUERY_CAPABILITY 0x10 // query the current int 10 capability
+#define VDM_FULL_VDM_CREATED 0x20 // a full VDM is created
+#define VDM_MINI_VDM_CREATED 0x40 // a mini VDM is created
+#define VDM_MINI_VDM_SUPPORTED 0x80 // mini VDM support is available
+ PCHAR szName; // VDM initialization program
+ PCHAR szArgs; // VDM initialization arguments
+ }INITVDM;
+
+typedef struct {
+ BYTE bBufferType;
+#define BUFFER_NONE 0
+#define INPUT_BUFFER 1
+#define OUTPUT_BUFFER 2
+ BYTE bReserved;
+ BYTE bSelCRF;
+ BYTE bOffCRF;
+ PVOID pAddress;
+ ULONG ulSize;
+ } BUFFER, *PBUFFER;
+
+typedef struct vcrf_s {
+ ULONG reg_eax;
+ ULONG reg_ebx;
+ ULONG reg_ecx;
+ ULONG reg_edx;
+ ULONG reg_ebp;
+ ULONG reg_esi;
+ ULONG reg_edi;
+ ULONG reg_ds;
+ ULONG reg_es;
+ ULONG reg_fs;
+ ULONG reg_gs;
+ ULONG reg_cs;
+ ULONG reg_eip;
+ ULONG reg_eflag;
+ ULONG reg_ss;
+ ULONG reg_esp;
+ } VCRF;
+
+typedef struct {
+ ULONG ulBIOSIntNo;
+ VCRF aCRF;
+ BUFFER pB[2];
+ } INTCRF;
+
+#define PMIREQUEST_LOADPMIFILE 21
+#define PMIREQUEST_IDENTIFYADAPTER 22
+#define PMIREQUEST_SOFTWAREINT 23
+
+#ifdef PTR_DECL_IN_FRONT
+#define EXPENTRYP * EXPENTRY
+#else
+#define EXPENTRYP EXPENTRY *
+#endif
+
+/* Entry point to VIDEOPMI32Request. This may be overridden by external
+ * code that has already loaded VIDEOPMI to avoid loading it twice.
+ */
+
+APIRET (EXPENTRYP PM_VIDEOPMI32Request)(PVIDEO_ADAPTER, ULONG, PVOID, PVOID) = NULL;
+static ibool haveInt10 = -1; /* True if we have Int 10 support */
+static ibool useVPMI = true; /* False if VIDEOPMI unavailable */
+static VIDEO_ADAPTER Adapter; /* Video adapter for VIDEOPMI */
+static uchar RMBuf[1024]; /* Fake real mode transfer buffer */
+static uint VESABuf_len = 1024;/* Length of the VESABuf buffer */
+static void *VESABuf_ptr = NULL;/* Near pointer to VESABuf */
+static uint VESABuf_rseg; /* Real mode segment of VESABuf */
+static uint VESABuf_roff; /* Real mode offset of VESABuf */
+static uchar * lowMem = NULL;
+static ibool isSessionSwitching = false;
+static ulong parmsIn[4]; /* Must not cross 64Kb boundary! */
+static ulong parmsOut[4]; /* Must not cross 64Kb boundary! */
+extern ushort _PM_gdt;
+static void (PMAPIP fatalErrorCleanup)(void) = NULL;
+
+/* DosSysCtl prototype. It is not declared in the headers but it is in the
+ * standard import libraries (DOSCALLS.876). Funny.
+ */
+APIRET APIENTRY DosSysCtl(ULONG ulFunction, PVOID pvData);
+
+/* This is the stack size for the threads that track the session switch event */
+#define SESSION_SWITCH_STACK_SIZE 32768
+
+typedef struct {
+ VIOMODEINFO vmi;
+ USHORT CursorX;
+ USHORT CursorY;
+ UCHAR FrameBuffer[1];
+ } CONSOLE_SAVE;
+
+typedef struct _SESWITCHREC {
+ /* The following variable is volatile because of PM_SUSPEND_APP */
+ volatile int Flags; /* -1 or PM_DEACTIVATE or PM_REACTIVATE */
+ PM_saveState_cb Callback; /* Save/restore context callback */
+ HMTX Mutex; /* Exclusive access mutex */
+ HEV Event; /* Posted after callback is called */
+ } SESWITCHREC;
+
+// Page sized block cache
+
+#define PAGES_PER_BLOCK 32
+#define PAGE_BLOCK_SIZE (PAGES_PER_BLOCK * PM_PAGE_SIZE + (PM_PAGE_SIZE-1) + sizeof(pageblock))
+#define FREELIST_NEXT(p) (*(void**)(p))
+typedef struct pageblock {
+ struct pageblock *next;
+ struct pageblock *prev;
+ void *freeListStart;
+ void *freeList;
+ void *freeListEnd;
+ int freeCount;
+ PM_lockHandle lockHandle;
+ } pageblock;
+
+static pageblock *pageBlocks = NULL;
+
+/*----------------------------- Implementation ----------------------------*/
+
+/****************************************************************************
+PARAMETERS:
+func - Helper device driver function to call
+
+RETURNS:
+First return value from the device driver in parmsOut[0]
+
+REMARKS:
+Function to open our helper device driver, call it and close the file
+handle. Note that we have to open the device driver for every call because
+of two problems:
+
+ 1. We cannot open a single file handle in a DLL that is shared amongst
+ programs, since every process must have it's own open file handle.
+
+ 2. For some reason there appears to be a limit of about 12 open file
+ handles on a device driver in the system. Hence when we open more
+ than about 12 file handles things start to go very strange.
+
+Hence we simply open the file handle every time that we need to call the
+device driver to work around these problems.
+****************************************************************************/
+static ulong CallSDDHelp(
+ int func)
+{
+ static ulong inLen; /* Must not cross 64Kb boundary! */
+ static ulong outLen; /* Must not cross 64Kb boundary! */
+ HFILE hSDDHelp;
+ ULONG rc;
+ ulong result;
+
+ if ((rc = DosOpen(PMHELP_NAME,&hSDDHelp,&result,0,0,
+ FILE_OPEN, OPEN_SHARE_DENYNONE | OPEN_ACCESS_READWRITE,
+ NULL)) != 0) {
+ if (rc == 4) { /* Did we run out of file handles? */
+ ULONG ulNewFHs;
+ LONG lAddFHs = 5;
+
+ if (DosSetRelMaxFH(&lAddFHs, &ulNewFHs) != 0)
+ PM_fatalError("Failed to raise the file handles limit!");
+ else {
+ if ((rc = DosOpen(PMHELP_NAME,&hSDDHelp,&result,0,0,
+ FILE_OPEN, OPEN_SHARE_DENYNONE | OPEN_ACCESS_READWRITE,
+ NULL)) != 0) {
+ PM_fatalError("Unable to open SDDHELP$ helper device driver! (#2)");
+ }
+ }
+ }
+ else
+ PM_fatalError("Unable to open SDDHELP$ helper device driver!");
+ }
+ if (DosDevIOCtl(hSDDHelp,PMHELP_IOCTL,func,
+ &parmsIn, inLen = sizeof(parmsIn), &inLen,
+ &parmsOut, outLen = sizeof(parmsOut), &outLen) != 0)
+ PM_fatalError("Failure calling SDDHELP$ helper device driver!");
+ DosClose(hSDDHelp);
+ return parmsOut[0];
+}
+
+/****************************************************************************
+REMARKS:
+Determine if we're running on a DBCS system.
+****************************************************************************/
+ibool __IsDBCSSystem(void)
+{
+ CHAR achDBCSInfo[12];
+ COUNTRYCODE ccStruct = {0, 0};
+
+ memset(achDBCSInfo, 0, 12);
+
+ /* Get the DBCS vector - if it's not empty, we're on DBCS */
+ DosQueryDBCSEnv(sizeof(achDBCSInfo), &ccStruct, achDBCSInfo);
+ if (achDBCSInfo[0] != 0)
+ return true;
+ else
+ return false;
+}
+
+/****************************************************************************
+REMARKS:
+Determine if PMSHELL is running - if it isn't, we can't use certain calls
+****************************************************************************/
+ibool __isShellLoaded(void)
+{
+ PVOID ptr;
+
+ if (DosGetNamedSharedMem(&ptr, (PSZ)"\\SHAREMEM\\PMGLOBAL.MEM", PAG_READ) == NO_ERROR) {
+ DosFreeMem(ptr);
+ return true;
+ }
+ return false;
+}
+
+/****************************************************************************
+REMARKS:
+Initialise the PM library and connect to our helper device driver. If we
+cannot connect to our helper device driver, we bail out with an error
+message.
+****************************************************************************/
+void PMAPI PM_init(void)
+{
+ if (!lowMem) {
+ /* Obtain the 32->16 callgate from the device driver to enable IOPL */
+ if ((_PM_gdt = CallSDDHelp(PMHELP_GETGDT32)) == 0)
+ PM_fatalError("Unable to obtain call gate selector!");
+
+ PM_setIOPL(3);
+
+ /* Map the first Mb of physical memory into lowMem */
+ if ((lowMem = PM_mapPhysicalAddr(0,0xFFFFF,true)) == NULL)
+ PM_fatalError("Unable to map first Mb physical memory!");
+
+ /* Initialise the MTRR interface functions */
+ MTRR_init();
+ }
+}
+
+/****************************************************************************
+REMARKS:
+Initialise the PM library for BIOS access via VIDEOPMI. This should work
+with any GRADD driver, including SDD/2.
+****************************************************************************/
+static ibool InitInt10(void)
+{
+ HMODULE hModGENPMI,hModSDDPMI,hModVideoPMI;
+ CHAR buf[80],path[_MAX_PATH];
+ HEV hevDaemon = NULLHANDLE;
+ RESULTCODES resCodes;
+
+ if (haveInt10 == -1) {
+ /* Connect to VIDEOPMI and get entry point. Note that we only
+ * do this if GENPMI or SDDPMI are already loaded, since we need
+ * a GRADD based driver for this to work.
+ */
+ PM_init();
+ haveInt10 = false;
+ if (DosQueryModuleHandle((PSZ)"GENPMI.DLL",&hModGENPMI) != 0)
+ hModGENPMI = NULLHANDLE;
+ if (DosQueryModuleHandle((PSZ)"SDDPMI.DLL",&hModSDDPMI) != 0)
+ hModSDDPMI = NULLHANDLE;
+ if (hModGENPMI || hModSDDPMI) {
+ if (DosLoadModule((PSZ)buf,sizeof(buf),(PSZ)"VIDEOPMI.DLL",&hModVideoPMI) == 0) {
+ if (DosQueryProcAddr(hModVideoPMI,0,(PSZ)"VIDEOPMI32Request",(void*)&PM_VIDEOPMI32Request) != 0)
+ PM_fatalError("Unable to get VIDEOPMI32Request entry point!");
+ strcpy(path,"X:\\OS2\\SVGADATA.PMI");
+ path[0] = PM_getBootDrive();
+ if (PM_VIDEOPMI32Request(&Adapter,PMIREQUEST_LOADPMIFILE,path,NULL) != 0) {
+ DosFreeModule(hModVideoPMI);
+ PM_VIDEOPMI32Request = NULL;
+ haveInt10 = false;
+ }
+ else {
+ /* Attempt to initialise the full VDM in the system. This will only
+ * work if VPRPMI.SYS is loaded, but it provides support for passing
+ * values in ES/DS/ESI/EDI between the BIOS which does not work with
+ * kernel VDM's in fixpacks earlier than FP15. FP15 and later and
+ * the new Warp 4.51 and Warp Server convenience packs should work
+ * fine with the kernel mini-VDM.
+ *
+ * Also the full VDM is the only solution for really old kernels
+ * (but GRADD won't run on them so this is superfluous ;-).
+ */
+ INITVDM InitVDM = {VDM_INITIALIZE,NULL,NULL};
+ PM_VIDEOPMI32Request(&Adapter,PMIREQUEST_SOFTWAREINT,&InitVDM,NULL);
+ haveInt10 = true;
+ }
+ }
+ }
+ else {
+ /* A GRADD driver isn't loaded, hence we can't use VIDEOPMI. But we will try
+ * to access the mini-VDM directly, first verifying that the support is
+ * available in the kernel (it should be for kernels that support GRADD).
+ * This may be needed in a command line boot or if non-GRADD driver is
+ * used (Matrox or classic VGA).
+ * Note: because of problems with mini-VDM support in the kernel, we have to
+ * spawn a daemon process that will do the actual mini-VDM access for us.
+ */
+ /* Try to open shared semaphore to see if our daemon is already up */
+ if (DosOpenEventSem(SHAREDSEM, &hevDaemon) == NO_ERROR) {
+ if (DosWaitEventSem(hevDaemon, 1) == NO_ERROR) {
+ /* If semaphore is posted, all is well */
+ useVPMI = false;
+ haveInt10 = true;
+ }
+ }
+ else {
+ /* Create shared event semaphore */
+ if (DosCreateEventSem(SHAREDSEM, &hevDaemon, DC_SEM_SHARED, FALSE) == NO_ERROR) {
+ PM_findBPD(DAEMON_NAME, path);
+ strcat(path, DAEMON_NAME);
+ if (DosExecPgm(buf, sizeof(buf), EXEC_BACKGROUND, (PSZ)DAEMON_NAME,
+ NULL, &resCodes, (PSZ)path) == NO_ERROR) {
+ /* The daemon was successfully spawned, now give it a sec to come up */
+ if (DosWaitEventSem(hevDaemon, 2000) == NO_ERROR) {
+ /* It's up! */
+ useVPMI = false;
+ haveInt10 = true;
+ }
+ }
+ }
+ }
+ }
+ }
+ return haveInt10;
+}
+
+/****************************************************************************
+REMARKS:
+We "probably" have BIOS access under OS/2 but we have to verify/initialize it
+first.
+****************************************************************************/
+ibool PMAPI PM_haveBIOSAccess(void)
+{
+ return InitInt10();
+}
+
+/****************************************************************************
+REMARKS:
+Return the operating system type identifier.
+****************************************************************************/
+long PMAPI PM_getOSType(void)
+{
+ return _OS_OS2;
+}
+
+/****************************************************************************
+REMARKS:
+Return the runtime type identifier.
+****************************************************************************/
+int PMAPI PM_getModeType(void)
+{
+ return PM_386;
+}
+
+/****************************************************************************
+REMARKS:
+Add a file directory separator to the end of the filename.
+****************************************************************************/
+void PMAPI PM_backslash(
+ char *s)
+{
+ uint pos = strlen(s);
+ if (s[pos-1] != '\\') {
+ s[pos] = '\\';
+ s[pos+1] = '\0';
+ }
+}
+
+/****************************************************************************
+REMARKS:
+Add a user defined PM_fatalError cleanup function.
+****************************************************************************/
+void PMAPI PM_setFatalErrorCleanup(
+ void (PMAPIP cleanup)(void))
+{
+ fatalErrorCleanup = cleanup;
+}
+
+/****************************************************************************
+REMARKS:
+Report a fatal error condition and halt the program.
+****************************************************************************/
+void PMAPI PM_fatalError(
+ const char *msg)
+{
+ /* Be prepare to be called recursively (failed to fail situation :-) */
+ static int fatalErrorCount = 0;
+ if (fatalErrorCount++ == 0) {
+ if (fatalErrorCleanup)
+ fatalErrorCleanup();
+ }
+ fprintf(stderr,"%s\n", msg);
+ exit(1);
+}
+
+/****************************************************************************
+REMARKS:
+Allocate the real mode VESA transfer buffer for communicating with the BIOS.
+****************************************************************************/
+void * PMAPI PM_getVESABuf(
+ uint *len,
+ uint *rseg,
+ uint *roff)
+{
+ if (!VESABuf_ptr) {
+ /* Allocate a global buffer for communicating with the VESA VBE */
+ if ((VESABuf_ptr = PM_allocRealSeg(VESABuf_len, &VESABuf_rseg, &VESABuf_roff)) == NULL)
+ return NULL;
+ }
+ *len = VESABuf_len;
+ *rseg = VESABuf_rseg;
+ *roff = VESABuf_roff;
+ return VESABuf_ptr;
+}
+
+/****************************************************************************
+REMARKS:
+Check if a key has been pressed.
+****************************************************************************/
+int PMAPI PM_kbhit(void)
+{
+ KBDKEYINFO key; /* Must not cross a 64K boundary */
+
+ KbdPeek(&key, 0);
+ return (key.fbStatus & KBDTRF_FINAL_CHAR_IN);
+}
+
+/****************************************************************************
+REMARKS:
+Wait for and return the next keypress.
+****************************************************************************/
+int PMAPI PM_getch(void)
+{
+ KBDKEYINFO key; /* Must not cross a 64K boundary */
+
+ KbdCharIn(&key,IO_WAIT,0);
+ return key.chChar;
+}
+
+/****************************************************************************
+REMARKS:
+Open a fullscreen console for output to the screen. This requires that
+the application be a fullscreen VIO program.
+****************************************************************************/
+PM_HWND PMAPI PM_openConsole(
+ PM_HWND hwndUser,
+ int device,
+ int xRes,
+ int yRes,
+ int bpp,
+ ibool fullScreen)
+{
+ (void)hwndUser;
+ (void)device;
+ (void)xRes;
+ (void)yRes;
+ (void)bpp;
+ (void)fullScreen;
+ return 0;
+}
+
+/****************************************************************************
+REMARKS:
+Find the size of the console state buffer.
+****************************************************************************/
+int PMAPI PM_getConsoleStateSize(void)
+{
+ VIOMODEINFO vmi;
+ vmi.cb = sizeof (VIOMODEINFO);
+ VioGetMode (&vmi, (HVIO)0);
+ return sizeof (CONSOLE_SAVE) - 1 + vmi.col * vmi.row * 2;
+}
+
+/****************************************************************************
+REMARKS:
+Save the state of the console.
+****************************************************************************/
+void PMAPI PM_saveConsoleState(
+ void *stateBuf,
+ PM_HWND hwndConsole)
+{
+ USHORT fblen;
+ CONSOLE_SAVE *cs = (CONSOLE_SAVE*)stateBuf;
+ VIOMODEINFO vmi;
+
+ /* The reason for the VIOMODEINFO juggling is 16-bit code. Because the user
+ * allocates the state buffer, cd->vmi might be crossing the 64K boundary and
+ * the 16-bit API would fail. If we create another copy on stack, the compiler
+ * should ensure that the 64K boundary will not be crossed (it adjusts the stack
+ * if it should cross).
+ */
+ vmi.cb = sizeof(VIOMODEINFO);
+ VioGetMode(&vmi,(HVIO)0);
+ memcpy(&cs->vmi, &vmi, sizeof(VIOMODEINFO));
+ VioGetCurPos(&cs->CursorY, &cs->CursorX, (HVIO)0);
+ fblen = cs->vmi.col * cs->vmi.row * 2;
+ VioReadCellStr((PCH)cs->FrameBuffer, &fblen, 0, 0, (HVIO)0);
+}
+
+/* Global variable to communicate between threads */
+static SESWITCHREC SesSwitchRec = { -1 };
+
+/****************************************************************************
+REMARKS:
+Called by external routines at least once per frame to check whenever a
+session save/restore should be performed. Since we receive such notifications
+asyncronously, we can't perform all required operations at that time.
+****************************************************************************/
+void __PM_checkConsoleSwitch(void)
+{
+ int Flags, Mode;
+ PM_saveState_cb Callback;
+
+ /* Quick optimized path for most common case */
+ if (SesSwitchRec.Flags == -1)
+ return;
+
+again:
+ if (DosRequestMutexSem(SesSwitchRec.Mutex, 100))
+ return;
+ Flags = SesSwitchRec.Flags;
+ Callback = SesSwitchRec.Callback;
+ SesSwitchRec.Flags = -1;
+ DosReleaseMutexSem(SesSwitchRec.Mutex);
+
+ isSessionSwitching = true; /* Prevent VIO calls */
+ Mode = Callback(Flags);
+ isSessionSwitching = false;
+ DosPostEventSem(SesSwitchRec.Event);
+ if (Flags == PM_DEACTIVATE && Mode == PM_SUSPEND_APP)
+ /* Suspend application until we switch back to our application */
+ for (;;) {
+ DosSleep (500);
+ /* SesSwitchRec.Flags is volatile so optimizer
+ * won't load it into a register
+ */
+ if (SesSwitchRec.Flags != -1)
+ goto again;
+ }
+}
+
+/****************************************************************************
+REMARKS:
+Waits until main thread processes the session switch event.
+****************************************************************************/
+static void _PM_SessionSwitchEvent(
+ PM_saveState_cb saveState,
+ int flags)
+{
+ ULONG Count;
+
+ if (DosRequestMutexSem(SesSwitchRec.Mutex, 10000))
+ return;
+
+ /* We're going to wait on that semaphore */
+ DosResetEventSem(SesSwitchRec.Event, &Count);
+ SesSwitchRec.Callback = saveState;
+ SesSwitchRec.Flags = flags;
+ DosReleaseMutexSem(SesSwitchRec.Mutex);
+
+ /* Now wait until all required operations are complete */
+ DosWaitEventSem (SesSwitchRec.Event, 10000);
+}
+
+/****************************************************************************
+REMARKS:
+This is the thread responsible for tracking switches back to our
+fullscreen session.
+****************************************************************************/
+static void _PM_ConsoleSwitch(
+ PM_saveState_cb saveState)
+{
+ USHORT NotifyType;
+
+ for (;;) {
+ if (VioModeWait(VMWR_POPUP, &NotifyType, 0) != 0)
+ break;
+ _PM_SessionSwitchEvent(saveState, PM_REACTIVATE);
+ }
+ VioModeUndo(UNDOI_RELEASEOWNER, UNDOK_ERRORCODE, (HVIO)0);
+}
+
+/****************************************************************************
+REMARKS:
+This is the thread responsible for tracking screen popups (usually fatal
+error handler uses them).
+****************************************************************************/
+static void _PM_ConsolePopup(
+ PM_saveState_cb saveState)
+{
+ USHORT NotifyType;
+ for (;;) {
+ if (VioSavRedrawWait(VSRWI_SAVEANDREDRAW, &NotifyType, 0) != 0)
+ break;
+ if (NotifyType == VSRWN_SAVE)
+ _PM_SessionSwitchEvent(saveState, PM_DEACTIVATE);
+ else if (NotifyType == VSRWN_REDRAW)
+ _PM_SessionSwitchEvent(saveState, PM_REACTIVATE);
+ }
+ VioSavRedrawUndo(UNDOI_RELEASEOWNER, UNDOK_ERRORCODE, (HVIO)0);
+}
+
+/****************************************************************************
+REMARKS:
+Set the suspend application callback for the fullscreen console.
+****************************************************************************/
+void PMAPI PM_setSuspendAppCallback(
+ PM_saveState_cb saveState)
+{
+ // If PM isn't loaded, this stuff will cause crashes!
+ if (__isShellLoaded()) {
+ if (saveState) {
+ /* Create the threads responsible for tracking console switches */
+ SesSwitchRec.Flags = -1;
+ DosCreateMutexSem(NULL, &SesSwitchRec.Mutex, 0, FALSE);
+ DosCreateEventSem(NULL, &SesSwitchRec.Event, 0, FALSE);
+ _beginthread ((void(*)(void*))_PM_ConsoleSwitch,NULL,SESSION_SWITCH_STACK_SIZE, (void*)saveState);
+ _beginthread ((void(*)(void*))_PM_ConsolePopup,NULL,SESSION_SWITCH_STACK_SIZE, (void*)saveState);
+ }
+ else {
+ /* Kill the threads responsible for tracking console switches */
+ VioModeUndo(UNDOI_RELEASEOWNER, UNDOK_TERMINATE, (HVIO)0);
+ VioSavRedrawUndo(UNDOI_RELEASEOWNER, UNDOK_TERMINATE, (HVIO)0);
+ DosCloseEventSem(SesSwitchRec.Event);
+ DosCloseMutexSem(SesSwitchRec.Mutex);
+ }
+ }
+}
+
+/****************************************************************************
+REMARKS:
+Restore the console state.
+****************************************************************************/
+void PMAPI PM_restoreConsoleState(
+ const void *stateBuf,
+ PM_HWND hwndConsole)
+{
+ CONSOLE_SAVE *cs = (CONSOLE_SAVE *)stateBuf;
+ VIOMODEINFO vmi;
+
+ if (!cs)
+ return;
+
+ memcpy(&vmi, &cs->vmi, sizeof (VIOMODEINFO));
+ VioSetMode(&vmi, (HVIO)0);
+ VioSetCurPos(cs->CursorY, cs->CursorX, (HVIO)0);
+ VioWrtCellStr((PCH)cs->FrameBuffer, cs->vmi.col * cs->vmi.row * 2,0, 0, (HVIO)0);
+}
+
+/****************************************************************************
+REMARKS:
+Close the fullscreen console.
+****************************************************************************/
+void PMAPI PM_closeConsole(
+ PM_HWND hwndConsole)
+{
+ /* Kill the threads responsible for tracking console switches */
+ PM_setSuspendAppCallback(NULL);
+ (void)hwndConsole;
+}
+
+/****************************************************************************
+REMARKS:
+Set the location of the OS console cursor.
+****************************************************************************/
+void PM_setOSCursorLocation(
+ int x,
+ int y)
+{
+ /* If session switch is in progress, calling into VIO causes deadlocks! */
+ /* Also this call to VIO screws up our console library on DBCS boxes... */
+ if (!isSessionSwitching && !__IsDBCSSystem())
+ VioSetCurPos(y,x,0);
+}
+
+/****************************************************************************
+REMARKS:
+Set the width of the OS console.
+****************************************************************************/
+void PM_setOSScreenWidth(
+ int width,
+ int height)
+{
+ /* Nothing to do in here */
+ (void)width;
+ (void)height;
+}
+
+/****************************************************************************
+REMARKS:
+Set the real time clock handler (used for software stereo modes).
+****************************************************************************/
+ibool PMAPI PM_setRealTimeClockHandler(
+ PM_intHandler ih,
+ int frequency)
+{
+ // TODO: Implement this!
+ (void)ih;
+ (void)frequency;
+ return false;
+}
+
+/****************************************************************************
+REMARKS:
+Set the real time clock frequency (for stereo modes).
+****************************************************************************/
+void PMAPI PM_setRealTimeClockFrequency(
+ int frequency)
+{
+ // TODO: Implement this!
+ (void)frequency;
+}
+
+/****************************************************************************
+REMARKS:
+Restore the original real time clock handler.
+****************************************************************************/
+void PMAPI PM_restoreRealTimeClockHandler(void)
+{
+ // TODO: Implement this!
+}
+
+/****************************************************************************
+REMARKS:
+Return the current operating system path or working directory.
+****************************************************************************/
+char * PMAPI PM_getCurrentPath(
+ char *path,
+ int maxLen)
+{
+ return getcwd(path,maxLen);
+}
+
+/****************************************************************************
+REMARKS:
+Return the drive letter for the boot drive.
+****************************************************************************/
+char PMAPI PM_getBootDrive(void)
+{
+ ulong boot = 3;
+ DosQuerySysInfo(QSV_BOOT_DRIVE,QSV_BOOT_DRIVE,&boot,sizeof(boot));
+ return (char)('a' + boot - 1);
+}
+
+/****************************************************************************
+REMARKS:
+Return the path to the VBE/AF driver files.
+****************************************************************************/
+const char * PMAPI PM_getVBEAFPath(void)
+{
+ static char path[CCHMAXPATH];
+ strcpy(path,"x:\\");
+ path[0] = PM_getBootDrive();
+ return path;
+}
+
+/****************************************************************************
+REMARKS:
+Return the path to the Nucleus driver files.
+****************************************************************************/
+const char * PMAPI PM_getNucleusPath(void)
+{
+ static char path[CCHMAXPATH];
+ if (getenv("NUCLEUS_PATH") != NULL)
+ return getenv("NUCLEUS_PATH");
+ strcpy(path,"x:\\os2\\drivers");
+ path[0] = PM_getBootDrive();
+ PM_backslash(path);
+ strcat(path,"nucleus");
+ return path;
+}
+
+/****************************************************************************
+REMARKS:
+Return the path to the Nucleus configuration files.
+****************************************************************************/
+const char * PMAPI PM_getNucleusConfigPath(void)
+{
+ static char path[CCHMAXPATH];
+ strcpy(path,PM_getNucleusPath());
+ PM_backslash(path);
+ strcat(path,"config");
+ return path;
+}
+
+/****************************************************************************
+REMARKS:
+Return a unique identifier for the machine if possible.
+****************************************************************************/
+const char * PMAPI PM_getUniqueID(void)
+{
+ return PM_getMachineName();
+}
+
+/****************************************************************************
+REMARKS:
+Get the name of the machine on the network.
+****************************************************************************/
+const char * PMAPI PM_getMachineName(void)
+{
+ static char name[40],*env;
+
+ if ((env = getenv("HOSTNAME")) != NULL) {
+ strncpy(name,env,sizeof(name));
+ name[sizeof(name)-1] = 0;
+ return name;
+ }
+ return "OS2";
+}
+
+/****************************************************************************
+REMARKS:
+Return a pointer to the real mode BIOS data area.
+****************************************************************************/
+void * PMAPI PM_getBIOSPointer(void)
+{
+ PM_init();
+ return lowMem + 0x400;
+}
+
+/****************************************************************************
+REMARKS:
+Return a pointer to 0xA0000 physical VGA graphics framebuffer.
+****************************************************************************/
+void * PMAPI PM_getA0000Pointer(void)
+{
+ PM_init();
+ return lowMem + 0xA0000;
+}
+
+/****************************************************************************
+REMARKS:
+Map a physical address to a linear address in the callers process.
+****************************************************************************/
+void * PMAPI PM_mapPhysicalAddr(
+ ulong base,
+ ulong limit,
+ ibool isCached)
+{
+ ulong baseAddr,baseOfs,linear;
+
+ /* Round the physical address to a 4Kb boundary and the limit to a
+ * 4Kb-1 boundary before passing the values to mmap. If we round the
+ * physical address, then we also add an extra offset into the address
+ * that we return.
+ */
+ baseOfs = base & 4095;
+ baseAddr = base & ~4095;
+ limit = ((limit+baseOfs+1+4095) & ~4095)-1;
+ parmsIn[0] = baseAddr;
+ parmsIn[1] = limit;
+ parmsIn[2] = isCached;
+ if ((linear = CallSDDHelp(PMHELP_MAPPHYS)) == 0)
+ return NULL;
+ return (void*)(linear + baseOfs);
+}
+
+/****************************************************************************
+REMARKS:
+Free a physical address mapping allocated by PM_mapPhysicalAddr.
+****************************************************************************/
+void PMAPI PM_freePhysicalAddr(
+ void *ptr,
+ ulong limit)
+{
+ parmsIn[0] = (ulong)ptr;
+ parmsIn[1] = limit;
+ CallSDDHelp(PMHELP_FREEPHYS);
+}
+
+/****************************************************************************
+REMARKS:
+Find the physical address of a linear memory address in current process.
+****************************************************************************/
+ulong PMAPI PM_getPhysicalAddr(
+ void *p)
+{
+ parmsIn[0] = (ulong)p;
+ return CallSDDHelp(PMHELP_GETPHYSICALADDR);
+}
+
+/****************************************************************************
+REMARKS:
+Find the physical address of a linear memory address in current process.
+****************************************************************************/
+ibool PMAPI PM_getPhysicalAddrRange(
+ void *p,
+ ulong length,
+ ulong *physAddress)
+{
+ parmsIn[0] = (ulong)p;
+ parmsIn[1] = (ulong)length;
+ parmsIn[2] = (ulong)physAddress;
+ return CallSDDHelp(PMHELP_GETPHYSICALADDRRANGE);
+}
+
+/****************************************************************************
+REMARKS:
+Sleep for the specified number of milliseconds.
+****************************************************************************/
+void PMAPI PM_sleep(
+ ulong milliseconds)
+{
+ DosSleep(milliseconds);
+}
+
+/****************************************************************************
+REMARKS:
+Return the base I/O port for the specified COM port.
+****************************************************************************/
+int PMAPI PM_getCOMPort(
+ int port)
+{
+ switch (port) {
+ case 0: return 0x3F8;
+ case 1: return 0x2F8;
+ }
+ return 0;
+}
+
+/****************************************************************************
+REMARKS:
+Return the base I/O port for the specified LPT port.
+****************************************************************************/
+int PMAPI PM_getLPTPort(
+ int port)
+{
+ switch (port) {
+ case 0: return 0x3BC;
+ case 1: return 0x378;
+ case 2: return 0x278;
+ }
+ return 0;
+}
+
+/****************************************************************************
+REMARKS:
+Allocate a block of shared memory. For Win9x we allocate shared memory
+as locked, global memory that is accessible from any memory context
+(including interrupt time context), which allows us to load our important
+data structure and code such that we can access it directly from a ring
+0 interrupt context.
+****************************************************************************/
+void * PMAPI PM_mallocShared(
+ long size)
+{
+ parmsIn[0] = size;
+ return (void*)CallSDDHelp(PMHELP_MALLOCSHARED);
+}
+
+/****************************************************************************
+REMARKS:
+Free a block of shared memory.
+****************************************************************************/
+void PMAPI PM_freeShared(
+ void *ptr)
+{
+ parmsIn[0] = (ulong)ptr;
+ CallSDDHelp(PMHELP_FREESHARED);
+}
+
+/****************************************************************************
+REMARKS:
+Map a linear memory address to the calling process address space. The
+address will have been allocated in another process using the
+PM_mapPhysicalAddr function.
+****************************************************************************/
+void * PMAPI PM_mapToProcess(
+ void *base,
+ ulong limit)
+{
+ ulong baseAddr,baseOfs;
+
+ /* Round the physical address to a 4Kb boundary and the limit to a
+ * 4Kb-1 boundary before passing the values to mmap. If we round the
+ * physical address, then we also add an extra offset into the address
+ * that we return.
+ */
+ baseOfs = (ulong)base & 4095;
+ baseAddr = (ulong)base & ~4095;
+ limit = ((limit+baseOfs+1+4095) & ~4095)-1;
+ parmsIn[0] = (ulong)baseAddr;
+ parmsIn[1] = limit;
+ return (void*)(CallSDDHelp(PMHELP_MAPTOPROCESS)+baseOfs);
+}
+
+/****************************************************************************
+REMARKS:
+Map a real mode pointer to a protected mode pointer.
+****************************************************************************/
+void * PMAPI PM_mapRealPointer(
+ uint r_seg,
+ uint r_off)
+{
+ if (r_seg == 0xFFFF)
+ return &RMBuf[r_off];
+ return lowMem + MK_PHYS(r_seg,r_off);
+}
+
+/****************************************************************************
+REMARKS:
+Allocate a block of real mode memory
+****************************************************************************/
+void * PMAPI PM_allocRealSeg(
+ uint size,
+ uint *r_seg,
+ uint *r_off)
+{
+ if (size > sizeof(RMBuf))
+ return NULL;
+ *r_seg = 0xFFFF;
+ *r_off = 0x0000;
+ return &RMBuf;
+}
+
+/****************************************************************************
+REMARKS:
+Free a block of real mode memory.
+****************************************************************************/
+void PMAPI PM_freeRealSeg(
+ void *mem)
+{
+ /* Nothing to do in here */
+ (void)mem;
+}
+
+#define INDPMI(reg) rmregs.aCRF.reg_##reg = regs->reg
+#define OUTDPMI(reg) regs->reg = rmregs.aCRF.reg_##reg
+
+#define REG_OFFSET(field) (((ULONG)&(((VCRF*)0)->field)) / sizeof(ULONG))
+
+/****************************************************************************
+REMARKS:
+Issue a real mode interrupt (parameters in DPMI compatible structure)
+****************************************************************************/
+void PMAPI DPMI_int86(
+ int intno,
+ DPMI_regs *regs)
+{
+ INTCRF rmregs;
+ ulong eax = 0;
+
+ if (!InitInt10())
+ return;
+ memset(&rmregs, 0, sizeof(rmregs));
+ rmregs.ulBIOSIntNo = intno;
+ INDPMI(eax); INDPMI(ebx); INDPMI(ecx); INDPMI(edx); INDPMI(esi); INDPMI(edi);
+ rmregs.aCRF.reg_ds = regs->ds;
+ rmregs.aCRF.reg_es = regs->es;
+ if (intno == 0x10) {
+ eax = rmregs.aCRF.reg_eax;
+ switch (eax & 0xFFFF) {
+ case 0x4F00:
+ /* We have to hack the way this function works, due to
+ * some bugs in the IBM mini-VDM BIOS support. Specifically
+ * we need to make the input buffer and output buffer the
+ * 'same' buffer, and that ES:SI points to the output
+ * buffer (ignored by the BIOS). The data will end up
+ * being returned in the input buffer, except for the
+ * first four bytes ('VESA') that will not be returned.
+ */
+ rmregs.pB[0].bBufferType = INPUT_BUFFER;
+ rmregs.pB[0].bSelCRF = REG_OFFSET(reg_es);
+ rmregs.pB[0].bOffCRF = REG_OFFSET(reg_edi);
+ rmregs.pB[0].pAddress = RMBuf;
+ rmregs.pB[0].ulSize = 4;
+ rmregs.pB[1].bBufferType = OUTPUT_BUFFER;
+ rmregs.pB[1].bSelCRF = REG_OFFSET(reg_es);
+ rmregs.pB[1].bOffCRF = REG_OFFSET(reg_esi);
+ rmregs.pB[1].pAddress = ((PBYTE)RMBuf)+4;
+ rmregs.pB[1].ulSize = 512-4;
+ break;
+ case 0x4F01:
+ rmregs.pB[0].bBufferType = OUTPUT_BUFFER;
+ rmregs.pB[0].bSelCRF = REG_OFFSET(reg_es);
+ rmregs.pB[0].bOffCRF = REG_OFFSET(reg_edi);
+ rmregs.pB[0].pAddress = RMBuf;
+ rmregs.pB[0].ulSize = 256;
+ break;
+ case 0x4F02:
+ rmregs.pB[0].bBufferType = INPUT_BUFFER;
+ rmregs.pB[0].bSelCRF = REG_OFFSET(reg_es);
+ rmregs.pB[0].bOffCRF = REG_OFFSET(reg_edi);
+ rmregs.pB[0].pAddress = RMBuf;
+ rmregs.pB[0].ulSize = 256;
+ break;
+ case 0x4F09:
+ rmregs.pB[0].bBufferType = INPUT_BUFFER;
+ rmregs.pB[0].bSelCRF = REG_OFFSET(reg_es);
+ rmregs.pB[0].bOffCRF = REG_OFFSET(reg_edi);
+ rmregs.pB[0].pAddress = RMBuf;
+ rmregs.pB[0].ulSize = 1024;
+ break;
+ case 0x4F0A:
+ /* Due to bugs in the mini-VDM in OS/2, the 0x4F0A protected
+ * mode interface functions will not work (we never get any
+ * selectors returned), so we fail this function here. The
+ * rest of the VBE/Core driver will work properly if this
+ * function is failed, because the VBE 2.0 and 3.0 specs
+ * allow for this.
+ */
+ regs->eax = 0x014F;
+ return;
+ }
+ }
+ if (useVPMI)
+ PM_VIDEOPMI32Request(&Adapter,PMIREQUEST_SOFTWAREINT,NULL,&rmregs);
+ else {
+ DosSysCtl(6, &rmregs);
+ }
+
+ OUTDPMI(eax); OUTDPMI(ebx); OUTDPMI(ecx); OUTDPMI(edx); OUTDPMI(esi); OUTDPMI(edi);
+ if (((regs->eax & 0xFFFF) == 0x004F) && ((eax & 0xFFFF) == 0x4F00)) {
+ /* Hack to fix up the missing 'VESA' string for mini-VDM */
+ memcpy(RMBuf,"VESA",4);
+ }
+ regs->ds = rmregs.aCRF.reg_ds;
+ regs->es = rmregs.aCRF.reg_es;
+ regs->flags = rmregs.aCRF.reg_eflag;
+}
+
+#define IN(reg) rmregs.reg = in->e.reg
+#define OUT(reg) out->e.reg = rmregs.reg
+
+/****************************************************************************
+REMARKS:
+Issue a real mode interrupt.
+****************************************************************************/
+int PMAPI PM_int86(
+ int intno,
+ RMREGS *in,
+ RMREGS *out)
+{
+ DPMI_regs rmregs;
+
+ memset(&rmregs, 0, sizeof(rmregs));
+ IN(eax); IN(ebx); IN(ecx); IN(edx); IN(esi); IN(edi);
+ DPMI_int86(intno,&rmregs);
+ OUT(eax); OUT(ebx); OUT(ecx); OUT(edx); OUT(esi); OUT(edi);
+ out->x.cflag = rmregs.flags & 0x1;
+ return out->x.ax;
+}
+
+/****************************************************************************
+REMARKS:
+Issue a real mode interrupt.
+****************************************************************************/
+int PMAPI PM_int86x(
+ int intno,
+ RMREGS *in,
+ RMREGS *out,
+ RMSREGS *sregs)
+{
+ DPMI_regs rmregs;
+
+ memset(&rmregs, 0, sizeof(rmregs));
+ IN(eax); IN(ebx); IN(ecx); IN(edx); IN(esi); IN(edi);
+ rmregs.es = sregs->es;
+ rmregs.ds = sregs->ds;
+ DPMI_int86(intno,&rmregs);
+ OUT(eax); OUT(ebx); OUT(ecx); OUT(edx); OUT(esi); OUT(edi);
+ sregs->es = rmregs.es;
+ sregs->cs = rmregs.cs;
+ sregs->ss = rmregs.ss;
+ sregs->ds = rmregs.ds;
+ out->x.cflag = rmregs.flags & 0x1;
+ return out->x.ax;
+}
+
+/****************************************************************************
+REMARKS:
+Call a real mode far function.
+****************************************************************************/
+void PMAPI PM_callRealMode(
+ uint seg,
+ uint off,
+ RMREGS *in,
+ RMSREGS *sregs)
+{
+ PM_fatalError("PM_callRealMode not supported on OS/2!");
+}
+
+/****************************************************************************
+REMARKS:
+Return the amount of available memory.
+****************************************************************************/
+void PMAPI PM_availableMemory(
+ ulong *physical,
+ ulong *total)
+{
+ /* Unable to get reliable values from OS/2 for this */
+ *physical = *total = 0;
+}
+
+/****************************************************************************
+REMARKS:
+Allocate a block of locked, physical memory for DMA operations.
+****************************************************************************/
+void * PMAPI PM_allocLockedMem(
+ uint size,
+ ulong *physAddr,
+ ibool contiguous,
+ ibool below16M)
+{
+ parmsIn[0] = size;
+ parmsIn[1] = contiguous;
+ parmsIn[2] = below16M;
+ CallSDDHelp(PMHELP_ALLOCLOCKED);
+ *physAddr = parmsOut[1];
+ return (void*)parmsOut[0];
+}
+
+/****************************************************************************
+REMARKS:
+Free a block of locked physical memory.
+****************************************************************************/
+void PMAPI PM_freeLockedMem(
+ void *p,
+ uint size,
+ ibool contiguous)
+{
+ parmsIn[0] = (ulong)p;
+ CallSDDHelp(PMHELP_FREELOCKED);
+}
+
+/****************************************************************************
+REMARKS:
+Allocates a new block of pages for the page block manager.
+****************************************************************************/
+static pageblock *PM_addNewPageBlock(void)
+{
+ int i;
+ pageblock *newBlock;
+ char *p,*next;
+
+ /* Allocate memory for the new page block, and add to head of list */
+ if (DosAllocSharedMem((void**)&newBlock,NULL,PAGE_BLOCK_SIZE,OBJ_GETTABLE | PAG_READ | PAG_WRITE | PAG_COMMIT))
+ return NULL;
+ if (!PM_lockDataPages(newBlock,PAGE_BLOCK_SIZE,&newBlock->lockHandle))
+ return NULL;
+ newBlock->prev = NULL;
+ newBlock->next = pageBlocks;
+ if (pageBlocks)
+ pageBlocks->prev = newBlock;
+ pageBlocks = newBlock;
+
+ /* Initialise the page aligned free list for the page block */
+ newBlock->freeCount = PAGES_PER_BLOCK;
+ newBlock->freeList = p = (char*)(((ulong)(newBlock + 1) + (PM_PAGE_SIZE-1)) & ~(PM_PAGE_SIZE-1));
+ newBlock->freeListStart = newBlock->freeList;
+ newBlock->freeListEnd = p + (PAGES_PER_BLOCK-1) * PM_PAGE_SIZE;
+ for (i = 0; i < PAGES_PER_BLOCK; i++,p = next)
+ FREELIST_NEXT(p) = next = p + PM_PAGE_SIZE;
+ FREELIST_NEXT(p - PM_PAGE_SIZE) = NULL;
+ return newBlock;
+}
+
+/****************************************************************************
+REMARKS:
+Allocates a page aligned and page sized block of memory
+****************************************************************************/
+void * PMAPI PM_allocPage(
+ ibool locked)
+{
+ pageblock *block;
+ void *p;
+
+ /* Scan the block list looking for any free blocks. Allocate a new
+ * page block if no free blocks are found.
+ */
+ for (block = pageBlocks; block != NULL; block = block->next) {
+ if (block->freeCount)
+ break;
+ }
+ if (block == NULL && (block = PM_addNewPageBlock()) == NULL)
+ return NULL;
+ block->freeCount--;
+ p = block->freeList;
+ block->freeList = FREELIST_NEXT(p);
+ (void)locked;
+ return p;
+}
+
+/****************************************************************************
+REMARKS:
+Free a page aligned and page sized block of memory
+****************************************************************************/
+void PMAPI PM_freePage(
+ void *p)
+{
+ pageblock *block;
+
+ /* First find the page block that this page belongs to */
+ for (block = pageBlocks; block != NULL; block = block->next) {
+ if (p >= block->freeListStart && p <= block->freeListEnd)
+ break;
+ }
+ CHECK(block != NULL);
+
+ /* Now free the block by adding it to the free list */
+ FREELIST_NEXT(p) = block->freeList;
+ block->freeList = p;
+ if (++block->freeCount == PAGES_PER_BLOCK) {
+ /* If all pages in the page block are now free, free the entire
+ * page block itself.
+ */
+ if (block == pageBlocks) {
+ /* Delete from head */
+ pageBlocks = block->next;
+ if (block->next)
+ block->next->prev = NULL;
+ }
+ else {
+ /* Delete from middle of list */
+ CHECK(block->prev != NULL);
+ block->prev->next = block->next;
+ if (block->next)
+ block->next->prev = block->prev;
+ }
+
+ /* Unlock the memory and free it */
+ PM_unlockDataPages(block,PAGE_BLOCK_SIZE,&block->lockHandle);
+ DosFreeMem(block);
+ }
+}
+
+/****************************************************************************
+REMARKS:
+Map in all the shared memory blocks for managing the memory pages above.
+****************************************************************************/
+void PMAPI PM_mapSharedPages(void)
+{
+ pageblock *block;
+
+ /* Map all the page blocks above into the shared memory for process */
+ for (block = pageBlocks; block != NULL; block = block->next) {
+ DosGetSharedMem(block, PAG_READ | PAG_WRITE);
+ }
+}
+
+/****************************************************************************
+REMARKS:
+Lock linear memory so it won't be paged.
+****************************************************************************/
+int PMAPI PM_lockDataPages(
+ void *p,
+ uint len,
+ PM_lockHandle *lockHandle)
+{
+ parmsIn[0] = (ulong)p;
+ parmsIn[1] = len;
+ CallSDDHelp(PMHELP_LOCKPAGES);
+ lockHandle->h[0] = parmsOut[1];
+ lockHandle->h[1] = parmsOut[2];
+ lockHandle->h[2] = parmsOut[3];
+ return parmsOut[0];
+}
+
+/****************************************************************************
+REMARKS:
+Unlock linear memory so it won't be paged.
+****************************************************************************/
+int PMAPI PM_unlockDataPages(
+ void *p,
+ uint len,
+ PM_lockHandle *lockHandle)
+{
+ parmsIn[0] = lockHandle->h[0];
+ parmsIn[1] = lockHandle->h[1];
+ parmsIn[2] = lockHandle->h[2];
+ return CallSDDHelp(PMHELP_UNLOCKPAGES);
+}
+
+/****************************************************************************
+REMARKS:
+Lock linear memory so it won't be paged.
+****************************************************************************/
+int PMAPI PM_lockCodePages(
+ void (*p)(),
+ uint len,
+ PM_lockHandle *lockHandle)
+{
+ parmsIn[0] = (ulong)p;
+ parmsIn[1] = len;
+ CallSDDHelp(PMHELP_LOCKPAGES);
+ lockHandle->h[0] = parmsOut[1];
+ lockHandle->h[1] = parmsOut[2];
+ lockHandle->h[2] = parmsOut[3];
+ return parmsOut[0];
+}
+
+/****************************************************************************
+REMARKS:
+Unlock linear memory so it won't be paged.
+****************************************************************************/
+int PMAPI PM_unlockCodePages(
+ void (*p)(),
+ uint len,
+ PM_lockHandle *lockHandle)
+{
+ parmsIn[0] = lockHandle->h[0];
+ parmsIn[1] = lockHandle->h[1];
+ parmsIn[2] = lockHandle->h[2];
+ return CallSDDHelp(PMHELP_UNLOCKPAGES);
+}
+
+/****************************************************************************
+REMARKS:
+Call the VBE/Core software interrupt to change display banks.
+****************************************************************************/
+void PMAPI PM_setBankA(
+ int bank)
+{
+ INTCRF rmregs;
+
+ if (!InitInt10())
+ return;
+ memset(&rmregs, 0, sizeof(rmregs));
+ rmregs.ulBIOSIntNo = 0x10;
+ rmregs.aCRF.reg_eax = 0x4F05;
+ rmregs.aCRF.reg_ebx = 0x0000;
+ rmregs.aCRF.reg_edx = bank;
+ PM_VIDEOPMI32Request(&Adapter,PMIREQUEST_SOFTWAREINT,&rmregs,NULL);
+}
+
+/****************************************************************************
+REMARKS:
+Call the VBE/Core software interrupt to change display banks.
+****************************************************************************/
+void PMAPI PM_setBankAB(
+ int bank)
+{
+ INTCRF rmregs;
+
+ if (!InitInt10())
+ return;
+ memset(&rmregs, 0, sizeof(rmregs));
+ rmregs.ulBIOSIntNo = 0x10;
+ rmregs.aCRF.reg_eax = 0x4F05;
+ rmregs.aCRF.reg_ebx = 0x0000;
+ rmregs.aCRF.reg_edx = bank;
+ PM_VIDEOPMI32Request(&Adapter,PMIREQUEST_SOFTWAREINT,&rmregs,NULL);
+ rmregs.ulBIOSIntNo = 0x10;
+ rmregs.aCRF.reg_eax = 0x4F05;
+ rmregs.aCRF.reg_ebx = 0x0001;
+ rmregs.aCRF.reg_edx = bank;
+ PM_VIDEOPMI32Request(&Adapter,PMIREQUEST_SOFTWAREINT,&rmregs,NULL);
+}
+
+/****************************************************************************
+REMARKS:
+Call the VBE/Core software interrupt to change display start address.
+****************************************************************************/
+void PMAPI PM_setCRTStart(
+ int x,
+ int y,
+ int waitVRT)
+{
+ INTCRF rmregs;
+
+ if (!InitInt10())
+ return;
+ memset(&rmregs, 0, sizeof(rmregs));
+ rmregs.ulBIOSIntNo = 0x10;
+ rmregs.aCRF.reg_eax = 0x4F07;
+ rmregs.aCRF.reg_ebx = waitVRT;
+ rmregs.aCRF.reg_ecx = x;
+ rmregs.aCRF.reg_edx = y;
+ PM_VIDEOPMI32Request(&Adapter,PMIREQUEST_SOFTWAREINT,&rmregs,NULL);
+}
+
+/****************************************************************************
+REMARKS:
+Execute the POST on the secondary BIOS for a controller.
+****************************************************************************/
+ibool PMAPI PM_doBIOSPOST(
+ ushort axVal,
+ ulong BIOSPhysAddr,
+ void *mappedBIOS,
+ ulong BIOSLen)
+{
+ (void)axVal;
+ (void)BIOSPhysAddr;
+ (void)mappedBIOS;
+ (void)BIOSLen;
+ return false;
+}
+
+/****************************************************************************
+PARAMETERS:
+base - The starting physical base address of the region
+size - The size in bytes of the region
+type - Type to place into the MTRR register
+
+RETURNS:
+Error code describing the result.
+
+REMARKS:
+Function to enable write combining for the specified region of memory.
+****************************************************************************/
+int PMAPI PM_enableWriteCombine(
+ ulong base,
+ ulong size,
+ uint type)
+{
+ return MTRR_enableWriteCombine(base,size,type);
+}
+
+// TODO: Move the MTRR helper stuff into the call gate, or better yet
+// entirely into the ring 0 helper driver!!
+
+/* MTRR helper functions. To make it easier to implement the MTRR support
+ * under OS/2, we simply put our ring 0 helper functions into the
+ * helper device driver rather than the entire MTRR module. This makes
+ * it easier to maintain the MTRR support since we don't need to deal
+ * with 16-bit ring 0 code in the MTRR library.
+ */
+
+/****************************************************************************
+REMARKS:
+Flush the translation lookaside buffer.
+****************************************************************************/
+void PMAPI PM_flushTLB(void)
+{
+ CallSDDHelp(PMHELP_FLUSHTLB);
+}
+
+/****************************************************************************
+REMARKS:
+Return true if ring 0 (or if we can call the helpers functions at ring 0)
+****************************************************************************/
+ibool _ASMAPI _MTRR_isRing0(void)
+{
+ return true;
+}
+
+/****************************************************************************
+REMARKS:
+Read and return the value of the CR4 register
+****************************************************************************/
+ulong _ASMAPI _MTRR_saveCR4(void)
+{
+ return CallSDDHelp(PMHELP_SAVECR4);
+}
+
+/****************************************************************************
+REMARKS:
+Restore the value of the CR4 register
+****************************************************************************/
+void _ASMAPI _MTRR_restoreCR4(ulong cr4Val)
+{
+ parmsIn[0] = cr4Val;
+ CallSDDHelp(PMHELP_RESTORECR4);
+}
+
+/****************************************************************************
+REMARKS:
+Read a machine status register for the CPU.
+****************************************************************************/
+void _ASMAPI _MTRR_readMSR(
+ ulong reg,
+ ulong *eax,
+ ulong *edx)
+{
+ parmsIn[0] = reg;
+ CallSDDHelp(PMHELP_READMSR);
+ *eax = parmsOut[0];
+ *edx = parmsOut[1];
+}
+
+/****************************************************************************
+REMARKS:
+Write a machine status register for the CPU.
+****************************************************************************/
+void _ASMAPI _MTRR_writeMSR(
+ ulong reg,
+ ulong eax,
+ ulong edx)
+{
+ parmsIn[0] = reg;
+ parmsIn[1] = eax;
+ parmsIn[2] = edx;
+ CallSDDHelp(PMHELP_WRITEMSR);
+}
+
+PM_MODULE PMAPI PM_loadLibrary(
+ const char *szDLLName)
+{
+ // TODO: Implement this to load shared libraries!
+ (void)szDLLName;
+ return NULL;
+}
+
+void * PMAPI PM_getProcAddress(
+ PM_MODULE hModule,
+ const char *szProcName)
+{
+ // TODO: Implement this!
+ (void)hModule;
+ (void)szProcName;
+ return NULL;
+}
+
+void PMAPI PM_freeLibrary(
+ PM_MODULE hModule)
+{
+ // TODO: Implement this!
+ (void)hModule;
+}
+
+/****************************************************************************
+REMARKS:
+Internal function to convert the find data to the generic interface.
+****************************************************************************/
+static void convertFindData(
+ PM_findData *findData,
+ FILEFINDBUF3 *blk)
+{
+ ulong dwSize = findData->dwSize;
+
+ memset(findData,0,findData->dwSize);
+ findData->dwSize = dwSize;
+ if (blk->attrFile & FILE_READONLY)
+ findData->attrib |= PM_FILE_READONLY;
+ if (blk->attrFile & FILE_DIRECTORY)
+ findData->attrib |= PM_FILE_DIRECTORY;
+ if (blk->attrFile & FILE_ARCHIVED)
+ findData->attrib |= PM_FILE_ARCHIVE;
+ if (blk->attrFile & FILE_HIDDEN)
+ findData->attrib |= PM_FILE_HIDDEN;
+ if (blk->attrFile & FILE_SYSTEM)
+ findData->attrib |= PM_FILE_SYSTEM;
+ findData->sizeLo = blk->cbFile;
+ findData->sizeHi = 0;
+ strncpy(findData->name,blk->achName,PM_MAX_PATH);
+ findData->name[PM_MAX_PATH-1] = 0;
+}
+
+#define FIND_MASK (FILE_ARCHIVED | FILE_DIRECTORY | FILE_SYSTEM | FILE_HIDDEN | FILE_READONLY)
+
+/****************************************************************************
+REMARKS:
+Function to find the first file matching a search criteria in a directory.
+****************************************************************************/
+void *PMAPI PM_findFirstFile(
+ const char *filename,
+ PM_findData *findData)
+{
+ FILEFINDBUF3 blk;
+ HDIR hdir = HDIR_CREATE;
+ ulong count = 1;
+
+ if (DosFindFirst((PSZ)filename,&hdir,FIND_MASK,&blk,sizeof(blk),&count,FIL_STANDARD) == NO_ERROR) {
+ convertFindData(findData,&blk);
+ return (void*)hdir;
+ }
+ return PM_FILE_INVALID;
+}
+
+/****************************************************************************
+REMARKS:
+Function to find the next file matching a search criteria in a directory.
+****************************************************************************/
+ibool PMAPI PM_findNextFile(
+ void *handle,
+ PM_findData *findData)
+{
+ FILEFINDBUF3 blk;
+ ulong count = 1;
+
+ if (DosFindNext((HDIR)handle,&blk,sizeof(blk),&count) == NO_ERROR) {
+ convertFindData(findData,&blk);
+ return true;
+ }
+ return false;
+}
+
+/****************************************************************************
+REMARKS:
+Function to close the find process
+****************************************************************************/
+void PMAPI PM_findClose(
+ void *handle)
+{
+ DosFindClose((HDIR)handle);
+}
+
+/****************************************************************************
+REMARKS:
+Function to determine if a drive is a valid drive or not. Under Unix this
+function will return false for anything except a value of 3 (considered
+the root drive, and equivalent to C: for non-Unix systems). The drive
+numbering is:
+
+ 0 - Current drive
+ 1 - Drive A:
+ 2 - Drive B:
+ 3 - Drive C:
+ etc
+
+****************************************************************************/
+ibool PMAPI PM_driveValid(
+ char drive)
+{
+ ulong cntDisk,cntDriveMap;
+ ibool valid;
+
+ DosQueryCurrentDisk(&cntDisk,&cntDriveMap);
+ valid = (DosSetDefaultDisk(drive) == NO_ERROR);
+ DosSetDefaultDisk(cntDisk);
+ return valid;
+}
+
+/****************************************************************************
+REMARKS:
+Function to get the current working directory for the specififed drive.
+Under Unix this will always return the current working directory regardless
+of what the value of 'drive' is.
+****************************************************************************/
+void PMAPI PM_getdcwd(
+ int drive,
+ char *dir,
+ int len)
+{
+ ulong length = len;
+
+ DosQueryCurrentDir(drive, (PSZ)dir, &length);
+}
+
+/****************************************************************************
+REMARKS:
+Function to change the file attributes for a specific file.
+****************************************************************************/
+void PMAPI PM_setFileAttr(
+ const char *filename,
+ uint attrib)
+{
+ FILESTATUS3 s;
+
+ if (DosQueryPathInfo((PSZ)filename,FIL_STANDARD,(PVOID)&s,sizeof(s)))
+ return;
+ s.attrFile = 0;
+ if (attrib & PM_FILE_READONLY)
+ s.attrFile |= FILE_READONLY;
+ if (attrib & PM_FILE_ARCHIVE)
+ s.attrFile |= FILE_ARCHIVED;
+ if (attrib & PM_FILE_HIDDEN)
+ s.attrFile |= FILE_HIDDEN;
+ if (attrib & PM_FILE_SYSTEM)
+ s.attrFile |= FILE_SYSTEM;
+ DosSetPathInfo((PSZ)filename,FIL_STANDARD,(PVOID)&s,sizeof(s),0L);
+}
+
+/****************************************************************************
+REMARKS:
+Function to get the file attributes for a specific file.
+****************************************************************************/
+uint PMAPI PM_getFileAttr(
+ const char *filename)
+{
+ FILESTATUS3 fs3;
+ uint retval = 0;
+
+ if (DosQueryPathInfo((PSZ)filename, FIL_STANDARD, &fs3, sizeof(FILESTATUS3)))
+ return 0;
+ if (fs3.attrFile & FILE_READONLY)
+ retval |= PM_FILE_READONLY;
+ if (fs3.attrFile & FILE_ARCHIVED)
+ retval |= PM_FILE_ARCHIVE;
+ if (fs3.attrFile & FILE_HIDDEN)
+ retval |= PM_FILE_HIDDEN;
+ if (fs3.attrFile & FILE_SYSTEM)
+ retval |= PM_FILE_SYSTEM;
+ return retval;
+}
+
+/****************************************************************************
+REMARKS:
+Function to create a directory.
+****************************************************************************/
+ibool PMAPI PM_mkdir(
+ const char *filename)
+{
+ return DosCreateDir((PSZ)filename,NULL) == NO_ERROR;
+}
+
+/****************************************************************************
+REMARKS:
+Function to remove a directory.
+****************************************************************************/
+ibool PMAPI PM_rmdir(
+ const char *filename)
+{
+ return DosDeleteDir((PSZ)filename) == NO_ERROR;
+}
+
+/****************************************************************************
+REMARKS:
+Function to get the file time and date for a specific file.
+****************************************************************************/
+ibool PMAPI PM_getFileTime(
+ const char *filename,
+ ibool gmTime,
+ PM_time *time)
+{
+ FILESTATUS3 fs3;
+ struct tm tc;
+ struct tm *ret;
+ time_t tt;
+
+ if (DosQueryPathInfo((PSZ)filename, FIL_STANDARD, &fs3, sizeof(FILESTATUS3)))
+ return false;
+ if (gmTime) {
+ tc.tm_year = fs3.fdateLastWrite.year + 80;
+ tc.tm_mon = fs3.fdateLastWrite.month - 1;
+ tc.tm_mday = fs3.fdateLastWrite.day;
+ tc.tm_hour = fs3.ftimeLastWrite.hours;
+ tc.tm_min = fs3.ftimeLastWrite.minutes;
+ tc.tm_sec = fs3.ftimeLastWrite.twosecs * 2;
+ if((tt = mktime(&tc)) == -1)
+ return false;
+ if(!(ret = gmtime(&tt)))
+ return false;
+ time->sec = ret->tm_sec;
+ time->day = ret->tm_mday;
+ time->mon = ret->tm_mon + 1;
+ time->year = ret->tm_year - 80;
+ time->min = ret->tm_min;
+ time->hour = ret->tm_hour;
+ }
+ else {
+ time->sec = fs3.ftimeLastWrite.twosecs * 2;
+ time->day = fs3.fdateLastWrite.day;
+ time->mon = fs3.fdateLastWrite.month;
+ time->year = fs3.fdateLastWrite.year;
+ time->min = fs3.ftimeLastWrite.minutes;
+ time->hour = fs3.ftimeLastWrite.hours;
+ }
+ return true;
+}
+
+/****************************************************************************
+REMARKS:
+Function to set the file time and date for a specific file.
+****************************************************************************/
+ibool PMAPI PM_setFileTime(
+ const char *filename,
+ ibool gmTime,
+ PM_time *time)
+{
+ FILESTATUS3 fs3;
+ struct tm tc;
+ struct tm *ret;
+ time_t tt;
+
+ if (DosQueryPathInfo((PSZ)filename,FIL_STANDARD,(PVOID)&fs3,sizeof(fs3)))
+ return false;
+ if (gmTime) {
+ tc.tm_year = time->year + 80;
+ tc.tm_mon = time->mon - 1;
+ tc.tm_mday = time->day;
+ tc.tm_hour = time->hour;
+ tc.tm_min = time->min;
+ tc.tm_sec = time->sec;
+ if((tt = mktime(&tc)) == -1)
+ return false;
+ ret = localtime(&tt);
+ fs3.ftimeLastWrite.twosecs = ret->tm_sec / 2;
+ fs3.fdateLastWrite.day = ret->tm_mday;
+ fs3.fdateLastWrite.month = ret->tm_mon + 1;
+ fs3.fdateLastWrite.year = ret->tm_year - 80;
+ fs3.ftimeLastWrite.minutes = ret->tm_min;
+ fs3.ftimeLastWrite.hours = ret->tm_hour;
+ }
+ else {
+ fs3.ftimeLastWrite.twosecs = time->sec / 2;
+ fs3.fdateLastWrite.day = time->day;
+ fs3.fdateLastWrite.month = time->mon;
+ fs3.fdateLastWrite.year = time->year;
+ fs3.ftimeLastWrite.minutes = time->min;
+ fs3.ftimeLastWrite.hours = time->hour;
+ }
+ memcpy(&fs3.fdateLastAccess, &fs3.fdateLastWrite, sizeof(FDATE));
+ memcpy(&fs3.fdateCreation, &fs3.fdateLastWrite, sizeof(FDATE));
+ memcpy(&fs3.ftimeLastAccess, &fs3.ftimeLastWrite, sizeof(FTIME));
+ memcpy(&fs3.ftimeCreation, &fs3.ftimeLastWrite, sizeof(FTIME));
+ DosSetPathInfo((PSZ)filename,FIL_STANDARD,(PVOID)&fs3,sizeof(FILESTATUS3),0L);
+ return true;
+}
diff --git a/board/MAI/bios_emulator/scitech/src/pm/os2/vflat.c b/board/MAI/bios_emulator/scitech/src/pm/os2/vflat.c
new file mode 100644
index 00000000000..579ef2c95c4
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/pm/os2/vflat.c
@@ -0,0 +1,49 @@
+/****************************************************************************
+*
+* SciTech OS Portability Manager Library
+*
+* ========================================================================
+*
+* The contents of this file are subject to the SciTech MGL Public
+* License Version 1.0 (the "License"); you may not use this file
+* except in compliance with the License. You may obtain a copy of
+* the License at http://www.scitechsoft.com/mgl-license.txt
+*
+* Software distributed under the License is distributed on an
+* "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+* implied. See the License for the specific language governing
+* rights and limitations under the License.
+*
+* The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+*
+* The Initial Developer of the Original Code is SciTech Software, Inc.
+* All Rights Reserved.
+*
+* ========================================================================
+*
+* Language: ANSI C
+* Environment: Any
+*
+* Description: Dummy module; no virtual framebuffer for this OS
+*
+****************************************************************************/
+
+#include "pmapi.h"
+
+ibool PMAPI VF_available(void)
+{
+ return false;
+}
+
+void * PMAPI VF_init(ulong baseAddr,int bankSize,int codeLen,void *bankFunc)
+{
+ baseAddr = baseAddr;
+ bankSize = bankSize;
+ codeLen = codeLen;
+ bankFunc = bankFunc;
+ return NULL;
+}
+
+void PMAPI VF_exit(void)
+{
+}
diff --git a/board/MAI/bios_emulator/scitech/src/pm/os2/ztimer.c b/board/MAI/bios_emulator/scitech/src/pm/os2/ztimer.c
new file mode 100644
index 00000000000..30ffe4340b0
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/pm/os2/ztimer.c
@@ -0,0 +1,110 @@
+/****************************************************************************
+*
+* Ultra Long Period Timer
+*
+* ========================================================================
+*
+* The contents of this file are subject to the SciTech MGL Public
+* License Version 1.0 (the "License"); you may not use this file
+* except in compliance with the License. You may obtain a copy of
+* the License at http://www.scitechsoft.com/mgl-license.txt
+*
+* Software distributed under the License is distributed on an
+* "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+* implied. See the License for the specific language governing
+* rights and limitations under the License.
+*
+* The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+*
+* The Initial Developer of the Original Code is SciTech Software, Inc.
+* All Rights Reserved.
+*
+* ========================================================================
+*
+* Language: ANSI C
+* Environment: OS/2
+*
+* Description: OS specific implementation for the Zen Timer functions.
+*
+****************************************************************************/
+
+/*---------------------------- Global variables ---------------------------*/
+
+static ulong frequency;
+
+/*----------------------------- Implementation ----------------------------*/
+
+/****************************************************************************
+REMARKS:
+Initialise the Zen Timer module internals.
+****************************************************************************/
+void __ZTimerInit(void)
+{
+ DosTmrQueryFreq(&frequency);
+}
+
+/****************************************************************************
+REMARKS:
+Start the Zen Timer counting.
+****************************************************************************/
+#define __LZTimerOn(tm) DosTmrQueryTime((QWORD*)&tm->start)
+
+/****************************************************************************
+REMARKS:
+Compute the lap time since the timer was started.
+****************************************************************************/
+static ulong __LZTimerLap(
+ LZTimerObject *tm)
+{
+ CPU_largeInteger tmLap,tmCount;
+
+ DosTmrQueryTime((QWORD*)&tmLap);
+ _CPU_diffTime64(&tm->start,&tmLap,&tmCount);
+ return _CPU_calcMicroSec(&tmCount,frequency);
+}
+
+/****************************************************************************
+REMARKS:
+Call the assembler Zen Timer functions to do the timing.
+****************************************************************************/
+#define __LZTimerOff(tm) DosTmrQueryTime((QWORD*)&tm->end)
+
+/****************************************************************************
+REMARKS:
+Call the assembler Zen Timer functions to do the timing.
+****************************************************************************/
+static ulong __LZTimerCount(
+ LZTimerObject *tm)
+{
+ CPU_largeInteger tmCount;
+
+ _CPU_diffTime64(&tm->start,&tm->end,&tmCount);
+ return _CPU_calcMicroSec(&tmCount,frequency);
+}
+
+/****************************************************************************
+REMARKS:
+Define the resolution of the long period timer as microseconds per timer tick.
+****************************************************************************/
+#define ULZTIMER_RESOLUTION 1000
+
+/****************************************************************************
+REMARKS:
+Read the Long Period timer value from the BIOS timer tick.
+****************************************************************************/
+static ulong __ULZReadTime(void)
+{
+ ULONG count;
+ DosQuerySysInfo( QSV_MS_COUNT, QSV_MS_COUNT, &count, sizeof(ULONG) );
+ return count;
+}
+
+/****************************************************************************
+REMARKS:
+Compute the elapsed time from the BIOS timer tick. Note that we check to see
+whether a midnight boundary has passed, and if so adjust the finish time to
+account for this. We cannot detect if more that one midnight boundary has
+passed, so if this happens we will be generating erronous results.
+****************************************************************************/
+ulong __ULZElapsedTime(ulong start,ulong finish)
+{ return finish - start; }
diff --git a/board/MAI/bios_emulator/scitech/src/pm/os2pm/event.c b/board/MAI/bios_emulator/scitech/src/pm/os2pm/event.c
new file mode 100644
index 00000000000..97c2caa82f9
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/pm/os2pm/event.c
@@ -0,0 +1,170 @@
+/****************************************************************************
+*
+* SciTech OS Portability Manager Library
+*
+* ========================================================================
+*
+* The contents of this file are subject to the SciTech MGL Public
+* License Version 1.0 (the "License"); you may not use this file
+* except in compliance with the License. You may obtain a copy of
+* the License at http://www.scitechsoft.com/mgl-license.txt
+*
+* Software distributed under the License is distributed on an
+* "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+* implied. See the License for the specific language governing
+* rights and limitations under the License.
+*
+* The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+*
+* The Initial Developer of the Original Code is SciTech Software, Inc.
+* All Rights Reserved.
+*
+* ========================================================================
+*
+* Language: ANSI C
+* Environment: IBM PC (OS/2)
+*
+* Description: OS/2 implementation for the SciTech cross platform
+* event library.
+*
+****************************************************************************/
+
+/*---------------------------- Global Variables ---------------------------*/
+
+static int oldMouseState; /* Old mouse state */
+static ulong oldKeyMessage; /* Old keyboard state */
+static ushort keyUpMsg[256] = {0};/* Table of key up messages */
+static int rangeX,rangeY; /* Range of mouse coordinates */
+HMOU _EVT_hMouse; /* Handle to the mouse driver */
+
+/*---------------------------- Implementation -----------------------------*/
+
+/* These are not used under OS/2 */
+#define _EVT_disableInt() 1
+#define _EVT_restoreInt(flags)
+
+/****************************************************************************
+PARAMETERS:
+scanCode - Scan code to test
+
+REMARKS:
+This macro determines if a specified key is currently down at the
+time that the call is made.
+****************************************************************************/
+#define _EVT_isKeyDown(scanCode) (keyUpMsg[scanCode] != 0)
+
+/****************************************************************************
+REMARKS:
+Pumps all messages in the message queue from OS/2 into our event queue.
+****************************************************************************/
+static void _EVT_pumpMessages(void)
+{
+ // TODO: Implement this for OS/2 Presentation Manager apps!
+}
+
+/****************************************************************************
+REMARKS:
+This macro/function is used to converts the scan codes reported by the
+keyboard to our event libraries normalised format. We only have one scan
+code for the 'A' key, and use shift modifiers to determine if it is a
+Ctrl-F1, Alt-F1 etc. The raw scan codes from the keyboard work this way,
+but the OS gives us 'cooked' scan codes, we have to translate them back
+to the raw format.
+****************************************************************************/
+#define _EVT_maskKeyCode(evt)
+
+/****************************************************************************
+REMARKS:
+Safely abort the event module upon catching a fatal error.
+****************************************************************************/
+void _EVT_abort()
+{
+ EVT_exit();
+ PM_fatalError("Unhandled exception!");
+}
+
+/****************************************************************************
+PARAMETERS:
+mouseMove - Callback function to call wheneve the mouse needs to be moved
+
+REMARKS:
+Initiliase the event handling module. Here we install our mouse handling ISR
+to be called whenever any button's are pressed or released. We also build
+the free list of events in the event queue.
+
+We use handler number 2 of the mouse libraries interrupt handlers for our
+event handling routines.
+****************************************************************************/
+void EVTAPI EVT_init(
+ _EVT_mouseMoveHandler mouseMove)
+{
+ /* Initialise the event queue */
+ EVT.mouseMove = mouseMove;
+ initEventQueue();
+ oldMouseState = 0;
+ oldKeyMessage = 0;
+ memset(keyUpMsg,0,sizeof(keyUpMsg));
+
+ // TODO: OS/2 PM specific initialisation code!
+
+ /* Catch program termination signals so we can clean up properly */
+ signal(SIGABRT, _EVT_abort);
+ signal(SIGFPE, _EVT_abort);
+ signal(SIGINT, _EVT_abort);
+}
+
+/****************************************************************************
+REMARKS
+Changes the range of coordinates returned by the mouse functions to the
+specified range of values. This is used when changing between graphics
+modes set the range of mouse coordinates for the new display mode.
+****************************************************************************/
+void EVTAPI EVT_setMouseRange(
+ int xRes,
+ int yRes)
+{
+ rangeX = xRes;
+ rangeY = yRes;
+}
+
+/****************************************************************************
+REMARKS:
+Initiailises the internal event handling modules. The EVT_suspend function
+can be called to suspend event handling (such as when shelling out to DOS),
+and this function can be used to resume it again later.
+****************************************************************************/
+void EVT_resume(void)
+{
+ // Do nothing for OS/2
+}
+
+/****************************************************************************
+REMARKS
+Suspends all of our event handling operations. This is also used to
+de-install the event handling code.
+****************************************************************************/
+void EVT_suspend(void)
+{
+ // Do nothing for OS/2
+}
+
+/****************************************************************************
+REMARKS
+Exits the event module for program terminatation.
+****************************************************************************/
+void EVT_exit(void)
+{
+ /* Restore signal handlers */
+ signal(SIGABRT, SIG_DFL);
+ signal(SIGFPE, SIG_DFL);
+ signal(SIGINT, SIG_DFL);
+
+ // TODO: OS/2 PM specific exit code
+}
+
+/****************************************************************************
+REMARKS
+Modifes the mouse coordinates as necessary if scaling to OS coordinates,
+and sets the OS mouse cursor position.
+****************************************************************************/
+#define _EVT_setMousePos(x,y)
diff --git a/board/MAI/bios_emulator/scitech/src/pm/os2pm/oshdr.h b/board/MAI/bios_emulator/scitech/src/pm/os2pm/oshdr.h
new file mode 100644
index 00000000000..0b69f8222cc
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/pm/os2pm/oshdr.h
@@ -0,0 +1,36 @@
+/****************************************************************************
+*
+* SciTech OS Portability Manager Library
+*
+* ========================================================================
+*
+* The contents of this file are subject to the SciTech MGL Public
+* License Version 1.0 (the "License"); you may not use this file
+* except in compliance with the License. You may obtain a copy of
+* the License at http://www.scitechsoft.com/mgl-license.txt
+*
+* Software distributed under the License is distributed on an
+* "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+* implied. See the License for the specific language governing
+* rights and limitations under the License.
+*
+* The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+*
+* The Initial Developer of the Original Code is SciTech Software, Inc.
+* All Rights Reserved.
+*
+* ========================================================================
+*
+* Language: ANSI C
+* Environment: 32-bit OS/2
+*
+* Description: Include file to include all OS specific header files.
+*
+****************************************************************************/
+
+#define INCL_DOSERRORS
+#define INCL_DOS
+#define INCL_SUB
+#define INCL_VIO
+#define INCL_KBD
+#include <os2.h>
diff --git a/board/MAI/bios_emulator/scitech/src/pm/oshdr.h b/board/MAI/bios_emulator/scitech/src/pm/oshdr.h
new file mode 100644
index 00000000000..404e5c93c5e
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/pm/oshdr.h
@@ -0,0 +1,70 @@
+/****************************************************************************
+*
+* SciTech OS Portability Manager Library
+*
+* ========================================================================
+*
+* The contents of this file are subject to the SciTech MGL Public
+* License Version 1.0 (the "License"); you may not use this file
+* except in compliance with the License. You may obtain a copy of
+* the License at http://www.scitechsoft.com/mgl-license.txt
+*
+* Software distributed under the License is distributed on an
+* "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+* implied. See the License for the specific language governing
+* rights and limitations under the License.
+*
+* The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+*
+* The Initial Developer of the Original Code is SciTech Software, Inc.
+* All Rights Reserved.
+*
+* ========================================================================
+*
+* Language: ANSI C
+* Environment: Any
+*
+* Description: Header file to pull in OS specific headers for the target
+* OS environment.
+*
+****************************************************************************/
+
+#if defined(__SMX32__)
+#include "smx/oshdr.h"
+#elif defined(__RTTARGET__)
+#include "rttarget/oshdr.h"
+#elif defined(__REALDOS__)
+#include "dos/oshdr.h"
+#elif defined(__WIN32_VXD__)
+#include "vxd/oshdr.h"
+#elif defined(__NT_DRIVER__)
+#include "ntdrv/oshdr.h"
+#elif defined(__WINDOWS32__)
+#include "win32/oshdr.h"
+#elif defined(__OS2_VDD__)
+#include "vxd/oshdr.h"
+#elif defined(__OS2__)
+#if defined(__OS2_PM__)
+#include "os2pm/oshdr.h"
+#else
+#include "os2/oshdr.h"
+#endif
+#elif defined(__LINUX__)
+#if defined(__USE_X11__)
+#include "x11/oshdr.h"
+#else
+#include "linux/oshdr.h"
+#endif
+#elif defined(__QNX__)
+#if defined(__USE_PHOTON__)
+#include "photon/oshdr.h"
+#elif defined(__USE_X11__)
+#include "x11/oshdr.h"
+#else
+#include "qnx/oshdr.h"
+#endif
+#elif defined(__BEOS__)
+#include "beos/oshdr.h"
+#else
+#error PM library not ported to this platform yet!
+#endif
diff --git a/board/MAI/bios_emulator/scitech/src/pm/photon/event.c b/board/MAI/bios_emulator/scitech/src/pm/photon/event.c
new file mode 100644
index 00000000000..738dfea3795
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/pm/photon/event.c
@@ -0,0 +1,268 @@
+/****************************************************************************
+*
+* SciTech Multi-platform Graphics Library
+*
+* ========================================================================
+*
+* The contents of this file are subject to the SciTech MGL Public
+* License Version 1.0 (the "License"); you may not use this file
+* except in compliance with the License. You may obtain a copy of
+* the License at http://www.scitechsoft.com/mgl-license.txt
+*
+* Software distributed under the License is distributed on an
+* "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+* implied. See the License for the specific language governing
+* rights and limitations under the License.
+*
+* The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+*
+* The Initial Developer of the Original Code is SciTech Software, Inc.
+* All Rights Reserved.
+*
+* ========================================================================
+*
+* Language: ANSI C
+* Environment: QNX Photon GUI
+*
+* Description: QNX fullscreen console implementation for the SciTech
+* cross platform event library.
+*
+****************************************************************************/
+
+/*--------------------------- Global variables ----------------------------*/
+
+static ushort keyUpMsg[256] = {0};/* Table of key up messages */
+
+/*---------------------------- Implementation -----------------------------*/
+
+/* These are not used under Linux */
+#define _EVT_disableInt() 1
+#define _EVT_restoreInt(flags)
+
+/****************************************************************************
+PARAMETERS:
+scanCode - Scan code to test
+
+REMARKS:
+This macro determines if a specified key is currently down at the
+time that the call is made.
+****************************************************************************/
+static ibool _EVT_isKeyDown(
+ uchar scancode)
+{
+ return (KeyState[(scancode & 0xf8) >> 3] & (1 << (scancode & 0x7)) ?
+ true : false);
+}
+
+/****************************************************************************
+REMARKS:
+Retrieves all events from the mouse/keyboard event queue and stuffs them
+into the MGL event queue for further processing.
+****************************************************************************/
+static void _EVT_pumpMessages(void)
+{
+ int pid;
+ uint msg, but_stat, message;
+ uchar evt[sizeof (PhEvent_t) + 1024];
+ PhEvent_t *event = (void *)evt;
+ PhKeyEvent_t *key;
+ PhPointerEvent_t *mouse;
+ static int extended;
+ event_t _evt;
+
+ while (count < EVENTQSIZE) {
+ uint mods = 0, keyp = 0;
+
+ pid = Creceive(0, &msg, sizeof (msg));
+
+ if (pid == -1)
+ return;
+
+ if (PhEventRead(pid, event, sizeof (evt)) == Ph_EVENT_MSG) {
+ memset(&evt, 0, sizeof (evt));
+ if (event->type == Ph_EV_KEY) {
+ key = PhGetData(event);
+
+ if (key->key_flags & KEY_SCAN_VALID) {
+ keyp = key->key_scan;
+ if (key->key_flags & KEY_DOWN)
+ KeyState[(keyp & 0xf800) >> 11]
+ |= 1 << ((keyp & 0x700) >> 8);
+ else
+ KeyState[(keyp & 0xf800) >> 11]
+ &= ~(1 << ((keyp & 0x700) >> 8));
+ }
+ if ((key->key_flags & KEY_SYM_VALID) || extended)
+ keyp |= key->key_sym;
+
+ /* No way to tell left from right... */
+ if (key->key_mods & KEYMOD_SHIFT)
+ mods = (EVT_LEFTSHIFT | EVT_RIGHTSHIFT);
+ if (key->key_mods & KEYMOD_CTRL)
+ mods |= (EVT_CTRLSTATE | EVT_LEFTCTRL);
+ if (key->key_mods & KEYMOD_ALT)
+ mods |= (EVT_ALTSTATE | EVT_LEFTALT);
+
+ _evt.when = evt->timestamp;
+ if (key->key_flags & KEY_REPEAT) {
+ _evt.what = EVT_KEYREPEAT;
+ _evt.message = 0x10000;
+ }
+ else if (key->key_flags & KEY_DOWN)
+ _evt.what = EVT_KEYDOWN;
+ else
+ _evt.what = EVT_KEYUP;
+ _evt.modifiers = mods;
+ _evt.message |= keyp;
+
+ addEvent(&_evt);
+
+ switch(key->key_scan & 0xff00) {
+ case 0xe000:
+ extended = 1;
+ break;
+ case 0xe001:
+ extended = 2;
+ break;
+ default:
+ if (extended)
+ extended--;
+ }
+ }
+ else if (event->type & Ph_EV_PTR_ALL) {
+ but_stat = message = 0;
+ mouse = PhGetData(event);
+
+ if (mouse->button_state & Ph_BUTTON_3)
+ but_stat = EVT_LEFTBUT;
+ if (mouse->buttons & Ph_BUTTON_3)
+ message = EVT_LEFTBMASK;
+
+ if (mouse->button_state & Ph_BUTTON_1)
+ but_stat |= EVT_RIGHTBUT;
+ if (mouse->buttons & Ph_BUTTON_1)
+ message |= EVT_RIGHTBMASK;
+
+ _evt.when = evt->timestamp;
+ if (event->type & Ph_EV_PTR_MOTION) {
+ _evt.what = EVT_MOUSEMOVE;
+ _evt.where_x = mouse->pos.x;
+ _evt.where_y = mouse->pos.y;
+ _evt.modifiers = but_stat;
+ addEvent(&_evt);
+ }
+ if (event->type & Ph_EV_BUT_PRESS)
+ _evt.what = EVT_MOUSEDOWN;
+ else
+ _evt.what = EVT_MOUSEUP;
+ _evt.where_x = mouse->pos.x;
+ _evt.where_y = mouse->pos.y;
+ _evt.modifiers = but_stat;
+ _evt.message = message;
+ addEvent(&_evt);
+ }
+ }
+ else
+ return;
+ }
+}
+
+/****************************************************************************
+REMARKS:
+This macro/function is used to converts the scan codes reported by the
+keyboard to our event libraries normalised format. We only have one scan
+code for the 'A' key, and use shift modifiers to determine if it is a
+Ctrl-F1, Alt-F1 etc. The raw scan codes from the keyboard work this way,
+but the OS gives us 'cooked' scan codes, we have to translate them back
+to the raw format.
+****************************************************************************/
+#define _EVT_maskKeyCode(evt)
+
+/****************************************************************************
+REMARKS:
+Safely abort the event module upon catching a fatal error.
+****************************************************************************/
+void _EVT_abort(
+ int signo)
+{
+ char buf[80];
+
+ EVT_exit();
+ sprintf(buf,"Terminating on signal %d",signo);
+ PM_fatalError(buf);
+}
+
+/****************************************************************************
+PARAMETERS:
+mouseMove - Callback function to call wheneve the mouse needs to be moved
+
+REMARKS:
+Initiliase the event handling module. Here we install our mouse handling ISR
+to be called whenever any button's are pressed or released. We also build
+the free list of events in the event queue.
+
+We use handler number 2 of the mouse libraries interrupt handlers for our
+event handling routines.
+****************************************************************************/
+void EVTAPI EVT_init(
+ _EVT_mouseMoveHandler mouseMove)
+{
+ int i;
+
+ /* Initialise the event queue */
+ _mouseMove = mouseMove;
+ initEventQueue();
+ memset((void *)KeyState, 0, sizeof (KeyState));
+
+ /* Catch program termination signals so we can clean up properly */
+ signal(SIGABRT, _EVT_abort);
+ signal(SIGFPE, _EVT_abort);
+ signal(SIGINT, _EVT_abort);
+}
+
+/****************************************************************************
+REMARKS
+Changes the range of coordinates returned by the mouse functions to the
+specified range of values. This is used when changing between graphics
+modes set the range of mouse coordinates for the new display mode.
+****************************************************************************/
+void EVTAPI EVT_setMouseRange(
+ int xRes,
+ int yRes)
+{
+ // TODO: Need to call Input to change the coordinates that it returns
+ // for mouse events!!
+}
+
+/****************************************************************************
+REMARKS:
+Initiailises the internal event handling modules. The EVT_suspend function
+can be called to suspend event handling (such as when shelling out to DOS),
+and this function can be used to resume it again later.
+****************************************************************************/
+void EVT_resume(void)
+{
+ // Do nothing for Photon
+}
+
+/****************************************************************************
+REMARKS
+Suspends all of our event handling operations. This is also used to
+de-install the event handling code.
+****************************************************************************/
+void EVT_suspend(void)
+{
+ // Do nothing for Photon
+}
+
+/****************************************************************************
+REMARKS
+Exits the event module for program terminatation.
+****************************************************************************/
+void EVT_exit(void)
+{
+ /* Restore signal handlers */
+ signal(SIGABRT, SIG_DFL);
+ signal(SIGFPE, SIG_DFL);
+ signal(SIGINT, SIG_DFL);
+}
diff --git a/board/MAI/bios_emulator/scitech/src/pm/photon/oshdr.h b/board/MAI/bios_emulator/scitech/src/pm/photon/oshdr.h
new file mode 100644
index 00000000000..3c72563de23
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/pm/photon/oshdr.h
@@ -0,0 +1,38 @@
+/****************************************************************************
+*
+* SciTech Multi-platform Graphics Library
+*
+* ========================================================================
+*
+* The contents of this file are subject to the SciTech MGL Public
+* License Version 1.0 (the "License"); you may not use this file
+* except in compliance with the License. You may obtain a copy of
+* the License at http://www.scitechsoft.com/mgl-license.txt
+*
+* Software distributed under the License is distributed on an
+* "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+* implied. See the License for the specific language governing
+* rights and limitations under the License.
+*
+* The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+*
+* The Initial Developer of the Original Code is SciTech Software, Inc.
+* All Rights Reserved.
+*
+* ========================================================================
+*
+* Language: ANSI C
+* Environment: QNX Photon GUI
+*
+* Description: Include file to include all OS specific header files.
+*
+****************************************************************************/
+
+#include <sys/mouse.h>
+#include <sys/keyboard.h>
+#include <sys/fd.h>
+#include <sys/stat.h>
+#include <conio.h>
+#include <process.h>
+#include <sys/kernel.h>
+#include <Ph.h>
diff --git a/board/MAI/bios_emulator/scitech/src/pm/pm.vpw b/board/MAI/bios_emulator/scitech/src/pm/pm.vpw
new file mode 100644
index 00000000000..26e68a7a3af
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/pm/pm.vpw
@@ -0,0 +1,43 @@
+[Dependencies]
+[CurrentProject]
+curproj=pmlinux.vpj
+[ProjectFiles]
+pmcommon.vpj
+pmdos.vpj
+pmlinux.vpj
+pmqnx.vpj
+pmvxd.vpj
+pmwin32.vpj
+z_samples.vpj
+..\a-global includes.vpj
+[TreeExpansion]
+"..\a-global includes.vpj" 0
+pmcommon.vpj 0
+pmdos.vpj 0
+pmlinux.vpj 0
+pmqnx.vpj 0
+pmvxd.vpj 0
+pmwin32.vpj 0
+z_samples.vpj 1 1
+[State]
+SCREEN: 1280 1024 0 0 960 746 0 0 M 0 0 0 0 977 631
+CWD: C:\scitech\src\pm
+FILEHIST: 9
+C:\scitech\makedefs\gcc_win32.mk
+C:\scitech\bin\gcc2-w32.bat
+C:\scitech\bin\gcc2-c32.bat
+C:\scitech\bin\gcc2-linux.bat
+C:\scitech\makedefs\gcc_linux.mk
+C:\scitech\src\pm\linux\event.c
+C:\scitech\src\pm\linux\oshdr.h
+C:\scitech\src\pm\event.c
+C:\scitech\src\pm\pmlinux.vpj
+[ProjectDates]
+pmcommon.vpj=20010517164335290
+pmdos.vpj=20010517164335290
+pmlinux.vpj=20010620175829812
+pmqnx.vpj=20010517164335290
+pmvxd.vpj=20010517164335306
+pmwin32.vpj=20010517164335306
+z_samples.vpj=20010517164335306
+..\a-global includes.vpj=20010517164334978
diff --git a/board/MAI/bios_emulator/scitech/src/pm/pmcommon.vpj b/board/MAI/bios_emulator/scitech/src/pm/pmcommon.vpj
new file mode 100644
index 00000000000..48b872d9817
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/pm/pmcommon.vpj
@@ -0,0 +1,45 @@
+[COMPILER]
+version=5.0b
+MACRO=\n
+activeconfig=,wc10-d32
+FILTERNAME=Source Files\nInclude Files\nAssembler Files\nOther Files\n
+FILTERPATTERN=*.c;*.cpp;*.cxx;*.prg;*.pas;*.dpr;*.bas;*.java;*.sc;*.e;*.cob;*.html;*.rc\n*.h\n*.asm\n*.*\n
+FILTERASSOCIATEFILETYPES=0 0 0 0
+FILTERAPPCOMMAND=\n\n\n\n
+vcsproject=SCC:Perforce SCM://depot
+vcslocalpath=SCC:Perforce SCM:c:\
+compile=concur|capture|hide|:Compile:&Compile,
+make=concur|capture|hide|clear|saveall|:Build:&Build,
+rebuild=concur|capture|hide|clear|saveall|:Rebuild:&Rebuild,
+debug=concur|capture|hide|savenone|:Debug:&Debug,
+execute=hide|savenone|:Execute:E&xecute,
+user1=hide|:User 1:User 1,
+user2=hide|:User 2:User 2,
+workingdir=.
+includedirs=%(SCITECH)\include;%(PRIVATE)\include
+reffile=
+[FILES]
+common.c
+cpuinfo.c
+debug.c
+event.c
+makefile
+oshdr.h
+ztimer.c
+..\common\agplib.c
+codepage\us_eng.c
+common\_cpuinfo.asm
+common\_dma.asm
+common\_int64.asm
+common\_joy.asm
+common\_mtrr.asm
+common\_pcilib.asm
+common\agp.c
+common\keyboard.c
+common\malloc.c
+common\mtrr.c
+common\pcilib.c
+common\unixio.c
+common\vgastate.c
+[ASSOCIATION]
+[CONFIGURATIONS]
diff --git a/board/MAI/bios_emulator/scitech/src/pm/pmdos.vpj b/board/MAI/bios_emulator/scitech/src/pm/pmdos.vpj
new file mode 100644
index 00000000000..1157513b30e
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/pm/pmdos.vpj
@@ -0,0 +1,41 @@
+[SciTech]
+compiler=wc10-
+targetos=d32
+[COMPILER]
+version=5.0b
+MACRO=enable_current_compiler\n
+activeconfig=,TEST_HARNESS=1
+FILTERNAME=Source Files\nInclude Files\nAssembler Files\n
+FILTERPATTERN=*.c;*.cpp;*.cxx;*.prg;*.pas;*.dpr;*.bas;*.java;*.sc;*.e;*.cob;*.html;*.rc\n*.h\n*.asm\n
+FILTERASSOCIATEFILETYPES=0 0 0
+FILTERAPPCOMMAND=\n\n\n
+vcsproject=SCC:Perforce SCM://depot
+vcslocalpath=SCC:Perforce SCM:c:\
+compile=concur|capture|clear|:Compile:&Compile,dmake %n.obj -u %b
+make=concur|capture|clear|saveall|:Build:&Build,dmake install %b
+rebuild=concur|capture|clear|saveall|:Rebuild:&Rebuild,dmake cleanexe & dmake install -u %b
+debug=concur|capture|hide|savenone|:Debug:&Debug,
+execute=hide|savenone|nochangedir|:Execute:E&xecute,
+user1=hide|:User 1:User 1,
+user2=hide|:User 2:User 2,
+usertool_clean_directory=concur|capture|hide|savenone|nochangedir|:Clean Directory:C&lean Directory,dmake cleanexe
+workingdir=.
+includedirs=%(SCITECH)\include;%(PRIVATE)\include
+reffile=
+[FILES]
+dos\_event.asm
+dos\_lztimer.asm
+dos\_pm.asm
+dos\_pmdos.asm
+dos\_vflat.asm
+dos\cpuinfo.c
+dos\event.c
+dos\oshdr.h
+dos\pm.c
+dos\pmdos.c
+dos\vflat.c
+dos\ztimer.c
+[ASSOCIATION]
+[CONFIGURATIONS]
+config=,NORMAL_BUILD=1
+config=,TEST_HARNESS=1
diff --git a/board/MAI/bios_emulator/scitech/src/pm/pmlinux.vpj b/board/MAI/bios_emulator/scitech/src/pm/pmlinux.vpj
new file mode 100644
index 00000000000..0bfbf8446a5
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/pm/pmlinux.vpj
@@ -0,0 +1,35 @@
+[SciTech]
+compiler=gcc2-
+targetos=linux
+[COMPILER]
+version=5.0b
+MACRO=enable_current_compiler\n
+FILTERNAME=Source Files\nInclude Files\nAssembler Files\n
+FILTERPATTERN=*.c;*.cpp;*.cxx;*.prg;*.pas;*.dpr;*.bas;*.java;*.sc;*.e;*.cob;*.html;*.rc\n*.h\n*.asm\n
+FILTERASSOCIATEFILETYPES=0 0 0
+FILTERAPPCOMMAND=\n\n\n
+vcsproject=SCC:Perforce SCM://depot
+vcslocalpath=SCC:Perforce SCM:c:\
+activeconfig=,install BUILD_DLL=1
+compile=concur|capture|clear|:Compile:&Compile,dmake %n.o -u
+make=concur|capture|clear|saveall|:Build:&Build,dmake %b
+rebuild=concur|capture|clear|saveall|:Rebuild:&Rebuild,dmake cleanexe & dmake -u %b
+debug=concur|capture|hide|savenone|:Debug:&Debug,
+execute=hide|savenone|nochangedir|:Execute:E&xecute,
+user1=hide|:User 1:User 1,
+user2=hide|:User 2:User 2,
+usertool_clean_directory=concur|capture|hide|savenone|nochangedir|:Clean Directory:C&lean Directory,dmake cleanexe
+workingdir=.
+includedirs=%(SCITECH)\include;%(PRIVATE)\include
+reffile=
+[FILES]
+linux\cpuinfo.c
+linux\event.c
+linux\oshdr.h
+linux\pm.c
+linux\vflat.c
+linux\ztimer.c
+[ASSOCIATION]
+[CONFIGURATIONS]
+config=,install BUILD_DLL=1
+config=,install
diff --git a/board/MAI/bios_emulator/scitech/src/pm/pmntdrv.vpj b/board/MAI/bios_emulator/scitech/src/pm/pmntdrv.vpj
new file mode 100644
index 00000000000..3ec35a76e48
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/pm/pmntdrv.vpj
@@ -0,0 +1,39 @@
+[SciTech]
+compiler=vc60-
+targetos=drvw2k
+[COMPILER]
+version=5.0b
+MACRO=enable_current_compiler\n
+activeconfig=,wc10-d32
+FILTERNAME=Source Files\nInclude Files\nAssembler Files\n
+FILTERPATTERN=*.c;*.cpp;*.cxx;*.prg;*.pas;*.dpr;*.bas;*.java;*.sc;*.e;*.cob;*.html;*.rc\n*.h\n*.asm\n
+FILTERASSOCIATEFILETYPES=0 0 0
+FILTERAPPCOMMAND=\n\n\n
+vcsproject=SCC:Perforce SCM://depot
+vcslocalpath=SCC:Perforce SCM:c:\
+compile=concur|capture|:Compile:&Compile,dmake %n.obj
+make=concur|capture|clear|saveall|:Build:&Build,dmake install
+rebuild=concur|capture|clear|saveall|:Rebuild:&Rebuild,dmake cleanexe & dmake install -u
+debug=concur|capture|hide|savenone|:Debug:&Debug,
+execute=hide|savenone|nochangedir|:Execute:E&xecute,
+user1=hide|:User 1:User 1,
+user2=hide|:User 2:User 2,
+usertool_clean_directory=concur|capture|hide|savenone|:Clean Directory:&Clean Directory,dmake cleanexe
+workingdir=.
+includedirs=%(SCITECH)\include;%(PRIVATE)\include
+reffile=
+[FILES]
+..\..\include\ntdriver.h
+ntdrv\_pm.asm
+ntdrv\cpuinfo.c
+ntdrv\int86.c
+ntdrv\irq.c
+ntdrv\mem.c
+ntdrv\oshdr.h
+ntdrv\pm.c
+ntdrv\stdio.c
+ntdrv\stdlib.c
+ntdrv\vflat.c
+ntdrv\ztimer.c
+[ASSOCIATION]
+[CONFIGURATIONS]
diff --git a/board/MAI/bios_emulator/scitech/src/pm/pmqnx.vpj b/board/MAI/bios_emulator/scitech/src/pm/pmqnx.vpj
new file mode 100644
index 00000000000..d54170252c4
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/pm/pmqnx.vpj
@@ -0,0 +1,35 @@
+[SciTech]
+compiler=wc10-
+targetos=qnx
+[COMPILER]
+version=5.0b
+MACRO=enable_current_compiler\n
+activeconfig=,wc10-d32
+FILTERNAME=Source Files\nInclude Files\nAssembler Files\n
+FILTERPATTERN=*.c;*.cpp;*.cxx;*.prg;*.pas;*.dpr;*.bas;*.java;*.sc;*.e;*.cob;*.html;*.rc\n*.h\n*.asm\n
+FILTERASSOCIATEFILETYPES=0 0 0
+FILTERAPPCOMMAND=\n\n\n
+vcsproject=SCC:Perforce SCM://depot
+vcslocalpath=SCC:Perforce SCM:c:\
+compile=concur|capture|clear|:Compile:&Compile,dmake %n.obj
+make=concur|capture|clear|saveall|:Build:&Build,dmake install
+rebuild=concur|capture|clear|saveall|:Rebuild:&Rebuild,dmake cleanexe & dmake install -u
+debug=concur|capture|hide|savenone|:Debug:&Debug,
+execute=hide|savenone|nochangedir|:Execute:E&xecute,
+user1=hide|:User 1:User 1,
+user2=hide|:User 2:User 2,
+usertool_clean_directory=concur|capture|hide|savenone|nochangedir|:Clean Directory:C&lean Directory,dmake cleanexe
+workingdir=.
+includedirs=%(SCITECH)\include;%(PRIVATE)\include
+reffile=
+[FILES]
+qnx\_mtrrqnx.asm
+qnx\cpuinfo.c
+qnx\event.c
+qnx\mtrrqnx.c
+qnx\oshdr.h
+qnx\pm.c
+qnx\vflat.c
+qnx\ztimer.c
+[ASSOCIATION]
+[CONFIGURATIONS]
diff --git a/board/MAI/bios_emulator/scitech/src/pm/pmvxd.vpj b/board/MAI/bios_emulator/scitech/src/pm/pmvxd.vpj
new file mode 100644
index 00000000000..1fcf911769b
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/pm/pmvxd.vpj
@@ -0,0 +1,34 @@
+[SciTech]
+compiler=bc50-
+targetos=vxd
+[COMPILER]
+version=5.0b
+MACRO=enable_current_compiler\n
+activeconfig=,wc10-d32
+FILTERNAME=Source Files\nInclude Files\nAssembler Files\n
+FILTERPATTERN=*.c;*.cpp;*.cxx;*.prg;*.pas;*.dpr;*.bas;*.java;*.sc;*.e;*.cob;*.html;*.rc\n*.h\n*.asm\n
+FILTERASSOCIATEFILETYPES=0 0 0
+FILTERAPPCOMMAND=\n\n\n
+vcsproject=SCC:Perforce SCM://depot
+vcslocalpath=SCC:Perforce SCM:c:\
+compile=concur|capture|nochangedir|:Compile:&Compile,dmake %n.obj
+make=concur|capture|clear|saveall|nochangedir|:Build:&Build,dmake install
+rebuild=concur|capture|clear|saveall|nochangedir|:Rebuild:&Rebuild,dmake cleanexe & dmake install -u
+debug=concur|capture|hide|savenone|nochangedir|:Debug:&Debug,
+execute=hide|savenone|nochangedir|:Execute:E&xecute,
+user1=hide|:User 1:User 1,
+user2=hide|:User 2:User 2,
+usertool_clean_directory=concur|capture|hide|savenone|nochangedir|:Clean Directory:&Clean Directory,dmake cleanexe
+workingdir=.
+includedirs=%(SCITECH)\include;%(PRIVATE)\include
+reffile=
+[FILES]
+vxd\_pm.asm
+vxd\cpuinfo.c
+vxd\fileio.c
+vxd\oshdr.h
+vxd\pm.c
+vxd\vflat.c
+vxd\ztimer.c
+[ASSOCIATION]
+[CONFIGURATIONS]
diff --git a/board/MAI/bios_emulator/scitech/src/pm/pmwin32.vpj b/board/MAI/bios_emulator/scitech/src/pm/pmwin32.vpj
new file mode 100644
index 00000000000..ace682208c6
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/pm/pmwin32.vpj
@@ -0,0 +1,35 @@
+[SciTech]
+compiler=vc60-
+targetos=c32
+[COMPILER]
+version=5.0b
+MACRO=enable_current_compiler\n
+activeconfig=,wc10-d32
+FILTERNAME=Source Files\nInclude Files\nAssembler Files\n
+FILTERPATTERN=*.c;*.cpp;*.cxx;*.prg;*.pas;*.dpr;*.bas;*.java;*.sc;*.e;*.cob;*.html;*.rc\n*.h\n*.asm\n
+FILTERASSOCIATEFILETYPES=0 0 0
+FILTERAPPCOMMAND=\n\n\n
+vcsproject=SCC:Perforce SCM://depot
+vcslocalpath=SCC:Perforce SCM:c:\
+compile=concur|capture|:Compile:&Compile,dmake %n.obj
+make=concur|capture|clear|saveall|:Build:&Build,dmake install
+rebuild=concur|capture|clear|saveall|:Rebuild:&Rebuild,dmake cleanexe & dmake install -u
+debug=concur|capture|hide|savenone|:Debug:&Debug,
+execute=hide|savenone|nochangedir|:Execute:E&xecute,
+user1=hide|:User 1:User 1,
+user2=hide|:User 2:User 2,
+usertool_clean_directory=concur|capture|savenone|:Clean Directory:&Clean Directory,dmake cleanexe
+workingdir=.
+includedirs=%(SCITECH)\include;%(PRIVATE)\include
+reffile=
+[FILES]
+win32\_pmwin32.asm
+win32\cpuinfo.c
+win32\ddraw.c
+win32\event.c
+win32\oshdr.h
+win32\pm.c
+win32\vflat.c
+win32\ztimer.c
+[ASSOCIATION]
+[CONFIGURATIONS]
diff --git a/board/MAI/bios_emulator/scitech/src/pm/qnx/_mtrrqnx.asm b/board/MAI/bios_emulator/scitech/src/pm/qnx/_mtrrqnx.asm
new file mode 100644
index 00000000000..5a3fe105ec2
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/pm/qnx/_mtrrqnx.asm
@@ -0,0 +1,226 @@
+;****************************************************************************
+;*
+;* SciTech OS Portability Manager Library
+;*
+;* ========================================================================
+;*
+;* The contents of this file are subject to the SciTech MGL Public
+;* License Version 1.0 (the "License"); you may not use this file
+;* except in compliance with the License. You may obtain a copy of
+;* the License at http://www.scitechsoft.com/mgl-license.txt
+;*
+;* Software distributed under the License is distributed on an
+;* "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+;* implied. See the License for the specific language governing
+;* rights and limitations under the License.
+;*
+;* The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+;*
+;* The Initial Developer of the Original Code is SciTech Software, Inc.
+;* All Rights Reserved.
+;*
+;* ========================================================================
+;*
+;* Language: NASM
+;* Environment: QNX
+;*
+;* Description: Assembler support routines for the Memory Type Range Register
+;* (MTRR) module for QNX.
+;*
+;****************************************************************************
+
+ IDEAL
+
+include "scitech.mac" ; Memory model macros
+
+header _mtrrqnx ; Set up memory model
+
+begdataseg _mtrrqnx ; Start of code segment
+
+ifdef USE_NASM
+%define R0_FLUSH_TLB 0
+%define R0_SAVE_CR4 1
+%define R0_RESTORE_CR4 2
+%define R0_READ_MSR 3
+%define R0_WRITE_MSR 4
+else
+R0_FLUSH_TLB EQU 0
+R0_SAVE_CR4 EQU 1
+R0_RESTORE_CR4 EQU 2
+R0_READ_MSR EQU 3
+R0_WRITE_MSR EQU 4
+endif
+
+cpublic _PM_R0
+_PM_R0_service dd 0
+_PM_R0_reg dd 0
+_PM_R0_eax dd 0
+_PM_R0_edx dd 0
+
+enddataseg _mtrrqnx ; Start of code segment
+
+begcodeseg _mtrrqnx ; Start of code segment
+
+P586
+
+;----------------------------------------------------------------------------
+; ulong _MTRR_disableInt(void);
+;----------------------------------------------------------------------------
+; Return processor interrupt status and disable interrupts.
+;----------------------------------------------------------------------------
+cprocstart _MTRR_disableInt
+
+ pushfd ; Put flag word on stack
+; cli ; Disable interrupts!
+ pop eax ; deposit flag word in return register
+ ret
+
+cprocend
+
+;----------------------------------------------------------------------------
+; void _MTRR_restoreInt(ulong ps);
+;----------------------------------------------------------------------------
+; Restore processor interrupt status.
+;----------------------------------------------------------------------------
+cprocstart _MTRR_restoreInt
+
+ ARG ps:ULONG
+
+ push ebp
+ mov ebp,esp ; Set up stack frame
+ push [ULONG ps]
+ popfd ; Restore processor status (and interrupts)
+ pop ebp
+ ret
+
+cprocend
+
+;----------------------------------------------------------------------------
+; uchar _MTRR_getCx86(uchar reg);
+;----------------------------------------------------------------------------
+; Read a Cyrix CPU indexed register
+;----------------------------------------------------------------------------
+cprocstart _MTRR_getCx86
+
+ ARG reg:UCHAR
+
+ enter_c
+ mov al,[reg]
+ out 22h,al
+ in al,23h
+ leave_c
+ ret
+
+cprocend
+
+;----------------------------------------------------------------------------
+; uchar _MTRR_setCx86(uchar reg,uchar val);
+;----------------------------------------------------------------------------
+; Write a Cyrix CPU indexed register
+;----------------------------------------------------------------------------
+cprocstart _MTRR_setCx86
+
+ ARG reg:UCHAR, val:UCHAR
+
+ enter_c
+ mov al,[reg]
+ out 22h,al
+ mov al,[val]
+ out 23h,al
+ leave_c
+ ret
+
+cprocend
+
+;----------------------------------------------------------------------------
+; ulong _PM_ring0_isr(void);
+;----------------------------------------------------------------------------
+; Ring 0 clock interrupt handler that we use to execute the MTRR support
+; code.
+;----------------------------------------------------------------------------
+cprocnear _PM_ring0_isr
+
+;--------------------------------------------------------
+; void PM_flushTLB(void);
+;--------------------------------------------------------
+ pushad
+ cmp [DWORD _PM_R0_service],R0_FLUSH_TLB
+ jne @@1
+ wbinvd ; Flush the CPU cache
+ mov eax,cr3
+ mov cr3,eax ; Flush the TLB
+ jmp @@Exit
+
+;--------------------------------------------------------
+; ulong _MTRR_saveCR4(void);
+;--------------------------------------------------------
+@@1: cmp [DWORD _PM_R0_service],R0_SAVE_CR4
+ jne @@2
+
+; Save value of CR4 and clear Page Global Enable (bit 7)
+
+ mov ebx,cr4
+ mov eax,ebx
+ and al,7Fh
+ mov cr4,eax
+
+; Disable and flush caches
+
+ mov eax,cr0
+ or eax,40000000h
+ wbinvd
+ mov cr0,eax
+ wbinvd
+
+; Return value from CR4
+
+ mov [_PM_R0_reg],ebx
+ jmp @@Exit
+
+;--------------------------------------------------------
+; void _MTRR_restoreCR4(ulong cr4Val)
+;--------------------------------------------------------
+@@2: cmp [DWORD _PM_R0_service],R0_RESTORE_CR4
+ jne @@3
+
+ mov eax,cr0
+ and eax,0BFFFFFFFh
+ mov cr0,eax
+ mov eax,[_PM_R0_reg]
+ mov cr4,eax
+ jmp @@Exit
+
+;--------------------------------------------------------
+; void _MTRR_readMSR(int reg, ulong FAR *eax, ulong FAR *edx);
+;--------------------------------------------------------
+@@3: cmp [DWORD _PM_R0_service],R0_READ_MSR
+ jne @@4
+
+ mov ecx,[_PM_R0_reg]
+ rdmsr
+ mov [_PM_R0_eax],eax
+ mov [_PM_R0_edx],edx
+ jmp @@Exit
+
+;--------------------------------------------------------
+; void _MTRR_writeMSR(int reg, ulong eax, ulong edx);
+;--------------------------------------------------------
+@@4: cmp [DWORD _PM_R0_service],R0_WRITE_MSR
+ jne @@Exit
+
+ mov ecx,[_PM_R0_reg]
+ mov eax,[_PM_R0_eax]
+ mov edx,[_PM_R0_edx]
+ wrmsr
+ jmp @@Exit
+
+@@Exit: mov [DWORD _PM_R0_service],-1
+ popad
+ mov eax,0
+ retf
+
+cprocend
+
+endcodeseg _mtrrqnx
+
+ END ; End of module
diff --git a/board/MAI/bios_emulator/scitech/src/pm/qnx/cpuinfo.c b/board/MAI/bios_emulator/scitech/src/pm/qnx/cpuinfo.c
new file mode 100644
index 00000000000..a8782542b20
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/pm/qnx/cpuinfo.c
@@ -0,0 +1,64 @@
+/****************************************************************************
+*
+* Ultra Long Period Timer
+*
+* ========================================================================
+*
+* The contents of this file are subject to the SciTech MGL Public
+* License Version 1.0 (the "License"); you may not use this file
+* except in compliance with the License. You may obtain a copy of
+* the License at http://www.scitechsoft.com/mgl-license.txt
+*
+* Software distributed under the License is distributed on an
+* "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+* implied. See the License for the specific language governing
+* rights and limitations under the License.
+*
+* The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+*
+* The Initial Developer of the Original Code is SciTech Software, Inc.
+* All Rights Reserved.
+*
+* ========================================================================
+*
+* Language: ANSI C
+* Environment: QNX
+*
+* Description: QNX specific code for the CPU detection module.
+*
+****************************************************************************/
+
+/*----------------------------- Implementation ----------------------------*/
+
+/****************************************************************************
+REMARKS:
+TODO: We should implement this for QNX!
+****************************************************************************/
+#define SetMaxThreadPriority() 0
+
+/****************************************************************************
+REMARKS:
+TODO: We should implement this for QNX!
+****************************************************************************/
+#define RestoreThreadPriority(i)
+
+/****************************************************************************
+REMARKS:
+Initialise the counter and return the frequency of the counter.
+****************************************************************************/
+static void GetCounterFrequency(
+ CPU_largeInteger *freq)
+{
+ freq->low = CLOCKS_PER_SEC * 1000;
+ freq->high = 0;
+}
+
+/****************************************************************************
+REMARKS:
+Read the counter and return the counter value.
+****************************************************************************/
+#define GetCounter(t) \
+{ \
+ (t)->low = clock() * 1000; \
+ (t)->high = 0; \
+}
diff --git a/board/MAI/bios_emulator/scitech/src/pm/qnx/event.c b/board/MAI/bios_emulator/scitech/src/pm/qnx/event.c
new file mode 100644
index 00000000000..e16f8a53928
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/pm/qnx/event.c
@@ -0,0 +1,602 @@
+/****************************************************************************
+*
+* SciTech Multi-platform Graphics Library
+*
+* ========================================================================
+*
+* The contents of this file are subject to the SciTech MGL Public
+* License Version 1.0 (the "License"); you may not use this file
+* except in compliance with the License. You may obtain a copy of
+* the License at http://www.scitechsoft.com/mgl-license.txt
+*
+* Software distributed under the License is distributed on an
+* "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+* implied. See the License for the specific language governing
+* rights and limitations under the License.
+*
+* The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+*
+* The Initial Developer of the Original Code is SciTech Software, Inc.
+* All Rights Reserved.
+*
+* ========================================================================
+*
+* Language: ANSI C
+* Environment: QNX
+*
+* Description: QNX fullscreen console implementation for the SciTech
+* cross platform event library.
+*
+****************************************************************************/
+
+#include <errno.h>
+#include <unistd.h>
+
+/*--------------------------- Global variables ----------------------------*/
+
+#ifndef __QNXNTO__
+static struct _mouse_ctrl *_PM_mouse_ctl;
+static int _PM_keyboard_fd = -1;
+//static int _PM_modifiers, _PM_leds;
+#else
+static int kbd_fd = -1, mouse_fd = -1;
+#endif
+static int kill_pid = 0;
+static ushort keyUpMsg[256] = {0};/* Table of key up messages */
+static int rangeX,rangeY; /* Range of mouse coordinates */
+
+#define TIME_TO_MSEC(__t) ((__t).tv_nsec / 1000000 + (__t).tv_sec * 1000)
+
+#define LED_NUM 1
+#define LED_CAP 2
+#define LED_SCR 4
+
+/* Scancode mappings on QNX for special keys */
+
+typedef struct {
+ int scan;
+ int map;
+ } keymap;
+
+// TODO: Fix this and set it up so we can do a binary search!
+
+keymap keymaps[] = {
+ {96, KB_padEnter},
+ {74, KB_padMinus},
+ {78, KB_padPlus},
+ {55, KB_padTimes},
+ {98, KB_padDivide},
+ {71, KB_padHome},
+ {72, KB_padUp},
+ {73, KB_padPageUp},
+ {75, KB_padLeft},
+ {76, KB_padCenter},
+ {77, KB_padRight},
+ {79, KB_padEnd},
+ {80, KB_padDown},
+ {81, KB_padPageDown},
+ {82, KB_padInsert},
+ {83, KB_padDelete},
+ {105,KB_left},
+ {108,KB_down},
+ {106,KB_right},
+ {103,KB_up},
+ {110,KB_insert},
+ {102,KB_home},
+ {104,KB_pageUp},
+ {111,KB_delete},
+ {107,KB_end},
+ {109,KB_pageDown},
+ {125,KB_leftWindows},
+ {126,KB_rightWindows},
+ {127,KB_menu},
+ {100,KB_rightAlt},
+ {97,KB_rightCtrl},
+ };
+
+/* And the keypad with num lock turned on (changes the ASCII code only) */
+
+keymap keypad[] = {
+ {71, ASCII_7},
+ {72, ASCII_8},
+ {73, ASCII_9},
+ {75, ASCII_4},
+ {76, ASCII_5},
+ {77, ASCII_6},
+ {79, ASCII_1},
+ {80, ASCII_2},
+ {81, ASCII_3},
+ {82, ASCII_0},
+ {83, ASCII_period},
+ };
+
+#define NB_KEYMAPS (sizeof(keymaps)/sizeof(keymaps[0]))
+#define NB_KEYPAD (sizeof(keypad)/sizeof(keypad[0]))
+
+/*---------------------------- Implementation -----------------------------*/
+
+/****************************************************************************
+REMARKS:
+Include generic raw scancode keyboard module.
+****************************************************************************/
+#include "common/keyboard.c"
+
+/* These are not used under QNX */
+#define _EVT_disableInt() 1
+#define _EVT_restoreInt(flags)
+
+/****************************************************************************
+REMARKS:
+This function is used to return the number of ticks since system
+startup in milliseconds. This should be the same value that is placed into
+the time stamp fields of events, and is used to implement auto mouse down
+events.
+****************************************************************************/
+ulong _EVT_getTicks(void)
+{
+ struct timespec t;
+ clock_gettime(CLOCK_REALTIME,&t);
+ return (t.tv_nsec / 1000000 + t.tv_sec * 1000);
+}
+
+/****************************************************************************
+REMARKS:
+Converts a mickey movement value to a pixel adjustment value.
+****************************************************************************/
+static int MickeyToPixel(
+ int mickey)
+{
+ // TODO: We can add some code in here to handle 'acceleration' for
+ // the mouse cursor. For now just use the mickeys.
+ return mickey;
+}
+
+#ifdef __QNXNTO__
+/****************************************************************************
+REMARKS:
+Retrieves all events from the mouse/keyboard event queue and stuffs them
+into the MGL event queue for further processing.
+****************************************************************************/
+static void _EVT_pumpMessages(void)
+{
+ int rc1, rc2;
+ struct _keyboard_packet key;
+ struct _mouse_packet ms;
+ static long old_buttons = 0;
+ uint message = 0, but_stat = 0, mods = 0;
+ event_t evt;
+
+ while (EVT.count < EVENTQSIZE) {
+ rc1 = read(kbd_fd, (void *)&key, sizeof(key));
+ if (rc1 == -1) {
+ if (errno == EAGAIN)
+ rc1 = 0;
+ else {
+ perror("getEvents");
+ PM_fatalError("Keyboard error");
+ }
+ }
+ if (rc1 > 0) {
+ memset(&evt, 0, sizeof(evt));
+ if (key.data.modifiers & KEYMOD_SHIFT)
+ mods |= EVT_LEFTSHIFT;
+ if (key.data.modifiers & KEYMOD_CTRL)
+ mods |= EVT_CTRLSTATE;
+ if (key.data.modifiers & KEYMOD_ALT)
+ mods |= EVT_ALTSTATE;
+
+ /* Now store the keyboard event data */
+ evt.when = TIME_TO_MSEC(key.time);
+ if (key.data.flags & KEY_SCAN_VALID)
+ evt.message |= (key.data.key_scan & 0x7F) << 8;
+ if ((key.data.flags & KEY_SYM_VALID) &&
+ (((key.data.key_sym & 0xff00) == 0xf000 &&
+ (key.data.key_sym & 0xff) < 0x20) ||
+ key.data.key_sym < 0x80))
+ evt.message |= (key.data.key_sym & 0xFF);
+ evt.modifiers = mods;
+ if (key.data.flags & KEY_DOWN) {
+ evt.what = EVT_KEYDOWN;
+ keyUpMsg[evt.message >> 8] = (ushort)evt.message;
+ }
+ else if (key.data.flags & KEY_REPEAT) {
+ evt.message |= 0x10000;
+ evt.what = EVT_KEYREPEAT;
+ }
+ else {
+ evt.what = EVT_KEYUP;
+ evt.message = keyUpMsg[evt.message >> 8];
+ if (evt.message == 0)
+ continue;
+ keyUpMsg[evt.message >> 8] = 0;
+ }
+
+ /* Now add the new event to the event queue */
+ addEvent(&evt);
+ }
+ rc2 = read(mouse_fd, (void *)&ms, sizeof (ms));
+ if (rc2 == -1) {
+ if (errno == EAGAIN)
+ rc2 = 0;
+ else {
+ perror("getEvents");
+ PM_fatalError("Mouse error");
+ }
+ }
+ if (rc2 > 0) {
+ memset(&evt, 0, sizeof(evt));
+ ms.hdr.buttons &=
+ (_POINTER_BUTTON_LEFT | _POINTER_BUTTON_RIGHT);
+ if (ms.hdr.buttons & _POINTER_BUTTON_LEFT)
+ but_stat = EVT_LEFTBUT;
+ if ((ms.hdr.buttons & _POINTER_BUTTON_LEFT) !=
+ (old_buttons & _POINTER_BUTTON_LEFT))
+ message = EVT_LEFTBMASK;
+ if (ms.hdr.buttons & _POINTER_BUTTON_RIGHT)
+ but_stat |= EVT_RIGHTBUT;
+ if ((ms.hdr.buttons & _POINTER_BUTTON_RIGHT) !=
+ (old_buttons & _POINTER_BUTTON_RIGHT))
+ message |= EVT_RIGHTBMASK;
+ if (ms.dx || ms.dy) {
+ ms.dy = -ms.dy;
+ EVT.mx += MickeyToPixel(ms.dx);
+ EVT.my += MickeyToPixel(ms.dy);
+ if (EVT.mx < 0) EVT.mx = 0;
+ if (EVT.my < 0) EVT.my = 0;
+ if (EVT.mx > rangeX) EVT.mx = rangeX;
+ if (EVT.my > rangeY) EVT.my = rangeY;
+ evt.what = EVT_MOUSEMOVE;
+ evt.when = TIME_TO_MSEC(ms.hdr.time);
+ evt.where_x = EVT.mx;
+ evt.where_y = EVT.my;
+ evt.relative_x = ms.dx;
+ evt.relative_y = ms.dy;
+ evt.modifiers = but_stat;
+ addEvent(&evt);
+ }
+ evt.what = ms.hdr.buttons < old_buttons ?
+ EVT_MOUSEUP : EVT_MOUSEDOWN;
+ evt.when = TIME_TO_MSEC(ms.hdr.time);
+ evt.where_x = EVT.mx;
+ evt.where_y = EVT.my;
+ evt.relative_x = ms.dx;
+ evt.relative_y = ms.dy;
+ evt.modifiers = but_stat;
+ evt.message = message;
+ if (ms.hdr.buttons != old_buttons) {
+ addEvent(&evt);
+ old_buttons = ms.hdr.buttons;
+ }
+ }
+ if (rc1 + rc2 == 0)
+ break;
+ }
+}
+#else
+/****************************************************************************
+REMARKS:
+Retrieves all events from the mouse/keyboard event queue and stuffs them
+into the MGL event queue for further processing.
+****************************************************************************/
+static void _EVT_pumpMessages(void)
+{
+ struct mouse_event ev;
+ int rc;
+ static long old_buttons = 0;
+ uint message = 0, but_stat = 0;
+ event_t evt;
+ char buf[32];
+ int numkeys, i;
+
+ /* Poll keyboard events */
+ while ((numkeys = read(_PM_keyboard_fd, buf, sizeof buf)) > 0) {
+ for (i = 0; i < numkeys; i++) {
+ processRawScanCode(buf[i]);
+ }
+ }
+
+ if (_PM_mouse_ctl == NULL)
+ return;
+
+ /* Gobble pending mouse events */
+ while (EVT.count < EVENTQSIZE) {
+ rc = mouse_read(_PM_mouse_ctl, &ev, 1, 0, NULL);
+ if (rc == -1) {
+ perror("getEvents");
+ PM_fatalError("Mouse error (Input terminated?)");
+ }
+ if (rc == 0)
+ break;
+
+ message = 0, but_stat = 0;
+ memset(&evt, 0, sizeof(evt));
+
+ ev.buttons &= (_MOUSE_LEFT | _MOUSE_RIGHT);
+ if (ev.buttons & _MOUSE_LEFT)
+ but_stat = EVT_LEFTBUT;
+ if ((ev.buttons & _MOUSE_LEFT) != (old_buttons & _MOUSE_LEFT))
+ message = EVT_LEFTBMASK;
+ if (ev.buttons & _MOUSE_RIGHT)
+ but_stat |= EVT_RIGHTBUT;
+ if ((ev.buttons & _MOUSE_RIGHT) != (old_buttons & _MOUSE_RIGHT))
+ message |= EVT_RIGHTBMASK;
+ if (ev.dx || ev.dy) {
+ ev.dy = -ev.dy;
+ EVT.mx += MickeyToPixel(ev.dx);
+ EVT.my += MickeyToPixel(ev.dy);
+ if (EVT.mx < 0) EVT.mx = 0;
+ if (EVT.my < 0) EVT.my = 0;
+ if (EVT.mx > rangeX) EVT.mx = rangeX;
+ if (EVT.my > rangeY) EVT.my = rangeY;
+ evt.what = EVT_MOUSEMOVE;
+ evt.when = ev.timestamp*100;
+ evt.where_x = EVT.mx;
+ evt.where_y = EVT.my;
+ evt.relative_x = ev.dx;
+ evt.relative_y = ev.dy;
+ evt.modifiers = but_stat;
+ addEvent(&evt);
+ }
+ evt.what = ev.buttons < old_buttons ? EVT_MOUSEUP : EVT_MOUSEDOWN;
+ evt.when = ev.timestamp*100;
+ evt.where_x = EVT.mx;
+ evt.where_y = EVT.my;
+ evt.relative_x = ev.dx;
+ evt.relative_y = ev.dy;
+ evt.modifiers = but_stat;
+ evt.message = message;
+ if (ev.buttons != old_buttons) {
+ addEvent(&evt);
+ old_buttons = ev.buttons;
+ }
+ }
+}
+#endif /* __QNXNTO__ */
+
+/****************************************************************************
+REMARKS:
+This macro/function is used to converts the scan codes reported by the
+keyboard to our event libraries normalised format. We only have one scan
+code for the 'A' key, and use shift modifiers to determine if it is a
+Ctrl-F1, Alt-F1 etc. The raw scan codes from the keyboard work this way,
+but the OS gives us 'cooked' scan codes, we have to translate them back
+to the raw format.
+****************************************************************************/
+#define _EVT_maskKeyCode(evt)
+
+/****************************************************************************
+REMARKS:
+Safely abort the event module upon catching a fatal error.
+****************************************************************************/
+void _EVT_abort(
+ int signo)
+{
+ char buf[80];
+
+ EVT_exit();
+ sprintf(buf,"Terminating on signal %d",signo);
+ PM_fatalError(buf);
+}
+
+/****************************************************************************
+PARAMETERS:
+mouseMove - Callback function to call wheneve the mouse needs to be moved
+
+REMARKS:
+Initiliase the event handling module. Here we install our mouse handling ISR
+to be called whenever any button's are pressed or released. We also build
+the free list of events in the event queue.
+
+We use handler number 2 of the mouse libraries interrupt handlers for our
+event handling routines.
+****************************************************************************/
+void EVTAPI EVT_init(
+ _EVT_mouseMoveHandler mouseMove)
+{
+ int i;
+ struct stat st;
+ char *iarg[16];
+#ifdef __QNXNTO__
+ char buf[128];
+ FILE *p;
+ int argno,len;
+#endif
+
+#ifdef __QNXNTO__
+ ThreadCtl(_NTO_TCTL_IO, 0); /* So joystick code won't blow up */
+#endif
+
+ /* Initialise the event queue */
+ EVT.mouseMove = mouseMove;
+ initEventQueue();
+ memset(keyUpMsg,0,sizeof(keyUpMsg));
+
+#ifdef __QNXNTO__
+ /*
+ * User may already have input running with the right parameters.
+ * Thus they could start input at boot time, using the output of
+ * inputtrap, passing the the -r flag to make it run as a resource
+ * manager.
+ */
+ if ((mouse_fd = open("/dev/mouse0", O_RDONLY | O_NONBLOCK)) < 0) {
+ /* Run inputtrap to get the args for input */
+ if ((p = popen("inputtrap", "r")) == NULL)
+ PM_fatalError("Error running 'inputtrap'");
+ fgets(buf, sizeof(buf), p);
+ pclose(p);
+
+ /* Build the argument list */
+ len = strlen(buf);
+ iarg[0] = buf;
+ for (i = 0, argno = 0; i < len && argno < 15;) {
+ if (argno == 1) {
+ /*
+ * Add flags to input's arg list.
+ * '-r' means run as resource
+ * manager, providing the /dev/mouse
+ * and /dev/keyboard interfaces.
+ * '-P' supresses the /dev/photon
+ * mechanism.
+ */
+ iarg[argno++] = "-Pr";
+ continue;
+ }
+ while (buf[i] == ' ')
+ i++;
+ if (buf[i] == '\0' || buf[i] == '\n')
+ break;
+ iarg[argno++] = &buf[i];
+ while (buf[i] != ' '
+ && buf[i] != '\0' && buf[i] != '\n')
+ i++;
+ buf[i++] = '\0';
+ }
+ iarg[argno] = NULL;
+
+ if ((kill_pid = spawnvp(P_NOWAITO, iarg[0], iarg)) == -1) {
+ perror("spawning input resmgr");
+ PM_fatalError("Could not start input resmgr");
+ }
+ for (i = 0; i < 10; i++) {
+ if (stat("/dev/mouse0", &st) == 0)
+ break;
+ sleep(1);
+ }
+ if ((mouse_fd = open("/dev/mouse0", O_RDONLY|O_NONBLOCK)) < 0) {
+ perror("/dev/mouse0");
+ PM_fatalError("Could not open /dev/mouse0");
+ }
+ }
+ if ((kbd_fd = open("/dev/keyboard0", O_RDONLY|O_NONBLOCK)) < 0) {
+ perror("/dev/keyboard0");
+ PM_fatalError("Could not open /dev/keyboard0");
+ }
+#else
+ /* Connect to Input/Mouse for event handling */
+ if (_PM_mouse_ctl == NULL) {
+ _PM_mouse_ctl = mouse_open(0, "/dev/mouse", 0);
+
+ /* "Mouse" is not running; attempt to start it */
+ if (_PM_mouse_ctl == NULL) {
+ iarg[0] = "mousetrap";
+ iarg[1] = "start";
+ iarg[2] = NULL;
+ if ((kill_pid = spawnvp(P_NOWAITO, iarg[0], (void*)iarg)) == -1)
+ perror("spawn (mousetrap)");
+ else {
+ for (i = 0; i < 10; i++) {
+ if (stat("/dev/mouse", &st) == 0)
+ break;
+ sleep(1);
+ }
+ _PM_mouse_ctl = mouse_open(0, "/dev/mouse", 0);
+ }
+ }
+ }
+ if (_PM_keyboard_fd == -1)
+ _PM_keyboard_fd = open("/dev/kbd", O_RDONLY|O_NONBLOCK);
+#endif
+
+ /* Catch program termination signals so we can clean up properly */
+ signal(SIGABRT, _EVT_abort);
+ signal(SIGFPE, _EVT_abort);
+ signal(SIGINT, _EVT_abort);
+}
+
+/****************************************************************************
+REMARKS
+Changes the range of coordinates returned by the mouse functions to the
+specified range of values. This is used when changing between graphics
+modes set the range of mouse coordinates for the new display mode.
+****************************************************************************/
+void EVTAPI EVT_setMouseRange(
+ int xRes,
+ int yRes)
+{
+ rangeX = xRes;
+ rangeY = yRes;
+}
+
+/****************************************************************************
+REMARKS
+Modifes the mouse coordinates as necessary if scaling to OS coordinates,
+and sets the OS mouse cursor position.
+****************************************************************************/
+#define _EVT_setMousePos(x,y)
+
+/****************************************************************************
+REMARKS:
+Initiailises the internal event handling modules. The EVT_suspend function
+can be called to suspend event handling (such as when shelling out to DOS),
+and this function can be used to resume it again later.
+****************************************************************************/
+void EVT_resume(void)
+{
+ // Do nothing for QNX
+}
+
+/****************************************************************************
+REMARKS
+Suspends all of our event handling operations. This is also used to
+de-install the event handling code.
+****************************************************************************/
+void EVT_suspend(void)
+{
+ // Do nothing for QNX
+}
+
+/****************************************************************************
+REMARKS
+Exits the event module for program terminatation.
+****************************************************************************/
+void EVT_exit(void)
+{
+#ifdef __QNXNTO__
+ char c;
+ int flags;
+
+ if (kbd_fd != -1) {
+ close(kbd_fd);
+ kbd_fd = -1;
+ }
+ if (mouse_fd != -1) {
+ close(mouse_fd);
+ mouse_fd = -1;
+ }
+#endif
+
+ /* Restore signal handlers */
+ signal(SIGABRT, SIG_DFL);
+ signal(SIGFPE, SIG_DFL);
+ signal(SIGINT, SIG_DFL);
+
+#ifndef __QNXNTO__
+ /* Kill the Input/Mouse driver if we have spawned it */
+ if (_PM_mouse_ctl != NULL) {
+ struct _fd_entry fde;
+ uint pid = 0;
+
+ /* Find out the pid of the mouse driver */
+ if (kill_pid > 0) {
+ if (qnx_fd_query(0,
+ 0, _PM_mouse_ctl->fd, &fde) != -1)
+ pid = fde.pid;
+ }
+ mouse_close(_PM_mouse_ctl);
+ _PM_mouse_ctl = NULL;
+
+ if (pid > 0) {
+ /* For some reasons the PID's are different under QNX4,
+ * so we use the old mechanism to kill the mouse server.
+ */
+ kill(pid, SIGTERM);
+ kill_pid = 0;
+ }
+ }
+#endif
+ if (kill_pid > 0) {
+ kill(kill_pid, SIGTERM);
+ kill_pid = 0;
+ }
+}
+
diff --git a/board/MAI/bios_emulator/scitech/src/pm/qnx/mtrrqnx.c b/board/MAI/bios_emulator/scitech/src/pm/qnx/mtrrqnx.c
new file mode 100644
index 00000000000..de749e38349
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/pm/qnx/mtrrqnx.c
@@ -0,0 +1,182 @@
+/****************************************************************************
+*
+* SciTech OS Portability Manager Library
+*
+* ========================================================================
+*
+* The contents of this file are subject to the SciTech MGL Public
+* License Version 1.0 (the "License"); you may not use this file
+* except in compliance with the License. You may obtain a copy of
+* the License at http://www.scitechsoft.com/mgl-license.txt
+*
+* Software distributed under the License is distributed on an
+* "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+* implied. See the License for the specific language governing
+* rights and limitations under the License.
+*
+* The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+*
+* The Initial Developer of the Original Code is SciTech Software, Inc.
+* All Rights Reserved.
+*
+* ========================================================================
+*
+* Language: ANSI C
+* Environment: QNX
+*
+* Description: MTRR helper functions module. To make it easier to implement
+* the MTRR support under QNX, we simply put our ring 0 helper
+* functions into stubs that run them at ring 0 using whatever
+* mechanism is available.
+*
+****************************************************************************/
+
+#include "pmapi.h"
+#include <stdio.h>
+#include <sys/mman.h>
+#include <time.h>
+#ifdef __QNXNTO__
+#include <sys/neutrino.h>
+#include <sys/syspage.h>
+#else
+#include <i86.h>
+#include <sys/irqinfo.h>
+#endif
+
+/*--------------------------- Global variables ----------------------------*/
+
+#define R0_FLUSH_TLB 0
+#define R0_SAVE_CR4 1
+#define R0_RESTORE_CR4 2
+#define R0_READ_MSR 3
+#define R0_WRITE_MSR 4
+
+typedef struct {
+ int service;
+ int reg;
+ ulong eax;
+ ulong edx;
+ } R0_data;
+
+extern volatile R0_data _PM_R0;
+
+/*----------------------------- Implementation ----------------------------*/
+
+#ifdef __QNXNTO__
+const struct sigevent * _ASMAPI _PM_ring0_isr(void *arg, int id);
+#else
+pid_t far _ASMAPI _PM_ring0_isr();
+#endif
+
+/****************************************************************************
+REMARKS:
+Return true if ring 0 (or if we can call the helpers functions at ring 0)
+****************************************************************************/
+ibool _ASMAPI _MTRR_isRing0(void)
+{
+#ifdef __QNXNTO__
+ return false; // Not implemented yet!
+#else
+ return true;
+#endif
+}
+
+/****************************************************************************
+REMARKS:
+Function to execute a service at ring 0. This is done using the clock
+interrupt handler since the code we attach to it will always run at ring 0.
+****************************************************************************/
+static void CallRing0(void)
+{
+#ifdef __QNXNTO__
+ uint clock_intno = SYSPAGE_ENTRY(qtime)->intr;
+#else
+ uint clock_intno = 0; /* clock irq */
+#endif
+ int intrid;
+
+#ifdef __QNXNTO__
+ mlock((void*)&_PM_R0, sizeof(_PM_R0));
+ ThreadCtl(_NTO_TCTL_IO, 0);
+#endif
+#ifdef __QNXNTO__
+ if ((intrid = InterruptAttach(_NTO_INTR_CLASS_EXTERNAL | clock_intno,
+ _PM_ring0_isr, (void*)&_PM_R0, sizeof(_PM_R0), _NTO_INTR_FLAGS_END)) == -1) {
+#else
+ if ((intrid = qnx_hint_attach(clock_intno, _PM_ring0_isr, FP_SEG(&_PM_R0))) == -1) {
+#endif
+ perror("Attach");
+ exit(-1);
+ }
+ while (_PM_R0.service != -1)
+ ;
+#ifdef __QNXNTO__
+ InterruptDetachId(intrid);
+#else
+ qnx_hint_detach(intrid);
+#endif
+}
+
+/****************************************************************************
+REMARKS:
+Flush the translation lookaside buffer.
+****************************************************************************/
+void PMAPI PM_flushTLB(void)
+{
+ _PM_R0.service = R0_FLUSH_TLB;
+ CallRing0();
+}
+
+/****************************************************************************
+REMARKS:
+Read and return the value of the CR4 register
+****************************************************************************/
+ulong _ASMAPI _MTRR_saveCR4(void)
+{
+ _PM_R0.service = R0_SAVE_CR4;
+ CallRing0();
+ return _PM_R0.reg;
+}
+
+/****************************************************************************
+REMARKS:
+Restore the value of the CR4 register
+****************************************************************************/
+void _ASMAPI _MTRR_restoreCR4(ulong cr4Val)
+{
+ _PM_R0.service = R0_RESTORE_CR4;
+ _PM_R0.reg = cr4Val;
+ CallRing0();
+}
+
+/****************************************************************************
+REMARKS:
+Read a machine status register for the CPU.
+****************************************************************************/
+void _ASMAPI _MTRR_readMSR(
+ int reg,
+ ulong *eax,
+ ulong *edx)
+{
+ _PM_R0.service = R0_READ_MSR;
+ _PM_R0.reg = reg;
+ CallRing0();
+ *eax = _PM_R0.eax;
+ *edx = _PM_R0.edx;
+}
+
+/****************************************************************************
+REMARKS:
+Write a machine status register for the CPU.
+****************************************************************************/
+void _ASMAPI _MTRR_writeMSR(
+ int reg,
+ ulong eax,
+ ulong edx)
+{
+ _PM_R0.service = R0_WRITE_MSR;
+ _PM_R0.reg = reg;
+ _PM_R0.eax = eax;
+ _PM_R0.edx = edx;
+ CallRing0();
+}
diff --git a/board/MAI/bios_emulator/scitech/src/pm/qnx/oshdr.h b/board/MAI/bios_emulator/scitech/src/pm/qnx/oshdr.h
new file mode 100644
index 00000000000..09611930495
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/pm/qnx/oshdr.h
@@ -0,0 +1,103 @@
+/****************************************************************************
+*
+* SciTech Multi-platform Graphics Library
+*
+* ========================================================================
+*
+* The contents of this file are subject to the SciTech MGL Public
+* License Version 1.0 (the "License"); you may not use this file
+* except in compliance with the License. You may obtain a copy of
+* the License at http://www.scitechsoft.com/mgl-license.txt
+*
+* Software distributed under the License is distributed on an
+* "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+* implied. See the License for the specific language governing
+* rights and limitations under the License.
+*
+* The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+*
+* The Initial Developer of the Original Code is SciTech Software, Inc.
+* All Rights Reserved.
+*
+* ========================================================================
+*
+* Language: ANSI C
+* Environment: QNX
+*
+* Description: Include file to include all OS specific header files.
+*
+****************************************************************************/
+
+#include <sys/stat.h>
+#include <fcntl.h>
+#include <process.h>
+#include <time.h>
+#ifndef __QNXNTO__
+#include <sys/mouse.h>
+#include <sys/keyboard.h>
+#include <sys/fd.h>
+#include <conio.h>
+#else
+#include <sys/dcmd_input.h>
+
+/* Things 'borrowed' from photon/keycodes.h */
+
+/*
+ * Keyboard modifiers
+ */
+#define KEYMODBIT_SHIFT 0
+#define KEYMODBIT_CTRL 1
+#define KEYMODBIT_ALT 2
+#define KEYMODBIT_ALTGR 3
+#define KEYMODBIT_SHL3 4
+#define KEYMODBIT_MOD6 5
+#define KEYMODBIT_MOD7 6
+#define KEYMODBIT_MOD8 7
+
+#define KEYMODBIT_SHIFT_LOCK 8
+#define KEYMODBIT_CTRL_LOCK 9
+#define KEYMODBIT_ALT_LOCK 10
+#define KEYMODBIT_ALTGR_LOCK 11
+#define KEYMODBIT_SHL3_LOCK 12
+#define KEYMODBIT_MOD6_LOCK 13
+#define KEYMODBIT_MOD7_LOCK 14
+#define KEYMODBIT_MOD8_LOCK 15
+
+#define KEYMODBIT_CAPS_LOCK 16
+#define KEYMODBIT_NUM_LOCK 17
+#define KEYMODBIT_SCROLL_LOCK 18
+
+#define KEYMOD_SHIFT (1 << KEYMODBIT_SHIFT)
+#define KEYMOD_CTRL (1 << KEYMODBIT_CTRL)
+#define KEYMOD_ALT (1 << KEYMODBIT_ALT)
+#define KEYMOD_ALTGR (1 << KEYMODBIT_ALTGR)
+#define KEYMOD_SHL3 (1 << KEYMODBIT_SHL3)
+#define KEYMOD_MOD6 (1 << KEYMODBIT_MOD6)
+#define KEYMOD_MOD7 (1 << KEYMODBIT_MOD7)
+#define KEYMOD_MOD8 (1 << KEYMODBIT_MOD8)
+
+#define KEYMOD_SHIFT_LOCK (1 << KEYMODBIT_SHIFT_LOCK)
+#define KEYMOD_CTRL_LOCK (1 << KEYMODBIT_CTRL_LOCK)
+#define KEYMOD_ALT_LOCK (1 << KEYMODBIT_ALT_LOCK)
+#define KEYMOD_ALTGR_LOCK (1 << KEYMODBIT_ALTGR_LOCK)
+#define KEYMOD_SHL3_LOCK (1 << KEYMODBIT_SHL3_LOCK)
+#define KEYMOD_MOD6_LOCK (1 << KEYMODBIT_MOD6_LOCK)
+#define KEYMOD_MOD7_LOCK (1 << KEYMODBIT_MOD7_LOCK)
+#define KEYMOD_MOD8_LOCK (1 << KEYMODBIT_MOD8_LOCK)
+
+#define KEYMOD_CAPS_LOCK (1 << KEYMODBIT_CAPS_LOCK)
+#define KEYMOD_NUM_LOCK (1 << KEYMODBIT_NUM_LOCK)
+#define KEYMOD_SCROLL_LOCK (1 << KEYMODBIT_SCROLL_LOCK)
+
+/*
+ * Keyboard flags
+ */
+#define KEY_DOWN 0x00000001 /* Key was pressed down */
+#define KEY_REPEAT 0x00000002 /* Key was repeated */
+#define KEY_SCAN_VALID 0x00000020 /* Scancode is valid */
+#define KEY_SYM_VALID 0x00000040 /* Key symbol is valid */
+#define KEY_CAP_VALID 0x00000080 /* Key cap is valid */
+#define KEY_DEAD 0x40000000 /* Key symbol is a DEAD key */
+#define KEY_OEM_CAP 0x80000000 /* Key cap is an OEM scan code from keyboard */
+
+#endif /* __QNXNTO__ */
diff --git a/board/MAI/bios_emulator/scitech/src/pm/qnx/pm.c b/board/MAI/bios_emulator/scitech/src/pm/qnx/pm.c
new file mode 100644
index 00000000000..c2b41eb09ff
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/pm/qnx/pm.c
@@ -0,0 +1,891 @@
+/****************************************************************************
+*
+* SciTech OS Portability Manager Library
+*
+* ========================================================================
+*
+* The contents of this file are subject to the SciTech MGL Public
+* License Version 1.0 (the "License"); you may not use this file
+* except in compliance with the License. You may obtain a copy of
+* the License at http://www.scitechsoft.com/mgl-license.txt
+*
+* Software distributed under the License is distributed on an
+* "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+* implied. See the License for the specific language governing
+* rights and limitations under the License.
+*
+* The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+*
+* The Initial Developer of the Original Code is SciTech Software, Inc.
+* All Rights Reserved.
+*
+* ========================================================================
+*
+* Language: ANSI C
+* Environment: QNX
+*
+* Description: Implementation for the OS Portability Manager Library, which
+* contains functions to implement OS specific services in a
+* generic, cross platform API. Porting the OS Portability
+* Manager library is the first step to porting any SciTech
+* products to a new platform.
+*
+****************************************************************************/
+
+#include "pmapi.h"
+#include "drvlib/os/os.h"
+#include "mtrr.h"
+#include <stdio.h>
+#include <stdlib.h>
+#include <string.h>
+#include <time.h>
+#include <unistd.h>
+#include <termios.h>
+#include <fcntl.h>
+#include <malloc.h>
+#include <sys/mman.h>
+#include "qnx/vbios.h"
+#ifndef __QNXNTO__
+#include <sys/seginfo.h>
+#include <sys/console.h>
+#include <conio.h>
+#include <i86.h>
+#else
+#include <sys/neutrino.h>
+#include <sys/dcmd_chr.h>
+#endif
+
+/*--------------------------- Global variables ----------------------------*/
+
+static uint VESABuf_len = 1024; /* Length of the VESABuf buffer */
+static void *VESABuf_ptr = NULL; /* Near pointer to VESABuf */
+static uint VESABuf_rseg; /* Real mode segment of VESABuf */
+static uint VESABuf_roff; /* Real mode offset of VESABuf */
+static VBIOSregs_t *VRegs = NULL; /* Pointer to VBIOS registers */
+static int raw_count = 0;
+static struct _console_ctrl *cc = NULL;
+static int console_count = 0;
+static int rmbuf_inuse = 0;
+
+static void (PMAPIP fatalErrorCleanup)(void) = NULL;
+
+/*----------------------------- Implementation ----------------------------*/
+
+void PMAPI PM_init(void)
+{
+ char *force;
+
+ if (VRegs == NULL) {
+#ifdef __QNXNTO__
+ ThreadCtl(_NTO_TCTL_IO, 0); /* Get IO privilidge */
+#endif
+ force = getenv("VBIOS_METHOD");
+ VRegs = VBIOSinit(force ? atoi(force) : 0);
+ }
+#ifndef __QNXNTO__
+ MTRR_init();
+#endif
+}
+
+ibool PMAPI PM_haveBIOSAccess(void)
+{ return VRegs != NULL; }
+
+long PMAPI PM_getOSType(void)
+{ return _OS_QNX; }
+
+int PMAPI PM_getModeType(void)
+{ return PM_386; }
+
+void PMAPI PM_backslash(char *s)
+{
+ uint pos = strlen(s);
+ if (s[pos-1] != '/') {
+ s[pos] = '/';
+ s[pos+1] = '\0';
+ }
+}
+
+void PMAPI PM_setFatalErrorCleanup(
+ void (PMAPIP cleanup)(void))
+{
+ fatalErrorCleanup = cleanup;
+}
+
+void PMAPI PM_fatalError(const char *msg)
+{
+ if (fatalErrorCleanup)
+ fatalErrorCleanup();
+ fprintf(stderr,"%s\n", msg);
+ exit(1);
+}
+
+static void ExitVBEBuf(void)
+{
+ if (VESABuf_ptr)
+ PM_freeRealSeg(VESABuf_ptr);
+ VESABuf_ptr = 0;
+}
+
+void * PMAPI PM_getVESABuf(uint *len,uint *rseg,uint *roff)
+{
+ if (!VESABuf_ptr) {
+ /* Allocate a global buffer for communicating with the VESA VBE */
+ if ((VESABuf_ptr = PM_allocRealSeg(VESABuf_len, &VESABuf_rseg, &VESABuf_roff)) == NULL)
+ return NULL;
+ atexit(ExitVBEBuf);
+ }
+ *len = VESABuf_len;
+ *rseg = VESABuf_rseg;
+ *roff = VESABuf_roff;
+ return VESABuf_ptr;
+}
+
+static int term_raw(void)
+{
+ struct termios termios_p;
+
+ if (raw_count++ > 0)
+ return 0;
+
+ /* Go into "raw" input mode */
+ if (tcgetattr(STDIN_FILENO, &termios_p))
+ return -1;
+
+ termios_p.c_cc[VMIN] = 1;
+ termios_p.c_cc[VTIME] = 0;
+ termios_p.c_lflag &= ~( ECHO|ICANON|ISIG|ECHOE|ECHOK|ECHONL);
+ tcsetattr(STDIN_FILENO, TCSADRAIN, &termios_p);
+ return 0;
+}
+
+static void term_restore(void)
+{
+ struct termios termios_p;
+
+ if (raw_count-- != 1)
+ return;
+
+ tcgetattr(STDIN_FILENO, &termios_p);
+ termios_p.c_lflag |= (ECHO|ICANON|ISIG|ECHOE|ECHOK|ECHONL);
+ termios_p.c_oflag |= (OPOST);
+ tcsetattr(STDIN_FILENO, TCSADRAIN, &termios_p);
+}
+
+int PMAPI PM_kbhit(void)
+{
+ int blocking, c;
+
+ if (term_raw() == -1)
+ return 0;
+
+ /* Go into non blocking mode */
+ blocking = fcntl(STDIN_FILENO, F_GETFL) | O_NONBLOCK;
+ fcntl(STDIN_FILENO, F_SETFL, blocking);
+ c = getc(stdin);
+
+ /* restore blocking mode */
+ fcntl(STDIN_FILENO, F_SETFL, blocking & ~O_NONBLOCK);
+ term_restore();
+ if (c != EOF) {
+ ungetc(c, stdin);
+ return c;
+ }
+ clearerr(stdin);
+ return 0;
+}
+
+int PMAPI PM_getch(void)
+{
+ int c;
+
+ if (term_raw() == -1)
+ return (0);
+ c = getc(stdin);
+#if defined(__QNX__) && !defined(__QNXNTO__)
+ if (c == 0xA)
+ c = 0x0D;
+ else if (c == 0x7F)
+ c = 0x08;
+#endif
+ term_restore();
+ return c;
+}
+
+PM_HWND PMAPI PM_openConsole(
+ PM_HWND hwndUser,
+ int device,
+ int xRes,
+ int yRes,
+ int bpp,
+ ibool fullScreen)
+{
+#ifndef __QNXNTO__
+ int fd;
+
+ if (console_count++)
+ return 0;
+ if ((fd = open("/dev/con1", O_RDWR)) == -1)
+ return -1;
+ cc = console_open(fd, O_RDWR);
+ close(fd);
+ if (cc == NULL)
+ return -1;
+#endif
+ return 1;
+}
+
+int PMAPI PM_getConsoleStateSize(void)
+{
+ return PM_getVGAStateSize() + sizeof(int) * 3;
+}
+
+void PMAPI PM_saveConsoleState(void *stateBuf,int console_id)
+{
+#ifdef __QNXNTO__
+ int fd;
+ int flags;
+
+ if ((fd = open("/dev/con1", O_RDWR)) == -1)
+ return;
+ flags = _CONCTL_INVISIBLE_CHG | _CONCTL_INVISIBLE;
+ devctl(fd, DCMD_CHR_SERCTL, &flags, sizeof flags, 0);
+ close(fd);
+#else
+ uchar *buf = &((uchar*)stateBuf)[PM_getVGAStateSize()];
+
+ /* Save QNX 4 console state */
+ console_read(cc, -1, 0, NULL, 0,
+ (int *)buf+1, (int *)buf+2, NULL);
+ *(int *)buf = console_ctrl(cc, -1,
+ CONSOLE_NORESIZE | CONSOLE_NOSWITCH | CONSOLE_INVISIBLE,
+ CONSOLE_NORESIZE | CONSOLE_NOSWITCH | CONSOLE_INVISIBLE);
+
+ /* Save state of VGA registers */
+ PM_saveVGAState(stateBuf);
+#endif
+}
+
+void PMAPI PM_setSuspendAppCallback(int (_ASMAPIP saveState)(int flags))
+{
+ /* TODO: Implement support for console switching if possible */
+}
+
+void PMAPI PM_restoreConsoleState(const void *stateBuf,PM_HWND hwndConsole)
+{
+#ifdef __QNXNTO__
+ int fd;
+ int flags;
+
+ if ((fd = open("/dev/con1", O_RDWR)) == -1)
+ return;
+ flags = _CONCTL_INVISIBLE_CHG;
+ devctl(fd, DCMD_CHR_SERCTL, &flags, sizeof flags, 0);
+ close(fd);
+#else
+ uchar *buf = &((uchar*)stateBuf)[PM_getVGAStateSize()];
+
+ /* Restore the state of the VGA compatible registers */
+ PM_restoreVGAState(stateBuf);
+
+ /* Restore QNX 4 console state */
+ console_ctrl(cc, -1, *(int *)buf,
+ CONSOLE_NORESIZE | CONSOLE_NOSWITCH | CONSOLE_INVISIBLE);
+ console_write(cc, -1, 0, NULL, 0,
+ (int *)buf+1, (int *)buf+2, NULL);
+#endif
+}
+
+void PMAPI PM_closeConsole(PM_HWND hwndConsole)
+{
+#ifndef __QNXNTO__
+ if (--console_count == 0) {
+ console_close(cc);
+ cc = NULL;
+ }
+#endif
+}
+
+void PM_setOSCursorLocation(int x,int y)
+{
+ if (!cc)
+ return;
+#ifndef __QNXNTO__
+ console_write(cc, -1, 0, NULL, 0, &y, &x, NULL);
+#endif
+}
+
+void PM_setOSScreenWidth(int width,int height)
+{
+}
+
+ibool PMAPI PM_setRealTimeClockHandler(PM_intHandler ih, int frequency)
+{
+ // TODO: Implement this for QNX
+ return false;
+}
+
+void PMAPI PM_setRealTimeClockFrequency(int frequency)
+{
+ // TODO: Implement this for QNX
+}
+
+void PMAPI PM_restoreRealTimeClockHandler(void)
+{
+ // TODO: Implement this for QNX
+}
+
+char * PMAPI PM_getCurrentPath(
+ char *path,
+ int maxLen)
+{
+ return getcwd(path,maxLen);
+}
+
+char PMAPI PM_getBootDrive(void)
+{ return '/'; }
+
+const char * PMAPI PM_getVBEAFPath(void)
+{ return PM_getNucleusConfigPath(); }
+
+const char * PMAPI PM_getNucleusPath(void)
+{
+ char *env = getenv("NUCLEUS_PATH");
+#ifdef __QNXNTO__
+#ifdef __X86__
+ return env ? env : "/nto/scitech/x86/bin";
+#elif defined (__PPC__)
+ return env ? env : "/nto/scitech/ppcbe/bin";
+#elif defined (__MIPS__)
+#ifdef __BIGENDIAN__
+ return env ? env : "/nto/scitech/mipsbe/bin";
+#else
+ return env ? env : "/nto/scitech/mipsle/bin";
+#endif
+#elif defined (__SH__)
+#ifdef __BIGENDIAN__
+ return env ? env : "/nto/scitech/shbe/bin";
+#else
+ return env ? env : "/nto/scitech/shle/bin";
+#endif
+#elif defined (__ARM__)
+ return env ? env : "/nto/scitech/armle/bin";
+#endif
+#else /* QNX 4 */
+ return env ? env : "/qnx4/scitech/bin";
+#endif
+}
+
+const char * PMAPI PM_getNucleusConfigPath(void)
+{
+ static char path[512];
+ char *env;
+#ifdef __QNXNTO__
+ char temp[64];
+ gethostname(temp, sizeof (temp));
+ temp[sizeof (temp) - 1] = '\0'; /* Paranoid */
+ sprintf(path,"/etc/config/scitech/%s/config", temp);
+#else
+ sprintf(path,"/etc/config/scitech/%d/config", getnid());
+#endif
+ if ((env = getenv("NUCLEUS_PATH")) != NULL) {
+ strcpy(path,env);
+ PM_backslash(path);
+ strcat(path,"config");
+ }
+ return path;
+}
+
+const char * PMAPI PM_getUniqueID(void)
+{
+ static char buf[128];
+#ifdef __QNXNTO__
+ gethostname(buf, sizeof (buf));
+#else
+ sprintf(buf,"node%d", getnid());
+#endif
+ return buf;
+}
+
+const char * PMAPI PM_getMachineName(void)
+{
+ static char buf[128];
+#ifdef __QNXNTO__
+ gethostname(buf, sizeof (buf));
+#else
+ sprintf(buf,"node%d", getnid());
+#endif
+ return buf;
+}
+
+void * PMAPI PM_getBIOSPointer(void)
+{
+ return PM_mapRealPointer(0, 0x400);
+}
+
+void * PMAPI PM_getA0000Pointer(void)
+{
+ static void *ptr = NULL;
+ void *freeptr;
+ unsigned offset, i, maplen;
+
+ if (ptr != NULL)
+ return ptr;
+
+ /* Some trickery is required to get the linear address 64K aligned */
+ for (i = 0; i < 5; i++) {
+ ptr = PM_mapPhysicalAddr(0xA0000,0xFFFF,true);
+ offset = 0x10000 - ((unsigned)ptr % 0x10000);
+ if (!offset)
+ break;
+ munmap(ptr, 0x10000);
+ maplen = 0x10000 + offset;
+ freeptr = PM_mapPhysicalAddr(0xA0000-offset, maplen-1,true);
+ ptr = (void *)(offset + (unsigned)freeptr);
+ if (0x10000 - ((unsigned)ptr % 0x10000))
+ break;
+ munmap(freeptr, maplen);
+ }
+ if (i == 5) {
+ printf("Could not get a 64K aligned linear address for A0000 region\n");
+ exit(1);
+ }
+ return ptr;
+}
+
+void * PMAPI PM_mapPhysicalAddr(ulong base,ulong limit,ibool isCached)
+{
+ uchar_t *p;
+ unsigned o;
+ unsigned prot = PROT_READ|PROT_WRITE|(isCached?0:PROT_NOCACHE);
+#ifdef __PAGESIZE
+ int pagesize = __PAGESIZE;
+#else
+ int pagesize = 4096;
+#endif
+ int rounddown = base % pagesize;
+#ifndef __QNXNTO__
+ static int __VidFD = -1;
+#endif
+
+ if (rounddown) {
+ if (base < rounddown)
+ return NULL;
+ base -= rounddown;
+ limit += rounddown;
+ }
+
+#ifndef __QNXNTO__
+ if (__VidFD < 0) {
+ if ((__VidFD = shm_open( "Physical", O_RDWR, 0777 )) == -1) {
+ perror( "Cannot open Physical memory" );
+ exit(1);
+ }
+ }
+ o = base & 0xFFF;
+ limit = (limit + o + 0xFFF) & ~0xFFF;
+ if ((int)(p = mmap( 0, limit, prot, MAP_SHARED,
+ __VidFD, base )) == -1 ) {
+ return NULL;
+ }
+ p += o;
+#else
+ if ((p = mmap(0, limit, prot, MAP_PHYS | MAP_SHARED,
+ NOFD, base)) == MAP_FAILED) {
+ return (void *)-1;
+ }
+#endif
+ return (p + rounddown);
+}
+
+void PMAPI PM_freePhysicalAddr(void *ptr,ulong limit)
+{
+ munmap(ptr,limit+1);
+}
+
+ulong PMAPI PM_getPhysicalAddr(void *p)
+{
+ // TODO: This function should find the physical address of a linear
+ // address.
+ return 0xFFFFFFFFUL;
+}
+
+ibool PMAPI PM_getPhysicalAddrRange(
+ void *p,
+ ulong length,
+ ulong *physAddress)
+{
+ // TODO: Implement this!
+ return false;
+}
+
+void PMAPI PM_sleep(ulong milliseconds)
+{
+ // TODO: Put the process to sleep for milliseconds
+}
+
+int PMAPI PM_getCOMPort(int port)
+{
+ // TODO: Re-code this to determine real values using the Plug and Play
+ // manager for the OS.
+ switch (port) {
+ case 0: return 0x3F8;
+ case 1: return 0x2F8;
+ }
+ return 0;
+}
+
+int PMAPI PM_getLPTPort(int port)
+{
+ // TODO: Re-code this to determine real values using the Plug and Play
+ // manager for the OS.
+ switch (port) {
+ case 0: return 0x3BC;
+ case 1: return 0x378;
+ case 2: return 0x278;
+ }
+ return 0;
+}
+
+void * PMAPI PM_mallocShared(long size)
+{
+ return PM_malloc(size);
+}
+
+void PMAPI PM_freeShared(void *ptr)
+{
+ PM_free(ptr);
+}
+
+void * PMAPI PM_mapToProcess(void *base,ulong limit)
+{ return (void*)base; }
+
+void * PMAPI PM_mapRealPointer(uint r_seg,uint r_off)
+{
+ void *p;
+
+ PM_init();
+
+ if ((p = VBIOSgetmemptr(r_seg, r_off, VRegs)) == (void *)-1)
+ return NULL;
+ return p;
+}
+
+void * PMAPI PM_allocRealSeg(uint size,uint *r_seg,uint *r_off)
+{
+ if (size > 1024) {
+ printf("PM_allocRealSeg: can't handle %d bytes\n", size);
+ return 0;
+ }
+ if (rmbuf_inuse != 0) {
+ printf("PM_allocRealSeg: transfer area already in use\n");
+ return 0;
+ }
+ PM_init();
+ rmbuf_inuse = 1;
+ *r_seg = VBIOS_TransBufVSeg(VRegs);
+ *r_off = VBIOS_TransBufVOff(VRegs);
+ return (void*)VBIOS_TransBufPtr(VRegs);
+}
+
+void PMAPI PM_freeRealSeg(void *mem)
+{
+ if (rmbuf_inuse == 0) {
+ printf("PM_freeRealSeg: nothing was allocated\n");
+ return;
+ }
+ rmbuf_inuse = 0;
+}
+
+void PMAPI DPMI_int86(int intno, DPMI_regs *regs)
+{
+ PM_init();
+ if (VRegs == NULL)
+ return;
+
+ VRegs->l.eax = regs->eax;
+ VRegs->l.ebx = regs->ebx;
+ VRegs->l.ecx = regs->ecx;
+ VRegs->l.edx = regs->edx;
+ VRegs->l.esi = regs->esi;
+ VRegs->l.edi = regs->edi;
+
+ VBIOSint(intno, VRegs, 1024);
+
+ regs->eax = VRegs->l.eax;
+ regs->ebx = VRegs->l.ebx;
+ regs->ecx = VRegs->l.ecx;
+ regs->edx = VRegs->l.edx;
+ regs->esi = VRegs->l.esi;
+ regs->edi = VRegs->l.edi;
+ regs->flags = VRegs->w.flags & 0x1;
+}
+
+int PMAPI PM_int86(int intno, RMREGS *in, RMREGS *out)
+{
+ PM_init();
+ if (VRegs == NULL)
+ return 0;
+
+ VRegs->l.eax = in->e.eax;
+ VRegs->l.ebx = in->e.ebx;
+ VRegs->l.ecx = in->e.ecx;
+ VRegs->l.edx = in->e.edx;
+ VRegs->l.esi = in->e.esi;
+ VRegs->l.edi = in->e.edi;
+
+ VBIOSint(intno, VRegs, 1024);
+
+ out->e.eax = VRegs->l.eax;
+ out->e.ebx = VRegs->l.ebx;
+ out->e.ecx = VRegs->l.ecx;
+ out->e.edx = VRegs->l.edx;
+ out->e.esi = VRegs->l.esi;
+ out->e.edi = VRegs->l.edi;
+ out->x.cflag = VRegs->w.flags & 0x1;
+
+ return out->x.ax;
+}
+
+int PMAPI PM_int86x(int intno, RMREGS *in, RMREGS *out,
+ RMSREGS *sregs)
+{
+ PM_init();
+ if (VRegs == NULL)
+ return 0;
+
+ if (intno == 0x21) {
+ time_t today = time(NULL);
+ struct tm *t;
+ t = localtime(&today);
+ out->x.cx = t->tm_year + 1900;
+ out->h.dh = t->tm_mon + 1;
+ out->h.dl = t->tm_mday;
+ return 0;
+ }
+ else {
+ VRegs->l.eax = in->e.eax;
+ VRegs->l.ebx = in->e.ebx;
+ VRegs->l.ecx = in->e.ecx;
+ VRegs->l.edx = in->e.edx;
+ VRegs->l.esi = in->e.esi;
+ VRegs->l.edi = in->e.edi;
+ VRegs->w.es = sregs->es;
+ VRegs->w.ds = sregs->ds;
+
+ VBIOSint(intno, VRegs, 1024);
+
+ out->e.eax = VRegs->l.eax;
+ out->e.ebx = VRegs->l.ebx;
+ out->e.ecx = VRegs->l.ecx;
+ out->e.edx = VRegs->l.edx;
+ out->e.esi = VRegs->l.esi;
+ out->e.edi = VRegs->l.edi;
+ out->x.cflag = VRegs->w.flags & 0x1;
+ sregs->es = VRegs->w.es;
+ sregs->ds = VRegs->w.ds;
+
+ return out->x.ax;
+ }
+}
+
+void PMAPI PM_callRealMode(uint seg,uint off, RMREGS *in,
+ RMSREGS *sregs)
+{
+ PM_init();
+ if (VRegs == NULL)
+ return;
+
+ VRegs->l.eax = in->e.eax;
+ VRegs->l.ebx = in->e.ebx;
+ VRegs->l.ecx = in->e.ecx;
+ VRegs->l.edx = in->e.edx;
+ VRegs->l.esi = in->e.esi;
+ VRegs->l.edi = in->e.edi;
+ VRegs->w.es = sregs->es;
+ VRegs->w.ds = sregs->ds;
+
+ VBIOScall(seg, off, VRegs, 1024);
+
+ in->e.eax = VRegs->l.eax;
+ in->e.ebx = VRegs->l.ebx;
+ in->e.ecx = VRegs->l.ecx;
+ in->e.edx = VRegs->l.edx;
+ in->e.esi = VRegs->l.esi;
+ in->e.edi = VRegs->l.edi;
+ in->x.cflag = VRegs->w.flags & 0x1;
+ sregs->es = VRegs->w.es;
+ sregs->ds = VRegs->w.ds;
+}
+
+void PMAPI PM_availableMemory(ulong *physical,ulong *total)
+{
+#ifndef __QNXNTO__
+ *physical = *total = _memavl();
+#endif
+}
+
+void * PMAPI PM_allocLockedMem(
+ uint size,
+ ulong *physAddr,
+ ibool contiguous,
+ ibool below16M)
+{
+ // TODO: Implement this on QNX
+ return NULL;
+}
+
+void PMAPI PM_freeLockedMem(
+ void *p,
+ uint size,
+ ibool contiguous)
+{
+ // TODO: Implement this on QNX
+}
+
+void * PMAPI PM_allocPage(
+ ibool locked)
+{
+ // TODO: Implement this on QNX
+ return NULL;
+}
+
+void PMAPI PM_freePage(
+ void *p)
+{
+ // TODO: Implement this on QNX
+}
+
+void PMAPI PM_setBankA(int bank)
+{
+ PM_init();
+ if (VRegs == NULL)
+ return;
+
+ VRegs->l.eax = 0x4F05;
+ VRegs->l.ebx = 0x0000;
+ VRegs->l.edx = bank;
+ VBIOSint(0x10, VRegs, 1024);
+}
+
+void PMAPI PM_setBankAB(int bank)
+{
+ PM_init();
+ if (VRegs == NULL)
+ return;
+
+ VRegs->l.eax = 0x4F05;
+ VRegs->l.ebx = 0x0000;
+ VRegs->l.edx = bank;
+ VBIOSint(0x10, VRegs, 1024);
+
+ VRegs->l.eax = 0x4F05;
+ VRegs->l.ebx = 0x0001;
+ VRegs->l.edx = bank;
+ VBIOSint(0x10, VRegs, 1024);
+}
+
+void PMAPI PM_setCRTStart(int x,int y,int waitVRT)
+{
+ PM_init();
+ if (VRegs == NULL)
+ return;
+
+ VRegs->l.eax = 0x4F07;
+ VRegs->l.ebx = waitVRT;
+ VRegs->l.ecx = x;
+ VRegs->l.edx = y;
+ VBIOSint(0x10, VRegs, 1024);
+}
+
+ibool PMAPI PM_doBIOSPOST(
+ ushort axVal,
+ ulong BIOSPhysAddr,
+ void *copyOfBIOS,
+ ulong BIOSLen)
+{
+ (void)axVal;
+ (void)BIOSPhysAddr;
+ (void)copyOfBIOS;
+ (void)BIOSLen;
+ return false;
+}
+
+int PMAPI PM_lockDataPages(void *p,uint len,PM_lockHandle *lh)
+{
+ p = p; len = len;
+ return 1;
+}
+
+int PMAPI PM_unlockDataPages(void *p,uint len,PM_lockHandle *lh)
+{
+ p = p; len = len;
+ return 1;
+}
+
+int PMAPI PM_lockCodePages(void (*p)(),uint len,PM_lockHandle *lh)
+{
+ p = p; len = len;
+ return 1;
+}
+
+int PMAPI PM_unlockCodePages(void (*p)(),uint len,PM_lockHandle *lh)
+{
+ p = p; len = len;
+ return 1;
+}
+
+PM_MODULE PMAPI PM_loadLibrary(
+ const char *szDLLName)
+{
+ // TODO: Implement this to load shared libraries!
+ (void)szDLLName;
+ return NULL;
+}
+
+void * PMAPI PM_getProcAddress(
+ PM_MODULE hModule,
+ const char *szProcName)
+{
+ // TODO: Implement this!
+ (void)hModule;
+ (void)szProcName;
+ return NULL;
+}
+
+void PMAPI PM_freeLibrary(
+ PM_MODULE hModule)
+{
+ // TODO: Implement this!
+ (void)hModule;
+}
+
+int PMAPI PM_setIOPL(
+ int level)
+{
+ // QNX handles IOPL selection at the program link level.
+ return level;
+}
+
+/****************************************************************************
+PARAMETERS:
+base - The starting physical base address of the region
+size - The size in bytes of the region
+type - Type to place into the MTRR register
+
+RETURNS:
+Error code describing the result.
+
+REMARKS:
+Function to enable write combining for the specified region of memory.
+****************************************************************************/
+int PMAPI PM_enableWriteCombine(
+ ulong base,
+ ulong size,
+ uint type)
+{
+#ifndef __QNXNTO__
+ return MTRR_enableWriteCombine(base,size,type);
+#else
+ return PM_MTRR_NOT_SUPPORTED;
+#endif
+}
diff --git a/board/MAI/bios_emulator/scitech/src/pm/qnx/vflat.c b/board/MAI/bios_emulator/scitech/src/pm/qnx/vflat.c
new file mode 100644
index 00000000000..579ef2c95c4
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/pm/qnx/vflat.c
@@ -0,0 +1,49 @@
+/****************************************************************************
+*
+* SciTech OS Portability Manager Library
+*
+* ========================================================================
+*
+* The contents of this file are subject to the SciTech MGL Public
+* License Version 1.0 (the "License"); you may not use this file
+* except in compliance with the License. You may obtain a copy of
+* the License at http://www.scitechsoft.com/mgl-license.txt
+*
+* Software distributed under the License is distributed on an
+* "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+* implied. See the License for the specific language governing
+* rights and limitations under the License.
+*
+* The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+*
+* The Initial Developer of the Original Code is SciTech Software, Inc.
+* All Rights Reserved.
+*
+* ========================================================================
+*
+* Language: ANSI C
+* Environment: Any
+*
+* Description: Dummy module; no virtual framebuffer for this OS
+*
+****************************************************************************/
+
+#include "pmapi.h"
+
+ibool PMAPI VF_available(void)
+{
+ return false;
+}
+
+void * PMAPI VF_init(ulong baseAddr,int bankSize,int codeLen,void *bankFunc)
+{
+ baseAddr = baseAddr;
+ bankSize = bankSize;
+ codeLen = codeLen;
+ bankFunc = bankFunc;
+ return NULL;
+}
+
+void PMAPI VF_exit(void)
+{
+}
diff --git a/board/MAI/bios_emulator/scitech/src/pm/qnx/ztimer.c b/board/MAI/bios_emulator/scitech/src/pm/qnx/ztimer.c
new file mode 100644
index 00000000000..d2740971f98
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/pm/qnx/ztimer.c
@@ -0,0 +1,91 @@
+/****************************************************************************
+*
+* Ultra Long Period Timer
+*
+* ========================================================================
+*
+* The contents of this file are subject to the SciTech MGL Public
+* License Version 1.0 (the "License"); you may not use this file
+* except in compliance with the License. You may obtain a copy of
+* the License at http://www.scitechsoft.com/mgl-license.txt
+*
+* Software distributed under the License is distributed on an
+* "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+* implied. See the License for the specific language governing
+* rights and limitations under the License.
+*
+* The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+*
+* The Initial Developer of the Original Code is SciTech Software, Inc.
+* All Rights Reserved.
+*
+* ========================================================================
+*
+* Language: ANSI C
+* Environment: QNX
+*
+* Description: QNX specific implementation for the Zen Timer functions.
+*
+****************************************************************************/
+
+/*----------------------------- Implementation ----------------------------*/
+
+/****************************************************************************
+REMARKS:
+Initialise the Zen Timer module internals.
+****************************************************************************/
+void __ZTimerInit(void)
+{
+}
+
+/****************************************************************************
+REMARKS:
+Use the gettimeofday() function to get microsecond precision (probably less
+though)
+****************************************************************************/
+static ulong __ULZReadTime(void)
+{
+ struct timespec ts;
+ clock_gettime(CLOCK_REALTIME, &ts);
+ return (ts.tv_nsec / 1000 + ts.tv_sec * 1000000);
+}
+
+/****************************************************************************
+REMARKS:
+Start the Zen Timer counting.
+****************************************************************************/
+#define __LZTimerOn(tm) tm->start.low = __ULZReadTime()
+
+/****************************************************************************
+REMARKS:
+Compute the lap time since the timer was started.
+****************************************************************************/
+#define __LZTimerLap(tm) (__ULZReadTime() - tm->start.low)
+
+/****************************************************************************
+REMARKS:
+Call the assembler Zen Timer functions to do the timing.
+****************************************************************************/
+#define __LZTimerOff(tm) tm->end.low = __ULZReadTime()
+
+/****************************************************************************
+REMARKS:
+Call the assembler Zen Timer functions to do the timing.
+****************************************************************************/
+#define __LZTimerCount(tm) (tm->end.low - tm->start.low)
+
+/****************************************************************************
+REMARKS:
+Define the resolution of the long period timer as microseconds per timer tick.
+****************************************************************************/
+#define ULZTIMER_RESOLUTION 1
+
+/****************************************************************************
+REMARKS:
+Compute the elapsed time from the BIOS timer tick. Note that we check to see
+whether a midnight boundary has passed, and if so adjust the finish time to
+account for this. We cannot detect if more that one midnight boundary has
+passed, so if this happens we will be generating erronous results.
+****************************************************************************/
+ulong __ULZElapsedTime(ulong start,ulong finish)
+{ return finish - start; }
diff --git a/board/MAI/bios_emulator/scitech/src/pm/rttarget/cpuinfo.c b/board/MAI/bios_emulator/scitech/src/pm/rttarget/cpuinfo.c
new file mode 100644
index 00000000000..3d6dd44313b
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/pm/rttarget/cpuinfo.c
@@ -0,0 +1,94 @@
+/****************************************************************************
+*
+* Ultra Long Period Timer
+*
+* ========================================================================
+*
+* The contents of this file are subject to the SciTech MGL Public
+* License Version 1.0 (the "License"); you may not use this file
+* except in compliance with the License. You may obtain a copy of
+* the License at http://www.scitechsoft.com/mgl-license.txt
+*
+* Software distributed under the License is distributed on an
+* "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+* implied. See the License for the specific language governing
+* rights and limitations under the License.
+*
+* The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+*
+* The Initial Developer of the Original Code is SciTech Software, Inc.
+* All Rights Reserved.
+*
+* ========================================================================
+*
+* Language: ANSI C
+* Environment: RTTarget-32
+*
+* Description: Module to implement OS specific services to measure the
+* CPU frequency.
+*
+****************************************************************************/
+
+/*---------------------------- Global variables ---------------------------*/
+
+static ibool havePerformanceCounter;
+
+/*----------------------------- Implementation ----------------------------*/
+
+/****************************************************************************
+REMARKS:
+Increase the thread priority to maximum, if possible.
+****************************************************************************/
+static int SetMaxThreadPriority(void)
+{
+ int oldPriority;
+ HANDLE hThread = GetCurrentThread();
+
+ oldPriority = GetThreadPriority(hThread);
+ if (oldPriority != THREAD_PRIORITY_ERROR_RETURN)
+ SetThreadPriority(hThread, THREAD_PRIORITY_TIME_CRITICAL);
+ return oldPriority;
+}
+
+/****************************************************************************
+REMARKS:
+Restore the original thread priority.
+****************************************************************************/
+static void RestoreThreadPriority(
+ int oldPriority)
+{
+ HANDLE hThread = GetCurrentThread();
+
+ if (oldPriority != THREAD_PRIORITY_ERROR_RETURN)
+ SetThreadPriority(hThread, oldPriority);
+}
+
+/****************************************************************************
+REMARKS:
+Initialise the counter and return the frequency of the counter.
+****************************************************************************/
+static void GetCounterFrequency(
+ CPU_largeInteger *freq)
+{
+ if (!QueryPerformanceFrequency((LARGE_INTEGER*)freq)) {
+ havePerformanceCounter = false;
+ freq->low = 100000;
+ freq->high = 0;
+ }
+ else
+ havePerformanceCounter = true;
+}
+
+/****************************************************************************
+REMARKS:
+Read the counter and return the counter value.
+****************************************************************************/
+#define GetCounter(t) \
+{ \
+ if (havePerformanceCounter) \
+ QueryPerformanceCounter((LARGE_INTEGER*)t); \
+ else { \
+ (t)->low = timeGetTime() * 100; \
+ (t)->high = 0; \
+ } \
+}
diff --git a/board/MAI/bios_emulator/scitech/src/pm/rttarget/event.c b/board/MAI/bios_emulator/scitech/src/pm/rttarget/event.c
new file mode 100644
index 00000000000..e9aba21b9f8
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/pm/rttarget/event.c
@@ -0,0 +1,287 @@
+/****************************************************************************
+*
+* SciTech Multi-platform Graphics Library
+*
+* ========================================================================
+*
+* The contents of this file are subject to the SciTech MGL Public
+* License Version 1.0 (the "License"); you may not use this file
+* except in compliance with the License. You may obtain a copy of
+* the License at http://www.scitechsoft.com/mgl-license.txt
+*
+* Software distributed under the License is distributed on an
+* "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+* implied. See the License for the specific language governing
+* rights and limitations under the License.
+*
+* The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+*
+* The Initial Developer of the Original Code is SciTech Software, Inc.
+* All Rights Reserved.
+*
+* ========================================================================
+*
+* Language: ANSI C
+* Environment: RTTarget-32
+*
+* Description: Win32 implementation for the SciTech cross platform
+* event library.
+*
+****************************************************************************/
+
+/*---------------------------- Global Variables ---------------------------*/
+
+static ushort keyUpMsg[256] = {0}; /* Table of key up messages */
+static int rangeX,rangeY; /* Range of mouse coordinates */
+
+/*---------------------------- Implementation -----------------------------*/
+
+/* These are not used under Win32 */
+#define _EVT_disableInt() 1
+#define _EVT_restoreInt(flags)
+
+/****************************************************************************
+PARAMETERS:
+scanCode - Scan code to test
+
+REMARKS:
+This macro determines if a specified key is currently down at the
+time that the call is made.
+****************************************************************************/
+#define _EVT_isKeyDown(scanCode) (keyUpMsg[scanCode] != 0)
+
+/****************************************************************************
+REMARKS:
+This function is used to return the number of ticks since system
+startup in milliseconds. This should be the same value that is placed into
+the time stamp fields of events, and is used to implement auto mouse down
+events.
+****************************************************************************/
+ulong _EVT_getTicks(void)
+{ return timeGetTime(); }
+
+/****************************************************************************
+REMARKS:
+Pumps all messages in the message queue from Win32 into our event queue.
+****************************************************************************/
+void _EVT_pumpMessages(void)
+{
+ MSG msg;
+ MSG charMsg;
+ event_t evt;
+
+ while (PeekMessage(&msg,NULL,0,0,PM_REMOVE)) {
+ memset(&evt,0,sizeof(evt));
+ switch (msg.message) {
+ case WM_MOUSEMOVE:
+ evt.what = EVT_MOUSEMOVE;
+ break;
+ case WM_LBUTTONDBLCLK:
+ evt.what = EVT_MOUSEDOWN;
+ evt.message = EVT_LEFTBMASK | EVT_DBLCLICK;
+ break;
+ case WM_LBUTTONDOWN:
+ evt.what = EVT_MOUSEDOWN;
+ evt.message = EVT_LEFTBMASK;
+ break;
+ case WM_LBUTTONUP:
+ evt.what = EVT_MOUSEUP;
+ evt.message = EVT_LEFTBMASK;
+ break;
+ case WM_RBUTTONDBLCLK:
+ evt.what = EVT_MOUSEDOWN | EVT_DBLCLICK;
+ evt.message = EVT_RIGHTBMASK;
+ break;
+ case WM_RBUTTONDOWN:
+ evt.what = EVT_MOUSEDOWN;
+ evt.message = EVT_RIGHTBMASK;
+ break;
+ case WM_RBUTTONUP:
+ evt.what = EVT_MOUSEUP;
+ evt.message = EVT_RIGHTBMASK;
+ break;
+ case WM_KEYDOWN:
+ case WM_SYSKEYDOWN:
+ if (HIWORD(msg.lParam) & KF_REPEAT) {
+ evt.what = EVT_KEYREPEAT;
+ }
+ else {
+ evt.what = EVT_KEYDOWN;
+ }
+ break;
+ case WM_KEYUP:
+ case WM_SYSKEYUP:
+ evt.what = EVT_KEYUP;
+ break;
+ }
+
+ /* Convert mouse event modifier flags */
+ if (evt.what & EVT_MOUSEEVT) {
+ evt.where_x = msg.pt.x;
+ evt.where_y = msg.pt.y;
+ if (evt.what == EVT_MOUSEMOVE) {
+ if (oldMove != -1) {
+ evtq[oldMove].where_x = evt.where_x;/* Modify existing one */
+ evtq[oldMove].where_y = evt.where_y;
+ evt.what = 0;
+ }
+ else {
+ oldMove = freeHead; /* Save id of this move event */
+ }
+ }
+ else
+ oldMove = -1;
+ if (msg.wParam & MK_LBUTTON)
+ evt.modifiers |= EVT_LEFTBUT;
+ if (msg.wParam & MK_RBUTTON)
+ evt.modifiers |= EVT_RIGHTBUT;
+ if (msg.wParam & MK_SHIFT)
+ evt.modifiers |= EVT_SHIFTKEY;
+ if (msg.wParam & MK_CONTROL)
+ evt.modifiers |= EVT_CTRLSTATE;
+ }
+
+ /* Convert keyboard codes */
+ TranslateMessage(&msg);
+ if (evt.what & EVT_KEYEVT) {
+ int scanCode = (msg.lParam >> 16) & 0xFF;
+ if (evt.what == EVT_KEYUP) {
+ /* Get message for keyup code from table of cached down values */
+ evt.message = keyUpMsg[scanCode];
+ keyUpMsg[scanCode] = 0;
+ }
+ else {
+ if (PeekMessage(&charMsg,NULL,WM_CHAR,WM_CHAR,PM_REMOVE))
+ evt.message = charMsg.wParam;
+ if (PeekMessage(&charMsg,NULL,WM_SYSCHAR,WM_SYSCHAR,PM_REMOVE))
+ evt.message = charMsg.wParam;
+ evt.message |= ((msg.lParam >> 8) & 0xFF00);
+ keyUpMsg[scanCode] = (ushort)evt.message;
+ }
+ if (evt.what == EVT_KEYREPEAT)
+ evt.message |= (msg.lParam << 16);
+ if (HIWORD(msg.lParam) & KF_ALTDOWN)
+ evt.modifiers |= EVT_ALTSTATE;
+ if (GetKeyState(VK_SHIFT) & 0x8000U)
+ evt.modifiers |= EVT_SHIFTKEY;
+ if (GetKeyState(VK_CONTROL) & 0x8000U)
+ evt.modifiers |= EVT_CTRLSTATE;
+ oldMove = -1;
+ }
+
+ if (evt.what != 0) {
+ /* Add time stamp and add the event to the queue */
+ evt.when = msg.time;
+ if (count < EVENTQSIZE) {
+ addEvent(&evt);
+ }
+ }
+ DispatchMessage(&msg);
+ }
+}
+
+/****************************************************************************
+REMARKS:
+This macro/function is used to converts the scan codes reported by the
+keyboard to our event libraries normalised format. We only have one scan
+code for the 'A' key, and use shift modifiers to determine if it is a
+Ctrl-F1, Alt-F1 etc. The raw scan codes from the keyboard work this way,
+but the OS gives us 'cooked' scan codes, we have to translate them back
+to the raw format.
+****************************************************************************/
+#define _EVT_maskKeyCode(evt)
+
+/****************************************************************************
+REMARKS:
+Safely abort the event module upon catching a fatal error.
+****************************************************************************/
+void _EVT_abort()
+{
+ EVT_exit();
+ PM_fatalError("Unhandled exception!");
+}
+
+/****************************************************************************
+PARAMETERS:
+mouseMove - Callback function to call wheneve the mouse needs to be moved
+
+REMARKS:
+Initiliase the event handling module. Here we install our mouse handling ISR
+to be called whenever any button's are pressed or released. We also build
+the free list of events in the event queue.
+
+We use handler number 2 of the mouse libraries interrupt handlers for our
+event handling routines.
+****************************************************************************/
+void EVTAPI EVT_init(
+ _EVT_mouseMoveHandler mouseMove)
+{
+ /* Initialise the event queue */
+ _mouseMove = mouseMove;
+ initEventQueue();
+ memset(keyUpMsg,0,sizeof(keyUpMsg));
+
+ /* Catch program termination signals so we can clean up properly */
+ signal(SIGABRT, _EVT_abort);
+ signal(SIGFPE, _EVT_abort);
+ signal(SIGINT, _EVT_abort);
+}
+
+/****************************************************************************
+REMARKS
+Changes the range of coordinates returned by the mouse functions to the
+specified range of values. This is used when changing between graphics
+modes set the range of mouse coordinates for the new display mode.
+****************************************************************************/
+void EVTAPI EVT_setMouseRange(
+ int xRes,
+ int yRes)
+{
+ rangeX = xRes;
+ rangeY = yRes;
+}
+
+/****************************************************************************
+REMARKS
+Modifes the mouse coordinates as necessary if scaling to OS coordinates,
+and sets the OS mouse cursor position.
+****************************************************************************/
+void _EVT_setMousePos(
+ int *x,
+ int *y)
+{
+ SetCursorPos(*x,*y);
+}
+
+/****************************************************************************
+REMARKS:
+Initiailises the internal event handling modules. The EVT_suspend function
+can be called to suspend event handling (such as when shelling out to DOS),
+and this function can be used to resume it again later.
+****************************************************************************/
+void EVT_resume(void)
+{
+ // Do nothing for Win32
+}
+
+/****************************************************************************
+REMARKS
+Suspends all of our event handling operations. This is also used to
+de-install the event handling code.
+****************************************************************************/
+void EVT_suspend(void)
+{
+ // Do nothing for Win32
+}
+
+/****************************************************************************
+REMARKS
+Exits the event module for program terminatation.
+****************************************************************************/
+void EVT_exit(void)
+{
+ /* Restore signal handlers */
+ signal(SIGABRT, SIG_DFL);
+ signal(SIGFPE, SIG_DFL);
+ signal(SIGINT, SIG_DFL);
+}
diff --git a/board/MAI/bios_emulator/scitech/src/pm/rttarget/oshdr.h b/board/MAI/bios_emulator/scitech/src/pm/rttarget/oshdr.h
new file mode 100644
index 00000000000..1352dadad60
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/pm/rttarget/oshdr.h
@@ -0,0 +1,34 @@
+/****************************************************************************
+*
+* SciTech OS Portability Manager Library
+*
+* ========================================================================
+*
+* The contents of this file are subject to the SciTech MGL Public
+* License Version 1.0 (the "License"); you may not use this file
+* except in compliance with the License. You may obtain a copy of
+* the License at http://www.scitechsoft.com/mgl-license.txt
+*
+* Software distributed under the License is distributed on an
+* "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+* implied. See the License for the specific language governing
+* rights and limitations under the License.
+*
+* The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+*
+* The Initial Developer of the Original Code is SciTech Software, Inc.
+* All Rights Reserved.
+*
+* ========================================================================
+*
+* Language: ANSI C
+* Environment: RTTarget-32
+*
+* Description: Include file to include all OS specific header files.
+*
+****************************************************************************/
+
+#define WIN32_LEAN_AND_MEAN
+#define STRICT
+#include <windows.h>
+#include <mmsystem.h>
diff --git a/board/MAI/bios_emulator/scitech/src/pm/rttarget/pm.c b/board/MAI/bios_emulator/scitech/src/pm/rttarget/pm.c
new file mode 100644
index 00000000000..e6c1fbd8b31
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/pm/rttarget/pm.c
@@ -0,0 +1,701 @@
+/****************************************************************************
+*
+* SciTech OS Portability Manager Library
+*
+* ========================================================================
+*
+* The contents of this file are subject to the SciTech MGL Public
+* License Version 1.0 (the "License"); you may not use this file
+* except in compliance with the License. You may obtain a copy of
+* the License at http://www.scitechsoft.com/mgl-license.txt
+*
+* Software distributed under the License is distributed on an
+* "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+* implied. See the License for the specific language governing
+* rights and limitations under the License.
+*
+* The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+*
+* The Initial Developer of the Original Code is SciTech Software, Inc.
+* All Rights Reserved.
+*
+* ========================================================================
+*
+* Language: ANSI C
+* Environment: RTTarget-32
+*
+* Description: Implementation for the OS Portability Manager Library, which
+* contains functions to implement OS specific services in a
+* generic, cross platform API. Porting the OS Portability
+* Manager library is the first step to porting any SciTech
+* products to a new platform.
+*
+****************************************************************************/
+
+#include "pmapi.h"
+#include "drvlib/os/os.h"
+#include <stdio.h>
+#include <stdlib.h>
+#include <string.h>
+#define WIN32_LEAN_AND_MEAN
+#define STRICT
+#include <windows.h>
+#include <mmsystem.h>
+#ifdef __BORLANDC__
+#pragma warn -par
+#endif
+
+/*--------------------------- Global variables ----------------------------*/
+
+static void (PMAPIP fatalErrorCleanup)(void) = NULL;
+
+/*----------------------------- Implementation ----------------------------*/
+
+void MTRR_init(void);
+
+/****************************************************************************
+REMARKS:
+Initialise the PM library.
+****************************************************************************/
+void PMAPI PM_init(void)
+{
+ // TODO: dO any special init code in here.
+ MTRR_init();
+}
+
+/****************************************************************************
+REMARKS:
+Return the operating system type identifier.
+****************************************************************************/
+long PMAPI PM_getOSType(void)
+{
+ return _OS_RTTARGET;
+}
+
+/****************************************************************************
+REMARKS:
+Return the runtime type identifier.
+****************************************************************************/
+int PMAPI PM_getModeType(void)
+{
+ return PM_386;
+}
+
+/****************************************************************************
+REMARKS:
+Add a file directory separator to the end of the filename.
+****************************************************************************/
+void PMAPI PM_backslash(
+ char *s)
+{
+ uint pos = strlen(s);
+ if (s[pos-1] != '\\') {
+ s[pos] = '\\';
+ s[pos+1] = '\0';
+ }
+}
+
+/****************************************************************************
+REMARKS:
+Add a user defined PM_fatalError cleanup function.
+****************************************************************************/
+void PMAPI PM_setFatalErrorCleanup(
+ void (PMAPIP cleanup)(void))
+{
+ fatalErrorCleanup = cleanup;
+}
+
+/****************************************************************************
+REMARKS:
+Report a fatal error condition and halt the program.
+****************************************************************************/
+void PMAPI PM_fatalError(
+ const char *msg)
+{
+ if (fatalErrorCleanup)
+ fatalErrorCleanup();
+ // TODO: Display a fatal error message and exit!
+// MessageBox(NULL,msg,"Fatal Error!", MB_ICONEXCLAMATION);
+ exit(1);
+}
+
+/****************************************************************************
+REMARKS:
+Allocate the real mode VESA transfer buffer for communicating with the BIOS.
+****************************************************************************/
+void * PMAPI PM_getVESABuf(
+ uint *len,
+ uint *rseg,
+ uint *roff)
+{
+ /* No BIOS access for the RTTarget */
+ return NULL;
+}
+
+/****************************************************************************
+REMARKS:
+Check if a key has been pressed.
+****************************************************************************/
+int PMAPI PM_kbhit(void)
+{
+ // TODO: Need to check if a key is waiting on the keyboard queue
+ return true;
+}
+
+/****************************************************************************
+REMARKS:
+Wait for and return the next keypress.
+****************************************************************************/
+int PMAPI PM_getch(void)
+{
+ // TODO: Need to obtain the next keypress, and block until one is hit
+ return 0xD;
+}
+
+/****************************************************************************
+REMARKS:
+Set the location of the OS console cursor.
+****************************************************************************/
+void PM_setOSCursorLocation(
+ int x,
+ int y)
+{
+ /* Nothing to do for RTTarget-32 */
+}
+
+/****************************************************************************
+REMARKS:
+Set the width of the OS console.
+****************************************************************************/
+void PM_setOSScreenWidth(
+ int width,
+ int height)
+{
+ /* Nothing to do for RTTarget-32 */
+}
+
+/****************************************************************************
+REMARKS:
+Set the real time clock handler (used for software stereo modes).
+****************************************************************************/
+ibool PMAPI PM_setRealTimeClockHandler(
+ PM_intHandler ih,
+ int frequency)
+{
+ /* Not supported for RTTarget-32 */
+ return false;
+}
+
+/****************************************************************************
+REMARKS:
+Set the real time clock frequency (for stereo modes).
+****************************************************************************/
+void PMAPI PM_setRealTimeClockFrequency(
+ int frequency)
+{
+ /* Not supported under RTTarget-32 */
+}
+
+/****************************************************************************
+REMARKS:
+Restore the original real time clock handler.
+****************************************************************************/
+void PMAPI PM_restoreRealTimeClockHandler(void)
+{
+ /* Not supported under RTTarget-32 */
+}
+
+/****************************************************************************
+REMARKS:
+Return the current operating system path or working directory.
+****************************************************************************/
+char * PMAPI PM_getCurrentPath(
+ char *path,
+ int maxLen)
+{
+ return getcwd(path,maxLen);
+}
+
+/****************************************************************************
+REMARKS:
+Return the drive letter for the boot drive.
+****************************************************************************/
+char PMAPI PM_getBootDrive(void)
+{
+ return 'c';
+}
+
+/****************************************************************************
+REMARKS:
+Return the path to the VBE/AF driver files.
+****************************************************************************/
+const char * PMAPI PM_getVBEAFPath(void)
+{
+ return "c:\\";
+}
+
+/****************************************************************************
+REMARKS:
+Return the path to the Nucleus driver files.
+****************************************************************************/
+const char * PMAPI PM_getNucleusPath(void)
+{
+ // TODO: Point this at the path when the Nucleus drivers will be found
+ return "c:\\nucleus";
+}
+
+/****************************************************************************
+REMARKS:
+Return the path to the Nucleus configuration files.
+****************************************************************************/
+const char * PMAPI PM_getNucleusConfigPath(void)
+{
+ static char path[256];
+ strcpy(path,PM_getNucleusPath());
+ PM_backslash(path);
+ strcat(path,"config");
+ return path;
+}
+
+/****************************************************************************
+REMARKS:
+Return a unique identifier for the machine if possible.
+****************************************************************************/
+const char * PMAPI PM_getUniqueID(void)
+{
+ return PM_getMachineName();
+}
+
+/****************************************************************************
+REMARKS:
+Get the name of the machine on the network.
+****************************************************************************/
+const char * PMAPI PM_getMachineName(void)
+{
+ /* Not necessary for RTTarget-32 */
+ return "Unknown";
+}
+
+/****************************************************************************
+REMARKS:
+Return a pointer to the real mode BIOS data area.
+****************************************************************************/
+void * PMAPI PM_getBIOSPointer(void)
+{
+ /* Not used for RTTarget-32 */
+ return NULL;
+}
+
+/****************************************************************************
+REMARKS:
+Return a pointer to 0xA0000 physical VGA graphics framebuffer.
+****************************************************************************/
+void * PMAPI PM_getA0000Pointer(void)
+{
+ static void *bankPtr;
+ if (!bankPtr)
+ bankPtr = PM_mapPhysicalAddr(0xA0000,0xFFFF,true);
+ return bankPtr;
+}
+
+/****************************************************************************
+REMARKS:
+Map a physical address to a linear address in the callers process.
+****************************************************************************/
+void * PMAPI PM_mapPhysicalAddr(
+ ulong base,
+ ulong limit,
+ ibool isCached)
+{
+ // TODO: Map a physical memory address to a linear address
+ return NULL;
+}
+
+/****************************************************************************
+REMARKS:
+Free a physical address mapping allocated by PM_mapPhysicalAddr.
+****************************************************************************/
+void PMAPI PM_freePhysicalAddr(
+ void *ptr,
+ ulong limit)
+{
+ // TODO: Free the physical address mapping
+}
+
+ulong PMAPI PM_getPhysicalAddr(void *p)
+{
+ // TODO: This function should find the physical address of a linear
+ // address.
+ return 0xFFFFFFFFUL;
+}
+
+void PMAPI PM_sleep(ulong milliseconds)
+{
+ Sleep(milliseconds);
+}
+
+int PMAPI PM_getCOMPort(int port)
+{
+ // TODO: Re-code this to determine real values using the Plug and Play
+ // manager for the OS.
+ switch (port) {
+ case 0: return 0x3F8;
+ case 1: return 0x2F8;
+ }
+ return 0;
+}
+
+int PMAPI PM_getLPTPort(int port)
+{
+ // TODO: Re-code this to determine real values using the Plug and Play
+ // manager for the OS.
+ switch (port) {
+ case 0: return 0x3BC;
+ case 1: return 0x378;
+ case 2: return 0x278;
+ }
+ return 0;
+}
+
+/****************************************************************************
+REMARKS:
+Allocate a block of (unnamed) shared memory.
+****************************************************************************/
+void * PMAPI PM_mallocShared(
+ long size)
+{
+ return PM_malloc(size);
+}
+
+/****************************************************************************
+REMARKS:
+Free a block of shared memory.
+****************************************************************************/
+void PMAPI PM_freeShared(
+ void *ptr)
+{
+ PM_free(ptr);
+}
+
+/****************************************************************************
+REMARKS:
+Map a linear memory address to the calling process address space. The
+address will have been allocated in another process using the
+PM_mapPhysicalAddr function.
+****************************************************************************/
+void * PMAPI PM_mapToProcess(
+ void *base,
+ ulong limit)
+{
+ return base;
+}
+
+/****************************************************************************
+REMARKS:
+Map a real mode pointer to a protected mode pointer.
+****************************************************************************/
+void * PMAPI PM_mapRealPointer(
+ uint r_seg,
+ uint r_off)
+{
+ /* Not used for RTTarget-32 */
+ return NULL;
+}
+
+/****************************************************************************
+REMARKS:
+Allocate a block of real mode memory
+****************************************************************************/
+void * PMAPI PM_allocRealSeg(
+ uint size,
+ uint *r_seg,
+ uint *r_off)
+{
+ /* Not used for RTTarget-32 */
+ return NULL;
+}
+
+/****************************************************************************
+REMARKS:
+Free a block of real mode memory.
+****************************************************************************/
+void PMAPI PM_freeRealSeg(
+ void *mem)
+{
+ /* Not used for RTTarget-32 */
+}
+
+/****************************************************************************
+REMARKS:
+Issue a real mode interrupt (parameters in DPMI compatible structure)
+****************************************************************************/
+void PMAPI DPMI_int86(
+ int intno,
+ DPMI_regs *regs)
+{
+ /* Not used for RTTarget-32 */
+}
+
+/****************************************************************************
+REMARKS:
+Issue a real mode interrupt.
+****************************************************************************/
+int PMAPI PM_int86(
+ int intno,
+ RMREGS *in,
+ RMREGS *out)
+{
+ /* Not used for RTTarget-32 */
+ return 0;
+}
+
+/****************************************************************************
+REMARKS:
+Issue a real mode interrupt.
+****************************************************************************/
+int PMAPI PM_int86x(
+ int intno,
+ RMREGS *in,
+ RMREGS *out,
+ RMSREGS *sregs)
+{
+ /* Not used for RTTarget-32 */
+ return 0;
+}
+
+/****************************************************************************
+REMARKS:
+Call a real mode far function.
+****************************************************************************/
+void PMAPI PM_callRealMode(
+ uint seg,
+ uint off,
+ RMREGS *in,
+ RMSREGS *sregs)
+{
+ /* Not used for RTTarget-32 */
+}
+
+/****************************************************************************
+REMARKS:
+Return the amount of available memory.
+****************************************************************************/
+void PMAPI PM_availableMemory(
+ ulong *physical,
+ ulong *total)
+{
+ // TODO: Figure out how to determine the available memory. Not entirely
+ // critical so returning 0 is OK.
+ *physical = *total = 0;
+}
+
+/****************************************************************************
+REMARKS:
+Allocate a block of locked, physical memory for DMA operations.
+****************************************************************************/
+void * PMAPI PM_allocLockedMem(
+ uint size,
+ ulong *physAddr,
+ ibool contiguous,
+ ibool below16M)
+{
+ // TODO: Allocate a block of locked, phsyically contigous memory for DMA
+ return 0;
+}
+
+/****************************************************************************
+REMARKS:
+Free a block of locked physical memory.
+****************************************************************************/
+void PMAPI PM_freeLockedMem(
+ void *p,
+ uint size,
+
+ ibool contiguous)
+{
+ // TODO: Free a locked memory buffer
+}
+
+/****************************************************************************
+REMARKS:
+Call the VBE/Core software interrupt to change display banks.
+****************************************************************************/
+void PMAPI PM_setBankA(
+ int bank)
+{
+ /* Not used for RTTarget-32 */
+}
+
+/****************************************************************************
+REMARKS:
+Call the VBE/Core software interrupt to change display banks.
+****************************************************************************/
+void PMAPI PM_setBankAB(
+ int bank)
+{
+ /* Not used for RTTarget-32 */
+}
+
+/****************************************************************************
+REMARKS:
+Call the VBE/Core software interrupt to change display start address.
+****************************************************************************/
+void PMAPI PM_setCRTStart(
+ int x,
+ int y,
+ int waitVRT)
+{
+ /* Not used for RTTarget-32 */
+}
+
+/****************************************************************************
+REMARKS:
+Execute the POST on the secondary BIOS for a controller.
+****************************************************************************/
+ibool PMAPI PM_doBIOSPOST(
+ ushort axVal,
+ ulong BIOSPhysAddr,
+ void *mappedBIOS)
+{
+ /* Not used for RTTarget-32 */
+ return false;
+}
+
+PM_MODULE PMAPI PM_loadLibrary(
+ const char *szDLLName)
+{
+ // TODO: Implement this to load shared libraries!
+ (void)szDLLName;
+ return NULL;
+}
+
+void * PMAPI PM_getProcAddress(
+ PM_MODULE hModule,
+ const char *szProcName)
+{
+ // TODO: Implement this!
+ (void)hModule;
+ (void)szProcName;
+ return NULL;
+}
+
+void PMAPI PM_freeLibrary(
+ PM_MODULE hModule)
+{
+ // TODO: Implement this!
+ (void)hModule;
+}
+
+/****************************************************************************
+REMARKS:
+Function to find the first file matching a search criteria in a directory.
+****************************************************************************/
+ulong PMAPI PM_findFirstFile(
+ const char *filename,
+ PM_findData *findData)
+{
+ // TODO: This function should start a directory enumeration search
+ // given the filename (with wildcards). The data should be
+ // converted and returned in the findData standard form.
+ (void)filename;
+ (void)findData;
+ return PM_FILE_INVALID;
+}
+
+/****************************************************************************
+REMARKS:
+Function to find the next file matching a search criteria in a directory.
+****************************************************************************/
+ibool PMAPI PM_findNextFile(
+ ulong handle,
+ PM_findData *findData)
+{
+ // TODO: This function should find the next file in directory enumeration
+ // search given the search criteria defined in the call to
+ // PM_findFirstFile. The data should be converted and returned
+ // in the findData standard form.
+ (void)handle;
+ (void)findData;
+ return false;
+}
+
+/****************************************************************************
+REMARKS:
+Function to close the find process
+****************************************************************************/
+void PMAPI PM_findClose(
+ ulong handle)
+{
+ // TODO: This function should close the find process. This may do
+ // nothing for some OS'es.
+ (void)handle;
+}
+
+/****************************************************************************
+REMARKS:
+Function to determine if a drive is a valid drive or not. Under Unix this
+function will return false for anything except a value of 3 (considered
+the root drive, and equivalent to C: for non-Unix systems). The drive
+numbering is:
+
+ 1 - Drive A:
+ 2 - Drive B:
+ 3 - Drive C:
+ etc
+
+****************************************************************************/
+ibool PMAPI PM_driveValid(
+ char drive)
+{
+ if (drive == 3)
+ return true;
+ return false;
+}
+
+/****************************************************************************
+REMARKS:
+Function to get the current working directory for the specififed drive.
+Under Unix this will always return the current working directory regardless
+of what the value of 'drive' is.
+****************************************************************************/
+void PMAPI PM_getdcwd(
+ int drive,
+ char *dir,
+ int len)
+{
+ (void)drive;
+ getcwd(dir,len);
+}
+
+/****************************************************************************
+REMARKS:
+Function to change the file attributes for a specific file.
+****************************************************************************/
+void PMAPI PM_setFileAttr(
+ const char *filename,
+ uint attrib)
+{
+ // TODO: Set the file attributes for a file
+ (void)filename;
+ (void)attrib;
+}
+
+/****************************************************************************
+REMARKS:
+Function to create a directory.
+****************************************************************************/
+ibool PMAPI PM_mkdir(
+ const char *filename)
+{
+ return mkdir(filename) == 0;
+}
+
+/****************************************************************************
+REMARKS:
+Function to remove a directory.
+****************************************************************************/
+ibool PMAPI PM_rmdir(
+ const char *filename)
+{
+ return rmdir(filename) == 0;
+}
diff --git a/board/MAI/bios_emulator/scitech/src/pm/rttarget/vflat.c b/board/MAI/bios_emulator/scitech/src/pm/rttarget/vflat.c
new file mode 100644
index 00000000000..dd9dfe68268
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/pm/rttarget/vflat.c
@@ -0,0 +1,48 @@
+/****************************************************************************
+*
+* SciTech OS Portability Manager Library
+*
+* ========================================================================
+*
+* The contents of this file are subject to the SciTech MGL Public
+* License Version 1.0 (the "License"); you may not use this file
+* except in compliance with the License. You may obtain a copy of
+* the License at http://www.scitechsoft.com/mgl-license.txt
+*
+* Software distributed under the License is distributed on an
+* "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+* implied. See the License for the specific language governing
+* rights and limitations under the License.
+*
+* The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+*
+* The Initial Developer of the Original Code is SciTech Software, Inc.
+* All Rights Reserved.
+*
+* ========================================================================
+*
+* Language: ANSI C
+* Environment: RTTarget-32
+*
+* Description: Dummy module; no virtual framebuffer for this OS
+*
+****************************************************************************/
+
+#include "pmapi.h"
+#ifdef __BORLANDC__
+#pragma warn -par
+#endif
+
+ibool PMAPI VF_available(void)
+{
+ return false;
+}
+
+void * PMAPI VF_init(ulong baseAddr,int bankSize,int codeLen,void *bankFunc)
+{
+ return NULL;
+}
+
+void PMAPI VF_exit(void)
+{
+}
diff --git a/board/MAI/bios_emulator/scitech/src/pm/rttarget/ztimer.c b/board/MAI/bios_emulator/scitech/src/pm/rttarget/ztimer.c
new file mode 100644
index 00000000000..52472c385a7
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/pm/rttarget/ztimer.c
@@ -0,0 +1,136 @@
+/****************************************************************************
+*
+* Ultra Long Period Timer
+*
+* ========================================================================
+*
+* The contents of this file are subject to the SciTech MGL Public
+* License Version 1.0 (the "License"); you may not use this file
+* except in compliance with the License. You may obtain a copy of
+* the License at http://www.scitechsoft.com/mgl-license.txt
+*
+* Software distributed under the License is distributed on an
+* "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+* implied. See the License for the specific language governing
+* rights and limitations under the License.
+*
+* The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+*
+* The Initial Developer of the Original Code is SciTech Software, Inc.
+* All Rights Reserved.
+*
+* ========================================================================
+*
+* Language: ANSI C
+* Environment: RTTarget-32
+*
+* Description: OS specific implementation for the Zen Timer functions.
+*
+****************************************************************************/
+
+/*---------------------------- Global variables ---------------------------*/
+
+static CPU_largeInteger countFreq;
+static ibool havePerformanceCounter;
+static ulong start,finish;
+
+/*----------------------------- Implementation ----------------------------*/
+
+/****************************************************************************
+REMARKS:
+Initialise the Zen Timer module internals.
+****************************************************************************/
+void __ZTimerInit(void)
+{
+#ifdef NO_ASSEMBLER
+ havePerformanceCounter = false;
+#else
+ havePerformanceCounter = QueryPerformanceFrequency((LARGE_INTEGER*)&countFreq);
+#endif
+}
+
+/****************************************************************************
+REMARKS:
+Start the Zen Timer counting.
+****************************************************************************/
+static void __LZTimerOn(
+ LZTimerObject *tm)
+{
+ if (havePerformanceCounter)
+ QueryPerformanceCounter((LARGE_INTEGER*)&tm->start);
+ else
+ tm->start.low = timeGetTime();
+}
+
+/****************************************************************************
+REMARKS:
+Compute the lap time since the timer was started.
+****************************************************************************/
+static ulong __LZTimerLap(
+ LZTimerObject *tm)
+{
+ CPU_largeInteger tmLap,tmCount;
+
+ if (havePerformanceCounter) {
+ QueryPerformanceCounter((LARGE_INTEGER*)&tmLap);
+ _CPU_diffTime64(&tm->start,&tmLap,&tmCount);
+ return _CPU_calcMicroSec(&tmCount,countFreq.low);
+ }
+ else {
+ tmLap.low = timeGetTime();
+ return (tmLap.low - tm->start.low) * 1000L;
+ }
+}
+
+/****************************************************************************
+REMARKS:
+Stop the Zen Timer counting.
+****************************************************************************/
+static void __LZTimerOff(
+ LZTimerObject *tm)
+{
+ if (havePerformanceCounter)
+ QueryPerformanceCounter((LARGE_INTEGER*)&tm->end);
+ else
+ tm->end.low = timeGetTime();
+}
+
+/****************************************************************************
+REMARKS:
+Compute the elapsed time in microseconds between start and end timings.
+****************************************************************************/
+static ulong __LZTimerCount(
+ LZTimerObject *tm)
+{
+ CPU_largeInteger tmCount;
+
+ if (havePerformanceCounter) {
+ _CPU_diffTime64(&tm->start,&tm->end,&tmCount);
+ return _CPU_calcMicroSec(&tmCount,countFreq.low);
+ }
+ else
+ return (tm->end.low - tm->start.low) * 1000L;
+}
+
+/****************************************************************************
+REMARKS:
+Define the resolution of the long period timer as microseconds per timer tick.
+****************************************************************************/
+#define ULZTIMER_RESOLUTION 1000
+
+/****************************************************************************
+REMARKS:
+Read the Long Period timer from the OS
+****************************************************************************/
+static ulong __ULZReadTime(void)
+{ return timeGetTime(); }
+
+/****************************************************************************
+REMARKS:
+Compute the elapsed time from the BIOS timer tick. Note that we check to see
+whether a midnight boundary has passed, and if so adjust the finish time to
+account for this. We cannot detect if more that one midnight boundary has
+passed, so if this happens we will be generating erronous results.
+****************************************************************************/
+ulong __ULZElapsedTime(ulong start,ulong finish)
+{ return finish - start; }
diff --git a/board/MAI/bios_emulator/scitech/src/pm/smx/_event.asm b/board/MAI/bios_emulator/scitech/src/pm/smx/_event.asm
new file mode 100644
index 00000000000..da62b1f712b
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/pm/smx/_event.asm
@@ -0,0 +1,175 @@
+;****************************************************************************
+;*
+;* SciTech Multi-platform Graphics Library
+;*
+;* ========================================================================
+;*
+;* The contents of this file are subject to the SciTech MGL Public
+;* License Version 1.0 (the "License"); you may not use this file
+;* except in compliance with the License. You may obtain a copy of
+;* the License at http://www.scitechsoft.com/mgl-license.txt
+;*
+;* Software distributed under the License is distributed on an
+;* "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+;* implied. See the License for the specific language governing
+;* rights and limitations under the License.
+;*
+;* The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+;*
+;* The Initial Developer of the Original Code is SciTech Software, Inc.
+;* All Rights Reserved.
+;*
+;* ========================================================================
+;*
+;* Language: 80386 Assembler
+;* Environment: IBM PC (MS DOS)
+;*
+;* Description: Assembly language support routines for the event module.
+;*
+;****************************************************************************
+
+ ideal
+
+include "scitech.mac" ; Memory model macros
+
+ifdef flatmodel
+
+header _event ; Set up memory model
+
+begdataseg _event
+
+ cextern _EVT_biosPtr,DPTR
+
+ cpublic _EVT_dataStart
+
+ifdef USE_NASM
+%define KB_HEAD WORD esi+01Ah ; Keyboard buffer head in BIOS data area
+%define KB_TAIL WORD esi+01Ch ; Keyboard buffer tail in BIOS data area
+%define KB_START WORD esi+080h ; Start of keyboard buffer in BIOS data area
+%define KB_END WORD esi+082h ; End of keyboard buffer in BIOS data area
+else
+KB_HEAD EQU WORD esi+01Ah ; Keyboard buffer head in BIOS data area
+KB_TAIL EQU WORD esi+01Ch ; Keyboard buffer tail in BIOS data area
+KB_START EQU WORD esi+080h ; Start of keyboard buffer in BIOS data area
+KB_END EQU WORD esi+082h ; End of keyboard buffer in BIOS data area
+endif
+
+ cpublic _EVT_dataEnd
+
+enddataseg _event
+
+begcodeseg _event ; Start of code segment
+
+ cpublic _EVT_codeStart
+
+;----------------------------------------------------------------------------
+; int _EVT_getKeyCode(void)
+;----------------------------------------------------------------------------
+; Returns the key code for the next available key by extracting it from
+; the BIOS keyboard buffer.
+;----------------------------------------------------------------------------
+cprocstart _EVT_getKeyCode
+
+ enter_c
+
+ mov esi,[_EVT_biosPtr]
+ xor ebx,ebx
+ xor eax,eax
+ mov bx,[KB_HEAD]
+ cmp bx,[KB_TAIL]
+ jz @@Done
+ xor eax,eax
+ mov ax,[esi+ebx] ; EAX := character from keyboard buffer
+ inc _bx
+ inc _bx
+ cmp bx,[KB_END] ; Hit the end of the keyboard buffer?
+ jl @@1
+ mov bx,[KB_START]
+@@1: mov [KB_HEAD],bx ; Update keyboard buffer head pointer
+
+@@Done: leave_c
+ ret
+
+cprocend
+
+;----------------------------------------------------------------------------
+; int _EVT_disableInt(void);
+;----------------------------------------------------------------------------
+; Return processor interrupt status and disable interrupts.
+;----------------------------------------------------------------------------
+cprocstart _EVT_disableInt
+
+ pushf ; Put flag word on stack
+ cli ; Disable interrupts!
+ pop eax ; deposit flag word in return register
+ ret
+
+cprocend
+
+;----------------------------------------------------------------------------
+; void _EVT_restoreInt(int ps);
+;----------------------------------------------------------------------------
+; Restore processor interrupt status.
+;----------------------------------------------------------------------------
+cprocstart _EVT_restoreInt
+
+ ARG ps:UINT
+
+ push ebp
+ mov ebp,esp ; Set up stack frame
+ push [DWORD ps]
+ popf ; Restore processor status (and interrupts)
+ pop ebp
+ ret
+
+cprocend
+
+;----------------------------------------------------------------------------
+; int EVT_rdinx(int port,int index)
+;----------------------------------------------------------------------------
+; Reads an indexed register value from an I/O port.
+;----------------------------------------------------------------------------
+cprocstart EVT_rdinx
+
+ ARG port:UINT, index:UINT
+
+ push ebp
+ mov ebp,esp
+ mov edx,[port]
+ mov al,[BYTE index]
+ out dx,al
+ inc dx
+ in al,dx
+ movzx eax,al
+ pop ebp
+ ret
+
+cprocend
+
+;----------------------------------------------------------------------------
+; void EVT_wrinx(int port,int index,int value)
+;----------------------------------------------------------------------------
+; Writes an indexed register value to an I/O port.
+;----------------------------------------------------------------------------
+cprocstart EVT_wrinx
+
+ ARG port:UINT, index:UINT, value:UINT
+
+ push ebp
+ mov ebp,esp
+ mov edx,[port]
+ mov al,[BYTE index]
+ mov ah,[BYTE value]
+ out dx,ax
+ pop ebp
+ ret
+
+cprocend
+
+ cpublic _EVT_codeEnd
+
+endcodeseg _event
+
+endif
+
+ END ; End of module
diff --git a/board/MAI/bios_emulator/scitech/src/pm/smx/_lztimer.asm b/board/MAI/bios_emulator/scitech/src/pm/smx/_lztimer.asm
new file mode 100644
index 00000000000..068eea65d2c
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/pm/smx/_lztimer.asm
@@ -0,0 +1,58 @@
+;****************************************************************************
+;*
+;* SciTech OS Portability Manager Library
+;*
+;* ========================================================================
+;*
+;* The contents of this file are subject to the SciTech MGL Public
+;* License Version 1.0 (the "License"); you may not use this file
+;* except in compliance with the License. You may obtain a copy of
+;* the License at http://www.scitechsoft.com/mgl-license.txt
+;*
+;* Software distributed under the License is distributed on an
+;* "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+;* implied. See the License for the specific language governing
+;* rights and limitations under the License.
+;*
+;* The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+;*
+;* The Initial Developer of the Original Code is SciTech Software, Inc.
+;* All Rights Reserved.
+;*
+;* ========================================================================
+;*
+;* Language: NASM or TASM Assembler
+;* Environment: smx 32 bit intel CPU
+;*
+;* Description: SMX does not support 486's, so this module is not necessary.
+;*
+;* All registers and all flags are preserved by all routines, except
+;* interrupts which are always turned on
+;*
+;****************************************************************************
+
+ IDEAL
+
+include "scitech.mac"
+
+header _lztimer
+
+begdataseg _lztimer
+
+enddataseg _lztimer
+
+begcodeseg _lztimer ; Start of code segment
+
+cprocstart LZ_disable
+ cli
+ ret
+cprocend
+
+cprocstart LZ_enable
+ sti
+ ret
+cprocend
+
+endcodeseg _lztimer
+
+ END
diff --git a/board/MAI/bios_emulator/scitech/src/pm/smx/_pm.asm b/board/MAI/bios_emulator/scitech/src/pm/smx/_pm.asm
new file mode 100644
index 00000000000..1c7cb21864b
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/pm/smx/_pm.asm
@@ -0,0 +1,448 @@
+;****************************************************************************
+;*
+;* SciTech OS Portability Manager Library
+;*
+;* ========================================================================
+;*
+;* The contents of this file are subject to the SciTech MGL Public
+;* License Version 1.0 (the "License"); you may not use this file
+;* except in compliance with the License. You may obtain a copy of
+;* the License at http://www.scitechsoft.com/mgl-license.txt
+;*
+;* Software distributed under the License is distributed on an
+;* "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+;* implied. See the License for the specific language governing
+;* rights and limitations under the License.
+;*
+;* The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+;*
+;* The Initial Developer of the Original Code is SciTech Software, Inc.
+;* All Rights Reserved.
+;*
+;* ========================================================================
+;*
+;* Language: 80386 Assembler, TASM 4.0 or NASM
+;* Environment: 32-bit SMX embedded systems development
+;*
+;* Description: Low level assembly support for the PM library specific to
+;* SMX.
+;*
+;****************************************************************************
+
+ IDEAL
+
+include "scitech.mac" ; Memory model macros
+
+header _pm ; Set up memory model
+
+begdataseg _pm
+
+ cextern _PM_savedDS,USHORT
+
+intel_id db "GenuineIntel" ; Intel vendor ID
+
+enddataseg _pm
+
+begcodeseg _pm ; Start of code segment
+
+;----------------------------------------------------------------------------
+; void PM_segread(PMSREGS *sregs)
+;----------------------------------------------------------------------------
+; Read the current value of all segment registers
+;----------------------------------------------------------------------------
+cprocstartdll16 PM_segread
+
+ ARG sregs:DPTR
+
+ enter_c
+
+ mov ax,es
+ _les _si,[sregs]
+ mov [_ES _si],ax
+ mov [_ES _si+2],cs
+ mov [_ES _si+4],ss
+ mov [_ES _si+6],ds
+ mov [_ES _si+8],fs
+ mov [_ES _si+10],gs
+
+ leave_c
+ ret
+
+cprocend
+
+; Create a table of the 256 different interrupt calls that we can jump
+; into
+
+ifdef USE_NASM
+
+%assign intno 0
+
+intTable:
+%rep 256
+ db 0CDh
+ db intno
+%assign intno intno + 1
+ ret
+ nop
+%endrep
+
+else
+
+intno = 0
+
+intTable:
+ REPT 256
+ db 0CDh
+ db intno
+intno = intno + 1
+ ret
+ nop
+ ENDM
+
+endif
+
+;----------------------------------------------------------------------------
+; _PM_genInt - Generate the appropriate interrupt
+;----------------------------------------------------------------------------
+cprocnear _PM_genInt
+
+ push _ax ; Save _ax
+ push _bx ; Save _bx
+ mov ebx,[UINT esp+12] ; EBX := interrupt number
+ mov _ax,offset intTable ; Point to interrupt generation table
+ shl _bx,2 ; _BX := index into table
+ add _ax,_bx ; _AX := pointer to interrupt code
+ xchg eax,[esp+4] ; Restore eax, and set for int
+ pop _bx ; restore _bx
+ ret
+
+cprocend
+
+;----------------------------------------------------------------------------
+; int PM_int386x(int intno, PMREGS *in, PMREGS *out,PMSREGS *sregs)
+;----------------------------------------------------------------------------
+; Issues a software interrupt in protected mode. This routine has been
+; written to allow user programs to load CS and DS with different values
+; other than the default.
+;----------------------------------------------------------------------------
+cprocstartdll16 PM_int386x
+
+ ARG intno:UINT, inptr:DPTR, outptr:DPTR, sregs:DPTR
+
+ LOCAL flags:UINT, sv_ds:UINT, sv_esi:ULONG = LocalSize
+
+ enter_c
+ push ds
+ push es ; Save segment registers
+ push fs
+ push gs
+
+ _lds _si,[sregs] ; DS:_SI -> Load segment registers
+ mov es,[_si]
+ mov bx,[_si+6]
+ mov [sv_ds],_bx ; Save value of user DS on stack
+ mov fs,[_si+8]
+ mov gs,[_si+10]
+
+ _lds _si,[inptr] ; Load CPU registers
+ mov eax,[_si]
+ mov ebx,[_si+4]
+ mov ecx,[_si+8]
+ mov edx,[_si+12]
+ mov edi,[_si+20]
+ mov esi,[_si+16]
+
+ push ds ; Save value of DS
+ push _bp ; Some interrupts trash this!
+ clc ; Generate the interrupt
+ push [UINT intno]
+ mov ds,[WORD sv_ds] ; Set value of user's DS selector
+ call _PM_genInt
+ pop _bp ; Pop intno from stack (flags unchanged)
+ pop _bp ; Restore value of stack frame pointer
+ pop ds ; Restore value of DS
+
+ pushf ; Save flags for later
+ pop [UINT flags]
+ push esi ; Save ESI for later
+ pop [DWORD sv_esi]
+ push ds ; Save DS for later
+ pop [UINT sv_ds]
+
+ _lds _si,[outptr] ; Save CPU registers
+ mov [_si],eax
+ mov [_si+4],ebx
+ mov [_si+8],ecx
+ mov [_si+12],edx
+ push [DWORD sv_esi]
+ pop [DWORD _si+16]
+ mov [_si+20],edi
+
+ mov _bx,[flags] ; Return flags
+ and ebx,1h ; Isolate carry flag
+ mov [_si+24],ebx ; Save carry flag status
+
+ _lds _si,[sregs] ; Save segment registers
+ mov [_si],es
+ mov _bx,[sv_ds]
+ mov [_si+6],bx ; Get returned DS from stack
+ mov [_si+8],fs
+ mov [_si+10],gs
+
+ pop gs ; Restore segment registers
+ pop fs
+ pop es
+ pop ds
+ leave_c
+ ret
+
+cprocend
+
+;----------------------------------------------------------------------------
+; void PM_saveDS(void)
+;----------------------------------------------------------------------------
+; Save the value of DS into a section of the code segment, so that we can
+; quickly load this value at a later date in the PM_loadDS() routine from
+; inside interrupt handlers etc. The method to do this is different
+; depending on the DOS extender being used.
+;----------------------------------------------------------------------------
+cprocstartdll16 PM_saveDS
+
+ mov [_PM_savedDS],ds ; Store away in data segment
+ ret
+
+cprocend
+
+;----------------------------------------------------------------------------
+; void PM_loadDS(void)
+;----------------------------------------------------------------------------
+; Routine to load the DS register with the default value for the current
+; DOS extender. Only the DS register is loaded, not the ES register, so
+; if you wish to call C code, you will need to also load the ES register
+; in 32 bit protected mode.
+;----------------------------------------------------------------------------
+cprocstartdll16 PM_loadDS
+
+ mov ds,[cs:_PM_savedDS] ; We can access the proper DS through CS
+ ret
+
+cprocend
+
+;----------------------------------------------------------------------------
+; void PM_setBankA(int bank)
+;----------------------------------------------------------------------------
+cprocstart PM_setBankA
+
+ ARG bank:UINT
+
+ push ebp
+ mov ebp,esp
+ push ebx
+ mov _bx,0
+ mov _ax,4F05h
+ mov _dx,[bank]
+ int 10h
+ pop ebx
+ pop ebp
+ ret
+
+cprocend
+
+;----------------------------------------------------------------------------
+; void PM_setBankAB(int bank)
+;----------------------------------------------------------------------------
+cprocstart PM_setBankAB
+
+ ARG bank:UINT
+
+ push ebp
+ mov ebp,esp
+ push ebx
+ mov _bx,0
+ mov _ax,4F05h
+ mov _dx,[bank]
+ int 10h
+ mov _bx,1
+ mov _ax,4F05h
+ mov _dx,[bank]
+ int 10h
+ pop ebx
+ pop ebp
+ ret
+
+cprocend
+
+;----------------------------------------------------------------------------
+; void PM_setCRTStart(int x,int y,int waitVRT)
+;----------------------------------------------------------------------------
+cprocstart PM_setCRTStart
+
+ ARG x:UINT, y:UINT, waitVRT:UINT
+
+ push ebp
+ mov ebp,esp
+ push ebx
+ mov _bx,[waitVRT]
+ mov _cx,[x]
+ mov _dx,[y]
+ mov _ax,4F07h
+ int 10h
+ pop ebx
+ pop ebp
+ ret
+
+cprocend
+
+;----------------------------------------------------------------------------
+; int _PM_inp(int port)
+;----------------------------------------------------------------------------
+; Reads a byte from the specified port
+;----------------------------------------------------------------------------
+cprocstart _PM_inp
+
+ ARG port:UINT
+
+ push _bp
+ mov _bp,_sp
+ xor _ax,_ax
+ mov _dx,[port]
+ in al,dx
+ pop _bp
+ ret
+
+cprocend
+
+;----------------------------------------------------------------------------
+; void _PM_outp(int port,int value)
+;----------------------------------------------------------------------------
+; Write a byte to the specified port.
+;----------------------------------------------------------------------------
+cprocstart _PM_outp
+
+ ARG port:UINT, value:UINT
+
+ push _bp
+ mov _bp,_sp
+ mov _dx,[port]
+ mov _ax,[value]
+ out dx,al
+ pop _bp
+ ret
+
+cprocend
+
+; Macro to delay briefly to ensure that enough time has elapsed between
+; successive I/O accesses so that the device being accessed can respond
+; to both accesses even on a very fast PC.
+
+ifdef USE_NASM
+%macro DELAY 0
+ jmp short $+2
+ jmp short $+2
+ jmp short $+2
+%endmacro
+%macro IODELAYN 1
+%rep %1
+ DELAY
+%endrep
+%endmacro
+else
+macro DELAY
+ jmp short $+2
+ jmp short $+2
+ jmp short $+2
+endm
+macro IODELAYN N
+ rept N
+ DELAY
+ endm
+endm
+endif
+
+;----------------------------------------------------------------------------
+; uchar _PM_readCMOS(int index)
+;----------------------------------------------------------------------------
+; Read the value of a specific CMOS register. We do this with both
+; normal interrupts and NMI disabled.
+;----------------------------------------------------------------------------
+cprocstart _PM_readCMOS
+
+ ARG index:UINT
+
+ push _bp
+ mov _bp,_sp
+ pushfd
+ mov al,[BYTE index]
+ or al,80h ; Add disable NMI flag
+ cli
+ out 70h,al
+ IODELAYN 5
+ in al,71h
+ mov ah,al
+ xor al,al
+ IODELAYN 5
+ out 70h,al ; Re-enable NMI
+ sti
+ mov al,ah ; Return value in AL
+ popfd
+ pop _bp
+ ret
+
+cprocend
+
+;----------------------------------------------------------------------------
+; void _PM_writeCMOS(int index,uchar value)
+;----------------------------------------------------------------------------
+; Read the value of a specific CMOS register. We do this with both
+; normal interrupts and NMI disabled.
+;----------------------------------------------------------------------------
+cprocstart _PM_writeCMOS
+
+ ARG index:UINT, value:UCHAR
+
+ push _bp
+ mov _bp,_sp
+ pushfd
+ mov al,[BYTE index]
+ or al,80h ; Add disable NMI flag
+ cli
+ out 70h,al
+ IODELAYN 5
+ mov al,[value]
+ out 71h,al
+ xor al,al
+ IODELAYN 5
+ out 70h,al ; Re-enable NMI
+ sti
+ popfd
+ pop _bp
+ ret
+
+cprocend
+
+;----------------------------------------------------------------------------
+; _PM_getPDB - Return the Page Table Directory Base address
+;----------------------------------------------------------------------------
+cprocstart _PM_getPDB
+
+ mov eax,cr3
+ and eax,0FFFFF000h
+ ret
+
+cprocend
+
+;----------------------------------------------------------------------------
+; _PM_flushTLB - Flush the Translation Lookaside buffer
+;----------------------------------------------------------------------------
+cprocstart PM_flushTLB
+
+ wbinvd ; Flush the CPU cache
+ mov eax,cr3
+ mov cr3,eax ; Flush the TLB
+ ret
+
+cprocend
+
+endcodeseg _pm
+
+ END ; End of module
diff --git a/board/MAI/bios_emulator/scitech/src/pm/smx/_pmsmx.asm b/board/MAI/bios_emulator/scitech/src/pm/smx/_pmsmx.asm
new file mode 100644
index 00000000000..8352ce30c15
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/pm/smx/_pmsmx.asm
@@ -0,0 +1,933 @@
+;****************************************************************************
+;*
+;* SciTech OS Portability Manager Library
+;*
+;* ========================================================================
+;*
+;* The contents of this file are subject to the SciTech MGL Public
+;* License Version 1.0 (the "License"); you may not use this file
+;* except in compliance with the License. You may obtain a copy of
+;* the License at http://www.scitechsoft.com/mgl-license.txt
+;*
+;* Software distributed under the License is distributed on an
+;* "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+;* implied. See the License for the specific language governing
+;* rights and limitations under the License.
+;*
+;* The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+;*
+;* The Initial Developer of the Original Code is SciTech Software, Inc.
+;* All Rights Reserved.
+;*
+;* ========================================================================
+;*
+;* Language: 80386 Assembler, TASM 4.0 or NASM
+;* Environment: 32-bit SMX embedded systems development
+;*
+;* Description: Low level assembly support for the PM library specific to
+;* SMX interrupt handling.
+;*
+;****************************************************************************
+
+ IDEAL
+
+include "scitech.mac" ; Memory model macros
+
+header _pmsmx ; Set up memory model
+
+; Define the size of our local stacks. For real mode code they cant be
+; that big, but for 32 bit protected mode code we can make them nice and
+; large so that complex C functions can be used.
+
+MOUSE_STACK EQU 4096
+TIMER_STACK EQU 4096
+KEY_STACK EQU 1024
+INT10_STACK EQU 1024
+
+ifdef USE_NASM
+
+; Macro to load DS and ES registers with correct value.
+
+%imacro LOAD_DS 0
+ mov ds,[cs:_PM_savedDS]
+ mov es,[cs:_PM_savedDS]
+%endmacro
+
+; Note that interrupts we disable interrupts during the following stack
+; %imacro for correct operation, but we do not enable them again. Normally
+; these %imacros are used within interrupt handlers so interrupts should
+; already be off. We turn them back on explicitly later if the user code
+; needs them to be back on.
+
+; Macro to switch to a new local stack.
+
+%imacro NEWSTK 1
+ cli
+ mov [seg_%1],ss
+ mov [ptr_%1],_sp
+ mov [TempSeg],ds
+ mov ss,[TempSeg]
+ mov _sp,offset %1
+%endmacro
+
+; %imacro to switch back to the old stack.
+
+%imacro RESTSTK 1
+ cli
+ mov ss,[seg_%1]
+ mov _sp,[ptr_%1]
+%endmacro
+
+; %imacro to swap the current stack with the one saved away.
+
+%imacro SWAPSTK 1
+ cli
+ mov ax,ss
+ xchg ax,[seg_%1]
+ mov ss,ax
+ xchg _sp,[ptr_%1]
+%endmacro
+
+else
+
+; Macro to load DS and ES registers with correct value.
+
+MACRO LOAD_DS
+ mov ds,[cs:_PM_savedDS]
+ mov es,[cs:_PM_savedDS]
+ENDM
+
+; Note that interrupts we disable interrupts during the following stack
+; macro for correct operation, but we do not enable them again. Normally
+; these macros are used within interrupt handlers so interrupts should
+; already be off. We turn them back on explicitly later if the user code
+; needs them to be back on.
+
+; Macro to switch to a new local stack.
+
+MACRO NEWSTK stkname
+ cli
+ mov [seg_&stkname&],ss
+ mov [ptr_&stkname&],_sp
+ mov [TempSeg],ds
+ mov ss,[TempSeg]
+ mov _sp,offset stkname
+ENDM
+
+; Macro to switch back to the old stack.
+
+MACRO RESTSTK stkname
+ cli
+ mov ss,[seg_&stkname&]
+ mov _sp,[ptr_&stkname&]
+ENDM
+
+; Macro to swap the current stack with the one saved away.
+
+MACRO SWAPSTK stkname
+ cli
+ mov ax,ss
+ xchg ax,[seg_&stkname&]
+ mov ss,ax
+ xchg _sp,[ptr_&stkname&]
+ENDM
+
+endif
+
+begdataseg _pmsmx
+
+ cextern _PM_savedDS,USHORT
+ cextern _PM_critHandler,CPTR
+ cextern _PM_breakHandler,CPTR
+ cextern _PM_timerHandler,CPTR
+ cextern _PM_rtcHandler,CPTR
+ cextern _PM_keyHandler,CPTR
+ cextern _PM_key15Handler,CPTR
+ cextern _PM_mouseHandler,CPTR
+ cextern _PM_int10Handler,CPTR
+
+ cextern _PM_ctrlCPtr,DPTR
+ cextern _PM_ctrlBPtr,DPTR
+ cextern _PM_critPtr,DPTR
+
+ cextern _PM_prevTimer,FCPTR
+ cextern _PM_prevRTC,FCPTR
+ cextern _PM_prevKey,FCPTR
+ cextern _PM_prevKey15,FCPTR
+ cextern _PM_prevBreak,FCPTR
+ cextern _PM_prevCtrlC,FCPTR
+ cextern _PM_prevCritical,FCPTR
+ cextern _PM_prevRealTimer,ULONG
+ cextern _PM_prevRealRTC,ULONG
+ cextern _PM_prevRealKey,ULONG
+ cextern _PM_prevRealKey15,ULONG
+ cextern _PM_prevRealInt10,ULONG
+
+cpublic _PM_pmsmxDataStart
+
+; Allocate space for all of the local stacks that we need. These stacks
+; are not very large, but should be large enough for most purposes
+; (generally you want to handle these interrupts quickly, simply storing
+; the information for later and then returning). If you need bigger
+; stacks then change the appropriate value in here.
+
+ ALIGN 4
+ dclb MOUSE_STACK ; Space for local stack (small)
+MsStack: ; Stack starts at end!
+ptr_MsStack DUINT 0 ; Place to store old stack offset
+seg_MsStack dw 0 ; Place to store old stack segment
+
+ ALIGN 4
+ dclb INT10_STACK ; Space for local stack (small)
+Int10Stack: ; Stack starts at end!
+ptr_Int10Stack DUINT 0 ; Place to store old stack offset
+seg_Int10Stack dw 0 ; Place to store old stack segment
+
+ ALIGN 4
+ dclb TIMER_STACK ; Space for local stack (small)
+TmStack: ; Stack starts at end!
+ptr_TmStack DUINT 0 ; Place to store old stack offset
+seg_TmStack dw 0 ; Place to store old stack segment
+
+ ALIGN 4
+ dclb TIMER_STACK ; Space for local stack (small)
+RtcStack: ; Stack starts at end!
+ptr_RtcStack DUINT 0 ; Place to store old stack offset
+seg_RtcStack dw 0 ; Place to store old stack segment
+RtcInside dw 0 ; Are we still handling current interrupt
+
+ ALIGN 4
+ dclb KEY_STACK ; Space for local stack (small)
+KyStack: ; Stack starts at end!
+ptr_KyStack DUINT 0 ; Place to store old stack offset
+seg_KyStack dw 0 ; Place to store old stack segment
+KyInside dw 0 ; Are we still handling current interrupt
+
+ ALIGN 4
+ dclb KEY_STACK ; Space for local stack (small)
+Ky15Stack: ; Stack starts at end!
+ptr_Ky15Stack DUINT 0 ; Place to store old stack offset
+seg_Ky15Stack dw 0 ; Place to store old stack segment
+
+TempSeg dw 0 ; Place to store stack segment
+
+cpublic _PM_pmsmxDataEnd
+
+enddataseg _pmsmx
+
+begcodeseg _pmsmx ; Start of code segment
+
+cpublic _PM_pmsmxCodeStart
+
+;----------------------------------------------------------------------------
+; PM_mouseISR - Mouse interrupt subroutine dispatcher
+;----------------------------------------------------------------------------
+; Interrupt subroutine called by the mouse driver upon interrupts, to
+; dispatch control to high level C based subroutines. Interrupts are on
+; when we call the user code.
+;
+; It is _extremely_ important to save the state of the extended registers
+; as these may well be trashed by the routines called from here and not
+; restored correctly by the mouse interface module.
+;
+; NOTE: This routine switches to a local stack before calling any C code,
+; and hence is _not_ re-entrant. For mouse handlers this is not a
+; problem, as the mouse driver arbitrates calls to the user mouse
+; handler for us.
+;
+; Entry: AX - Condition mask giving reason for call
+; BX - Mouse button state
+; CX - Horizontal cursor coordinate
+; DX - Vertical cursor coordinate
+; SI - Horizontal mickey value
+; DI - Vertical mickey value
+;
+;----------------------------------------------------------------------------
+cprocfar _PM_mouseISR
+
+ push ds ; Save value of DS
+ push es
+ pushad ; Save _all_ extended registers
+ cld ; Clear direction flag
+
+ LOAD_DS ; Load DS register
+ NEWSTK MsStack ; Switch to local stack
+
+; Call the installed high level C code routine
+
+ clrhi dx ; Clear out high order values
+ clrhi cx
+ clrhi bx
+ clrhi ax
+ sgnhi si
+ sgnhi di
+
+ push _di
+ push _si
+ push _dx
+ push _cx
+ push _bx
+ push _ax
+ sti ; Enable interrupts
+ call [CPTR _PM_mouseHandler]
+ _add sp,12,24
+
+ RESTSTK MsStack ; Restore previous stack
+
+ popad ; Restore all extended registers
+ pop es
+ pop ds
+ ret ; We are done!!
+
+cprocend
+
+;----------------------------------------------------------------------------
+; PM_timerISR - Timer interrupt subroutine dispatcher
+;----------------------------------------------------------------------------
+; Hardware interrupt handler for the timer interrupt, to dispatch control
+; to high level C based subroutines. We save the state of all registers
+; in this routine, and switch to a local stack. Interrupts are *off*
+; when we call the user code.
+;
+; NOTE: This routine switches to a local stack before calling any C code,
+; and hence is _not_ re-entrant. Make sure your C code executes as
+; quickly as possible, since a timer overrun will simply hang the
+; system.
+;----------------------------------------------------------------------------
+cprocfar _PM_timerISR
+
+ push ds ; Save value of DS
+ push es
+ pushad ; Save _all_ extended registers
+ cld ; Clear direction flag
+
+ LOAD_DS ; Load DS register
+
+ NEWSTK TmStack ; Switch to local stack
+ call [CPTR _PM_timerHandler]
+ RESTSTK TmStack ; Restore previous stack
+
+ popad ; Restore all extended registers
+ pop es
+ pop ds
+ iret ; Return from interrupt
+
+cprocend
+
+;----------------------------------------------------------------------------
+; PM_chainPrevTimer - Chain to previous timer interrupt and return
+;----------------------------------------------------------------------------
+; Chains to the previous timer interrupt routine and returns control
+; back to the high level interrupt handler.
+;----------------------------------------------------------------------------
+cprocstart PM_chainPrevTimer
+
+ifdef TNT
+ push eax
+ push ebx
+ push ecx
+ pushfd ; Push flags on stack to simulate interrupt
+ mov ax,250Eh ; Call real mode procedure function
+ mov ebx,[_PM_prevRealTimer]
+ mov ecx,1 ; Copy real mode flags to real mode stack
+ int 21h ; Call the real mode code
+ popfd
+ pop ecx
+ pop ebx
+ pop eax
+ ret
+else
+ SWAPSTK TmStack ; Swap back to previous stack
+ pushf ; Save state of interrupt flag
+ pushf ; Push flags on stack to simulate interrupt
+ifdef USE_NASM
+ call far dword [_PM_prevTimer]
+else
+ call [_PM_prevTimer]
+endif
+ popf ; Restore state of interrupt flag
+ SWAPSTK TmStack ; Swap back to C stack again
+ ret
+endif
+
+cprocend
+
+; Macro to delay briefly to ensure that enough time has elapsed between
+; successive I/O accesses so that the device being accessed can respond
+; to both accesses even on a very fast PC.
+
+ifdef USE_NASM
+%macro DELAY 0
+ jmp short $+2
+ jmp short $+2
+ jmp short $+2
+%endmacro
+%macro IODELAYN 1
+%rep %1
+ DELAY
+%endrep
+%endmacro
+else
+macro DELAY
+ jmp short $+2
+ jmp short $+2
+ jmp short $+2
+endm
+macro IODELAYN N
+ rept N
+ DELAY
+ endm
+endm
+endif
+
+;----------------------------------------------------------------------------
+; PM_rtcISR - Real time clock interrupt subroutine dispatcher
+;----------------------------------------------------------------------------
+; Hardware interrupt handler for the timer interrupt, to dispatch control
+; to high level C based subroutines. We save the state of all registers
+; in this routine, and switch to a local stack. Interrupts are *off*
+; when we call the user code.
+;
+; NOTE: This routine switches to a local stack before calling any C code,
+; and hence is _not_ re-entrant. Make sure your C code executes as
+; quickly as possible, since a timer overrun will simply hang the
+; system.
+;----------------------------------------------------------------------------
+cprocfar _PM_rtcISR
+
+ push ds ; Save value of DS
+ push es
+ pushad ; Save _all_ extended registers
+ cld ; Clear direction flag
+
+; Clear priority interrupt controller and re-enable interrupts so we
+; dont lock things up for long.
+
+ mov al,20h
+ out 0A0h,al
+ out 020h,al
+
+; Clear real-time clock timeout
+
+ in al,70h ; Read CMOS index register
+ push _ax ; and save for later
+ IODELAYN 3
+ mov al,0Ch
+ out 70h,al
+ IODELAYN 5
+ in al,71h
+
+; Call the C interrupt handler function
+
+ LOAD_DS ; Load DS register
+ cmp [BYTE RtcInside],1 ; Check for mutual exclusion
+ je @@Exit
+ mov [BYTE RtcInside],1
+ sti ; Re-enable interrupts
+ NEWSTK RtcStack ; Switch to local stack
+ call [CPTR _PM_rtcHandler]
+ RESTSTK RtcStack ; Restore previous stack
+ mov [BYTE RtcInside],0
+
+@@Exit: pop _ax
+ out 70h,al ; Restore CMOS index register
+ popad ; Restore all extended registers
+ pop es
+ pop ds
+ iret ; Return from interrupt
+
+cprocend
+
+;----------------------------------------------------------------------------
+; PM_keyISR - keyboard interrupt subroutine dispatcher
+;----------------------------------------------------------------------------
+; Hardware interrupt handler for the keyboard interrupt, to dispatch control
+; to high level C based subroutines. We save the state of all registers
+; in this routine, and switch to a local stack. Interrupts are *off*
+; when we call the user code.
+;
+; NOTE: This routine switches to a local stack before calling any C code,
+; and hence is _not_ re-entrant. However we ensure within this routine
+; mutual exclusion to the keyboard handling routine.
+;----------------------------------------------------------------------------
+cprocfar _PM_keyISR
+
+ push ds ; Save value of DS
+ push es
+ pushad ; Save _all_ extended registers
+ cld ; Clear direction flag
+
+ LOAD_DS ; Load DS register
+
+ cmp [BYTE KyInside],1 ; Check for mutual exclusion
+ je @@Reissued
+
+ mov [BYTE KyInside],1
+ NEWSTK KyStack ; Switch to local stack
+ call [CPTR _PM_keyHandler] ; Call C code
+ RESTSTK KyStack ; Restore previous stack
+ mov [BYTE KyInside],0
+
+@@Exit: popad ; Restore all extended registers
+ pop es
+ pop ds
+ iret ; Return from interrupt
+
+; When the BIOS keyboard handler needs to change the SHIFT status lights
+; on the keyboard, in the process of doing this the keyboard controller
+; re-issues another interrupt, while the current handler is still executing.
+; If we recieve another interrupt while still handling the current one,
+; then simply chain directly to the previous handler.
+;
+; Note that for most DOS extenders, the real mode interrupt handler that we
+; install takes care of this for us.
+
+@@Reissued:
+ifdef TNT
+ push eax
+ push ebx
+ push ecx
+ pushfd ; Push flags on stack to simulate interrupt
+ mov ax,250Eh ; Call real mode procedure function
+ mov ebx,[_PM_prevRealKey]
+ mov ecx,1 ; Copy real mode flags to real mode stack
+ int 21h ; Call the real mode code
+ popfd
+ pop ecx
+ pop ebx
+ pop eax
+else
+ pushf
+ifdef USE_NASM
+ call far dword [_PM_prevKey]
+else
+ call [_PM_prevKey]
+endif
+endif
+ jmp @@Exit
+
+cprocend
+
+;----------------------------------------------------------------------------
+; PM_chainPrevkey - Chain to previous key interrupt and return
+;----------------------------------------------------------------------------
+; Chains to the previous key interrupt routine and returns control
+; back to the high level interrupt handler.
+;----------------------------------------------------------------------------
+cprocstart PM_chainPrevKey
+
+ifdef TNT
+ push eax
+ push ebx
+ push ecx
+ pushfd ; Push flags on stack to simulate interrupt
+ mov ax,250Eh ; Call real mode procedure function
+ mov ebx,[_PM_prevRealKey]
+ mov ecx,1 ; Copy real mode flags to real mode stack
+ int 21h ; Call the real mode code
+ popfd
+ pop ecx
+ pop ebx
+ pop eax
+ ret
+else
+
+; YIKES! For some strange reason, when execution returns from the
+; previous keyboard handler, interrupts are re-enabled!! Since we expect
+; interrupts to remain off during the duration of our handler, this can
+; cause havoc. However our stack macros always turn off interrupts, so they
+; will be off when we exit this routine. Obviously there is a tiny weeny
+; window when interrupts will be enabled, but there is nothing we can
+; do about this.
+
+ SWAPSTK KyStack ; Swap back to previous stack
+ pushf ; Push flags on stack to simulate interrupt
+ifdef USE_NASM
+ call far dword [_PM_prevKey]
+else
+ call [_PM_prevKey]
+endif
+ SWAPSTK KyStack ; Swap back to C stack again
+ ret
+endif
+
+cprocend
+
+;----------------------------------------------------------------------------
+; PM_key15ISR - Int 15h keyboard interrupt subroutine dispatcher
+;----------------------------------------------------------------------------
+; This routine gets called if we have been called to handle the Int 15h
+; keyboard interrupt callout from real mode.
+;
+; Entry: AX - Hardware scan code to process
+; Exit: AX - Hardware scan code to process (0 to ignore)
+;----------------------------------------------------------------------------
+cprocfar _PM_key15ISR
+
+ push ds
+ push es
+ LOAD_DS
+ cmp ah,4Fh
+ jnz @@NotOurs ; Quit if not keyboard callout
+
+ pushad
+ cld ; Clear direction flag
+ xor ah,ah ; AX := scan code
+ NEWSTK Ky15Stack ; Switch to local stack
+ push _ax
+ call [CPTR _PM_key15Handler] ; Call C code
+ _add sp,2,4
+ RESTSTK Ky15Stack ; Restore previous stack
+ test ax,ax
+ jz @@1
+ stc ; Set carry to process as normal
+ jmp @@2
+@@1: clc ; Clear carry to ignore scan code
+@@2: popad
+ jmp @@Exit ; We are done
+
+@@NotOurs:
+ifdef TNT
+ push eax
+ push ebx
+ push ecx
+ pushfd ; Push flags on stack to simulate interrupt
+ mov ax,250Eh ; Call real mode procedure function
+ mov ebx,[_PM_prevRealKey15]
+ mov ecx,1 ; Copy real mode flags to real mode stack
+ int 21h ; Call the real mode code
+ popfd
+ pop ecx
+ pop ebx
+ pop eax
+else
+ pushf
+ifdef USE_NASM
+ call far dword [_PM_prevKey15]
+else
+ call [_PM_prevKey15]
+endif
+endif
+@@Exit: pop es
+ pop ds
+ retf 4
+
+cprocend
+
+;----------------------------------------------------------------------------
+; PM_breakISR - Control Break interrupt subroutine dispatcher
+;----------------------------------------------------------------------------
+; Hardware interrupt handler for the Ctrl-Break interrupt. We simply set
+; the Ctrl-Break flag to a 1 and leave (note that this is accessed through
+; a far pointer, as it may well be located in conventional memory).
+;----------------------------------------------------------------------------
+cprocfar _PM_breakISR
+
+ sti
+ push ds ; Save value of DS
+ push es
+ push _bx
+
+ LOAD_DS ; Load DS register
+ mov ebx,[_PM_ctrlBPtr]
+ mov [UINT _ES _bx],1
+
+; Run alternate break handler code if installed
+
+ cmp [CPTR _PM_breakHandler],0
+ je @@Exit
+
+ pushad
+ mov _ax,1
+ push _ax
+ call [CPTR _PM_breakHandler] ; Call C code
+ pop _ax
+ popad
+
+@@Exit: pop _bx
+ pop es
+ pop ds
+ iret ; Return from interrupt
+
+cprocend
+
+;----------------------------------------------------------------------------
+; int PM_ctrlBreakHit(int clearFlag)
+;----------------------------------------------------------------------------
+; Returns the current state of the Ctrl-Break flag and possibly clears it.
+;----------------------------------------------------------------------------
+cprocstart PM_ctrlBreakHit
+
+ ARG clearFlag:UINT
+
+ enter_c
+ pushf ; Save interrupt status
+ push es
+ mov ebx,[_PM_ctrlBPtr]
+ cli ; No interrupts thanks!
+ mov _ax,[_ES _bx]
+ test [BYTE clearFlag],1
+ jz @@Done
+ mov [UINT _ES _bx],0
+
+@@Done: pop es
+ popf ; Restore interrupt status
+ leave_c
+ ret
+
+cprocend
+
+;----------------------------------------------------------------------------
+; PM_ctrlCISR - Control Break interrupt subroutine dispatcher
+;----------------------------------------------------------------------------
+; Hardware interrupt handler for the Ctrl-C interrupt. We simply set
+; the Ctrl-C flag to a 1 and leave (note that this is accessed through
+; a far pointer, as it may well be located in conventional memory).
+;----------------------------------------------------------------------------
+cprocfar _PM_ctrlCISR
+
+ sti
+ push ds ; Save value of DS
+ push es
+ push _bx
+
+ LOAD_DS ; Load DS register
+ mov ebx,[_PM_ctrlCPtr]
+ mov [UINT _ES _bx],1
+
+; Run alternate break handler code if installed
+
+ cmp [CPTR _PM_breakHandler],0
+ je @@Exit
+
+ pushad
+ mov _ax,0
+ push _ax
+ call [CPTR _PM_breakHandler] ; Call C code
+ pop _ax
+ popad
+
+@@Exit: pop _bx
+ pop es
+ pop ds
+ iret ; Return from interrupt
+ iretd
+
+cprocend
+
+;----------------------------------------------------------------------------
+; int PM_ctrlCHit(int clearFlag)
+;----------------------------------------------------------------------------
+; Returns the current state of the Ctrl-C flag and possibly clears it.
+;----------------------------------------------------------------------------
+cprocstart PM_ctrlCHit
+
+ ARG clearFlag:UINT
+
+ enter_c
+ pushf ; Save interrupt status
+ push es
+ mov ebx,[_PM_ctrlCPtr]
+ cli ; No interrupts thanks!
+ mov _ax,[_ES _bx]
+ test [BYTE clearFlag],1
+ jz @@Done
+ mov [UINT _ES _bx],0
+
+@@Done:
+ pop es
+ popf ; Restore interrupt status
+ leave_c
+ ret
+
+cprocend
+
+;----------------------------------------------------------------------------
+; PM_criticalISR - Control Error handler interrupt subroutine dispatcher
+;----------------------------------------------------------------------------
+; Interrupt handler for the MSDOS Critical Error interrupt, to dispatch
+; control to high level C based subroutines. We save the state of all
+; registers in this routine, and switch to a local stack. We also pass
+; the values of the AX and DI registers to the as pointers, so that the
+; values can be modified before returning to MSDOS.
+;----------------------------------------------------------------------------
+cprocfar _PM_criticalISR
+
+ sti
+ push ds ; Save value of DS
+ push es
+ push _bx ; Save register values changed
+ cld ; Clear direction flag
+
+ LOAD_DS ; Load DS register
+ mov ebx,[_PM_critPtr]
+ mov [_ES _bx],ax
+ mov [_ES _bx+2],di
+
+; Run alternate critical handler code if installed
+
+ cmp [CPTR _PM_critHandler],0
+ je @@NoAltHandler
+
+ pushad
+ push _di
+ push _ax
+ call [CPTR _PM_critHandler] ; Call C code
+ _add sp,4,8
+ popad
+
+ pop _bx
+ pop es
+ pop ds
+ iret ; Return from interrupt
+
+@@NoAltHandler:
+ mov ax,3 ; Tell MSDOS to fail the operation
+ pop _bx
+ pop es
+ pop ds
+ iret ; Return from interrupt
+
+cprocend
+
+;----------------------------------------------------------------------------
+; int PM_criticalError(int *axVal,int *diVal,int clearFlag)
+;----------------------------------------------------------------------------
+; Returns the current state of the critical error flags, and the values that
+; MSDOS passed in the AX and DI registers to our handler.
+;----------------------------------------------------------------------------
+cprocstart PM_criticalError
+
+ ARG axVal:DPTR, diVal:DPTR, clearFlag:UINT
+
+ enter_c
+ pushf ; Save interrupt status
+ push es
+ mov ebx,[_PM_critPtr]
+ cli ; No interrupts thanks!
+ xor _ax,_ax
+ xor _di,_di
+ mov ax,[_ES _bx]
+ mov di,[_ES _bx+2]
+ test [BYTE clearFlag],1
+ jz @@NoClear
+ mov [ULONG _ES _bx],0
+@@NoClear:
+ _les _bx,[axVal]
+ mov [_ES _bx],_ax
+ _les _bx,[diVal]
+ mov [_ES _bx],_di
+ pop es
+ popf ; Restore interrupt status
+ leave_c
+ ret
+
+cprocend
+
+;----------------------------------------------------------------------------
+; void PM_setMouseHandler(int mask, PM_mouseHandler mh)
+;----------------------------------------------------------------------------
+cprocstart _PM_setMouseHandler
+
+ ARG mouseMask:UINT
+
+ enter_c
+ push es
+
+ mov ax,0Ch ; AX := Function 12 - install interrupt sub
+ mov _cx,[mouseMask] ; CX := mouse mask
+ mov _dx,offset _PM_mouseISR
+ push cs
+ pop es ; ES:_DX -> mouse handler
+ int 33h ; Call mouse driver
+
+ pop es
+ leave_c
+ ret
+
+cprocend
+
+;----------------------------------------------------------------------------
+; void PM_mousePMCB(void)
+;----------------------------------------------------------------------------
+; Mouse realmode callback routine. Upon entry to this routine, we recieve
+; the following from the DPMI server:
+;
+; Entry: DS:_SI -> Real mode stack at time of call
+; ES:_DI -> Real mode register data structure
+; SS:_SP -> Locked protected mode stack to use
+;----------------------------------------------------------------------------
+cprocfar _PM_mousePMCB
+
+ pushad
+ mov eax,[es:_di+1Ch] ; Load register values from real mode
+ mov ebx,[es:_di+10h]
+ mov ecx,[es:_di+18h]
+ mov edx,[es:_di+14h]
+ mov esi,[es:_di+04h]
+ mov edi,[es:_di]
+ call _PM_mouseISR ; Call the mouse handler
+ popad
+
+ mov ax,[ds:_si]
+ mov [es:_di+2Ah],ax ; Plug in return IP address
+ mov ax,[ds:_si+2]
+ mov [es:_di+2Ch],ax ; Plug in return CS value
+ add [WORD es:_di+2Eh],4 ; Remove return address from stack
+ iret ; Go back to real mode!
+
+cprocend
+
+;----------------------------------------------------------------------------
+; void PM_int10PMCB(void)
+;----------------------------------------------------------------------------
+; int10 realmode callback routine. Upon entry to this routine, we recieve
+; the following from the DPMI server:
+;
+; Entry: DS:ESI -> Real mode stack at time of call
+; ES:EDI -> Real mode register data structure
+; SS:ESP -> Locked protected mode stack to use
+;----------------------------------------------------------------------------
+cprocfar _PM_int10PMCB
+
+ pushad
+ push ds
+ push es
+ push fs
+
+ pushfd
+ pop eax
+ mov [es:edi+20h],ax ; Save return flag status
+ mov ax,[ds:esi]
+ mov [es:edi+2Ah],ax ; Plug in return IP address
+ mov ax,[ds:esi+2]
+ mov [es:edi+2Ch],ax ; Plug in return CS value
+ add [WORD es:edi+2Eh],4 ; Remove return address from stack
+
+; Call the install int10 handler in protected mode. This function gets called
+; with DS set to the current data selector, and ES:EDI pointing the the
+; real mode DPMI register structure at the time of the interrupt. The
+; handle must be written in assembler to be able to extract the real mode
+; register values from the structure
+
+ push es
+ pop fs ; FS:EDI -> real mode registers
+ LOAD_DS
+ NEWSTK Int10Stack ; Switch to local stack
+
+ call [_PM_int10Handler]
+
+ RESTSTK Int10Stack ; Restore previous stack
+ pop fs
+ pop es
+ pop ds
+ popad
+ iret ; Go back to real mode!
+
+cprocend
+
+cpublic _PM_pmsmxCodeEnd
+
+endcodeseg _pmsmx
+
+ END ; End of module
diff --git a/board/MAI/bios_emulator/scitech/src/pm/smx/_vflat.asm b/board/MAI/bios_emulator/scitech/src/pm/smx/_vflat.asm
new file mode 100644
index 00000000000..34985a9d8bf
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/pm/smx/_vflat.asm
@@ -0,0 +1,652 @@
+;****************************************************************************
+;*
+;* SciTech OS Portability Manager Library
+;*
+;* ========================================================================
+;*
+;* The contents of this file are subject to the SciTech MGL Public
+;* License Version 1.0 (the "License"); you may not use this file
+;* except in compliance with the License. You may obtain a copy of
+;* the License at http://www.scitechsoft.com/mgl-license.txt
+;*
+;* Software distributed under the License is distributed on an
+;* "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+;* implied. See the License for the specific language governing
+;* rights and limitations under the License.
+;*
+;* The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+;*
+;* The Initial Developer of the Original Code is SciTech Software, Inc.
+;* All Rights Reserved.
+;*
+;* ========================================================================
+;*
+;* Based on original code Copyright 1994 Otto Chrons
+;*
+;* Language: 80386 Assembler, TASM 4.0 or later
+;* Environment: IBM PC 32 bit protected mode
+;*
+;* Description: Low level page fault handler for virtual linear framebuffers.
+;*
+;****************************************************************************
+
+ IDEAL
+ JUMPS
+
+include "scitech.mac" ; Memory model macros
+
+header _vflat ; Set up memory model
+
+VFLAT_START EQU 0F0000000h
+VFLAT_END EQU 0F03FFFFFh
+PAGE_PRESENT EQU 1
+PAGE_NOTPRESENT EQU 0
+PAGE_READ EQU 0
+PAGE_WRITE EQU 2
+
+ifdef DOS4GW
+
+;----------------------------------------------------------------------------
+; DOS4G/W flat linear framebuffer emulation.
+;----------------------------------------------------------------------------
+
+begdataseg _vflat
+
+; Near pointers to the page directory base and our page tables. All of
+; this memory is always located in the first Mb of DOS memory.
+
+PDBR dd 0 ; Page directory base register (CR3)
+accessPageAddr dd 0
+accessPageTable dd 0
+
+; CauseWay page directory & 1st page table linear addresses.
+
+CauseWayDIRLinear dd 0
+CauseWay1stLinear dd 0
+
+; Place to store a copy of the original Page Table Directory before we
+; intialised our virtual buffer code.
+
+pageDirectory: resd 1024 ; Saved page table directory
+
+ValidCS dw 0 ; Valid CS for page faults
+Ring0CS dw 0 ; Our ring 0 code selector
+LastPage dd 0 ; Last page we mapped in
+BankFuncBuf: resb 101 ; Place to store bank switch code
+BankFuncPtr dd offset BankFuncBuf
+
+INT14Gate:
+INT14Offset dd 0 ; eip of original vector
+INT14Selector dw 0 ; cs of original vector
+
+ cextern _PM_savedDS,USHORT
+ cextern VF_haveCauseWay,BOOL
+
+enddataseg _vflat
+
+begcodeseg _vflat ; Start of code segment
+
+ cextern VF_malloc,FPTR
+
+;----------------------------------------------------------------------------
+; PF_handler64k - Page fault handler for 64k banks
+;----------------------------------------------------------------------------
+; The handler below is a 32 bit ring 0 page fault handler. It receives
+; control immediately after any page fault or after an IRQ6 (hardware
+; interrupt). This provides the fastest possible handling of page faults
+; since it jump directly here. If this is a page fault, the number
+; immediately on the stack will be an error code, at offset 4 will be
+; the eip of the faulting instruction, at offset 8 will be the cs of the
+; faulting instruction. If it is a hardware interrupt, it will not have
+; the error code and the eflags will be at offset 8.
+;----------------------------------------------------------------------------
+cprocfar PF_handler64k
+
+; Check if this is a processor exeception or a page fault
+
+ push eax
+ mov ax,[cs:ValidCS] ; Use CS override to access data
+ cmp [ss:esp+12],ax ; Is this a page fault?
+ jne @@ToOldHandler ; Nope, jump to the previous handler
+
+; Get address of page fault and check if within our handlers range
+
+ mov eax,cr2 ; EBX has page fault linear address
+ cmp eax,VFLAT_START ; Is the fault less than ours?
+ jb @@ToOldHandler ; Yep, go to previous handler
+ cmp eax,VFLAT_END ; Is the fault more than ours?
+ jae @@ToOldHandler ; Yep, go to previous handler
+
+; This is our page fault, so we need to handle it
+
+ pushad
+ push ds
+ push es
+ mov ebx,eax ; EBX := page fault address
+ and ebx,invert 0FFFFh ; Mask to 64k bank boundary
+ mov ds,[cs:_PM_savedDS]; Load segment registers
+ mov es,[cs:_PM_savedDS]
+
+; Map in the page table for our virtual framebuffer area for modification
+
+ mov edi,[PDBR] ; EDI points to page directory
+ mov edx,ebx ; EDX = linear address
+ shr edx,22 ; EDX = offset to page directory
+ mov edx,[edx*4+edi] ; EDX = physical page table address
+ mov eax,edx
+ mov edx,[accessPageTable]
+ or eax,7
+ mov [edx],eax
+ mov eax,cr3
+ mov cr3,eax ; Update page table cache
+
+; Mark all pages valid for the new page fault area
+
+ mov esi,ebx ; ESI := linear address for page
+ shr esi,10
+ and esi,0FFFh ; Offset into page table
+ add esi,[accessPageAddr]
+ifdef USE_NASM
+%assign off 0
+%rep 16
+ or [DWORD esi+off],0000000001h ; Enable pages
+%assign off off+4
+%endrep
+else
+off = 0
+REPT 16
+ or [DWORD esi+off],0000000001h ; Enable pages
+off = off+4
+ENDM
+endif
+
+; Mark all pages invalid for the previously mapped area
+
+ xchg esi,[LastPage] ; Save last page for next page fault
+ test esi,esi
+ jz @@DoneMapping ; Dont update if first time round
+ifdef USE_NASM
+%assign off 0
+%rep 16
+ or [DWORD esi+off],0FFFFFFFEh ; Disable pages
+%assign off off+4
+%endrep
+else
+off = 0
+REPT 16
+ and [DWORD esi+off],0FFFFFFFEh ; Disable pages
+off = off+4
+ENDM
+endif
+
+@@DoneMapping:
+ mov eax,cr3
+ mov cr3,eax ; Flush the TLB
+
+; Now program the new SuperVGA starting bank address
+
+ mov eax,ebx ; EAX := page fault address
+ shr eax,16
+ and eax,0FFh ; Mask to 0-255
+ call [BankFuncPtr] ; Call the bank switch function
+
+ pop es
+ pop ds
+ popad
+ pop eax
+ add esp,4 ; Pop the error code from stack
+ iretd ; Return to faulting instruction
+
+@@ToOldHandler:
+ pop eax
+ifdef USE_NASM
+ jmp far dword [cs:INT14Gate]; Chain to previous handler
+else
+ jmp [FWORD cs:INT14Gate]; Chain to previous handler
+endif
+
+cprocend
+
+;----------------------------------------------------------------------------
+; PF_handler4k - Page fault handler for 4k banks
+;----------------------------------------------------------------------------
+; The handler below is a 32 bit ring 0 page fault handler. It receives
+; control immediately after any page fault or after an IRQ6 (hardware
+; interrupt). This provides the fastest possible handling of page faults
+; since it jump directly here. If this is a page fault, the number
+; immediately on the stack will be an error code, at offset 4 will be
+; the eip of the faulting instruction, at offset 8 will be the cs of the
+; faulting instruction. If it is a hardware interrupt, it will not have
+; the error code and the eflags will be at offset 8.
+;----------------------------------------------------------------------------
+cprocfar PF_handler4k
+
+; Fill in when we have tested all the 64Kb code
+
+ifdef USE_NASM
+ jmp far dword [cs:INT14Gate]; Chain to previous handler
+else
+ jmp [FWORD cs:INT14Gate]; Chain to previous handler
+endif
+
+cprocend
+
+;----------------------------------------------------------------------------
+; void InstallFaultHandler(void *baseAddr,int bankSize)
+;----------------------------------------------------------------------------
+; Installes the page fault handler directly int the interrupt descriptor
+; table for maximum performance. This of course requires ring 0 access,
+; but none of this stuff will run without ring 0!
+;----------------------------------------------------------------------------
+cprocstart InstallFaultHandler
+
+ ARG baseAddr:ULONG, bankSize:UINT
+
+ enter_c
+
+ mov [DWORD LastPage],0 ; No pages have been mapped
+ mov ax,cs
+ mov [ValidCS],ax ; Save CS value for page faults
+
+; Put address of our page fault handler into the IDT directly
+
+ sub esp,6 ; Allocate space on stack
+ifdef USE_NASM
+ sidt [ss:esp] ; Store pointer to IDT
+else
+ sidt [FWORD ss:esp] ; Store pointer to IDT
+endif
+ pop ax ; add esp,2
+ pop eax ; Absolute address of IDT
+ add eax,14*8 ; Point to Int #14
+
+; Note that Interrupt gates do not have the high and low word of the
+; offset in adjacent words in memory, there are 4 bytes separating them.
+
+ mov ecx,[eax] ; Get cs and low 16 bits of offset
+ mov edx,[eax+6] ; Get high 16 bits of offset in dx
+ shl edx,16
+ mov dx,cx ; edx has offset
+ mov [INT14Offset],edx ; Save offset
+ shr ecx,16
+ mov [INT14Selector],cx ; Save original cs
+ mov [eax+2],cs ; Install new cs
+ mov edx,offset PF_handler64k
+ cmp [UINT bankSize],4
+ jne @@1
+ mov edx,offset PF_handler4k
+@@1: mov [eax],dx ; Install low word of offset
+ shr edx,16
+ mov [eax+6],dx ; Install high word of offset
+
+ leave_c
+ ret
+
+cprocend
+
+;----------------------------------------------------------------------------
+; void RemoveFaultHandler(void)
+;----------------------------------------------------------------------------
+; Closes down the virtual framebuffer services and restores the previous
+; page fault handler.
+;----------------------------------------------------------------------------
+cprocstart RemoveFaultHandler
+
+ enter_c
+
+; Remove page fault handler from IDT
+
+ sub esp,6 ; Allocate space on stack
+ifdef USE_NASM
+ sidt [ss:esp] ; Store pointer to IDT
+else
+ sidt [FWORD ss:esp] ; Store pointer to IDT
+endif
+
+ pop ax ; add esp,2
+ pop eax ; Absolute address of IDT
+ add eax,14*8 ; Point to Int #14
+ mov cx,[INT14Selector]
+ mov [eax+2],cx ; Restore original CS
+ mov edx,[INT14Offset]
+ mov [eax],dx ; Install low word of offset
+ shr edx,16
+ mov [eax+6],dx ; Install high word of offset
+
+ leave_c
+ ret
+
+cprocend
+
+;----------------------------------------------------------------------------
+; void InstallBankFunc(int codeLen,void *bankFunc)
+;----------------------------------------------------------------------------
+; Installs the bank switch function by relocating it into our data segment
+; and making it into a callable function. We do it this way to make the
+; code identical to the way that the VflatD devices work under Windows.
+;----------------------------------------------------------------------------
+cprocstart InstallBankFunc
+
+ ARG codeLen:UINT, bankFunc:DPTR
+
+ enter_c
+
+ mov esi,[bankFunc] ; Copy the code into buffer
+ mov edi,offset BankFuncBuf
+ mov ecx,[codeLen]
+ rep movsb
+ mov [BYTE edi],0C3h ; Terminate the function with a near ret
+
+ leave_c
+ ret
+
+cprocend
+
+;----------------------------------------------------------------------------
+; int InitPaging(void)
+;----------------------------------------------------------------------------
+; Initializes paging system. If paging is not enabled, builds a page table
+; directory and page tables for physical memory
+;
+; Exit: 0 - Successful
+; -1 - Couldn't initialize paging mechanism
+;----------------------------------------------------------------------------
+cprocstart InitPaging
+
+ push ebx
+ push ecx
+ push edx
+ push esi
+ push edi
+
+; Are we running under CauseWay?
+
+ mov ax,0FFF9h
+ int 31h
+ jc @@NotCauseway
+ cmp ecx,"CAUS"
+ jnz @@NotCauseway
+ cmp edx,"EWAY"
+ jnz @@NotCauseway
+
+ mov [BOOL VF_haveCauseWay],1
+ mov [CauseWayDIRLinear],esi
+ mov [CauseWay1stLinear],edi
+
+; Check for DPMI
+
+ mov ax,0ff00h
+ push es
+ int 31h
+ pop es
+ shr edi,2
+ and edi,3
+ cmp edi,2
+ jz @@ErrExit ; Not supported under DPMI
+
+ mov eax,[CauseWayDIRLinear]
+ jmp @@CopyCR3
+
+@@NotCauseway:
+ mov ax,cs
+ test ax,3 ; Which ring are we running
+ jnz @@ErrExit ; Needs zero ring to access
+ ; page tables (CR3)
+ mov eax,cr0 ; Load CR0
+ test eax,80000000h ; Is paging enabled?
+ jz @@ErrExit ; No, we must have paging!
+
+ mov eax,cr3 ; Load directory address
+ and eax,0FFFFF000h
+
+@@CopyCR3:
+ mov [PDBR],eax ; Save it
+ mov esi,eax
+ mov edi,offset pageDirectory
+ mov ecx,1024
+ cld
+ rep movsd ; Copy the original page table directory
+ cmp [DWORD accessPageAddr],0; Check if we have allocated page
+ jne @@HaveRealMem ; table already (we cant free it)
+
+ mov eax,0100h ; DPMI DOS allocate
+ mov ebx,8192/16
+ int 31h ; Allocate 8192 bytes
+ and eax,0FFFFh
+ shl eax,4 ; EAX points to newly allocated memory
+ add eax,4095
+ and eax,0FFFFF000h ; Page align
+ mov [accessPageAddr],eax
+
+@@HaveRealMem:
+ mov eax,[accessPageAddr] ; EAX -> page table in 1st Mb
+ shr eax,12
+ and eax,3FFh ; Page table offset
+ shl eax,2
+ cmp [BOOL VF_haveCauseWay],0
+ jz @@NotCW0
+ mov ebx,[CauseWay1stLinear]
+ jmp @@Put1st
+
+@@NotCW0:
+ mov ebx,[PDBR]
+ mov ebx,[ebx]
+ and ebx,0FFFFF000h ; Page table for 1st megabyte
+
+@@Put1st:
+ add eax,ebx
+ mov [accessPageTable],eax
+ sub eax,eax ; No error
+ jmp @@Exit
+
+@@ErrExit:
+ mov eax,-1
+
+@@Exit: pop edi
+ pop esi
+ pop edx
+ pop ecx
+ pop ebx
+ ret
+
+cprocend
+
+;----------------------------------------------------------------------------
+; void ClosePaging(void)
+;----------------------------------------------------------------------------
+; Closes the paging system
+;----------------------------------------------------------------------------
+cprocstart ClosePaging
+
+ push eax
+ push ecx
+ push edx
+ push esi
+ push edi
+
+ mov eax,[accessPageAddr]
+ call AccessPage ; Restore AccessPage mapping
+ mov edi,[PDBR]
+ mov esi,offset pageDirectory
+ mov ecx,1024
+ cld
+ rep movsd ; Restore the original page table directory
+
+@@Exit: pop edi
+ pop esi
+ pop edx
+ pop ecx
+ pop eax
+ ret
+
+cprocend
+
+;----------------------------------------------------------------------------
+; long AccessPage(long phys)
+;----------------------------------------------------------------------------
+; Maps a known page to given physical memory
+; Entry: EAX - Physical memory
+; Exit: EAX - Linear memory address of mapped phys mem
+;----------------------------------------------------------------------------
+cprocstatic AccessPage
+
+ push edx
+ mov edx,[accessPageTable]
+ or eax,7
+ mov [edx],eax
+ mov eax,cr3
+ mov cr3,eax ; Update page table cache
+ mov eax,[accessPageAddr]
+ pop edx
+ ret
+
+cprocend
+
+;----------------------------------------------------------------------------
+; long GetPhysicalAddress(long linear)
+;----------------------------------------------------------------------------
+; Returns the physical address of linear address
+; Entry: EAX - Linear address to convert
+; Exit: EAX - Physical address
+;----------------------------------------------------------------------------
+cprocstatic GetPhysicalAddress
+
+ push ebx
+ push edx
+ mov edx,eax
+ shr edx,22 ; EDX is the directory offset
+ mov ebx,[PDBR]
+ mov edx,[edx*4+ebx] ; Load page table address
+ push eax
+ mov eax,edx
+ call AccessPage ; Access the page table
+ mov edx,eax
+ pop eax
+ shr eax,12
+ and eax,03FFh ; EAX offset into page table
+ mov eax,[edx+eax*4] ; Load physical address
+ and eax,0FFFFF000h
+ pop edx
+ pop ebx
+ ret
+
+cprocend
+
+;----------------------------------------------------------------------------
+; void CreatePageTable(long pageDEntry)
+;----------------------------------------------------------------------------
+; Creates a page table for specific address (4MB)
+; Entry: EAX - Page directory entry (top 10-bits of address)
+;----------------------------------------------------------------------------
+cprocstatic CreatePageTable
+
+ push ebx
+ push ecx
+ push edx
+ push edi
+ mov ebx,eax ; Save address
+ mov eax,8192
+ push eax
+ call VF_malloc ; Allocate page table directory
+ add esp,4
+ add eax,0FFFh
+ and eax,0FFFFF000h ; Page align (4KB)
+ mov edi,eax ; Save page table linear address
+ sub eax,eax ; Fill with zero
+ mov ecx,1024
+ cld
+ rep stosd ; Clear page table
+ sub edi,4096
+ mov eax,edi
+ call GetPhysicalAddress
+ mov edx,[PDBR]
+ or eax,7 ; Present/write/user bit
+ mov [edx+ebx*4],eax ; Save physical address into page directory
+ mov eax,cr3
+ mov cr3,eax ; Update page table cache
+ pop edi
+ pop edx
+ pop ecx
+ pop ebx
+ ret
+
+cprocend
+
+;----------------------------------------------------------------------------
+; void MapPhysical2Linear(ulong pAddr, ulong lAddr, int pages, int flags);
+;----------------------------------------------------------------------------
+; Maps physical memory into linear memory
+; Entry: pAddr - Physical address
+; lAddr - Linear address
+; pages - Number of 4K pages to map
+; flags - Page flags
+; bit 0 = present
+; bit 1 = Read(0)/Write(1)
+;----------------------------------------------------------------------------
+cprocstart MapPhysical2Linear
+
+ ARG pAddr:ULONG, lAddr:ULONG, pages:UINT, pflags:UINT
+
+ enter_c
+
+ and [ULONG pAddr],0FFFFF000h; Page boundary
+ and [ULONG lAddr],0FFFFF000h; Page boundary
+ mov ecx,[pflags]
+ and ecx,11b ; Just two bits
+ or ecx,100b ; Supervisor bit
+ mov [pflags],ecx
+
+ mov edx,[lAddr]
+ shr edx,22 ; EDX = Directory
+ mov esi,[PDBR]
+ mov edi,[pages] ; EDI page count
+ mov ebx,[lAddr]
+
+@@CreateLoop:
+ mov ecx,[esi+edx*4] ; Load page table address
+ test ecx,1 ; Is it present?
+ jnz @@TableOK
+ mov eax,edx
+ call CreatePageTable ; Create a page table
+@@TableOK:
+ mov eax,ebx
+ shr eax,12
+ and eax,3FFh
+ sub eax,1024
+ neg eax ; EAX = page count in this table
+ inc edx ; Next table
+ mov ebx,0 ; Next time we'll map 1K pages
+ sub edi,eax ; Subtract mapped pages from page count
+ jns @@CreateLoop ; Create more tables if necessary
+
+ mov ecx,[pages] ; ECX = Page count
+ mov esi,[lAddr]
+ shr esi,12 ; Offset part isn't needed
+ mov edi,[pAddr]
+@@MappingLoop:
+ mov eax,esi
+ shr eax,10 ; EAX = offset to page directory
+ mov ebx,[PDBR]
+ mov eax,[eax*4+ebx] ; EAX = page table address
+ call AccessPage
+ mov ebx,esi
+ and ebx,3FFh ; EBX = offset to page table
+ mov edx,edi
+ add edi,4096 ; Next physical address
+ inc esi ; Next linear page
+ or edx,[pflags] ; Update flags...
+ mov [eax+ebx*4],edx ; Store page table entry
+ loop @@MappingLoop
+ mov eax,cr3
+ mov cr3,eax ; Update page table cache
+
+ leave_c
+ ret
+
+cprocend
+
+endcodeseg _vflat
+
+endif
+
+ END ; End of module
diff --git a/board/MAI/bios_emulator/scitech/src/pm/smx/cpuinfo.c b/board/MAI/bios_emulator/scitech/src/pm/smx/cpuinfo.c
new file mode 100644
index 00000000000..5447e574ec6
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/pm/smx/cpuinfo.c
@@ -0,0 +1,72 @@
+/****************************************************************************
+*
+* Ultra Long Period Timer
+*
+* ========================================================================
+*
+* The contents of this file are subject to the SciTech MGL Public
+* License Version 1.0 (the "License"); you may not use this file
+* except in compliance with the License. You may obtain a copy of
+* the License at http://www.scitechsoft.com/mgl-license.txt
+*
+* Software distributed under the License is distributed on an
+* "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+* implied. See the License for the specific language governing
+* rights and limitations under the License.
+*
+* The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+*
+* The Initial Developer of the Original Code is SciTech Software, Inc.
+* All Rights Reserved.
+*
+* ========================================================================
+*
+* Language: ANSI C
+* Environment: 32-bit SMX embedded systems development.
+*
+* Description: SMX specific code for the CPU detection module.
+*
+****************************************************************************/
+
+/*----------------------------- Implementation ----------------------------*/
+
+/* External timing function */
+
+void __ZTimerInit(void);
+
+/****************************************************************************
+REMARKS:
+Do nothing for DOS because we don't have thread priorities.
+****************************************************************************/
+#define SetMaxThreadPriority() 0
+
+/****************************************************************************
+REMARKS:
+Do nothing for DOS because we don't have thread priorities.
+****************************************************************************/
+#define RestoreThreadPriority(i) (void)(i)
+
+/****************************************************************************
+REMARKS:
+Initialise the counter and return the frequency of the counter.
+****************************************************************************/
+static void GetCounterFrequency(
+ CPU_largeInteger *freq)
+{
+ ulong resolution;
+
+ __ZTimerInit();
+ ULZTimerResolution(&resolution);
+ freq->low = (ulong)(10000000000.0 / resolution);
+ freq->high = 0;
+}
+
+/****************************************************************************
+REMARKS:
+Read the counter and return the counter value.
+****************************************************************************/
+#define GetCounter(t) \
+{ \
+ (t)->low = ULZReadTime() * 10000L; \
+ (t)->high = 0; \
+}
diff --git a/board/MAI/bios_emulator/scitech/src/pm/smx/event.c b/board/MAI/bios_emulator/scitech/src/pm/smx/event.c
new file mode 100644
index 00000000000..fc13bbbe420
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/pm/smx/event.c
@@ -0,0 +1,368 @@
+/****************************************************************************
+*
+* SciTech OS Portability Manager Library
+*
+* ========================================================================
+*
+* The contents of this file are subject to the SciTech MGL Public
+* License Version 1.0 (the "License"); you may not use this file
+* except in compliance with the License. You may obtain a copy of
+* the License at http://www.scitechsoft.com/mgl-license.txt
+*
+* Software distributed under the License is distributed on an
+* "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+* implied. See the License for the specific language governing
+* rights and limitations under the License.
+*
+* The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+*
+* The Initial Developer of the Original Code is SciTech Software, Inc.
+* All Rights Reserved.
+*
+* ========================================================================
+*
+* Language: ANSI C
+* Environment: 32-bit SMX embedded systems development
+*
+* Description: 32-bit SMX implementation for the SciTech cross platform
+* event library.
+*
+****************************************************************************/
+
+#include "smx/ps2mouse.h"
+
+/*--------------------------- Global variables ----------------------------*/
+
+ibool _VARAPI _EVT_useEvents = true; /* True to use event handling */
+ibool _VARAPI _EVT_installed = 0; /* Event handers installed? */
+uchar _VARAPI *_EVT_biosPtr = NULL; /* Pointer to the BIOS data area */
+static ibool haveMouse = false; /* True if we have a mouse */
+
+/*---------------------------- Implementation -----------------------------*/
+
+/* External assembler functions */
+
+void EVTAPI _EVT_pollJoystick(void);
+uint EVTAPI _EVT_disableInt(void);
+uint EVTAPI _EVT_restoreInt(uint flags);
+void EVTAPI _EVT_codeStart(void);
+void EVTAPI _EVT_codeEnd(void);
+void EVTAPI _EVT_cCodeStart(void);
+void EVTAPI _EVT_cCodeEnd(void);
+int EVTAPI _EVT_getKeyCode(void);
+int EVTAPI EVT_rdinx(int port,int index);
+void EVTAPI EVT_wrinx(int port,int index,int value);
+
+/****************************************************************************
+REMARKS:
+Do nothing for DOS, because we are fully interrupt driven.
+****************************************************************************/
+#define _EVT_pumpMessages()
+
+/****************************************************************************
+REMARKS:
+This function is used to return the number of ticks since system
+startup in milliseconds. This should be the same value that is placed into
+the time stamp fields of events, and is used to implement auto mouse down
+events.
+****************************************************************************/
+ulong _EVT_getTicks(void)
+{
+ return (ulong)PM_getLong(_EVT_biosPtr+0x6C) * 55UL;
+}
+
+/****************************************************************************
+REMARKS:
+Include generic raw scancode keyboard module.
+****************************************************************************/
+#include "common/keyboard.c"
+
+/****************************************************************************
+REMARKS:
+Determines if we have a mouse attached and functioning.
+****************************************************************************/
+static ibool detectMouse(void)
+{
+ return(ps2Query());
+}
+
+/****************************************************************************
+PARAMETERS:
+what - Event code
+message - Event message
+x,y - Mouse position at time of event
+but_stat - Mouse button status at time of event
+
+REMARKS:
+Adds a new mouse event to the event queue. This routine is called from within
+the mouse interrupt subroutine, so it must be efficient.
+
+NOTE: Interrupts MUST be OFF while this routine is called to ensure we have
+ mutually exclusive access to our internal data structures for
+ interrupt driven systems (like under DOS).
+****************************************************************************/
+static void addMouseEvent(
+ uint what,
+ uint message,
+ int x,
+ int y,
+ int mickeyX,
+ int mickeyY,
+ uint but_stat)
+{
+ event_t evt;
+
+ if (EVT.count < EVENTQSIZE) {
+ /* Save information in event record. */
+ evt.when = _EVT_getTicks();
+ evt.what = what;
+ evt.message = message;
+ evt.modifiers = but_stat;
+ evt.where_x = x; /* Save mouse event position */
+ evt.where_y = y;
+ evt.relative_x = mickeyX;
+ evt.relative_y = mickeyY;
+ evt.modifiers |= EVT.keyModifiers;
+ addEvent(&evt); /* Add to tail of event queue */
+ }
+}
+
+/****************************************************************************
+PARAMETERS:
+mask - Event mask
+butstate - Button state
+x - Mouse x coordinate
+y - Mouse y coordinate
+
+REMARKS:
+Mouse event handling routine. This gets called when a mouse event occurs,
+and we call the addMouseEvent() routine to add the appropriate mouse event
+to the event queue.
+
+Note: Interrupts are ON when this routine is called by the mouse driver code.
+//AM: NOTE: This function has not actually been ported from DOS yet and should not
+//AM: be installed until it is.
+****************************************************************************/
+static void EVTAPI mouseISR(
+ uint mask,
+ uint butstate,
+ int x,
+ int y,
+ int mickeyX,
+ int mickeyY)
+{
+ RMREGS regs;
+ uint ps;
+
+ if (mask & 1) {
+ /* Save the current mouse coordinates */
+ EVT.mx = x; EVT.my = y;
+
+ /* If the last event was a movement event, then modify the last
+ * event rather than post a new one, so that the queue will not
+ * become saturated. Before we modify the data structures, we
+ * MUST ensure that interrupts are off.
+ */
+ ps = _EVT_disableInt();
+ if (EVT.oldMove != -1) {
+ EVT.evtq[EVT.oldMove].where_x = x; /* Modify existing one */
+ EVT.evtq[EVT.oldMove].where_y = y;
+ EVT.evtq[EVT.oldMove].relative_x += mickeyX;
+ EVT.evtq[EVT.oldMove].relative_y += mickeyY;
+ }
+ else {
+ EVT.oldMove = EVT.freeHead; /* Save id of this move event */
+ addMouseEvent(EVT_MOUSEMOVE,0,x,y,mickeyX,mickeyY,butstate);
+ }
+ _EVT_restoreInt(ps);
+ }
+ if (mask & 0x2A) {
+ ps = _EVT_disableInt();
+ addMouseEvent(EVT_MOUSEDOWN,mask >> 1,x,y,0,0,butstate);
+ EVT.oldMove = -1;
+ _EVT_restoreInt(ps);
+ }
+ if (mask & 0x54) {
+ ps = _EVT_disableInt();
+ addMouseEvent(EVT_MOUSEUP,mask >> 2,x,y,0,0,butstate);
+ EVT.oldMove = -1;
+ _EVT_restoreInt(ps);
+ }
+ EVT.oldKey = -1;
+}
+
+/****************************************************************************
+REMARKS:
+Keyboard interrupt handler function.
+
+NOTE: Interrupts are OFF when this routine is called by the keyboard ISR,
+ and we leave them OFF the entire time. This has been modified to work
+ in conjunction with smx keyboard handler.
+****************************************************************************/
+static void EVTAPI keyboardISR(void)
+{
+ PM_chainPrevKey();
+ processRawScanCode(PM_inpb(0x60));
+ PM_outpb(0x20,0x20);
+}
+
+/****************************************************************************
+REMARKS:
+Safely abort the event module upon catching a fatal error.
+****************************************************************************/
+void _EVT_abort()
+{
+ EVT_exit();
+ PM_fatalError("Unhandled exception!");
+}
+
+/****************************************************************************
+PARAMETERS:
+mouseMove - Callback function to call wheneve the mouse needs to be moved
+
+REMARKS:
+Initiliase the event handling module. Here we install our mouse handling ISR
+to be called whenever any button's are pressed or released. We also build
+the free list of events in the event queue.
+
+We use handler number 2 of the mouse libraries interrupt handlers for our
+event handling routines.
+****************************************************************************/
+void EVTAPI EVT_init(
+ _EVT_mouseMoveHandler mouseMove)
+{
+ int i;
+
+ EVT.mouseMove = mouseMove;
+ _EVT_biosPtr = PM_getBIOSPointer();
+ EVT_resume();
+}
+
+/****************************************************************************
+REMARKS:
+Initiailises the internal event handling modules. The EVT_suspend function
+can be called to suspend event handling (such as when shelling out to DOS),
+and this function can be used to resume it again later.
+****************************************************************************/
+void EVTAPI EVT_resume(void)
+{
+ static int locked = 0;
+ int stat;
+ uchar mods;
+ PM_lockHandle lh;
+
+ if (_EVT_useEvents) {
+ /* Initialise the event queue and enable our interrupt handlers */
+ initEventQueue();
+ PM_setKeyHandler(keyboardISR);
+ if ((haveMouse = detectMouse()) != 0)
+ PM_setMouseHandler(0xFFFF,mouseISR);
+
+ /* Read the keyboard modifier flags from the BIOS to get the
+ * correct initialisation state. The only state we care about is
+ * the correct toggle state flags such as SCROLLLOCK, NUMLOCK and
+ * CAPSLOCK.
+ */
+ EVT.keyModifiers = 0;
+ mods = PM_getByte(_EVT_biosPtr+0x17);
+ if (mods & 0x10)
+ EVT.keyModifiers |= EVT_SCROLLLOCK;
+ if (mods & 0x20)
+ EVT.keyModifiers |= EVT_NUMLOCK;
+ if (mods & 0x40)
+ EVT.keyModifiers |= EVT_CAPSLOCK;
+
+ /* Lock all of the code and data used by our protected mode interrupt
+ * handling routines, so that it will continue to work correctly
+ * under real mode.
+ */
+ if (!locked) {
+ /* It is difficult to ensure that we lock our global data, so we
+ * do this by taking the address of a variable locking all data
+ * 2Kb on either side. This should properly cover the global data
+ * used by the module (the other alternative is to declare the
+ * variables in assembler, in which case we know it will be
+ * correct).
+ */
+ stat = !PM_lockDataPages(&EVT,sizeof(EVT),&lh);
+ stat |= !PM_lockDataPages(&_EVT_biosPtr,sizeof(_EVT_biosPtr),&lh);
+ stat |= !PM_lockCodePages((__codePtr)_EVT_cCodeStart,(int)_EVT_cCodeEnd-(int)_EVT_cCodeStart,&lh);
+ stat |= !PM_lockCodePages((__codePtr)_EVT_codeStart,(int)_EVT_codeEnd-(int)_EVT_codeStart,&lh);
+ if (stat) {
+ PM_fatalError("Page locking services failed - interrupt handling not safe!");
+ exit(1);
+ }
+ locked = 1;
+ }
+
+ _EVT_installed = true;
+ }
+}
+
+/****************************************************************************
+REMARKS
+Changes the range of coordinates returned by the mouse functions to the
+specified range of values. This is used when changing between graphics
+modes set the range of mouse coordinates for the new display mode.
+****************************************************************************/
+void EVTAPI EVT_setMouseRange(
+ int xRes,
+ int yRes)
+{
+ if (haveMouse) {
+ ps2MouseStop();
+ ps2MouseStart( 0, xRes, 0, yRes, -1, -1, -1);
+ }
+}
+
+/****************************************************************************
+REMARKS
+Modifes the mouse coordinates as necessary if scaling to OS coordinates,
+and sets the OS mouse cursor position.
+****************************************************************************/
+void _EVT_setMousePos(
+ int *x,
+ int *y)
+{
+ if (haveMouse)
+ ps2MouseMove(*x, *y);
+}
+
+/****************************************************************************
+REMARKS
+Suspends all of our event handling operations. This is also used to
+de-install the event handling code.
+****************************************************************************/
+void EVTAPI EVT_suspend(void)
+{
+ uchar mods;
+
+ if (_EVT_installed) {
+ PM_restoreKeyHandler();
+ if (haveMouse)
+ PM_restoreMouseHandler();
+
+ /* Set the keyboard modifier flags in the BIOS to our values */
+ EVT_allowLEDS(true);
+ mods = PM_getByte(_EVT_biosPtr+0x17) & ~0x70;
+ if (EVT.keyModifiers & EVT_SCROLLLOCK)
+ mods |= 0x10;
+ if (EVT.keyModifiers & EVT_NUMLOCK)
+ mods |= 0x20;
+ if (EVT.keyModifiers & EVT_CAPSLOCK)
+ mods |= 0x40;
+ PM_setByte(_EVT_biosPtr+0x17,mods);
+
+ /* Flag that we are no longer installed */
+ _EVT_installed = false;
+ }
+}
+
+/****************************************************************************
+REMARKS
+Exits the event module for program terminatation.
+****************************************************************************/
+void EVTAPI EVT_exit(void)
+{
+ EVT_suspend();
+}
diff --git a/board/MAI/bios_emulator/scitech/src/pm/smx/oshdr.h b/board/MAI/bios_emulator/scitech/src/pm/smx/oshdr.h
new file mode 100644
index 00000000000..3ff8daa2a9d
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/pm/smx/oshdr.h
@@ -0,0 +1,29 @@
+/****************************************************************************
+*
+* SciTech OS Portability Manager Library
+*
+* ========================================================================
+*
+* The contents of this file are subject to the SciTech MGL Public
+* License Version 1.0 (the "License"); you may not use this file
+* except in compliance with the License. You may obtain a copy of
+* the License at http://www.scitechsoft.com/mgl-license.txt
+*
+* Software distributed under the License is distributed on an
+* "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+* implied. See the License for the specific language governing
+* rights and limitations under the License.
+*
+* The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+*
+* The Initial Developer of the Original Code is SciTech Software, Inc.
+* All Rights Reserved.
+*
+* ========================================================================
+*
+* Language: ANSI C
+* Environment: 32-bit SMX embedded systems development.
+*
+* Description: Include file to include all OS specific header files.
+*
+****************************************************************************/
diff --git a/board/MAI/bios_emulator/scitech/src/pm/smx/pm.c b/board/MAI/bios_emulator/scitech/src/pm/smx/pm.c
new file mode 100644
index 00000000000..d6c95d688c5
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/pm/smx/pm.c
@@ -0,0 +1,1187 @@
+/****************************************************************************
+*
+* SciTech OS Portability Manager Library
+*
+* ========================================================================
+*
+* The contents of this file are subject to the SciTech MGL Public
+* License Version 1.0 (the "License"); you may not use this file
+* except in compliance with the License. You may obtain a copy of
+* the License at http://www.scitechsoft.com/mgl-license.txt
+*
+* Software distributed under the License is distributed on an
+* "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+* implied. See the License for the specific language governing
+* rights and limitations under the License.
+*
+* The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+*
+* The Initial Developer of the Original Code is SciTech Software, Inc.
+* All Rights Reserved.
+*
+* ========================================================================
+*
+* Language: ANSI C
+* Environment: 32 bit SMX embedded systems development.
+*
+* Description: Implementation for the OS Portability Manager Library, which
+* contains functions to implement OS specific services in a
+* generic, cross platform API. Porting the OS Portability
+* Manager library is the first step to porting any SciTech
+* products to a new platform.
+*
+****************************************************************************/
+
+#include "pmapi.h"
+#include "drvlib/os/os.h"
+#include "ztimerc.h"
+#include "event.h"
+#include "mtrr.h"
+#include "pm_help.h"
+#include <stdio.h>
+#include <stdlib.h>
+#include <string.h>
+#include <dos.h>
+#include <conio.h>
+#ifdef __GNUC__
+#include <unistd.h>
+#include <sys/nearptr.h>
+#include <sys/stat.h>
+#else
+#include <direct.h>
+#endif
+#ifdef __BORLANDC__
+#pragma warn -par
+#endif
+
+/*--------------------------- Global variables ----------------------------*/
+
+typedef struct {
+ int oldMode;
+ int old50Lines;
+ } DOS_stateBuf;
+
+#define MAX_RM_BLOCKS 10
+
+static struct {
+ void *p;
+ uint tag;
+ } rmBlocks[MAX_RM_BLOCKS];
+
+static uint VESABuf_len = 1024; /* Length of the VESABuf buffer */
+static void *VESABuf_ptr = NULL; /* Near pointer to VESABuf */
+static uint VESABuf_rseg; /* Real mode segment of VESABuf */
+static uint VESABuf_roff; /* Real mode offset of VESABuf */
+static void (PMAPIP fatalErrorCleanup)(void) = NULL;
+ushort _VARAPI _PM_savedDS = 0;
+static ulong PDB = 0,*pPDB = NULL;
+static uint VXD_version = -1;
+
+/*----------------------------- Implementation ----------------------------*/
+
+ulong _ASMAPI _PM_getPDB(void);
+void _ASMAPI _PM_VxDCall(VXD_regs *regs,uint off,uint sel);
+
+/****************************************************************************
+REMARKS:
+External function to call the PMHELP helper VxD.
+****************************************************************************/
+void PMAPI PM_VxDCall(
+ VXD_regs *regs)
+{
+}
+
+/****************************************************************************
+RETURNS:
+BCD coded version number of the VxD, or 0 if not loaded (ie: 0x202 - 2.2)
+
+REMARKS:
+This function gets the version number for the VxD that we have connected to.
+****************************************************************************/
+uint PMAPI PMHELP_getVersion(void)
+{
+ return VXD_version = 0;
+}
+
+void PMAPI PM_init(void)
+{
+#ifndef REALMODE
+ MTRR_init();
+#endif
+}
+
+/****************************************************************************
+PARAMETERS:
+base - The starting physical base address of the region
+size - The size in bytes of the region
+type - Type to place into the MTRR register
+
+RETURNS:
+Error code describing the result.
+
+REMARKS:
+Function to enable write combining for the specified region of memory.
+****************************************************************************/
+int PMAPI PM_enableWriteCombine(
+ ulong base,
+ ulong size,
+ uint type)
+{
+#ifndef REALMODE
+ return MTRR_enableWriteCombine(base,size,type);
+#else
+ return PM_MTRR_NOT_SUPPORTED;
+#endif
+}
+
+ibool PMAPI PM_haveBIOSAccess(void)
+{ return false; }
+
+long PMAPI PM_getOSType(void)
+{ return _OS_SMX; }
+
+int PMAPI PM_getModeType(void)
+{ return PM_386; }
+
+void PMAPI PM_backslash(char *s)
+{
+ uint pos = strlen(s);
+ if (s[pos-1] != '\\') {
+ s[pos] = '\\';
+ s[pos+1] = '\0';
+ }
+}
+
+void PMAPI PM_setFatalErrorCleanup(
+ void (PMAPIP cleanup)(void))
+{
+ fatalErrorCleanup = cleanup;
+}
+
+void MGLOutput(char *);
+
+void PMAPI PM_fatalError(const char *msg)
+{
+ if (fatalErrorCleanup)
+ fatalErrorCleanup();
+ MGLOutput(msg);
+// No support for fprintf() under smx currently!
+// fprintf(stderr,"%s\n", msg);
+ exit(1);
+}
+
+static void ExitVBEBuf(void)
+{
+ if (VESABuf_ptr)
+ PM_freeRealSeg(VESABuf_ptr);
+ VESABuf_ptr = 0;
+}
+
+void * PMAPI PM_getVESABuf(uint *len,uint *rseg,uint *roff)
+{
+ if (!VESABuf_ptr) {
+ /* Allocate a global buffer for communicating with the VESA VBE */
+ if ((VESABuf_ptr = PM_allocRealSeg(VESABuf_len, &VESABuf_rseg, &VESABuf_roff)) == NULL)
+ return NULL;
+ atexit(ExitVBEBuf);
+ }
+ *len = VESABuf_len;
+ *rseg = VESABuf_rseg;
+ *roff = VESABuf_roff;
+ return VESABuf_ptr;
+}
+
+int PMAPI PM_int386(int intno, PMREGS *in, PMREGS *out)
+{
+ PMSREGS sregs;
+ PM_segread(&sregs);
+ return PM_int386x(intno,in,out,&sregs);
+}
+
+/* Routines to set and get the real mode interrupt vectors, by making
+ * direct real mode calls to DOS and bypassing the DOS extenders API.
+ * This is the safest way to handle this, as some servers try to be
+ * smart about changing real mode vectors.
+ */
+
+void PMAPI _PM_getRMvect(int intno, long *realisr)
+{
+ RMREGS regs;
+ RMSREGS sregs;
+
+ PM_saveDS();
+ regs.h.ah = 0x35;
+ regs.h.al = intno;
+ PM_int86x(0x21, ®s, ®s, &sregs);
+ *realisr = ((long)sregs.es << 16) | regs.x.bx;
+}
+
+void PMAPI _PM_setRMvect(int intno, long realisr)
+{
+ RMREGS regs;
+ RMSREGS sregs;
+
+ PM_saveDS();
+ regs.h.ah = 0x25;
+ regs.h.al = intno;
+ sregs.ds = (int)(realisr >> 16);
+ regs.x.dx = (int)(realisr & 0xFFFF);
+ PM_int86x(0x21, ®s, ®s, &sregs);
+}
+
+void PMAPI _PM_addRealModeBlock(void *mem,uint tag)
+{
+ int i;
+
+ for (i = 0; i < MAX_RM_BLOCKS; i++) {
+ if (rmBlocks[i].p == NULL) {
+ rmBlocks[i].p = mem;
+ rmBlocks[i].tag = tag;
+ return;
+ }
+ }
+ PM_fatalError("To many real mode memory block allocations!");
+}
+
+uint PMAPI _PM_findRealModeBlock(void *mem)
+{
+ int i;
+
+ for (i = 0; i < MAX_RM_BLOCKS; i++) {
+ if (rmBlocks[i].p == mem)
+ return rmBlocks[i].tag;
+ }
+ PM_fatalError("Could not find prior real mode memory block allocation!");
+ return 0;
+}
+
+char * PMAPI PM_getCurrentPath(
+ char *path,
+ int maxLen)
+{
+ return getcwd(path,maxLen);
+}
+
+char PMAPI PM_getBootDrive(void)
+{ return 'C'; }
+
+const char * PMAPI PM_getVBEAFPath(void)
+{ return "c:\\"; }
+
+const char * PMAPI PM_getNucleusPath(void)
+{
+ static char path[256];
+ char *env;
+
+ if ((env = getenv("NUCLEUS_PATH")) != NULL)
+ return env;
+ return "c:\\nucleus";
+}
+
+const char * PMAPI PM_getNucleusConfigPath(void)
+{
+ static char path[256];
+ strcpy(path,PM_getNucleusPath());
+ PM_backslash(path);
+ strcat(path,"config");
+ return path;
+}
+
+const char * PMAPI PM_getUniqueID(void)
+{ return "SMX"; }
+
+const char * PMAPI PM_getMachineName(void)
+{ return "SMX"; }
+
+int PMAPI PM_kbhit(void)
+{
+ int hit;
+ event_t evt;
+
+ hit = EVT_peekNext(&evt,EVT_KEYDOWN | EVT_KEYREPEAT);
+ EVT_flush(~(EVT_KEYDOWN | EVT_KEYREPEAT));
+ return hit;
+}
+
+int PMAPI PM_getch(void)
+{
+ event_t evt;
+
+ EVT_halt(&evt,EVT_KEYDOWN);
+ return EVT_asciiCode(evt.message);
+}
+
+PM_HWND PMAPI PM_openConsole(PM_HWND hwndUser,int device,int xRes,int yRes,int bpp,ibool fullScreen)
+{
+ /* Not used for SMX */
+ (void)hwndUser;
+ (void)device;
+ (void)xRes;
+ (void)yRes;
+ (void)bpp;
+ (void)fullScreen;
+ return 0;
+}
+
+int PMAPI PM_getConsoleStateSize(void)
+{
+ return sizeof(DOS_stateBuf);
+}
+
+void PMAPI PM_saveConsoleState(void *stateBuf,PM_HWND hwndConsole)
+{
+ RMREGS regs;
+ DOS_stateBuf *sb = stateBuf;
+
+ /* Save the old video mode state */
+ regs.h.ah = 0x0F;
+ PM_int86(0x10,®s,®s);
+ sb->oldMode = regs.h.al & 0x7F;
+ sb->old50Lines = false;
+ if (sb->oldMode == 0x3) {
+ regs.x.ax = 0x1130;
+ regs.x.bx = 0;
+ regs.x.dx = 0;
+ PM_int86(0x10,®s,®s);
+ sb->old50Lines = (regs.h.dl == 42 || regs.h.dl == 49);
+ }
+ (void)hwndConsole;
+}
+
+void PMAPI PM_setSuspendAppCallback(int (_ASMAPIP saveState)(int flags))
+{
+ /* Not used for SMX */
+ (void)saveState;
+}
+
+void PMAPI PM_restoreConsoleState(const void *stateBuf,PM_HWND hwndConsole)
+{
+ RMREGS regs;
+ const DOS_stateBuf *sb = stateBuf;
+
+ /* Retore 50 line mode if set */
+ if (sb->old50Lines) {
+ regs.x.ax = 0x1112;
+ regs.x.bx = 0;
+ PM_int86(0x10,®s,®s);
+ }
+ (void)hwndConsole;
+}
+
+void PMAPI PM_closeConsole(PM_HWND hwndConsole)
+{
+ /* Not used for SMX */
+ (void)hwndConsole;
+}
+
+void PMAPI PM_setOSCursorLocation(int x,int y)
+{
+ uchar *_biosPtr = PM_getBIOSPointer();
+ PM_setByte(_biosPtr+0x50,x);
+ PM_setByte(_biosPtr+0x51,y);
+}
+
+void PMAPI PM_setOSScreenWidth(int width,int height)
+{
+ uchar *_biosPtr = PM_getBIOSPointer();
+ PM_setWord(_biosPtr+0x4A,width);
+ PM_setWord(_biosPtr+0x4C,width*2);
+ PM_setByte(_biosPtr+0x84,height-1);
+ if (height > 25) {
+ PM_setWord(_biosPtr+0x60,0x0607);
+ PM_setByte(_biosPtr+0x85,0x08);
+ }
+ else {
+ PM_setWord(_biosPtr+0x60,0x0D0E);
+ PM_setByte(_biosPtr+0x85,0x016);
+ }
+}
+
+void * PMAPI PM_mallocShared(long size)
+{
+ return PM_malloc(size);
+}
+
+void PMAPI PM_freeShared(void *ptr)
+{
+ PM_free(ptr);
+}
+
+#define GetRMVect(intno,isr) *(isr) = ((ulong*)rmZeroPtr)[intno]
+#define SetRMVect(intno,isr) ((ulong*)rmZeroPtr)[intno] = (isr)
+
+ibool PMAPI PM_doBIOSPOST(
+ ushort axVal,
+ ulong BIOSPhysAddr,
+ void *mappedBIOS,
+ ulong BIOSLen)
+{
+ static int firstTime = true;
+ static uchar *rmZeroPtr;
+ long Current10,Current6D,Current42;
+ RMREGS regs;
+ RMSREGS sregs;
+
+ /* Create a zero memory mapping for us to use */
+ if (firstTime) {
+ rmZeroPtr = PM_mapPhysicalAddr(0,0x7FFF,true);
+ firstTime = false;
+ }
+
+ /* Remap the secondary BIOS to 0xC0000 physical */
+ if (BIOSPhysAddr != 0xC0000L || BIOSLen > 32768) {
+ /* SMX cannot virtually remap the BIOS, so we can only work if all
+ * the secondary controllers are identical, and we then use the
+ * BIOS on the first controller for all the remaining controllers.
+ *
+ * For OS'es that do virtual memory, and remapping of 0xC0000
+ * physical (perhaps a copy on write mapping) should be all that
+ * is needed.
+ */
+ return false;
+ }
+
+ /* Save current handlers of int 10h and 6Dh */
+ GetRMVect(0x10,&Current10);
+ GetRMVect(0x6D,&Current6D);
+
+ /* POST the secondary BIOS */
+ GetRMVect(0x42,&Current42);
+ SetRMVect(0x10,Current42); /* Restore int 10h to STD-BIOS */
+ regs.x.ax = axVal;
+ PM_callRealMode(0xC000,0x0003,®s,&sregs);
+
+ /* Restore current handlers */
+ SetRMVect(0x10,Current10);
+ SetRMVect(0x6D,Current6D);
+
+ /* Second the primary BIOS mappin 1:1 for 0xC0000 physical */
+ if (BIOSPhysAddr != 0xC0000L) {
+ /* SMX does not support this */
+ (void)mappedBIOS;
+ }
+ return true;
+}
+
+void PMAPI PM_sleep(ulong milliseconds)
+{
+ ulong microseconds = milliseconds * 1000L;
+ LZTimerObject tm;
+
+ LZTimerOnExt(&tm);
+ while (LZTimerLapExt(&tm) < microseconds)
+ ;
+ LZTimerOffExt(&tm);
+}
+
+int PMAPI PM_getCOMPort(int port)
+{
+ switch (port) {
+ case 0: return 0x3F8;
+ case 1: return 0x2F8;
+ }
+ return 0;
+}
+
+int PMAPI PM_getLPTPort(int port)
+{
+ switch (port) {
+ case 0: return 0x3BC;
+ case 1: return 0x378;
+ case 2: return 0x278;
+ }
+ return 0;
+}
+
+PM_MODULE PMAPI PM_loadLibrary(
+ const char *szDLLName)
+{
+ (void)szDLLName;
+ return NULL;
+}
+
+void * PMAPI PM_getProcAddress(
+ PM_MODULE hModule,
+ const char *szProcName)
+{
+ (void)hModule;
+ (void)szProcName;
+ return NULL;
+}
+
+void PMAPI PM_freeLibrary(
+ PM_MODULE hModule)
+{
+ (void)hModule;
+}
+
+int PMAPI PM_setIOPL(
+ int level)
+{
+ return level;
+}
+
+/****************************************************************************
+REMARKS:
+Internal function to convert the find data to the generic interface.
+****************************************************************************/
+static void convertFindData(
+ PM_findData *findData,
+ struct find_t *blk)
+{
+ ulong dwSize = findData->dwSize;
+
+ memset(findData,0,findData->dwSize);
+ findData->dwSize = dwSize;
+ if (blk->attrib & _A_RDONLY)
+ findData->attrib |= PM_FILE_READONLY;
+ if (blk->attrib & _A_SUBDIR)
+ findData->attrib |= PM_FILE_DIRECTORY;
+ if (blk->attrib & _A_ARCH)
+ findData->attrib |= PM_FILE_ARCHIVE;
+ if (blk->attrib & _A_HIDDEN)
+ findData->attrib |= PM_FILE_HIDDEN;
+ if (blk->attrib & _A_SYSTEM)
+ findData->attrib |= PM_FILE_SYSTEM;
+ findData->sizeLo = blk->size;
+ strncpy(findData->name,blk->name,PM_MAX_PATH);
+ findData->name[PM_MAX_PATH-1] = 0;
+}
+
+#define FIND_MASK (_A_RDONLY | _A_ARCH | _A_SUBDIR | _A_HIDDEN | _A_SYSTEM)
+
+/****************************************************************************
+REMARKS:
+Function to find the first file matching a search criteria in a directory.
+****************************************************************************/
+void * PMAPI PM_findFirstFile(
+ const char *filename,
+ PM_findData *findData)
+{
+ struct find_t *blk;
+
+ if ((blk = PM_malloc(sizeof(*blk))) == NULL)
+ return PM_FILE_INVALID;
+ if (_dos_findfirst((char*)filename,FIND_MASK,blk) == 0) {
+ convertFindData(findData,blk);
+ return blk;
+ }
+ return PM_FILE_INVALID;
+}
+
+/****************************************************************************
+REMARKS:
+Function to find the next file matching a search criteria in a directory.
+****************************************************************************/
+ibool PMAPI PM_findNextFile(
+ void *handle,
+ PM_findData *findData)
+{
+ struct find_t *blk = handle;
+
+ if (_dos_findnext(blk) == 0) {
+ convertFindData(findData,blk);
+ return true;
+ }
+ return false;
+}
+
+/****************************************************************************
+REMARKS:
+Function to close the find process
+****************************************************************************/
+void PMAPI PM_findClose(
+ void *handle)
+{
+ PM_free(handle);
+}
+
+/****************************************************************************
+REMARKS:
+Function to determine if a drive is a valid drive or not. Under Unix this
+function will return false for anything except a value of 3 (considered
+the root drive, and equivalent to C: for non-Unix systems). The drive
+numbering is:
+
+ 1 - Drive A:
+ 2 - Drive B:
+ 3 - Drive C:
+ etc
+
+****************************************************************************/
+ibool PMAPI PM_driveValid(
+ char drive)
+{
+ RMREGS regs;
+ regs.h.dl = (uchar)(drive - 'A' + 1);
+ regs.h.ah = 0x36; // Get disk information service
+ PM_int86(0x21,®s,®s);
+ return regs.x.ax != 0xFFFF; // AX = 0xFFFF if disk is invalid
+}
+
+/****************************************************************************
+REMARKS:
+Function to get the current working directory for the specififed drive.
+Under Unix this will always return the current working directory regardless
+of what the value of 'drive' is.
+****************************************************************************/
+void PMAPI PM_getdcwd(
+ int drive,
+ char *dir,
+ int len)
+{
+ uint oldDrive,maxDrives;
+ _dos_getdrive(&oldDrive);
+ _dos_setdrive(drive,&maxDrives);
+ getcwd(dir,len);
+ _dos_setdrive(oldDrive,&maxDrives);
+}
+
+/****************************************************************************
+REMARKS:
+Function to change the file attributes for a specific file.
+****************************************************************************/
+void PMAPI PM_setFileAttr(
+ const char *filename,
+ uint attrib)
+{
+#if defined(TNT) && defined(_MSC_VER)
+ DWORD attr = 0;
+
+ if (attrib & PM_FILE_READONLY)
+ attr |= FILE_ATTRIBUTE_READONLY;
+ if (attrib & PM_FILE_ARCHIVE)
+ attr |= FILE_ATTRIBUTE_ARCHIVE;
+ if (attrib & PM_FILE_HIDDEN)
+ attr |= FILE_ATTRIBUTE_HIDDEN;
+ if (attrib & PM_FILE_SYSTEM)
+ attr |= FILE_ATTRIBUTE_SYSTEM;
+ SetFileAttributes((LPSTR)filename, attr);
+#else
+ uint attr = 0;
+
+ if (attrib & PM_FILE_READONLY)
+ attr |= _A_RDONLY;
+ if (attrib & PM_FILE_ARCHIVE)
+ attr |= _A_ARCH;
+ if (attrib & PM_FILE_HIDDEN)
+ attr |= _A_HIDDEN;
+ if (attrib & PM_FILE_SYSTEM)
+ attr |= _A_SYSTEM;
+ _dos_setfileattr(filename,attr);
+#endif
+}
+
+/****************************************************************************
+REMARKS:
+Function to create a directory.
+****************************************************************************/
+ibool PMAPI PM_mkdir(
+ const char *filename)
+{
+#ifdef __GNUC__
+ return mkdir(filename,S_IRUSR) == 0;
+#else
+//AM: return mkdir(filename) == 0;
+ return(false);
+#endif
+}
+
+/****************************************************************************
+REMARKS:
+Function to remove a directory.
+****************************************************************************/
+ibool PMAPI PM_rmdir(
+ const char *filename)
+{
+//AM: return rmdir(filename) == 0;
+ return(false);
+}
+
+/****************************************************************************
+REMARKS:
+Allocates a block of locked, physically contiguous memory. The memory
+may be required to be below the 16Meg boundary.
+****************************************************************************/
+void * PMAPI PM_allocLockedMem(
+ uint size,
+ ulong *physAddr,
+ ibool contiguous,
+ ibool below16M)
+{
+ void *p;
+ uint r_seg,r_off;
+ PM_lockHandle lh;
+
+ /* Under DOS the only way to know the physical memory address is to
+ * allocate the memory below the 1Meg boundary as real mode memory.
+ * We also allocate 4095 bytes more memory than we need, so we can
+ * properly page align the start of the memory block for DMA operations.
+ */
+ if (size > 4096)
+ return NULL;
+ if ((p = PM_allocRealSeg((size + 0xFFF) & ~0xFFF,&r_seg,&r_off)) == NULL)
+ return NULL;
+ *physAddr = ((r_seg << 4) + r_off + 0xFFF) & ~0xFFF;
+ PM_lockDataPages(p,size*2,&lh);
+ return p;
+}
+
+void PMAPI PM_freeLockedMem(void *p,uint size,ibool contiguous)
+{
+ (void)size;
+ PM_freeRealSeg(p);
+}
+
+/*-------------------------------------------------------------------------*/
+/* Generic DPMI routines common to 16/32 bit code */
+/*-------------------------------------------------------------------------*/
+
+ulong PMAPI DPMI_mapPhysicalToLinear(ulong physAddr,ulong limit)
+{
+ PMREGS r;
+ ulong physOfs;
+
+ if (physAddr < 0x100000L) {
+ /* We can't map memory below 1Mb, but the linear address are already
+ * mapped 1:1 for this memory anyway so we just return the base address.
+ */
+ return physAddr;
+ }
+
+ /* Round the physical address to a 4Kb boundary and the limit to a
+ * 4Kb-1 boundary before passing the values to DPMI as some extenders
+ * will fail the calls unless this is the case. If we round the
+ * physical address, then we also add an extra offset into the address
+ * that we return.
+ */
+ physOfs = physAddr & 4095;
+ physAddr = physAddr & ~4095;
+ limit = ((limit+physOfs+1+4095) & ~4095)-1;
+
+ r.x.ax = 0x800; /* DPMI map physical to linear */
+ r.x.bx = physAddr >> 16;
+ r.x.cx = physAddr & 0xFFFF;
+ r.x.si = limit >> 16;
+ r.x.di = limit & 0xFFFF;
+ PM_int386(0x31, &r, &r);
+ if (r.x.cflag)
+ return 0xFFFFFFFFUL;
+ return ((ulong)r.x.bx << 16) + r.x.cx + physOfs;
+}
+
+int PMAPI DPMI_setSelectorBase(ushort sel,ulong linAddr)
+{
+ PMREGS r;
+
+ r.x.ax = 7; /* DPMI set selector base address */
+ r.x.bx = sel;
+ r.x.cx = linAddr >> 16;
+ r.x.dx = linAddr & 0xFFFF;
+ PM_int386(0x31, &r, &r);
+ if (r.x.cflag)
+ return 0;
+ return 1;
+}
+
+ulong PMAPI DPMI_getSelectorBase(ushort sel)
+{
+ PMREGS r;
+
+ r.x.ax = 6; /* DPMI get selector base address */
+ r.x.bx = sel;
+ PM_int386(0x31, &r, &r);
+ return ((ulong)r.x.cx << 16) + r.x.dx;
+}
+
+int PMAPI DPMI_setSelectorLimit(ushort sel,ulong limit)
+{
+ PMREGS r;
+
+ r.x.ax = 8; /* DPMI set selector limit */
+ r.x.bx = sel;
+ r.x.cx = limit >> 16;
+ r.x.dx = limit & 0xFFFF;
+ PM_int386(0x31, &r, &r);
+ if (r.x.cflag)
+ return 0;
+ return 1;
+}
+
+uint PMAPI DPMI_createSelector(ulong base,ulong limit)
+{
+ uint sel;
+ PMREGS r;
+
+ /* Allocate 1 descriptor */
+ r.x.ax = 0;
+ r.x.cx = 1;
+ PM_int386(0x31, &r, &r);
+ if (r.x.cflag) return 0;
+ sel = r.x.ax;
+
+ /* Set the descriptor access rights (for a 32 bit page granular
+ * segment, ring 0).
+ */
+ r.x.ax = 9;
+ r.x.bx = sel;
+ r.x.cx = 0x4093;
+ PM_int386(0x31, &r, &r);
+
+ /* Map physical memory and create selector */
+ if ((base = DPMI_mapPhysicalToLinear(base,limit)) == 0xFFFFFFFFUL)
+ return 0;
+ if (!DPMI_setSelectorBase(sel,base))
+ return 0;
+ if (!DPMI_setSelectorLimit(sel,limit))
+ return 0;
+ return sel;
+}
+
+void PMAPI DPMI_freeSelector(uint sel)
+{
+ PMREGS r;
+
+ r.x.ax = 1;
+ r.x.bx = sel;
+ PM_int386(0x31, &r, &r);
+}
+
+int PMAPI DPMI_lockLinearPages(ulong linear,ulong len)
+{
+ PMREGS r;
+
+ r.x.ax = 0x600; /* DPMI Lock Linear Region */
+ r.x.bx = (linear >> 16); /* Linear address in BX:CX */
+ r.x.cx = (linear & 0xFFFF);
+ r.x.si = (len >> 16); /* Length in SI:DI */
+ r.x.di = (len & 0xFFFF);
+ PM_int386(0x31, &r, &r);
+ return (!r.x.cflag);
+}
+
+int PMAPI DPMI_unlockLinearPages(ulong linear,ulong len)
+{
+ PMREGS r;
+
+ r.x.ax = 0x601; /* DPMI Unlock Linear Region */
+ r.x.bx = (linear >> 16); /* Linear address in BX:CX */
+ r.x.cx = (linear & 0xFFFF);
+ r.x.si = (len >> 16); /* Length in SI:DI */
+ r.x.di = (len & 0xFFFF);
+ PM_int386(0x31, &r, &r);
+ return (!r.x.cflag);
+}
+
+void * PMAPI DPMI_mapPhysicalAddr(ulong base,ulong limit,ibool isCached)
+{
+ PMSREGS sregs;
+ ulong linAddr;
+ ulong DSBaseAddr;
+
+ /* Get the base address for the default DS selector */
+ PM_segread(&sregs);
+ DSBaseAddr = DPMI_getSelectorBase(sregs.ds);
+ if ((base < 0x100000) && (DSBaseAddr == 0)) {
+ /* DS is zero based, so we can directly access the first 1Mb of
+ * system memory (like under DOS4GW).
+ */
+ return (void*)base;
+ }
+
+ /* Map the memory to a linear address using DPMI function 0x800 */
+ if ((linAddr = DPMI_mapPhysicalToLinear(base,limit)) == 0) {
+ if (base >= 0x100000)
+ return NULL;
+ /* If the linear address mapping fails but we are trying to
+ * map an area in the first 1Mb of system memory, then we must
+ * be running under a Windows or OS/2 DOS box. Under these
+ * environments we can use the segment wrap around as a fallback
+ * measure, as this does work properly.
+ */
+ linAddr = base;
+ }
+
+ /* Now expand the default DS selector to 4Gb so we can access it */
+ if (!DPMI_setSelectorLimit(sregs.ds,0xFFFFFFFFUL))
+ return NULL;
+
+ /* Finally enable caching for the page tables that we just mapped in,
+ * since DOS4GW and PMODE/W create the page table entries without
+ * caching enabled which hurts the performance of the linear framebuffer
+ * as it disables write combining on Pentium Pro and above processors.
+ *
+ * For those processors cache disabling is better handled through the
+ * MTRR registers anyway (we can write combine a region but disable
+ * caching) so that MMIO register regions do not screw up.
+ */
+ if (isCached) {
+ if ((PDB = _PM_getPDB()) != 0 && DSBaseAddr == 0) {
+ int startPDB,endPDB,iPDB,startPage,endPage,start,end,iPage;
+ ulong pageTable,*pPageTable;
+ if (!pPDB) {
+ if (PDB >= 0x100000)
+ pPDB = (ulong*)DPMI_mapPhysicalToLinear(PDB,0xFFF);
+ else
+ pPDB = (ulong*)PDB;
+ }
+ if (pPDB) {
+ startPDB = (linAddr >> 22) & 0x3FF;
+ startPage = (linAddr >> 12) & 0x3FF;
+ endPDB = ((linAddr+limit) >> 22) & 0x3FF;
+ endPage = ((linAddr+limit) >> 12) & 0x3FF;
+ for (iPDB = startPDB; iPDB <= endPDB; iPDB++) {
+ pageTable = pPDB[iPDB] & ~0xFFF;
+ if (pageTable >= 0x100000)
+ pPageTable = (ulong*)DPMI_mapPhysicalToLinear(pageTable,0xFFF);
+ else
+ pPageTable = (ulong*)pageTable;
+ start = (iPDB == startPDB) ? startPage : 0;
+ end = (iPDB == endPDB) ? endPage : 0x3FF;
+ for (iPage = start; iPage <= end; iPage++)
+ pPageTable[iPage] &= ~0x18;
+ }
+ }
+ }
+ }
+
+ /* Now return the base address of the memory into the default DS */
+ return (void*)(linAddr - DSBaseAddr);
+}
+
+/* Some DOS extender implementations do not directly support calling a
+ * real mode procedure from protected mode. However we can simulate what
+ * we need temporarily hooking the INT 6Ah vector with a small real mode
+ * stub that will call our real mode code for us.
+ */
+
+static uchar int6AHandler[] = {
+ 0x00,0x00,0x00,0x00, /* __PMODE_callReal variable */
+ 0xFB, /* sti */
+ 0x2E,0xFF,0x1E,0x00,0x00, /* call [cs:__PMODE_callReal] */
+ 0xCF, /* iretf */
+ };
+static uchar *crPtr = NULL; /* Pointer to of int 6A handler */
+static uint crRSeg,crROff; /* Real mode seg:offset of handler */
+
+void PMAPI PM_callRealMode(uint seg,uint off, RMREGS *in,
+ RMSREGS *sregs)
+{
+ uchar *p;
+ uint oldSeg,oldOff;
+
+ if (!crPtr) {
+ /* Allocate and copy the memory block only once */
+ crPtr = PM_allocRealSeg(sizeof(int6AHandler), &crRSeg, &crROff);
+ memcpy(crPtr,int6AHandler,sizeof(int6AHandler));
+ }
+ PM_setWord(crPtr,off); /* Plug in address to call */
+ PM_setWord(crPtr+2,seg);
+ p = PM_mapRealPointer(0,0x6A * 4);
+ oldOff = PM_getWord(p); /* Save old handler address */
+ oldSeg = PM_getWord(p+2);
+ PM_setWord(p,crROff+4); /* Hook 6A handler */
+ PM_setWord(p+2,crRSeg);
+ PM_int86x(0x6A, in, in, sregs); /* Call real mode code */
+ PM_setWord(p,oldOff); /* Restore old handler */
+ PM_setWord(p+2,oldSeg);
+}
+
+void * PMAPI PM_getBIOSPointer(void)
+{ return PM_mapPhysicalAddr(0x400,0xFFFF,true); }
+
+void * PMAPI PM_getA0000Pointer(void)
+{ return PM_mapPhysicalAddr(0xA0000,0xFFFF,true); }
+
+void * PMAPI PM_mapPhysicalAddr(ulong base,ulong limit,ibool isCached)
+{ return DPMI_mapPhysicalAddr(base,limit,isCached); }
+
+void PMAPI PM_freePhysicalAddr(void *ptr,ulong limit)
+{
+ /* Mapping cannot be free */
+}
+
+ulong PMAPI PM_getPhysicalAddr(void *p)
+{
+ // TODO: This function should find the physical address of a linear
+ // address.
+ (void)p;
+ return 0xFFFFFFFFUL;
+}
+
+void * PMAPI PM_mapToProcess(void *base,ulong limit)
+{
+ (void)limit;
+ return (void*)base;
+}
+
+void * PMAPI PM_mapRealPointer(uint r_seg,uint r_off)
+{
+ static uchar *zeroPtr = NULL;
+
+ if (!zeroPtr)
+ zeroPtr = PM_mapPhysicalAddr(0,0xFFFFF,true);
+ return (void*)(zeroPtr + MK_PHYS(r_seg,r_off));
+}
+
+void * PMAPI PM_allocRealSeg(uint size,uint *r_seg,uint *r_off)
+{
+ PMREGS r;
+ void *p;
+
+ r.x.ax = 0x100; /* DPMI allocate DOS memory */
+ r.x.bx = (size + 0xF) >> 4; /* number of paragraphs */
+ PM_int386(0x31, &r, &r);
+ if (r.x.cflag)
+ return NULL; /* DPMI call failed */
+ *r_seg = r.x.ax; /* Real mode segment */
+ *r_off = 0;
+ p = PM_mapRealPointer(*r_seg,*r_off);
+ _PM_addRealModeBlock(p,r.x.dx);
+ return p;
+}
+
+void PMAPI PM_freeRealSeg(void *mem)
+{
+ PMREGS r;
+
+ r.x.ax = 0x101; /* DPMI free DOS memory */
+ r.x.dx = _PM_findRealModeBlock(mem);/* DX := selector from 0x100 */
+ PM_int386(0x31, &r, &r);
+}
+
+static DPMI_handler_t DPMI_int10 = NULL;
+
+void PMAPI DPMI_setInt10Handler(DPMI_handler_t handler)
+{
+ DPMI_int10 = handler;
+}
+
+void PMAPI DPMI_int86(int intno, DPMI_regs *regs)
+{
+ PMREGS r;
+ PMSREGS sr;
+
+ if (intno == 0x10 && DPMI_int10) {
+ if (DPMI_int10(regs))
+ return;
+ }
+ PM_segread(&sr);
+ r.x.ax = 0x300; /* DPMI issue real interrupt */
+ r.h.bl = intno;
+ r.h.bh = 0;
+ r.x.cx = 0;
+ sr.es = sr.ds;
+ r.e.edi = (uint)regs;
+ PM_int386x(0x31, &r, &r, &sr); /* Issue the interrupt */
+}
+
+#define IN(reg) rmregs.reg = in->e.reg
+#define OUT(reg) out->e.reg = rmregs.reg
+
+int PMAPI PM_int86(int intno, RMREGS *in, RMREGS *out)
+{
+ DPMI_regs rmregs;
+
+ memset(&rmregs, 0, sizeof(rmregs));
+ IN(eax); IN(ebx); IN(ecx); IN(edx); IN(esi); IN(edi);
+
+// These real mode ints may cause crashes.
+//AM: DPMI_int86(intno,&rmregs); /* DPMI issue real interrupt */
+
+ OUT(eax); OUT(ebx); OUT(ecx); OUT(edx); OUT(esi); OUT(edi);
+ out->x.cflag = rmregs.flags & 0x1;
+ return out->x.ax;
+}
+
+int PMAPI PM_int86x(int intno, RMREGS *in, RMREGS *out,
+ RMSREGS *sregs)
+{
+ DPMI_regs rmregs;
+
+ memset(&rmregs, 0, sizeof(rmregs));
+ IN(eax); IN(ebx); IN(ecx); IN(edx); IN(esi); IN(edi);
+ rmregs.es = sregs->es;
+ rmregs.ds = sregs->ds;
+
+//AM: DPMI_int86(intno,&rmregs); /* DPMI issue real interrupt */
+
+ OUT(eax); OUT(ebx); OUT(ecx); OUT(edx); OUT(esi); OUT(edi);
+ sregs->es = rmregs.es;
+ sregs->cs = rmregs.cs;
+ sregs->ss = rmregs.ss;
+ sregs->ds = rmregs.ds;
+ out->x.cflag = rmregs.flags & 0x1;
+ return out->x.ax;
+}
+
+#pragma pack(1)
+
+typedef struct {
+ uint LargestBlockAvail;
+ uint MaxUnlockedPage;
+ uint LargestLockablePage;
+ uint LinAddrSpace;
+ uint NumFreePagesAvail;
+ uint NumPhysicalPagesFree;
+ uint TotalPhysicalPages;
+ uint FreeLinAddrSpace;
+ uint SizeOfPageFile;
+ uint res[3];
+ } MemInfo;
+
+#pragma pack()
+
+void PMAPI PM_availableMemory(ulong *physical,ulong *total)
+{
+ PMREGS r;
+ PMSREGS sr;
+ MemInfo memInfo;
+
+ PM_segread(&sr);
+ r.x.ax = 0x500; /* DPMI get free memory info */
+ sr.es = sr.ds;
+ r.e.edi = (uint)&memInfo;
+ PM_int386x(0x31, &r, &r, &sr); /* Issue the interrupt */
+ *physical = memInfo.NumPhysicalPagesFree * 4096;
+ *total = memInfo.LargestBlockAvail;
+ if (*total < *physical)
+ *physical = *total;
+}
+
+/****************************************************************************
+REMARKS:
+Function to get the file attributes for a specific file.
+****************************************************************************/
+uint PMAPI PM_getFileAttr(
+ const char *filename)
+{
+ // TODO: Implement this!
+ return 0;
+}
+
+/****************************************************************************
+REMARKS:
+Function to get the file time and date for a specific file.
+****************************************************************************/
+ibool PMAPI PM_getFileTime(
+ const char *filename,
+ ibool gmTime,
+ PM_time *time)
+{
+ // TODO: Implement this!
+ return false;
+}
+
+/****************************************************************************
+REMARKS:
+Function to set the file time and date for a specific file.
+****************************************************************************/
+ibool PMAPI PM_setFileTime(
+ const char *filename,
+ ibool gmTime,
+ PM_time *time)
+{
+ // TODO: Implement this!
+ return false;
+}
diff --git a/board/MAI/bios_emulator/scitech/src/pm/smx/pmsmx.c b/board/MAI/bios_emulator/scitech/src/pm/smx/pmsmx.c
new file mode 100644
index 00000000000..2596c76a363
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/pm/smx/pmsmx.c
@@ -0,0 +1,471 @@
+/****************************************************************************
+*
+* SciTech OS Portability Manager Library
+*
+* ========================================================================
+*
+* The contents of this file are subject to the SciTech MGL Public
+* License Version 1.0 (the "License"); you may not use this file
+* except in compliance with the License. You may obtain a copy of
+* the License at http://www.scitechsoft.com/mgl-license.txt
+*
+* Software distributed under the License is distributed on an
+* "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+* implied. See the License for the specific language governing
+* rights and limitations under the License.
+*
+* The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+*
+* The Initial Developer of the Original Code is SciTech Software, Inc.
+* All Rights Reserved.
+*
+* ========================================================================
+*
+* Language: ANSI C
+* Environment: 32-bit SMX embedded systems development
+*
+* Description: Implementation for the OS Portability Manager Library, which
+* contains functions to implement OS specific services in a
+* generic, cross platform API. Porting the OS Portability
+* Manager library is the first step to porting any SciTech
+* products to a new platform.
+*
+****************************************************************************/
+
+#include "pmapi.h"
+#include <stdio.h>
+#include <stdlib.h>
+#include <string.h>
+#include <dos.h>
+#include "smx/ps2mouse.h"
+
+/*--------------------------- Global variables ----------------------------*/
+
+static int globalDataStart;
+
+PM_criticalHandler _VARAPI _PM_critHandler = NULL;
+PM_breakHandler _VARAPI _PM_breakHandler = NULL;
+PM_intHandler _VARAPI _PM_timerHandler = NULL;
+PM_intHandler _VARAPI _PM_rtcHandler = NULL;
+PM_intHandler _VARAPI _PM_keyHandler = NULL;
+PM_key15Handler _VARAPI _PM_key15Handler = NULL;
+PM_mouseHandler _VARAPI _PM_mouseHandler = NULL;
+PM_intHandler _VARAPI _PM_int10Handler = NULL;
+int _VARAPI _PM_mouseMask;
+
+uchar * _VARAPI _PM_ctrlCPtr; /* Location of Ctrl-C flag */
+uchar * _VARAPI _PM_ctrlBPtr; /* Location of Ctrl-Break flag */
+uchar * _VARAPI _PM_critPtr; /* Location of Critical error Bf*/
+PMFARPTR _VARAPI _PM_prevTimer = PMNULL; /* Previous timer handler */
+PMFARPTR _VARAPI _PM_prevRTC = PMNULL; /* Previous RTC handler */
+PMFARPTR _VARAPI _PM_prevKey = PMNULL; /* Previous key handler */
+PMFARPTR _VARAPI _PM_prevKey15 = PMNULL; /* Previous key15 handler */
+PMFARPTR _VARAPI _PM_prevBreak = PMNULL; /* Previous break handler */
+PMFARPTR _VARAPI _PM_prevCtrlC = PMNULL; /* Previous CtrlC handler */
+PMFARPTR _VARAPI _PM_prevCritical = PMNULL; /* Previous critical handler */
+long _VARAPI _PM_prevRealTimer; /* Previous real mode timer */
+long _VARAPI _PM_prevRealRTC; /* Previous real mode RTC */
+long _VARAPI _PM_prevRealKey; /* Previous real mode key */
+long _VARAPI _PM_prevRealKey15; /* Previous real mode key15 */
+long _VARAPI _PM_prevRealInt10; /* Previous real mode int 10h */
+static uchar _PM_oldCMOSRegA; /* CMOS register A contents */
+static uchar _PM_oldCMOSRegB; /* CMOS register B contents */
+static uchar _PM_oldRTCPIC2; /* Mask value for RTC IRQ8 */
+
+/*----------------------------- Implementation ----------------------------*/
+
+/* Globals for locking interrupt handlers in _pmsmx.asm */
+
+extern int _ASMAPI _PM_pmsmxDataStart;
+extern int _ASMAPI _PM_pmsmxDataEnd;
+void _ASMAPI _PM_pmsmxCodeStart(void);
+void _ASMAPI _PM_pmsmxCodeEnd(void);
+
+/* Protected mode interrupt handlers, also called by PM callbacks below */
+
+void _ASMAPI _PM_timerISR(void);
+void _ASMAPI _PM_rtcISR(void);
+void _ASMAPI _PM_keyISR(void);
+void _ASMAPI _PM_key15ISR(void);
+void _ASMAPI _PM_breakISR(void);
+void _ASMAPI _PM_ctrlCISR(void);
+void _ASMAPI _PM_criticalISR(void);
+void _ASMAPI _PM_mouseISR(void);
+void _ASMAPI _PM_int10PMCB(void);
+
+/* Protected mode DPMI callback handlers */
+
+void _ASMAPI _PM_mousePMCB(void);
+
+/* Routine to install a mouse handler function */
+
+void _ASMAPI _PM_setMouseHandler(int mask);
+
+/* Routine to allocate DPMI real mode callback routines */
+
+void _ASMAPI _DPMI_allocateCallback(void (_ASMAPI *pmcode)(),void *rmregs,long *RMCB);
+void _ASMAPI _DPMI_freeCallback(long RMCB);
+
+/* DPMI helper functions in PMLITE.C */
+
+ulong PMAPI DPMI_mapPhysicalToLinear(ulong physAddr,ulong limit);
+int PMAPI DPMI_setSelectorBase(ushort sel,ulong linAddr);
+ulong PMAPI DPMI_getSelectorBase(ushort sel);
+int PMAPI DPMI_setSelectorLimit(ushort sel,ulong limit);
+uint PMAPI DPMI_createSelector(ulong base,ulong limit);
+void PMAPI DPMI_freeSelector(uint sel);
+int PMAPI DPMI_lockLinearPages(ulong linear,ulong len);
+int PMAPI DPMI_unlockLinearPages(ulong linear,ulong len);
+
+/* Functions to read and write CMOS registers */
+
+uchar PMAPI _PM_readCMOS(int index);
+void PMAPI _PM_writeCMOS(int index,uchar value);
+
+/*-------------------------------------------------------------------------*/
+/* Generic routines common to all environments */
+/*-------------------------------------------------------------------------*/
+
+void PMAPI PM_resetMouseDriver(int hardReset)
+{
+ ps2MouseReset();
+}
+
+void PMAPI PM_setRealTimeClockFrequency(int frequency)
+{
+ static short convert[] = {
+ 8192,
+ 4096,
+ 2048,
+ 1024,
+ 512,
+ 256,
+ 128,
+ 64,
+ 32,
+ 16,
+ 8,
+ 4,
+ 2,
+ -1,
+ };
+ int i;
+
+ /* First clear any pending RTC timeout if not cleared */
+ _PM_readCMOS(0x0C);
+ if (frequency == 0) {
+ /* Disable RTC timout */
+ _PM_writeCMOS(0x0A,_PM_oldCMOSRegA);
+ _PM_writeCMOS(0x0B,_PM_oldCMOSRegB & 0x0F);
+ }
+ else {
+ /* Convert frequency value to RTC clock indexes */
+ for (i = 0; convert[i] != -1; i++) {
+ if (convert[i] == frequency)
+ break;
+ }
+
+ /* Set RTC timout value and enable timeout */
+ _PM_writeCMOS(0x0A,(_PM_oldCMOSRegA & 0xF0) | (i+3));
+ _PM_writeCMOS(0x0B,(_PM_oldCMOSRegB & 0x0F) | 0x40);
+ }
+}
+
+static void PMAPI lockPMHandlers(void)
+{
+ static int locked = 0;
+ int stat = 0;
+ PM_lockHandle lh;
+
+ /* Lock all of the code and data used by our protected mode interrupt
+ * handling routines, so that it will continue to work correctly
+ * under real mode.
+ */
+ if (!locked) {
+ PM_saveDS();
+ stat = !PM_lockDataPages(&globalDataStart-2048,4096,&lh);
+ stat |= !PM_lockDataPages(&_PM_pmsmxDataStart,(int)&_PM_pmsmxDataEnd - (int)&_PM_pmsmxDataStart,&lh);
+ stat |= !PM_lockCodePages((__codePtr)_PM_pmsmxCodeStart,(int)_PM_pmsmxCodeEnd-(int)_PM_pmsmxCodeStart,&lh);
+ if (stat) {
+ printf("Page locking services failed - interrupt handling not safe!\n");
+ exit(1);
+ }
+ locked = 1;
+ }
+}
+
+void PMAPI PM_getPMvect(int intno, PMFARPTR *isr)
+{
+ PMREGS regs;
+
+ regs.x.ax = 0x204;
+ regs.h.bl = intno;
+ PM_int386(0x31,®s,®s);
+ isr->sel = regs.x.cx;
+ isr->off = regs.e.edx;
+}
+
+void PMAPI PM_setPMvect(int intno, PM_intHandler isr)
+{
+ PMSREGS sregs;
+ PMREGS regs;
+
+ PM_saveDS();
+ regs.x.ax = 0x205; /* Set protected mode vector */
+ regs.h.bl = intno;
+ PM_segread(&sregs);
+ regs.x.cx = sregs.cs;
+ regs.e.edx = (uint)isr;
+ PM_int386(0x31,®s,®s);
+}
+
+void PMAPI PM_restorePMvect(int intno, PMFARPTR isr)
+{
+ PMREGS regs;
+
+ regs.x.ax = 0x205;
+ regs.h.bl = intno;
+ regs.x.cx = isr.sel;
+ regs.e.edx = isr.off;
+ PM_int386(0x31,®s,®s);
+}
+
+static long prevRealBreak; /* Previous real mode break handler */
+static long prevRealCtrlC; /* Previous real mode CtrlC handler */
+static long prevRealCritical; /* Prev real mode critical handler */
+
+int PMAPI PM_setMouseHandler(int mask, PM_mouseHandler mh)
+{
+ lockPMHandlers(); /* Ensure our handlers are locked */
+
+ _PM_mouseHandler = mh;
+ return 0;
+}
+
+void PMAPI PM_restoreMouseHandler(void)
+{
+ if (_PM_mouseHandler)
+ _PM_mouseHandler = NULL;
+}
+
+static void getISR(int intno, PMFARPTR *pmisr, long *realisr)
+{
+ PM_getPMvect(intno,pmisr);
+}
+
+static void restoreISR(int intno, PMFARPTR pmisr, long realisr)
+{
+ PM_restorePMvect(intno,pmisr);
+}
+
+static void setISR(int intno, void (* PMAPI pmisr)())
+{
+ lockPMHandlers(); /* Ensure our handlers are locked */
+ PM_setPMvect(intno,pmisr);
+}
+
+void PMAPI PM_setTimerHandler(PM_intHandler th)
+{
+ getISR(PM_IRQ0, &_PM_prevTimer, &_PM_prevRealTimer);
+ _PM_timerHandler = th;
+ setISR(PM_IRQ0, _PM_timerISR);
+}
+
+void PMAPI PM_restoreTimerHandler(void)
+{
+ if (_PM_timerHandler) {
+ restoreISR(PM_IRQ0, _PM_prevTimer, _PM_prevRealTimer);
+ _PM_timerHandler = NULL;
+ }
+}
+
+ibool PMAPI PM_setRealTimeClockHandler(PM_intHandler th,int frequency)
+{
+ /* Save the old CMOS real time clock values */
+ _PM_oldCMOSRegA = _PM_readCMOS(0x0A);
+ _PM_oldCMOSRegB = _PM_readCMOS(0x0B);
+
+ /* Set the real time clock interrupt handler */
+ getISR(0x70, &_PM_prevRTC, &_PM_prevRealRTC);
+ _PM_rtcHandler = th;
+ setISR(0x70, _PM_rtcISR);
+
+ /* Program the real time clock default frequency */
+ PM_setRealTimeClockFrequency(frequency);
+
+ /* Unmask IRQ8 in the PIC2 */
+ _PM_oldRTCPIC2 = PM_inpb(0xA1);
+ PM_outpb(0xA1,_PM_oldRTCPIC2 & 0xFE);
+ return true;
+}
+
+void PMAPI PM_restoreRealTimeClockHandler(void)
+{
+ if (_PM_rtcHandler) {
+ /* Restore CMOS registers and mask RTC clock */
+ _PM_writeCMOS(0x0A,_PM_oldCMOSRegA);
+ _PM_writeCMOS(0x0B,_PM_oldCMOSRegB);
+ PM_outpb(0xA1,(PM_inpb(0xA1) & 0xFE) | (_PM_oldRTCPIC2 & ~0xFE));
+
+ /* Restore the interrupt vector */
+ restoreISR(0x70, _PM_prevRTC, _PM_prevRealRTC);
+ _PM_rtcHandler = NULL;
+ }
+}
+
+void PMAPI PM_setKeyHandler(PM_intHandler kh)
+{
+ getISR(PM_IRQ1, &_PM_prevKey, &_PM_prevRealKey);
+ _PM_keyHandler = kh;
+ setISR(PM_IRQ1, _PM_keyISR);
+}
+
+void PMAPI PM_restoreKeyHandler(void)
+{
+ if (_PM_keyHandler) {
+ restoreISR(PM_IRQ1, _PM_prevKey, _PM_prevRealKey);
+ _PM_keyHandler = NULL;
+ }
+}
+
+void PMAPI PM_setKey15Handler(PM_key15Handler kh)
+{
+ getISR(0x15, &_PM_prevKey15, &_PM_prevRealKey15);
+ _PM_key15Handler = kh;
+ setISR(0x15, _PM_key15ISR);
+}
+
+void PMAPI PM_restoreKey15Handler(void)
+{
+ if (_PM_key15Handler) {
+ restoreISR(0x15, _PM_prevKey15, _PM_prevRealKey15);
+ _PM_key15Handler = NULL;
+ }
+}
+
+/* Real mode Ctrl-C and Ctrl-Break handler. This handler simply sets a
+ * flag in the real mode code segment and exit. We save the location
+ * of this flag in real mode memory so that both the real mode and
+ * protected mode code will be modifying the same flags.
+ */
+
+static uchar ctrlHandler[] = {
+ 0x00,0x00,0x00,0x00, /* ctrlBFlag */
+ 0x66,0x2E,0xC7,0x06,0x00,0x00,
+ 0x01,0x00,0x00,0x00, /* mov [cs:ctrlBFlag],1 */
+ 0xCF, /* iretf */
+ };
+
+void PMAPI PM_installAltBreakHandler(PM_breakHandler bh)
+{
+ uint rseg,roff;
+
+ getISR(0x1B, &_PM_prevBreak, &prevRealBreak);
+ getISR(0x23, &_PM_prevCtrlC, &prevRealCtrlC);
+ _PM_breakHandler = bh;
+ setISR(0x1B, _PM_breakISR);
+ setISR(0x23, _PM_ctrlCISR);
+
+ /* Hook the real mode vectors for these handlers, as these are not
+ * normally reflected by the DPMI server up to protected mode
+ */
+ _PM_ctrlBPtr = PM_allocRealSeg(sizeof(ctrlHandler)*2, &rseg, &roff);
+ memcpy(_PM_ctrlBPtr,ctrlHandler,sizeof(ctrlHandler));
+ memcpy(_PM_ctrlBPtr+sizeof(ctrlHandler),ctrlHandler,sizeof(ctrlHandler));
+ _PM_ctrlCPtr = _PM_ctrlBPtr + sizeof(ctrlHandler);
+ _PM_setRMvect(0x1B,((long)rseg << 16) | (roff+4));
+ _PM_setRMvect(0x23,((long)rseg << 16) | (roff+sizeof(ctrlHandler)+4));
+}
+
+void PMAPI PM_installBreakHandler(void)
+{
+ PM_installAltBreakHandler(NULL);
+}
+
+void PMAPI PM_restoreBreakHandler(void)
+{
+ if (_PM_prevBreak.sel) {
+ restoreISR(0x1B, _PM_prevBreak, prevRealBreak);
+ restoreISR(0x23, _PM_prevCtrlC, prevRealCtrlC);
+ _PM_prevBreak.sel = 0;
+ _PM_breakHandler = NULL;
+ PM_freeRealSeg(_PM_ctrlBPtr);
+ }
+}
+
+/* Real mode Critical Error handler. This handler simply saves the AX and
+ * DI values in the real mode code segment and exits. We save the location
+ * of this flag in real mode memory so that both the real mode and
+ * protected mode code will be modifying the same flags.
+ */
+
+static uchar criticalHandler[] = {
+ 0x00,0x00, /* axCode */
+ 0x00,0x00, /* diCode */
+ 0x2E,0xA3,0x00,0x00, /* mov [cs:axCode],ax */
+ 0x2E,0x89,0x3E,0x02,0x00, /* mov [cs:diCode],di */
+ 0xB8,0x03,0x00, /* mov ax,3 */
+ 0xCF, /* iretf */
+ };
+
+void PMAPI PM_installAltCriticalHandler(PM_criticalHandler ch)
+{
+ uint rseg,roff;
+
+ getISR(0x24, &_PM_prevCritical, &prevRealCritical);
+ _PM_critHandler = ch;
+ setISR(0x24, _PM_criticalISR);
+
+ /* Hook the real mode vector, as this is not normally reflected by the
+ * DPMI server up to protected mode.
+ */
+ _PM_critPtr = PM_allocRealSeg(sizeof(criticalHandler)*2, &rseg, &roff);
+ memcpy(_PM_critPtr,criticalHandler,sizeof(criticalHandler));
+ _PM_setRMvect(0x24,((long)rseg << 16) | (roff+4));
+}
+
+void PMAPI PM_installCriticalHandler(void)
+{
+ PM_installAltCriticalHandler(NULL);
+}
+
+void PMAPI PM_restoreCriticalHandler(void)
+{
+ if (_PM_prevCritical.sel) {
+ restoreISR(0x24, _PM_prevCritical, prevRealCritical);
+ PM_freeRealSeg(_PM_critPtr);
+ _PM_prevCritical.sel = 0;
+ _PM_critHandler = NULL;
+ }
+}
+
+int PMAPI PM_lockDataPages(void *p,uint len,PM_lockHandle *lh)
+{
+ PMSREGS sregs;
+ PM_segread(&sregs);
+ return DPMI_lockLinearPages((uint)p + DPMI_getSelectorBase(sregs.ds),len);
+}
+
+int PMAPI PM_unlockDataPages(void *p,uint len,PM_lockHandle *lh)
+{
+ PMSREGS sregs;
+ PM_segread(&sregs);
+ return DPMI_unlockLinearPages((uint)p + DPMI_getSelectorBase(sregs.ds),len);
+}
+
+int PMAPI PM_lockCodePages(void (*p)(),uint len,PM_lockHandle *lh)
+{
+ PMSREGS sregs;
+ PM_segread(&sregs);
+//AM: causes minor glitch with
+//AM: older versions pmEasy which don't allow DPMI 06 on
+//AM: Code selector 0x0C -- assume base is 0 which it should be.
+ return DPMI_lockLinearPages((uint)p,len);
+}
+
+int PMAPI PM_unlockCodePages(void (*p)(),uint len,PM_lockHandle *lh)
+{
+ PMSREGS sregs;
+ PM_segread(&sregs);
+ return DPMI_unlockLinearPages((uint)p,len);
+}
diff --git a/board/MAI/bios_emulator/scitech/src/pm/smx/vflat.c b/board/MAI/bios_emulator/scitech/src/pm/smx/vflat.c
new file mode 100644
index 00000000000..579ef2c95c4
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/pm/smx/vflat.c
@@ -0,0 +1,49 @@
+/****************************************************************************
+*
+* SciTech OS Portability Manager Library
+*
+* ========================================================================
+*
+* The contents of this file are subject to the SciTech MGL Public
+* License Version 1.0 (the "License"); you may not use this file
+* except in compliance with the License. You may obtain a copy of
+* the License at http://www.scitechsoft.com/mgl-license.txt
+*
+* Software distributed under the License is distributed on an
+* "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+* implied. See the License for the specific language governing
+* rights and limitations under the License.
+*
+* The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+*
+* The Initial Developer of the Original Code is SciTech Software, Inc.
+* All Rights Reserved.
+*
+* ========================================================================
+*
+* Language: ANSI C
+* Environment: Any
+*
+* Description: Dummy module; no virtual framebuffer for this OS
+*
+****************************************************************************/
+
+#include "pmapi.h"
+
+ibool PMAPI VF_available(void)
+{
+ return false;
+}
+
+void * PMAPI VF_init(ulong baseAddr,int bankSize,int codeLen,void *bankFunc)
+{
+ baseAddr = baseAddr;
+ bankSize = bankSize;
+ codeLen = codeLen;
+ bankFunc = bankFunc;
+ return NULL;
+}
+
+void PMAPI VF_exit(void)
+{
+}
diff --git a/board/MAI/bios_emulator/scitech/src/pm/smx/ztimer.c b/board/MAI/bios_emulator/scitech/src/pm/smx/ztimer.c
new file mode 100644
index 00000000000..01e180bdca4
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/pm/smx/ztimer.c
@@ -0,0 +1,115 @@
+/****************************************************************************
+*
+* Ultra Long Period Timer
+*
+* ========================================================================
+*
+* The contents of this file are subject to the SciTech MGL Public
+* License Version 1.0 (the "License"); you may not use this file
+* except in compliance with the License. You may obtain a copy of
+* the License at http://www.scitechsoft.com/mgl-license.txt
+*
+* Software distributed under the License is distributed on an
+* "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+* implied. See the License for the specific language governing
+* rights and limitations under the License.
+*
+* The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+*
+* The Initial Developer of the Original Code is SciTech Software, Inc.
+* All Rights Reserved.
+*
+* ========================================================================
+*
+* Language: ANSI C
+* Environment: 32-bit SMX embedded systems development
+*
+* Description: OS specific implementation for the Zen Timer functions.
+* LZTimer not supported for smx (as needed for i486 processors), only
+* ULZTimer is supported at this time.
+*
+****************************************************************************/
+
+/*---------------------------- Global smx variables -----------------------*/
+
+extern ulong _cdecl etime; /* elapsed time */
+extern ulong _cdecl xticks_per_second(void);
+
+/*----------------------------- Implementation ----------------------------*/
+
+/* External assembler functions */
+
+void _ASMAPI LZ_disable(void);
+void _ASMAPI LZ_enable(void);
+
+
+/****************************************************************************
+REMARKS:
+Initialise the Zen Timer module internals.
+****************************************************************************/
+void __ZTimerInit(void)
+{
+}
+
+ulong reterr(void)
+{
+ PM_fatalError("Zen Timer not supported for smx.");
+ return(0);
+}
+
+/****************************************************************************
+REMARKS:
+Call the assembler Zen Timer functions to do the timing.
+****************************************************************************/
+#define __LZTimerOn(tm) PM_fatalError("Zen Timer not supported for smx.")
+
+/****************************************************************************
+REMARKS:
+Call the assembler Zen Timer functions to do the timing.
+****************************************************************************/
+#define __LZTimerLap(tm) reterr()
+
+/****************************************************************************
+REMARKS:
+Call the assembler Zen Timer functions to do the timing.
+****************************************************************************/
+#define __LZTimerOff(tm) PM_fatalError("Zen Timer not supported for smx.")
+
+/****************************************************************************
+REMARKS:
+Call the assembler Zen Timer functions to do the timing.
+****************************************************************************/
+#define __LZTimerCount(tm) reterr()
+
+/****************************************************************************
+REMARKS:
+Define the resolution of the long period timer as seconds per timer tick.
+****************************************************************************/
+#define ULZTIMER_RESOLUTION (ulong)(1000000/xticks_per_second())
+
+/****************************************************************************
+REMARKS:
+Read the Long Period timer value from the smx timer tick.
+****************************************************************************/
+static ulong __ULZReadTime(void)
+{
+ ulong ticks;
+ LZ_disable(); /* Turn of interrupts */
+ ticks = etime;
+ LZ_enable(); /* Turn on interrupts again */
+ return ticks;
+}
+
+/****************************************************************************
+REMARKS:
+Compute the elapsed time from the BIOS timer tick. Note that we check to see
+whether a midnight boundary has passed, and if so adjust the finish time to
+account for this. We cannot detect if more that one midnight boundary has
+passed, so if this happens we will be generating erronous results.
+****************************************************************************/
+ulong __ULZElapsedTime(ulong start,ulong finish)
+{
+ if (finish < start)
+ finish += xticks_per_second() * 3600 *24; /* Number of ticks in 24 hours */
+ return finish - start;
+}
diff --git a/board/MAI/bios_emulator/scitech/src/pm/stub/cpuinfo.c b/board/MAI/bios_emulator/scitech/src/pm/stub/cpuinfo.c
new file mode 100644
index 00000000000..2833a72f448
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/pm/stub/cpuinfo.c
@@ -0,0 +1,79 @@
+/****************************************************************************
+*
+* Ultra Long Period Timer
+*
+* ========================================================================
+*
+* The contents of this file are subject to the SciTech MGL Public
+* License Version 1.0 (the "License"); you may not use this file
+* except in compliance with the License. You may obtain a copy of
+* the License at http://www.scitechsoft.com/mgl-license.txt
+*
+* Software distributed under the License is distributed on an
+* "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+* implied. See the License for the specific language governing
+* rights and limitations under the License.
+*
+* The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+*
+* The Initial Developer of the Original Code is SciTech Software, Inc.
+* All Rights Reserved.
+*
+* ========================================================================
+*
+* Language: ANSI C
+* Environment: *** TODO: ADD YOUR OS ENVIRONMENT NAME HERE ***
+*
+* Description: Module to implement OS specific services to measure the
+* CPU frequency.
+*
+****************************************************************************/
+
+/*----------------------------- Implementation ----------------------------*/
+
+/****************************************************************************
+REMARKS:
+Increase the thread priority to maximum, if possible.
+****************************************************************************/
+static int SetMaxThreadPriority(void)
+{
+ // TODO: If you have thread priorities, increase it to maximum for the
+ // thread for timing the CPU frequency.
+ return oldPriority;
+}
+
+/****************************************************************************
+REMARKS:
+Restore the original thread priority.
+****************************************************************************/
+static void RestoreThreadPriority(
+ int priority)
+{
+ // TODO: Restore the original thread priority on exit.
+}
+
+/****************************************************************************
+REMARKS:
+Initialise the counter and return the frequency of the counter.
+****************************************************************************/
+static void GetCounterFrequency(
+ CPU_largeInteger *freq)
+{
+ // TODO: Return the frequency of the counter in here. You should try to
+ // normalise this value to be around 100,000 ticks per second.
+ freq->low = 0;
+ freq->high = 0;
+}
+
+/****************************************************************************
+REMARKS:
+Read the counter and return the counter value.
+
+TODO: Implement this to read the counter. It should be done as a macro
+ for accuracy.
+****************************************************************************/
+#define GetCounter(t) \
+{ \
+ (t)->low = 0; \
+ (t)->high = 0; \
+}
diff --git a/board/MAI/bios_emulator/scitech/src/pm/stub/event.c b/board/MAI/bios_emulator/scitech/src/pm/stub/event.c
new file mode 100644
index 00000000000..8e805d060f6
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/pm/stub/event.c
@@ -0,0 +1,199 @@
+/****************************************************************************
+*
+* SciTech OS Portability Manager Library
+*
+* ========================================================================
+*
+* The contents of this file are subject to the SciTech MGL Public
+* License Version 1.0 (the "License"); you may not use this file
+* except in compliance with the License. You may obtain a copy of
+* the License at http://www.scitechsoft.com/mgl-license.txt
+*
+* Software distributed under the License is distributed on an
+* "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+* implied. See the License for the specific language governing
+* rights and limitations under the License.
+*
+* The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+*
+* The Initial Developer of the Original Code is SciTech Software, Inc.
+* All Rights Reserved.
+*
+* ========================================================================
+*
+* Language: ANSI C
+* Environment: *** TODO: ADD YOUR OS ENVIRONMENT NAME HERE ***
+*
+* Description: **** implementation for the SciTech cross platform
+* event library.
+*
+****************************************************************************/
+
+/*---------------------------- Global Variables ---------------------------*/
+
+static ushort keyUpMsg[256] = {0};/* Table of key up messages */
+static int rangeX,rangeY; /* Range of mouse coordinates */
+
+/*---------------------------- Implementation -----------------------------*/
+
+/* These are not used under non-DOS systems */
+#define _EVT_disableInt() 1
+#define _EVT_restoreInt(flags)
+
+/****************************************************************************
+PARAMETERS:
+scanCode - Scan code to test
+
+REMARKS:
+This macro determines if a specified key is currently down at the
+time that the call is made.
+****************************************************************************/
+#define _EVT_isKeyDown(scanCode) (keyUpMsg[scanCode] != 0)
+
+/****************************************************************************
+REMARKS:
+This function is used to return the number of ticks since system
+startup in milliseconds. This should be the same value that is placed into
+the time stamp fields of events, and is used to implement auto mouse down
+events.
+****************************************************************************/
+ulong _EVT_getTicks(void)
+{
+ // TODO: Implement this for your OS!
+}
+
+/****************************************************************************
+REMARKS:
+Pumps all messages in the application message queue into our event queue.
+****************************************************************************/
+static void _EVT_pumpMessages(void)
+{
+ // TODO: The purpose of this function is to read all keyboard and mouse
+ // events from the OS specific event queue, translate them and post
+ // them into the SciTech event queue.
+ //
+ // NOTE: There are a couple of important things that this function must
+ // take care of:
+ //
+ // 1. Support for KEYDOWN, KEYREPEAT and KEYUP is required.
+ //
+ // 2. Support for reading hardware scan code as well as ASCII
+ // translated values is required. Games use the scan codes rather
+ // than ASCII values. Scan codes go into the high order byte of the
+ // keyboard message field.
+ //
+ // 3. Support for at least reading mouse motion data (mickeys) from the
+ // mouse is required. Using the mickey values, we can then translate
+ // to mouse cursor coordinates scaled to the range of the current
+ // graphics display mode. Mouse values are scaled based on the
+ // global 'rangeX' and 'rangeY'.
+ //
+ // 4. Support for a timestamp for the events is required, which is
+ // defined as the number of milliseconds since some event (usually
+ // system startup). This is the timestamp when the event occurred
+ // (ie: at interrupt time) not when it was stuff into the SciTech
+ // event queue.
+ //
+ // 5. Support for mouse double click events. If the OS has a native
+ // mechanism to determine this, it should be used. Otherwise the
+ // time stamp information will be used by the generic event code
+ // to generate double click events.
+}
+
+/****************************************************************************
+REMARKS:
+This macro/function is used to converts the scan codes reported by the
+keyboard to our event libraries normalised format. We only have one scan
+code for the 'A' key, and use shift modifiers to determine if it is a
+Ctrl-F1, Alt-F1 etc. The raw scan codes from the keyboard work this way,
+but the OS gives us 'cooked' scan codes, we have to translate them back
+to the raw format.
+****************************************************************************/
+#define _EVT_maskKeyCode(evt)
+
+/****************************************************************************
+REMARKS:
+Safely abort the event module upon catching a fatal error.
+****************************************************************************/
+void _EVT_abort()
+{
+ EVT_exit();
+ PM_fatalError("Unhandled exception!");
+}
+
+/****************************************************************************
+PARAMETERS:
+mouseMove - Callback function to call wheneve the mouse needs to be moved
+
+REMARKS:
+Initiliase the event handling module. Here we install our mouse handling ISR
+to be called whenever any button's are pressed or released. We also build
+the free list of events in the event queue.
+
+We use handler number 2 of the mouse libraries interrupt handlers for our
+event handling routines.
+****************************************************************************/
+void EVTAPI EVT_init(
+ _EVT_mouseMoveHandler mouseMove)
+{
+ /* Initialise the event queue */
+ _mouseMove = mouseMove;
+ initEventQueue();
+ memset(keyUpMsg,0,sizeof(keyUpMsg));
+
+ // TODO: Do any OS specific initialisation here
+
+ /* Catch program termination signals so we can clean up properly */
+ signal(SIGABRT, _EVT_abort);
+ signal(SIGFPE, _EVT_abort);
+ signal(SIGINT, _EVT_abort);
+}
+
+/****************************************************************************
+REMARKS
+Changes the range of coordinates returned by the mouse functions to the
+specified range of values. This is used when changing between graphics
+modes set the range of mouse coordinates for the new display mode.
+****************************************************************************/
+void EVTAPI EVT_setMouseRange(
+ int xRes,
+ int yRes)
+{
+ rangeX = xRes;
+ rangeY = yRes;
+}
+
+/****************************************************************************
+REMARKS:
+Initiailises the internal event handling modules. The EVT_suspend function
+can be called to suspend event handling (such as when shelling out to DOS),
+and this function can be used to resume it again later.
+****************************************************************************/
+void EVT_resume(void)
+{
+ // Do nothing for non DOS systems
+}
+
+/****************************************************************************
+REMARKS
+Suspends all of our event handling operations. This is also used to
+de-install the event handling code.
+****************************************************************************/
+void EVT_suspend(void)
+{
+ // Do nothing for non DOS systems
+}
+
+/****************************************************************************
+REMARKS
+Exits the event module for program terminatation.
+****************************************************************************/
+void EVT_exit(void)
+{
+ /* Restore signal handlers */
+ signal(SIGABRT, SIG_DFL);
+ signal(SIGFPE, SIG_DFL);
+ signal(SIGINT, SIG_DFL);
+
+ // TODO: Do any OS specific cleanup in here
+}
diff --git a/board/MAI/bios_emulator/scitech/src/pm/stub/oshdr.h b/board/MAI/bios_emulator/scitech/src/pm/stub/oshdr.h
new file mode 100644
index 00000000000..81a20aaf15d
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/pm/stub/oshdr.h
@@ -0,0 +1,33 @@
+/****************************************************************************
+*
+* SciTech OS Portability Manager Library
+*
+* ========================================================================
+*
+* The contents of this file are subject to the SciTech MGL Public
+* License Version 1.0 (the "License"); you may not use this file
+* except in compliance with the License. You may obtain a copy of
+* the License at http://www.scitechsoft.com/mgl-license.txt
+*
+* Software distributed under the License is distributed on an
+* "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+* implied. See the License for the specific language governing
+* rights and limitations under the License.
+*
+* The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+*
+* The Initial Developer of the Original Code is SciTech Software, Inc.
+* All Rights Reserved.
+*
+* ========================================================================
+*
+* Language: ANSI C
+* Environment: BeOS
+*
+* Description: Include file to include all OS specific header files.
+*
+****************************************************************************/
+
+// TODO: This is where you include OS specific headers for the event handling
+// library. You may leave this empty if you have no OS specific headers
+// to include.
diff --git a/board/MAI/bios_emulator/scitech/src/pm/stub/pm.c b/board/MAI/bios_emulator/scitech/src/pm/stub/pm.c
new file mode 100644
index 00000000000..51656b05e35
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/pm/stub/pm.c
@@ -0,0 +1,980 @@
+/****************************************************************************
+*
+* SciTech OS Portability Manager Library
+*
+* ========================================================================
+*
+* The contents of this file are subject to the SciTech MGL Public
+* License Version 1.0 (the "License"); you may not use this file
+* except in compliance with the License. You may obtain a copy of
+* the License at http://www.scitechsoft.com/mgl-license.txt
+*
+* Software distributed under the License is distributed on an
+* "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+* implied. See the License for the specific language governing
+* rights and limitations under the License.
+*
+* The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+*
+* The Initial Developer of the Original Code is SciTech Software, Inc.
+* All Rights Reserved.
+*
+* ========================================================================
+*
+* Language: ANSI C
+* Environment: *** TODO: ADD YOUR OS ENVIRONMENT NAME HERE ***
+*
+* Description: Implementation for the OS Portability Manager Library, which
+* contains functions to implement OS specific services in a
+* generic, cross platform API. Porting the OS Portability
+* Manager library is the first step to porting any SciTech
+* products to a new platform.
+*
+****************************************************************************/
+
+#include "pmapi.h"
+#include "drvlib/os/os.h"
+#include <stdio.h>
+#include <stdlib.h>
+#include <string.h>
+
+// TODO: Include any OS specific headers here!
+
+/*--------------------------- Global variables ----------------------------*/
+
+// TODO: If you support access to the BIOS, the following VESABuf globals
+// keep track of a single VESA transfer buffer. If you don't support
+// access to the BIOS, remove these variables.
+
+static uint VESABuf_len = 1024; /* Length of the VESABuf buffer */
+static void *VESABuf_ptr = NULL; /* Near pointer to VESABuf */
+static uint VESABuf_rseg; /* Real mode segment of VESABuf */
+static uint VESABuf_roff; /* Real mode offset of VESABuf */
+
+static void (PMAPIP fatalErrorCleanup)(void) = NULL;
+
+/*----------------------------- Implementation ----------------------------*/
+
+/****************************************************************************
+REMARKS:
+Initialise the PM library.
+****************************************************************************/
+void PMAPI PM_init(void)
+{
+ // TODO: Do any initialisation in here. This includes getting IOPL
+ // access for the process calling PM_init. This will get called
+ // more than once.
+
+ // TODO: If you support the supplied MTRR register stuff (you need to
+ // be at ring 0 for this!), you should initialise it in here.
+
+/* MTRR_init(); */
+}
+
+/****************************************************************************
+REMARKS:
+Return the operating system type identifier.
+****************************************************************************/
+long PMAPI PM_getOSType(void)
+{
+ // TODO: Change this to return the define for your OS from drvlib/os.h
+ return _OS_MYOS;
+}
+
+/****************************************************************************
+REMARKS:
+Return the runtime type identifier (always PM_386 for protected mode)
+****************************************************************************/
+int PMAPI PM_getModeType(void)
+{ return PM_386; }
+
+/****************************************************************************
+REMARKS:
+Add a file directory separator to the end of the filename.
+****************************************************************************/
+void PMAPI PM_backslash(
+ char *s)
+{
+ uint pos = strlen(s);
+ if (s[pos-1] != '/') {
+ s[pos] = '/';
+ s[pos+1] = '\0';
+ }
+}
+
+/****************************************************************************
+REMARKS:
+Add a user defined PM_fatalError cleanup function.
+****************************************************************************/
+void PMAPI PM_setFatalErrorCleanup(
+ void (PMAPIP cleanup)(void))
+{
+ fatalErrorCleanup = cleanup;
+}
+
+/****************************************************************************
+REMARKS:
+Report a fatal error condition and halt the program.
+****************************************************************************/
+void PMAPI PM_fatalError(
+ const char *msg)
+{
+ // TODO: If you are running in a GUI environment without a console,
+ // this needs to be changed to bring up a fatal error message
+ // box and terminate the program.
+ if (fatalErrorCleanup)
+ fatalErrorCleanup();
+ fprintf(stderr,"%s\n", msg);
+ exit(1);
+}
+
+/****************************************************************************
+REMARKS:
+Exit handler to kill the VESA transfer buffer.
+****************************************************************************/
+static void ExitVBEBuf(void)
+{
+ // TODO: If you do not have BIOS access, remove this function.
+ if (VESABuf_ptr)
+ PM_freeRealSeg(VESABuf_ptr);
+ VESABuf_ptr = 0;
+}
+
+/****************************************************************************
+REMARKS:
+Allocate the real mode VESA transfer buffer for communicating with the BIOS.
+****************************************************************************/
+void * PMAPI PM_getVESABuf(
+ uint *len,
+ uint *rseg,
+ uint *roff)
+{
+ // TODO: If you do not have BIOS access, simply delete the guts of
+ // this function and return NULL.
+ if (!VESABuf_ptr) {
+ /* Allocate a global buffer for communicating with the VESA VBE */
+ if ((VESABuf_ptr = PM_allocRealSeg(VESABuf_len, &VESABuf_rseg, &VESABuf_roff)) == NULL)
+ return NULL;
+ atexit(ExitVBEBuf);
+ }
+ *len = VESABuf_len;
+ *rseg = VESABuf_rseg;
+ *roff = VESABuf_roff;
+ return VESABuf_ptr;
+}
+
+/****************************************************************************
+REMARKS:
+Check if a key has been pressed.
+****************************************************************************/
+int PMAPI PM_kbhit(void)
+{
+ // TODO: This function checks if a key is available to be read. This
+ // should be implemented, but is mostly used by the test programs
+ // these days.
+ return true;
+}
+
+/****************************************************************************
+REMARKS:
+Wait for and return the next keypress.
+****************************************************************************/
+int PMAPI PM_getch(void)
+{
+ // TODO: This returns the ASCII code of the key pressed. This
+ // should be implemented, but is mostly used by the test programs
+ // these days.
+ return 0xD;
+}
+
+/****************************************************************************
+REMARKS:
+Open a fullscreen console mode for output.
+****************************************************************************/
+int PMAPI PM_openConsole(void)
+{
+ // TODO: Opens up a fullscreen console for graphics output. If your
+ // console does not have graphics/text modes, this can be left
+ // empty. The main purpose of this is to disable console switching
+ // when in graphics modes if you can switch away from fullscreen
+ // consoles (if you want to allow switching, this can be done
+ // elsewhere with a full save/restore state of the graphics mode).
+ return 0;
+}
+
+/****************************************************************************
+REMARKS:
+Return the size of the state buffer used to save the console state.
+****************************************************************************/
+int PMAPI PM_getConsoleStateSize(void)
+{
+ // TODO: Returns the size of the console state buffer used to save the
+ // state of the console before going into graphics mode. This is
+ // used to restore the console back to normal when we are done.
+ return 1;
+}
+
+/****************************************************************************
+REMARKS:
+Save the state of the console into the state buffer.
+****************************************************************************/
+void PMAPI PM_saveConsoleState(
+ void *stateBuf,
+ int console_id)
+{
+ // TODO: Saves the state of the console into the state buffer. This is
+ // used to restore the console back to normal when we are done.
+ // We will always restore 80x25 text mode after being in graphics
+ // mode, so if restoring text mode is all you need to do this can
+ // be left empty.
+}
+
+/****************************************************************************
+REMARKS:
+Restore the state of the console from the state buffer.
+****************************************************************************/
+void PMAPI PM_restoreConsoleState(
+ const void *stateBuf,
+ int console_id)
+{
+ // TODO: Restore the state of the console from the state buffer. This is
+ // used to restore the console back to normal when we are done.
+ // We will always restore 80x25 text mode after being in graphics
+ // mode, so if restoring text mode is all you need to do this can
+ // be left empty.
+}
+
+/****************************************************************************
+REMARKS:
+Close the console and return to non-fullscreen console mode.
+****************************************************************************/
+void PMAPI PM_closeConsole(
+ int console_id)
+{
+ // TODO: Close the console when we are done, going back to text mode.
+}
+
+/****************************************************************************
+REMARKS:
+Set the location of the OS console cursor.
+****************************************************************************/
+void PM_setOSCursorLocation(
+ int x,
+ int y)
+{
+ // TODO: Set the OS console cursor location to the new value. This is
+ // generally used for new OS ports (used mostly for DOS).
+}
+
+/****************************************************************************
+REMARKS:
+Set the width of the OS console.
+****************************************************************************/
+void PM_setOSScreenWidth(
+ int width,
+ int height)
+{
+ // TODO: Set the OS console screen width. This is generally unused for
+ // new OS ports.
+}
+
+/****************************************************************************
+REMARKS:
+Set the real time clock handler (used for software stereo modes).
+****************************************************************************/
+ibool PMAPI PM_setRealTimeClockHandler(
+ PM_intHandler ih,
+ int frequency)
+{
+ // TODO: Install a real time clock interrupt handler. Normally this
+ // will not be supported from most OS'es in user land, so an
+ // alternative mechanism is needed to enable software stereo.
+ // Hence leave this unimplemented unless you have a high priority
+ // mechanism to call the 32-bit callback when the real time clock
+ // interrupt fires.
+ return false;
+}
+
+/****************************************************************************
+REMARKS:
+Set the real time clock frequency (for stereo modes).
+****************************************************************************/
+void PMAPI PM_setRealTimeClockFrequency(
+ int frequency)
+{
+ // TODO: Set the real time clock interrupt frequency. Used for stereo
+ // LC shutter glasses when doing software stereo. Usually sets
+ // the frequency to around 2048 Hz.
+}
+
+/****************************************************************************
+REMARKS:
+Restore the original real time clock handler.
+****************************************************************************/
+void PMAPI PM_restoreRealTimeClockHandler(void)
+{
+ // TODO: Restores the real time clock handler.
+}
+
+/****************************************************************************
+REMARKS:
+Return the current operating system path or working directory.
+****************************************************************************/
+char * PMAPI PM_getCurrentPath(
+ char *path,
+ int maxLen)
+{
+ return getcwd(path,maxLen);
+}
+
+/****************************************************************************
+REMARKS:
+Return the drive letter for the boot drive.
+****************************************************************************/
+char PMAPI PM_getBootDrive(void)
+{
+ // TODO: Return the boot drive letter for the OS. Normally this is 'c'
+ // for DOS based OS'es and '/' for Unices.
+ return '/';
+}
+
+/****************************************************************************
+REMARKS:
+Return the path to the VBE/AF driver files (legacy and not used).
+****************************************************************************/
+const char * PMAPI PM_getVBEAFPath(void)
+{
+ return PM_getNucleusConfigPath();
+}
+
+/****************************************************************************
+REMARKS:
+Return the path to the Nucleus driver files.
+****************************************************************************/
+const char * PMAPI PM_getNucleusPath(void)
+{
+ // TODO: Change this to the default path to Nucleus driver files. The
+ // following is the default for Unices.
+ char *env = getenv("NUCLEUS_PATH");
+ return env ? env : "/usr/lib/nucleus";
+}
+
+/****************************************************************************
+REMARKS:
+Return the path to the Nucleus configuration files.
+****************************************************************************/
+const char * PMAPI PM_getNucleusConfigPath(void)
+{
+ static char path[256];
+ strcpy(path,PM_getNucleusPath());
+ PM_backslash(path);
+ strcat(path,"config");
+ return path;
+}
+
+/****************************************************************************
+REMARKS:
+Return a unique identifier for the machine if possible.
+****************************************************************************/
+const char * PMAPI PM_getUniqueID(void)
+{
+ // TODO: Return a unique ID for the machine. If a unique ID is not
+ // available, return the machine name.
+ static char buf[128];
+ gethostname(buf, 128);
+ return buf;
+}
+
+/****************************************************************************
+REMARKS:
+Get the name of the machine on the network.
+****************************************************************************/
+const char * PMAPI PM_getMachineName(void)
+{
+ // TODO: Return the network machine name for the machine.
+ static char buf[128];
+ gethostname(buf, 128);
+ return buf;
+}
+
+/****************************************************************************
+REMARKS:
+Return a pointer to the real mode BIOS data area.
+****************************************************************************/
+void * PMAPI PM_getBIOSPointer(void)
+{
+ // TODO: This returns a pointer to the real mode BIOS data area. If you
+ // do not support BIOS access, you can simply return NULL here.
+ if (!zeroPtr)
+ zeroPtr = PM_mapPhysicalAddr(0,0xFFFFF,true);
+ return (void*)(zeroPtr + 0x400);
+}
+
+/****************************************************************************
+REMARKS:
+Return a pointer to 0xA0000 physical VGA graphics framebuffer.
+****************************************************************************/
+void * PMAPI PM_getA0000Pointer(void)
+{
+ static void *bankPtr;
+ if (!bankPtr)
+ bankPtr = PM_mapPhysicalAddr(0xA0000,0xFFFF,true);
+ return bankPtr;
+}
+
+/****************************************************************************
+REMARKS:
+Map a physical address to a linear address in the callers process.
+****************************************************************************/
+void * PMAPI PM_mapPhysicalAddr(
+ ulong base,
+ ulong limit,
+ ibool isCached)
+{
+ // TODO: This function maps a physical memory address to a linear
+ // address in the address space of the calling process.
+
+ // NOTE: This function *must* be able to handle any phsyical base
+ // address, and hence you will have to handle rounding of
+ // the physical base address to a page boundary (ie: 4Kb on
+ // x86 CPU's) to be able to properly map in the memory
+ // region.
+
+ // NOTE: If possible the isCached bit should be used to ensure that
+ // the PCD (Page Cache Disable) and PWT (Page Write Through)
+ // bits are set to disable caching for a memory mapping used
+ // for MMIO register access. We also disable caching using
+ // the MTRR registers for Pentium Pro and later chipsets so if
+ // MTRR support is enabled for your OS then you can safely ignore
+ // the isCached flag and always enable caching in the page
+ // tables.
+ return NULL;
+}
+
+/****************************************************************************
+REMARKS:
+Free a physical address mapping allocated by PM_mapPhysicalAddr.
+****************************************************************************/
+void PMAPI PM_freePhysicalAddr(
+ void *ptr,
+ ulong limit)
+{
+ // TODO: This function will free a physical memory mapping previously
+ // allocated with PM_mapPhysicalAddr() if at all possible. If
+ // you can't free physical memory mappings, simply do nothing.
+}
+
+/****************************************************************************
+REMARKS:
+Find the physical address of a linear memory address in current process.
+****************************************************************************/
+ulong PMAPI PM_getPhysicalAddr(void *p)
+{
+ // TODO: This function should find the physical address of a linear
+ // address.
+ return 0xFFFFFFFFUL;
+}
+
+void PMAPI PM_sleep(ulong milliseconds)
+{
+ // TODO: Put the process to sleep for milliseconds
+}
+
+int PMAPI PM_getCOMPort(int port)
+{
+ // TODO: Re-code this to determine real values using the Plug and Play
+ // manager for the OS.
+ switch (port) {
+ case 0: return 0x3F8;
+ case 1: return 0x2F8;
+ }
+ return 0;
+}
+
+int PMAPI PM_getLPTPort(int port)
+{
+ // TODO: Re-code this to determine real values using the Plug and Play
+ // manager for the OS.
+ switch (port) {
+ case 0: return 0x3BC;
+ case 1: return 0x378;
+ case 2: return 0x278;
+ }
+ return 0;
+}
+
+/****************************************************************************
+REMARKS:
+Allocate a block of (unnamed) shared memory.
+****************************************************************************/
+void * PMAPI PM_mallocShared(
+ long size)
+{
+ // TODO: This is used to allocate memory that is shared between process
+ // that all access the common Nucleus drivers via a common display
+ // driver DLL. If your OS does not support shared memory (or if
+ // the display driver does not need to allocate shared memory
+ // for each process address space), this should just call PM_malloc.
+ return PM_malloc(size);
+}
+
+/****************************************************************************
+REMARKS:
+Free a block of shared memory.
+****************************************************************************/
+void PMAPI PM_freeShared(
+ void *ptr)
+{
+ // TODO: Free the shared memory block. This will be called in the context
+ // of the original calling process that allocated the shared
+ // memory with PM_mallocShared. Simply call PM_free if you do not
+ // need this.
+ PM_free(ptr);
+}
+
+/****************************************************************************
+REMARKS:
+Map a linear memory address to the calling process address space. The
+address will have been allocated in another process using the
+PM_mapPhysicalAddr function.
+****************************************************************************/
+void * PMAPI PM_mapToProcess(
+ void *base,
+ ulong limit)
+{
+ // TODO: This function is used to map a physical memory mapping
+ // previously allocated with PM_mapPhysicalAddr into the
+ // address space of the calling process. If the memory mapping
+ // allocated by PM_mapPhysicalAddr is global to all processes,
+ // simply return the pointer.
+
+ // NOTE: This function must also handle rounding to page boundaries,
+ // since this function is used to map in shared memory buffers
+ // allocated with PM_mapPhysicalAddr(). Hence if you aligned
+ // the physical address above, then you also need to do it here.
+ return base;
+}
+
+/****************************************************************************
+REMARKS:
+Map a real mode pointer to a protected mode pointer.
+****************************************************************************/
+void * PMAPI PM_mapRealPointer(
+ uint r_seg,
+ uint r_off)
+{
+ // TODO: This function maps a real mode memory pointer into the
+ // calling processes address space as a 32-bit near pointer. If
+ // you do not support BIOS access, simply return NULL here.
+ if (!zeroPtr)
+ zeroPtr = PM_mapPhysicalAddr(0,0xFFFFF);
+ return (void*)(zeroPtr + MK_PHYS(r_seg,r_off));
+}
+
+/****************************************************************************
+REMARKS:
+Allocate a block of real mode memory
+****************************************************************************/
+void * PMAPI PM_allocRealSeg(
+ uint size,
+ uint *r_seg,
+ uint *r_off)
+{
+ // TODO: This function allocates a block of real mode memory for the
+ // calling process used to communicate with real mode BIOS
+ // functions. If you do not support BIOS access, simply return
+ // NULL here.
+ return NULL;
+}
+
+/****************************************************************************
+REMARKS:
+Free a block of real mode memory.
+****************************************************************************/
+void PMAPI PM_freeRealSeg(
+ void *mem)
+{
+ // TODO: Frees a previously allocated real mode memory block. If you
+ // do not support BIOS access, this function should be empty.
+}
+
+/****************************************************************************
+REMARKS:
+Issue a real mode interrupt (parameters in DPMI compatible structure)
+****************************************************************************/
+void PMAPI DPMI_int86(
+ int intno,
+ DPMI_regs *regs)
+{
+ // TODO: This function calls the real mode BIOS using the passed in
+ // register structure. If you do not support real mode BIOS
+ // access, this function should be empty.
+}
+
+/****************************************************************************
+REMARKS:
+Issue a real mode interrupt.
+****************************************************************************/
+int PMAPI PM_int86(
+ int intno,
+ RMREGS *in,
+ RMREGS *out)
+{
+ // TODO: This function calls the real mode BIOS using the passed in
+ // register structure. If you do not support real mode BIOS
+ // access, this function should return 0.
+ return 0;
+}
+
+/****************************************************************************
+REMARKS:
+Issue a real mode interrupt.
+****************************************************************************/
+int PMAPI PM_int86x(
+ int intno,
+ RMREGS *in,
+ RMREGS *out,
+ RMSREGS *sregs)
+{
+ // TODO: This function calls the real mode BIOS using the passed in
+ // register structure. If you do not support real mode BIOS
+ // access, this function should return 0.
+ return 0;
+}
+
+/****************************************************************************
+REMARKS:
+Call a real mode far function.
+****************************************************************************/
+void PMAPI PM_callRealMode(
+ uint seg,
+ uint off,
+ RMREGS *in,
+ RMSREGS *sregs)
+{
+ // TODO: This function calls a real mode far function with a far call.
+ // If you do not support BIOS access, this function should be
+ // empty.
+}
+
+/****************************************************************************
+REMARKS:
+Return the amount of available memory.
+****************************************************************************/
+void PMAPI PM_availableMemory(
+ ulong *physical,
+ ulong *total)
+{
+ // TODO: Report the amount of available memory, both the amount of
+ // physical memory left and the amount of virtual memory left.
+ // If the OS does not provide these services, report 0's.
+ *physical = *total = 0;
+}
+
+/****************************************************************************
+REMARKS:
+Allocate a block of locked, physical memory for DMA operations.
+****************************************************************************/
+void * PMAPI PM_allocLockedMem(
+ uint size,
+ ulong *physAddr,
+ ibool contiguous,
+ ibool below16M)
+{
+ // TODO: Allocate a block of locked, physical memory of the specified
+ // size. This is used for bus master operations. If this is not
+ // supported by the OS, return NULL and bus mastering will not
+ // be used.
+ return NULL;
+}
+
+/****************************************************************************
+REMARKS:
+Free a block of locked physical memory.
+****************************************************************************/
+void PMAPI PM_freeLockedMem(
+ void *p,
+ uint size,
+ ibool contiguous)
+{
+ // TODO: Free a memory block allocated with PM_allocLockedMem.
+}
+
+/****************************************************************************
+REMARKS:
+Call the VBE/Core software interrupt to change display banks.
+****************************************************************************/
+void PMAPI PM_setBankA(
+ int bank)
+{
+ RMREGS regs;
+
+ // TODO: This does a bank switch function by calling the real mode
+ // VESA BIOS. If you do not support BIOS access, this function should
+ // be empty.
+ regs.x.ax = 0x4F05;
+ regs.x.bx = 0x0000;
+ regs.x.dx = bank;
+ PM_int86(0x10,®s,®s);
+}
+
+/****************************************************************************
+REMARKS:
+Call the VBE/Core software interrupt to change display banks.
+****************************************************************************/
+void PMAPI PM_setBankAB(
+ int bank)
+{
+ RMREGS regs;
+
+ // TODO: This does a bank switch function by calling the real mode
+ // VESA BIOS. If you do not support BIOS access, this function should
+ // be empty.
+ regs.x.ax = 0x4F05;
+ regs.x.bx = 0x0000;
+ regs.x.dx = bank;
+ PM_int86(0x10,®s,®s);
+ regs.x.ax = 0x4F05;
+ regs.x.bx = 0x0001;
+ regs.x.dx = bank;
+ PM_int86(0x10,®s,®s);
+}
+
+/****************************************************************************
+REMARKS:
+Call the VBE/Core software interrupt to change display start address.
+****************************************************************************/
+void PMAPI PM_setCRTStart(
+ int x,
+ int y,
+ int waitVRT)
+{
+ RMREGS regs;
+
+ // TODO: This changes the display start address by calling the real mode
+ // VESA BIOS. If you do not support BIOS access, this function
+ // should be empty.
+ regs.x.ax = 0x4F07;
+ regs.x.bx = waitVRT;
+ regs.x.cx = x;
+ regs.x.dx = y;
+ PM_int86(0x10,®s,®s);
+}
+
+/****************************************************************************
+REMARKS:
+Enable write combining for the memory region.
+****************************************************************************/
+ibool PMAPI PM_enableWriteCombine(
+ ulong base,
+ ulong length,
+ uint type)
+{
+ // TODO: This function should enable Pentium Pro and Pentium II MTRR
+ // write combining for the passed in physical memory base address
+ // and length. Normally this is done via calls to an OS specific
+ // device driver as this can only be done at ring 0.
+ //
+ // NOTE: This is a *very* important function to implement! If you do
+ // not implement, graphics performance on the latest Intel chips
+ // will be severly impaired. For sample code that can be used
+ // directly in a ring 0 device driver, see the MSDOS implementation
+ // which includes assembler code to do this directly (if the
+ // program is running at ring 0).
+ return false;
+}
+
+/****************************************************************************
+REMARKS:
+Execute the POST on the secondary BIOS for a controller.
+****************************************************************************/
+ibool PMAPI PM_doBIOSPOST(
+ ushort axVal,
+ ulong BIOSPhysAddr,
+ void *mappedBIOS)
+{
+ // TODO: This function is used to run the BIOS POST code on a secondary
+ // controller to initialise it for use. This is not necessary
+ // for multi-controller operation, but it will make it a lot
+ // more convenicent for end users (otherwise they have to boot
+ // the system once with the secondary controller as primary, and
+ // then boot with both controllers installed).
+ //
+ // Even if you don't support full BIOS access, it would be
+ // adviseable to be able to POST the secondary controllers in the
+ // system using this function as a minimum requirement. Some
+ // graphics hardware has registers that contain values that only
+ // the BIOS knows about, which makes bring up a card from cold
+ // reset difficult if the BIOS has not POST'ed it.
+ return false;
+}
+
+/****************************************************************************
+REMARKS:
+Load an OS specific shared library or DLL. If the OS does not support
+shared libraries, simply return NULL.
+****************************************************************************/
+PM_MODULE PMAPI PM_loadLibrary(
+ const char *szDLLName)
+{
+ // TODO: This function should load a native shared library from disk
+ // given the path to the library.
+ (void)szDLLName;
+ return NULL;
+}
+
+/****************************************************************************
+REMARKS:
+Get the address of a named procedure from a shared library.
+****************************************************************************/
+void * PMAPI PM_getProcAddress(
+ PM_MODULE hModule,
+ const char *szProcName)
+{
+ // TODO: This function should return the address of a named procedure
+ // from a native shared library.
+ (void)hModule;
+ (void)szProcName;
+ return NULL;
+}
+
+/****************************************************************************
+REMARKS:
+Unload a shared library.
+****************************************************************************/
+void PMAPI PM_freeLibrary(
+ PM_MODULE hModule)
+{
+ // TODO: This function free a previously loaded native shared library.
+ (void)hModule;
+}
+
+/****************************************************************************
+REMARKS:
+Enable requested I/O privledge level (usually only to set to a value of
+3, and then restore it back again). If the OS is protected this function
+must be implemented in order to enable I/O port access for ring 3
+applications. The function should return the IOPL level active before
+the switch occurred so it can be properly restored.
+****************************************************************************/
+int PMAPI PM_setIOPL(
+ int level)
+{
+ // TODO: This function should enable IOPL for the task (if IOPL is
+ // not always enabled for the app through some other means).
+ return level;
+}
+
+/****************************************************************************
+REMARKS:
+Function to find the first file matching a search criteria in a directory.
+****************************************************************************/
+void *PMAPI PM_findFirstFile(
+ const char *filename,
+ PM_findData *findData)
+{
+ // TODO: This function should start a directory enumeration search
+ // given the filename (with wildcards). The data should be
+ // converted and returned in the findData standard form.
+ (void)filename;
+ (void)findData;
+ return PM_FILE_INVALID;
+}
+
+/****************************************************************************
+REMARKS:
+Function to find the next file matching a search criteria in a directory.
+****************************************************************************/
+ibool PMAPI PM_findNextFile(
+ void *handle,
+ PM_findData *findData)
+{
+ // TODO: This function should find the next file in directory enumeration
+ // search given the search criteria defined in the call to
+ // PM_findFirstFile. The data should be converted and returned
+ // in the findData standard form.
+ (void)handle;
+ (void)findData;
+ return false;
+}
+
+/****************************************************************************
+REMARKS:
+Function to close the find process
+****************************************************************************/
+void PMAPI PM_findClose(
+ void *handle)
+{
+ // TODO: This function should close the find process. This may do
+ // nothing for some OS'es.
+ (void)handle;
+}
+
+/****************************************************************************
+REMARKS:
+Function to determine if a drive is a valid drive or not. Under Unix this
+function will return false for anything except a value of 3 (considered
+the root drive, and equivalent to C: for non-Unix systems). The drive
+numbering is:
+
+ 1 - Drive A:
+ 2 - Drive B:
+ 3 - Drive C:
+ etc
+
+****************************************************************************/
+ibool PMAPI PM_driveValid(
+ char drive)
+{
+ if (drive == 3)
+ return true;
+ return false;
+}
+
+/****************************************************************************
+REMARKS:
+Function to get the current working directory for the specififed drive.
+Under Unix this will always return the current working directory regardless
+of what the value of 'drive' is.
+****************************************************************************/
+void PMAPI PM_getdcwd(
+ int drive,
+ char *dir,
+ int len)
+{
+ (void)drive;
+ getcwd(dir,len);
+}
+
+/****************************************************************************
+REMARKS:
+Function to change the file attributes for a specific file.
+****************************************************************************/
+void PMAPI PM_setFileAttr(
+ const char *filename,
+ uint attrib)
+{
+ // TODO: Set the file attributes for a file
+ (void)filename;
+ (void)attrib;
+}
+
+/****************************************************************************
+REMARKS:
+Function to create a directory.
+****************************************************************************/
+ibool PMAPI PM_mkdir(
+ const char *filename)
+{
+ return mkdir(filename) == 0;
+}
+
+/****************************************************************************
+REMARKS:
+Function to remove a directory.
+****************************************************************************/
+ibool PMAPI PM_rmdir(
+ const char *filename)
+{
+ return rmdir(filename) == 0;
+}
diff --git a/board/MAI/bios_emulator/scitech/src/pm/stub/vflat.c b/board/MAI/bios_emulator/scitech/src/pm/stub/vflat.c
new file mode 100644
index 00000000000..579ef2c95c4
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/pm/stub/vflat.c
@@ -0,0 +1,49 @@
+/****************************************************************************
+*
+* SciTech OS Portability Manager Library
+*
+* ========================================================================
+*
+* The contents of this file are subject to the SciTech MGL Public
+* License Version 1.0 (the "License"); you may not use this file
+* except in compliance with the License. You may obtain a copy of
+* the License at http://www.scitechsoft.com/mgl-license.txt
+*
+* Software distributed under the License is distributed on an
+* "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+* implied. See the License for the specific language governing
+* rights and limitations under the License.
+*
+* The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+*
+* The Initial Developer of the Original Code is SciTech Software, Inc.
+* All Rights Reserved.
+*
+* ========================================================================
+*
+* Language: ANSI C
+* Environment: Any
+*
+* Description: Dummy module; no virtual framebuffer for this OS
+*
+****************************************************************************/
+
+#include "pmapi.h"
+
+ibool PMAPI VF_available(void)
+{
+ return false;
+}
+
+void * PMAPI VF_init(ulong baseAddr,int bankSize,int codeLen,void *bankFunc)
+{
+ baseAddr = baseAddr;
+ bankSize = bankSize;
+ codeLen = codeLen;
+ bankFunc = bankFunc;
+ return NULL;
+}
+
+void PMAPI VF_exit(void)
+{
+}
diff --git a/board/MAI/bios_emulator/scitech/src/pm/stub/ztimer.c b/board/MAI/bios_emulator/scitech/src/pm/stub/ztimer.c
new file mode 100644
index 00000000000..9bad6c09751
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/pm/stub/ztimer.c
@@ -0,0 +1,111 @@
+/****************************************************************************
+*
+* Ultra Long Period Timer
+*
+* ========================================================================
+*
+* The contents of this file are subject to the SciTech MGL Public
+* License Version 1.0 (the "License"); you may not use this file
+* except in compliance with the License. You may obtain a copy of
+* the License at http://www.scitechsoft.com/mgl-license.txt
+*
+* Software distributed under the License is distributed on an
+* "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+* implied. See the License for the specific language governing
+* rights and limitations under the License.
+*
+* The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+*
+* The Initial Developer of the Original Code is SciTech Software, Inc.
+* All Rights Reserved.
+*
+* ========================================================================
+*
+* Language: ANSI C
+* Environment: *** TODO: ADD YOUR OS ENVIRONMENT NAME HERE ***
+*
+* Description: OS specific implementation for the Zen Timer functions.
+*
+****************************************************************************/
+
+/*----------------------------- Implementation ----------------------------*/
+
+/****************************************************************************
+REMARKS:
+Initialise the Zen Timer module internals.
+****************************************************************************/
+void __ZTimerInit(void)
+{
+ // TODO: Do any specific internal initialisation in here
+}
+
+/****************************************************************************
+REMARKS:
+Start the Zen Timer counting.
+****************************************************************************/
+static void __LZTimerOn(
+ LZTimerObject *tm)
+{
+ // TODO: Start the Zen Timer counting. This should be a macro if
+ // possible.
+}
+
+/****************************************************************************
+REMARKS:
+Compute the lap time since the timer was started.
+****************************************************************************/
+static ulong __LZTimerLap(
+ LZTimerObject *tm)
+{
+ // TODO: Compute the lap time between the current time and when the
+ // timer was started.
+ return 0;
+}
+
+/****************************************************************************
+REMARKS:
+Stop the Zen Timer counting.
+****************************************************************************/
+static void __LZTimerOff(
+ LZTimerObject *tm)
+{
+ // TODO: Stop the timer counting. Should be a macro if possible.
+}
+
+/****************************************************************************
+REMARKS:
+Compute the elapsed time in microseconds between start and end timings.
+****************************************************************************/
+static ulong __LZTimerCount(
+ LZTimerObject *tm)
+{
+ // TODO: Compute the elapsed time and return it. Always microseconds.
+ return 0;
+}
+
+/****************************************************************************
+REMARKS:
+Define the resolution of the long period timer as microseconds per timer tick.
+****************************************************************************/
+#define ULZTIMER_RESOLUTION 1
+
+/****************************************************************************
+REMARKS:
+Read the Long Period timer from the OS
+****************************************************************************/
+static ulong __ULZReadTime(void)
+{
+ // TODO: Read the long period timer from the OS. The resolution of this
+ // timer should be around 1/20 of a second for timing long
+ // periods if possible.
+}
+
+/****************************************************************************
+REMARKS:
+Compute the elapsed time from the BIOS timer tick. Note that we check to see
+whether a midnight boundary has passed, and if so adjust the finish time to
+account for this. We cannot detect if more that one midnight boundary has
+passed, so if this happens we will be generating erronous results.
+****************************************************************************/
+ulong __ULZElapsedTime(ulong start,ulong finish)
+{ return finish - start; }
diff --git a/board/MAI/bios_emulator/scitech/src/pm/tests/altbrk.c b/board/MAI/bios_emulator/scitech/src/pm/tests/altbrk.c
new file mode 100644
index 00000000000..5d899b7a67d
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/pm/tests/altbrk.c
@@ -0,0 +1,90 @@
+/****************************************************************************
+*
+* SciTech OS Portability Manager Library
+*
+* ========================================================================
+*
+* The contents of this file are subject to the SciTech MGL Public
+* License Version 1.0 (the "License"); you may not use this file
+* except in compliance with the License. You may obtain a copy of
+* the License at http://www.scitechsoft.com/mgl-license.txt
+*
+* Software distributed under the License is distributed on an
+* "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+* implied. See the License for the specific language governing
+* rights and limitations under the License.
+*
+* The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+*
+* The Initial Developer of the Original Code is SciTech Software, Inc.
+* All Rights Reserved.
+*
+* ========================================================================
+*
+*
+* Language: ANSI C
+* Environment: any
+*
+* Description: Test program to check the ability to install a C based
+* control C/break interrupt handler. Note that this
+* alternate version does not work with all extenders.
+*
+* Functions tested: PM_installAltBreakHandler()
+* PM_restoreBreakHandler()
+*
+*
+****************************************************************************/
+
+#include <stdlib.h>
+#include <stdio.h>
+#include "pmapi.h"
+
+volatile int breakHit = false;
+volatile int ctrlCHit = false;
+
+#pragma off (check_stack) /* No stack checking under Watcom */
+
+void PMAPI breakHandler(uint bHit)
+{
+ if (bHit)
+ breakHit = true;
+ else
+ ctrlCHit = true;
+}
+
+int main(void)
+{
+ printf("Program running in ");
+ switch (PM_getModeType()) {
+ case PM_realMode:
+ printf("real mode.\n\n");
+ break;
+ case PM_286:
+ printf("16 bit protected mode.\n\n");
+ break;
+ case PM_386:
+ printf("32 bit protected mode.\n\n");
+ break;
+ }
+
+ PM_installAltBreakHandler(breakHandler);
+ printf("Control C/Break interrupt handler installed\n");
+ while (1) {
+ if (ctrlCHit) {
+ printf("Code termimated with Ctrl-C.\n");
+ break;
+ }
+ if (breakHit) {
+ printf("Code termimated with Ctrl-Break.\n");
+ break;
+ }
+ if (PM_kbhit() && PM_getch() == 0x1B) {
+ printf("No break code detected!\n");
+ break;
+ }
+ printf("Hit Ctrl-C or Ctrl-Break to exit!\n");
+ }
+
+ PM_restoreBreakHandler();
+ return 0;
+}
diff --git a/board/MAI/bios_emulator/scitech/src/pm/tests/altcrit.c b/board/MAI/bios_emulator/scitech/src/pm/tests/altcrit.c
new file mode 100644
index 00000000000..c5390f68a93
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/pm/tests/altcrit.c
@@ -0,0 +1,85 @@
+/****************************************************************************
+*
+* SciTech OS Portability Manager Library
+*
+* ========================================================================
+*
+* The contents of this file are subject to the SciTech MGL Public
+* License Version 1.0 (the "License"); you may not use this file
+* except in compliance with the License. You may obtain a copy of
+* the License at http://www.scitechsoft.com/mgl-license.txt
+*
+* Software distributed under the License is distributed on an
+* "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+* implied. See the License for the specific language governing
+* rights and limitations under the License.
+*
+* The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+*
+* The Initial Developer of the Original Code is SciTech Software, Inc.
+* All Rights Reserved.
+*
+* ========================================================================
+*
+*
+* Language: ANSI C
+* Environment: any
+*
+* Description: Test program to check the ability to install a C based
+* critical error handler.
+*
+* Functions tested: PM_installCriticalHandler()
+* PM_criticalError()
+* PM_restoreCriticalHandler()
+*
+*
+****************************************************************************/
+
+#include <stdlib.h>
+#include <stdio.h>
+#include "pmapi.h"
+
+volatile uint criticalError = false;
+volatile uint axValue;
+volatile uint diValue;
+
+#pragma off (check_stack) /* No stack checking under Watcom */
+
+uint PMAPI criticalHandler(uint axVal,uint diVal)
+{
+ criticalError = true;
+ axValue = axVal;
+ diValue = diVal;
+ return 3; /* Tell MS-DOS to fail the operation */
+}
+
+int main(void)
+{
+ FILE *f;
+
+ printf("Program running in ");
+ switch (PM_getModeType()) {
+ case PM_realMode:
+ printf("real mode.\n\n");
+ break;
+ case PM_286:
+ printf("16 bit protected mode.\n\n");
+ break;
+ case PM_386:
+ printf("32 bit protected mode.\n\n");
+ break;
+ }
+
+ PM_installAltCriticalHandler(criticalHandler);
+ printf("Critical Error handler installed - trying to read from A: drive...\n");
+ f = fopen("a:\bog.bog","rb");
+ if (f) fclose(f);
+ if (criticalError) {
+ printf("Critical error occured on INT 21h function %02X!\n",
+ axValue >> 8);
+ }
+ else
+ printf("Critical error was not caught!\n");
+ PM_restoreCriticalHandler();
+ return 0;
+}
diff --git a/board/MAI/bios_emulator/scitech/src/pm/tests/biosptr.c b/board/MAI/bios_emulator/scitech/src/pm/tests/biosptr.c
new file mode 100644
index 00000000000..43668487af3
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/pm/tests/biosptr.c
@@ -0,0 +1,92 @@
+/****************************************************************************
+*
+* SciTech OS Portability Manager Library
+*
+* ========================================================================
+*
+* The contents of this file are subject to the SciTech MGL Public
+* License Version 1.0 (the "License"); you may not use this file
+* except in compliance with the License. You may obtain a copy of
+* the License at http://www.scitechsoft.com/mgl-license.txt
+*
+* Software distributed under the License is distributed on an
+* "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+* implied. See the License for the specific language governing
+* rights and limitations under the License.
+*
+* The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+*
+* The Initial Developer of the Original Code is SciTech Software, Inc.
+* All Rights Reserved.
+*
+* ========================================================================
+*
+* Language: ANSI C
+* Environment: any
+*
+* Description: Test program to check the ability to manipulate the
+* BIOS data area from protected mode using the PM
+* library. Compile and link with the appropriate command
+* line for your DOS extender.
+*
+* Functions tested: PM_getBIOSSelector()
+* PM_getLong()
+* PM_getByte()
+* PM_getWord()
+*
+****************************************************************************/
+
+#include <stdlib.h>
+#include <stdio.h>
+#include "pmapi.h"
+
+/* Macros to obtain values from the BIOS data area */
+
+#define TICKS() PM_getLong(bios+0x6C)
+#define KB_STAT PM_getByte(bios+0x17)
+#define KB_HEAD PM_getWord(bios+0x1A)
+#define KB_TAIL PM_getWord(bios+0x1C)
+
+/* Macros for working with the keyboard buffer */
+
+#define KB_HIT() (KB_HEAD != KB_TAIL)
+#define CTRL() (KB_STAT & 4)
+#define SHIFT() (KB_STAT & 2)
+#define ESC 0x1B
+
+/* Selector for BIOS data area */
+
+uchar *bios;
+
+int main(void)
+{
+ int c,done = 0;
+
+ printf("Program running in ");
+ switch (PM_getModeType()) {
+ case PM_realMode:
+ printf("real mode.\n\n");
+ break;
+ case PM_286:
+ printf("16 bit protected mode.\n\n");
+ break;
+ case PM_386:
+ printf("32 bit protected mode.\n\n");
+ break;
+ }
+
+ bios = PM_getBIOSPointer();
+ printf("Hit any key to test, Ctrl-Shift-Esc to quit\n");
+ while (!done) {
+ if (KB_HIT()) {
+ c = PM_getch();
+ if (c == 0) PM_getch();
+ printf("TIME=%-8lX ST=%02X CHAR=%02X ", TICKS(), KB_STAT, c);
+ printf("\n");
+ if ((c == ESC) && SHIFT() && CTRL())/* Ctrl-Shift-Esc */
+ break;
+ }
+ }
+
+ return 0;
+}
diff --git a/board/MAI/bios_emulator/scitech/src/pm/tests/block.c b/board/MAI/bios_emulator/scitech/src/pm/tests/block.c
new file mode 100644
index 00000000000..e9488729567
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/pm/tests/block.c
@@ -0,0 +1,69 @@
+/****************************************************************************
+*
+* SciTech OS Portability Manager Library
+*
+* ========================================================================
+*
+* The contents of this file are subject to the SciTech MGL Public
+* License Version 1.0 (the "License"); you may not use this file
+* except in compliance with the License. You may obtain a copy of
+* the License at http://www.scitechsoft.com/mgl-license.txt
+*
+* Software distributed under the License is distributed on an
+* "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+* implied. See the License for the specific language governing
+* rights and limitations under the License.
+*
+* The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+*
+* The Initial Developer of the Original Code is SciTech Software, Inc.
+* All Rights Reserved.
+*
+* ========================================================================
+*
+* Language: ANSI C
+* Environment: Any
+*
+* Description: Test program for the PM_blockUntilTimeout function.
+*
+****************************************************************************/
+
+#include <stdio.h>
+#include "pmapi.h"
+
+#define DELAY_MSECS 1100
+#define LOOPS 5
+
+/*-------------------------- Implementation -------------------------------*/
+
+/* The following routine takes a long count in microseconds and outputs
+ * a string representing the count in seconds. It could be modified to
+ * return a pointer to a static string representing the count rather
+ * than printing it out.
+ */
+
+void ReportTime(ulong count)
+{
+ ulong secs;
+
+ secs = count / 1000000L;
+ count = count - secs * 1000000L;
+ printf("Time taken: %lu.%06lu seconds\n",secs,count);
+}
+
+int main(void)
+{
+ int i;
+
+ printf("Detecting processor information ...");
+ fflush(stdout);
+ printf("\n\n%s\n", CPU_getProcessorName());
+ ZTimerInit();
+ LZTimerOn();
+ for (i = 0; i < LOOPS; i++) {
+ PM_blockUntilTimeout(DELAY_MSECS);
+ ReportTime(LZTimerLap());
+ }
+ LZTimerOff();
+ return 0;
+}
diff --git a/board/MAI/bios_emulator/scitech/src/pm/tests/brk.c b/board/MAI/bios_emulator/scitech/src/pm/tests/brk.c
new file mode 100644
index 00000000000..3561fee921f
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/pm/tests/brk.c
@@ -0,0 +1,78 @@
+/****************************************************************************
+*
+* SciTech OS Portability Manager Library
+*
+* ========================================================================
+*
+* The contents of this file are subject to the SciTech MGL Public
+* License Version 1.0 (the "License"); you may not use this file
+* except in compliance with the License. You may obtain a copy of
+* the License at http://www.scitechsoft.com/mgl-license.txt
+*
+* Software distributed under the License is distributed on an
+* "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+* implied. See the License for the specific language governing
+* rights and limitations under the License.
+*
+* The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+*
+* The Initial Developer of the Original Code is SciTech Software, Inc.
+* All Rights Reserved.
+*
+* ========================================================================
+*
+*
+* Language: ANSI C
+* Environment: any
+*
+* Description: Test program to check the ability to install a C based
+* control C/break interrupt handler.
+*
+* Functions tested: PM_installBreakHandler()
+* PM_ctrlCHit()
+* PM_ctrlBreakHit()
+* PM_restoreBreakHandler()
+*
+*
+****************************************************************************/
+
+#include <stdlib.h>
+#include <stdio.h>
+#include "pmapi.h"
+
+int main(void)
+{
+ printf("Program running in ");
+ switch (PM_getModeType()) {
+ case PM_realMode:
+ printf("real mode.\n\n");
+ break;
+ case PM_286:
+ printf("16 bit protected mode.\n\n");
+ break;
+ case PM_386:
+ printf("32 bit protected mode.\n\n");
+ break;
+ }
+
+ PM_installBreakHandler();
+ printf("Control C/Break interrupt handler installed\n");
+ while (1) {
+ if (PM_ctrlCHit(1)) {
+ printf("Code termimated with Ctrl-C.\n");
+ break;
+ }
+ if (PM_ctrlBreakHit(1)) {
+ printf("Code termimated with Ctrl-Break.\n");
+ break;
+ }
+ if (PM_kbhit() && PM_getch() == 0x1B) {
+ printf("No break code detected!\n");
+ break;
+ }
+ printf("Hit Ctrl-C or Ctrl-Break to exit!\n");
+ }
+
+ PM_restoreBreakHandler();
+ return 0;
+}
diff --git a/board/MAI/bios_emulator/scitech/src/pm/tests/callreal.c b/board/MAI/bios_emulator/scitech/src/pm/tests/callreal.c
new file mode 100644
index 00000000000..3897ce99993
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/pm/tests/callreal.c
@@ -0,0 +1,107 @@
+/****************************************************************************
+*
+* SciTech OS Portability Manager Library
+*
+* ========================================================================
+*
+* The contents of this file are subject to the SciTech MGL Public
+* License Version 1.0 (the "License"); you may not use this file
+* except in compliance with the License. You may obtain a copy of
+* the License at http://www.scitechsoft.com/mgl-license.txt
+*
+* Software distributed under the License is distributed on an
+* "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+* implied. See the License for the specific language governing
+* rights and limitations under the License.
+*
+* The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+*
+* The Initial Developer of the Original Code is SciTech Software, Inc.
+* All Rights Reserved.
+*
+* ========================================================================
+*
+* Language: ANSI C
+* Environment: any
+*
+* Description: Test program to check the ability to call a real mode
+* procedure. We simply copy a terribly simple assembly
+* language routine into a real mode block that we allocate,
+* and then attempt to call the routine and verify that it
+* was successful.
+*
+* Functions tested: PM_allocRealSeg()
+* PM_freeRealSeg()
+* PM_callRealMode()
+*
+****************************************************************************/
+
+#include <stdlib.h>
+#include <stdio.h>
+#include <string.h>
+#include "pmapi.h"
+
+/* Block of real mode code we will eventually call */
+
+static unsigned char realModeCode[] = {
+ 0x93, /* xchg ax,bx */
+ 0x87, 0xCA, /* xchg cx,dx */
+ 0xCB /* retf */
+ };
+
+int main(void)
+{
+ RMREGS regs;
+ RMSREGS sregs;
+ uchar *p;
+ unsigned r_seg,r_off;
+
+ printf("Program running in ");
+ switch (PM_getModeType()) {
+ case PM_realMode:
+ printf("real mode.\n\n");
+ break;
+ case PM_286:
+ printf("16 bit protected mode.\n\n");
+ break;
+ case PM_386:
+ printf("32 bit protected mode.\n\n");
+ break;
+ }
+
+ /* Allocate a the block of real mode memory */
+ if ((p = PM_allocRealSeg(sizeof(realModeCode), &r_seg, &r_off)) == NULL) {
+ printf("Unable to allocate real mode memory!\n");
+ exit(1);
+ }
+
+ /* Copy the real mode code */
+ memcpy(p,realModeCode,sizeof(realModeCode));
+
+ /* Now call the real mode code */
+ regs.x.ax = 1;
+ regs.x.bx = 2;
+ regs.x.cx = 3;
+ regs.x.dx = 4;
+ regs.x.si = 5;
+ regs.x.di = 6;
+ sregs.es = 7;
+ sregs.ds = 8;
+ PM_callRealMode(r_seg,r_off,®s,&sregs);
+ if (regs.x.ax != 2 || regs.x.bx != 1 || regs.x.cx != 4 || regs.x.dx != 3
+ || regs.x.si != 5 || regs.x.di != 6 || sregs.es != 7
+ || sregs.ds != 8) {
+ printf("Real mode call failed!\n");
+ printf("\n");
+ printf("ax = %04X, bx = %04X, cx = %04X, dx = %04X\n",
+ regs.x.ax,regs.x.bx,regs.x.cx,regs.x.dx);
+ printf("si = %04X, di = %04X, es = %04X, ds = %04X\n",
+ regs.x.si,regs.x.di,sregs.es,sregs.ds);
+ }
+ else
+ printf("Real mode call succeeded!\n");
+
+ /* Free the memory we allocated */
+ PM_freeRealSeg(p);
+ return 0;
+}
diff --git a/board/MAI/bios_emulator/scitech/src/pm/tests/checks.c b/board/MAI/bios_emulator/scitech/src/pm/tests/checks.c
new file mode 100644
index 00000000000..81737e17d7b
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/pm/tests/checks.c
@@ -0,0 +1,100 @@
+/****************************************************************************
+*
+* SciTech OS Portability Manager Library
+*
+* ========================================================================
+*
+* The contents of this file are subject to the SciTech MGL Public
+* License Version 1.0 (the "License"); you may not use this file
+* except in compliance with the License. You may obtain a copy of
+* the License at http://www.scitechsoft.com/mgl-license.txt
+*
+* Software distributed under the License is distributed on an
+* "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+* implied. See the License for the specific language governing
+* rights and limitations under the License.
+*
+* The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+*
+* The Initial Developer of the Original Code is SciTech Software, Inc.
+* All Rights Reserved.
+*
+* ========================================================================
+*
+* Language: ANSI C
+* Environment: Any
+*
+* Description: Main module for building checked builds of products with
+* assertions and trace code.
+*
+****************************************************************************/
+
+#include "scitech.h"
+#include <stdio.h>
+#include <stdlib.h>
+#include <string.h>
+#ifdef __WINDOWS__
+#define WIN32_LEAN_AND_MEAN
+#define STRICT
+#include <windows.h>
+#endif
+
+#ifdef CHECKED
+
+/*---------------------------- Global variables ---------------------------*/
+
+#define LOGFILE "\\scitech.log"
+
+void (*_CHK_fail)(int fatal,const char *msg,const char *cond,const char *file,int line) = _CHK_defaultFail;
+
+/*---------------------------- Implementation -----------------------------*/
+
+/****************************************************************************
+DESCRIPTION:
+Handles fatal error and warning conditions for checked builds.
+
+HEADER:
+scitech.h
+
+REMARKS:
+This function is called whenever an inline check or warning fails in any
+of the SciTech runtime libraries. Warning conditions simply cause the
+condition to be logged to the log file and send to the system debugger
+under Window. Fatal error conditions do all of the above, and then
+terminate the program with a fatal error conditions.
+
+This handler may be overriden by the user code if necessary to replace it
+with a different handler (the MGL for instance overrides this and replaces
+it with a handler that does an MGL_exit() before terminating the application
+so that it will clean up correctly.
+****************************************************************************/
+void _CHK_defaultFail(
+ int fatal,
+ const char *msg,
+ const char *cond,
+ const char *file,
+ int line)
+{
+ char buf[256];
+ FILE *log = fopen(LOGFILE, "at+");
+
+ sprintf(buf,msg,cond,file,line);
+ if (log) {
+ fputs(buf,log);
+ fflush(log);
+ fclose(log);
+#ifdef __WINDOWS__
+ OutputDebugStr(buf);
+#endif
+ }
+ if (fatal) {
+#ifdef __WINDOWS__
+ MessageBox(NULL, buf,"Fatal Error!",MB_ICONEXCLAMATION);
+#else
+ fputs(buf,stderr);
+#endif
+ exit(-1);
+ }
+}
+
+#endif /* CHECKED */
diff --git a/board/MAI/bios_emulator/scitech/src/pm/tests/cpu.c b/board/MAI/bios_emulator/scitech/src/pm/tests/cpu.c
new file mode 100644
index 00000000000..34abb2418d5
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/pm/tests/cpu.c
@@ -0,0 +1,46 @@
+/****************************************************************************
+*
+* SciTech OS Portability Manager Library
+*
+* ========================================================================
+*
+* The contents of this file are subject to the SciTech MGL Public
+* License Version 1.0 (the "License"); you may not use this file
+* except in compliance with the License. You may obtain a copy of
+* the License at http://www.scitechsoft.com/mgl-license.txt
+*
+* Software distributed under the License is distributed on an
+* "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+* implied. See the License for the specific language governing
+* rights and limitations under the License.
+*
+* The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+*
+* The Initial Developer of the Original Code is SciTech Software, Inc.
+* All Rights Reserved.
+*
+* ========================================================================
+*
+* Language: ANSI C
+* Environment: Any
+*
+* Description: Test program for the CPU detection code.
+*
+****************************************************************************/
+
+#include "ztimer.h"
+#include "pmapi.h"
+#include <stdio.h>
+#include <stdlib.h>
+
+/*----------------------------- Implementation ----------------------------*/
+
+int main(void)
+{
+ printf("Detecting processor information ...");
+ fflush(stdout);
+ printf("\n\n%s\n", CPU_getProcessorName());
+ if (CPU_haveRDTSC())
+ printf("\nProcessor supports Read Time Stamp Counter performance timer.\n");
+ return 0;
+}
diff --git a/board/MAI/bios_emulator/scitech/src/pm/tests/critical.c b/board/MAI/bios_emulator/scitech/src/pm/tests/critical.c
new file mode 100644
index 00000000000..21ec9946f7b
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/pm/tests/critical.c
@@ -0,0 +1,70 @@
+/****************************************************************************
+*
+* SciTech OS Portability Manager Library
+*
+* ========================================================================
+*
+* The contents of this file are subject to the SciTech MGL Public
+* License Version 1.0 (the "License"); you may not use this file
+* except in compliance with the License. You may obtain a copy of
+* the License at http://www.scitechsoft.com/mgl-license.txt
+*
+* Software distributed under the License is distributed on an
+* "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+* implied. See the License for the specific language governing
+* rights and limitations under the License.
+*
+* The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+*
+* The Initial Developer of the Original Code is SciTech Software, Inc.
+* All Rights Reserved.
+*
+* ========================================================================
+*
+*
+* Language: ANSI C
+* Environment: any
+*
+* Description: Test program to check the ability to install a C based
+* critical error handler.
+*
+* Functions tested: PM_installAltCriticalHandler()
+* PM_restoreCriticalHandler()
+*
+*
+****************************************************************************/
+
+#include <stdlib.h>
+#include <stdio.h>
+#include "pmapi.h"
+
+int main(void)
+{
+ FILE *f;
+ int axcode,dicode;
+
+ printf("Program running in ");
+ switch (PM_getModeType()) {
+ case PM_realMode:
+ printf("real mode.\n\n");
+ break;
+ case PM_286:
+ printf("16 bit protected mode.\n\n");
+ break;
+ case PM_386:
+ printf("32 bit protected mode.\n\n");
+ break;
+ }
+
+ PM_installCriticalHandler();
+ printf("Critical Error handler installed - trying to read from A: drive...\n");
+ f = fopen("a:\bog.bog","rb");
+ if (f) fclose(f);
+ if (PM_criticalError(&axcode,&dicode,1)) {
+ printf("Critical error occured on INT 21h function %02X!\n",
+ axcode >> 8);
+ }
+ else printf("Critical error was not caught!\n");
+ PM_restoreCriticalHandler();
+ return 0;
+}
diff --git a/board/MAI/bios_emulator/scitech/src/pm/tests/getch.c b/board/MAI/bios_emulator/scitech/src/pm/tests/getch.c
new file mode 100644
index 00000000000..c70f7ee3c3b
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/pm/tests/getch.c
@@ -0,0 +1,501 @@
+/****************************************************************************
+*
+* SciTech OS Portability Manager Library
+*
+* ========================================================================
+*
+* The contents of this file are subject to the SciTech MGL Public
+* License Version 1.0 (the "License"); you may not use this file
+* except in compliance with the License. You may obtain a copy of
+* the License at http://www.scitechsoft.com/mgl-license.txt
+*
+* Software distributed under the License is distributed on an
+* "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+* implied. See the License for the specific language governing
+* rights and limitations under the License.
+*
+* The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+*
+* The Initial Developer of the Original Code is SciTech Software, Inc.
+* All Rights Reserved.
+*
+* ========================================================================
+*
+* Language: ANSI C
+* Environment: Any
+*
+* Description: Test program to test out the cross platform event handling
+* library.
+*
+****************************************************************************/
+
+#include <stdlib.h>
+#include <stdio.h>
+#include <ctype.h>
+#include "pmapi.h"
+#include "event.h"
+
+/* Translation table for key codes */
+
+typedef struct {
+ int code;
+ char *name;
+ } KeyEntry;
+
+KeyEntry ASCIICodes[] = {
+ {ASCII_ctrlA ,"ASCII_ctrlA"},
+ {ASCII_ctrlB ,"ASCII_ctrlB"},
+ {ASCII_ctrlC ,"ASCII_ctrlC"},
+ {ASCII_ctrlD ,"ASCII_ctrlD"},
+ {ASCII_ctrlE ,"ASCII_ctrlE"},
+ {ASCII_ctrlF ,"ASCII_ctrlF"},
+ {ASCII_ctrlG ,"ASCII_ctrlG"},
+ {ASCII_backspace ,"ASCII_backspace"},
+ {ASCII_ctrlH ,"ASCII_ctrlH"},
+ {ASCII_tab ,"ASCII_tab"},
+ {ASCII_ctrlI ,"ASCII_ctrlI"},
+ {ASCII_ctrlJ ,"ASCII_ctrlJ"},
+ {ASCII_ctrlK ,"ASCII_ctrlK"},
+ {ASCII_ctrlL ,"ASCII_ctrlL"},
+ {ASCII_enter ,"ASCII_enter"},
+ {ASCII_ctrlM ,"ASCII_ctrlM"},
+ {ASCII_ctrlN ,"ASCII_ctrlN"},
+ {ASCII_ctrlO ,"ASCII_ctrlO"},
+ {ASCII_ctrlP ,"ASCII_ctrlP"},
+ {ASCII_ctrlQ ,"ASCII_ctrlQ"},
+ {ASCII_ctrlR ,"ASCII_ctrlR"},
+ {ASCII_ctrlS ,"ASCII_ctrlS"},
+ {ASCII_ctrlT ,"ASCII_ctrlT"},
+ {ASCII_ctrlU ,"ASCII_ctrlU"},
+ {ASCII_ctrlV ,"ASCII_ctrlV"},
+ {ASCII_ctrlW ,"ASCII_ctrlW"},
+ {ASCII_ctrlX ,"ASCII_ctrlX"},
+ {ASCII_ctrlY ,"ASCII_ctrlY"},
+ {ASCII_ctrlZ ,"ASCII_ctrlZ"},
+ {ASCII_esc ,"ASCII_esc"},
+ {ASCII_space ,"ASCII_space"},
+ {ASCII_exclamation ,"ASCII_exclamation"},
+ {ASCII_quote ,"ASCII_quote"},
+ {ASCII_pound ,"ASCII_pound"},
+ {ASCII_dollar ,"ASCII_dollar"},
+ {ASCII_percent ,"ASCII_percent"},
+ {ASCII_ampersand ,"ASCII_ampersand"},
+ {ASCII_apostrophe ,"ASCII_apostrophe"},
+ {ASCII_leftBrace ,"ASCII_leftBrace"},
+ {ASCII_rightBrace ,"ASCII_rightBrace"},
+ {ASCII_times ,"ASCII_times"},
+ {ASCII_plus ,"ASCII_plus"},
+ {ASCII_comma ,"ASCII_comma"},
+ {ASCII_minus ,"ASCII_minus"},
+ {ASCII_period ,"ASCII_period"},
+ {ASCII_divide ,"ASCII_divide"},
+ {ASCII_0 ,"ASCII_0"},
+ {ASCII_1 ,"ASCII_1"},
+ {ASCII_2 ,"ASCII_2"},
+ {ASCII_3 ,"ASCII_3"},
+ {ASCII_4 ,"ASCII_4"},
+ {ASCII_5 ,"ASCII_5"},
+ {ASCII_6 ,"ASCII_6"},
+ {ASCII_7 ,"ASCII_7"},
+ {ASCII_8 ,"ASCII_8"},
+ {ASCII_9 ,"ASCII_9"},
+ {ASCII_colon ,"ASCII_colon"},
+ {ASCII_semicolon ,"ASCII_semicolon"},
+ {ASCII_lessThan ,"ASCII_lessThan"},
+ {ASCII_equals ,"ASCII_equals"},
+ {ASCII_greaterThan ,"ASCII_greaterThan"},
+ {ASCII_question ,"ASCII_question"},
+ {ASCII_at ,"ASCII_at"},
+ {ASCII_A ,"ASCII_A"},
+ {ASCII_B ,"ASCII_B"},
+ {ASCII_C ,"ASCII_C"},
+ {ASCII_D ,"ASCII_D"},
+ {ASCII_E ,"ASCII_E"},
+ {ASCII_F ,"ASCII_F"},
+ {ASCII_G ,"ASCII_G"},
+ {ASCII_H ,"ASCII_H"},
+ {ASCII_I ,"ASCII_I"},
+ {ASCII_J ,"ASCII_J"},
+ {ASCII_K ,"ASCII_K"},
+ {ASCII_L ,"ASCII_L"},
+ {ASCII_M ,"ASCII_M"},
+ {ASCII_N ,"ASCII_N"},
+ {ASCII_O ,"ASCII_O"},
+ {ASCII_P ,"ASCII_P"},
+ {ASCII_Q ,"ASCII_Q"},
+ {ASCII_R ,"ASCII_R"},
+ {ASCII_S ,"ASCII_S"},
+ {ASCII_T ,"ASCII_T"},
+ {ASCII_U ,"ASCII_U"},
+ {ASCII_V ,"ASCII_V"},
+ {ASCII_W ,"ASCII_W"},
+ {ASCII_X ,"ASCII_X"},
+ {ASCII_Y ,"ASCII_Y"},
+ {ASCII_Z ,"ASCII_Z"},
+ {ASCII_leftSquareBrace ,"ASCII_leftSquareBrace"},
+ {ASCII_backSlash ,"ASCII_backSlash"},
+ {ASCII_rightSquareBrace ,"ASCII_rightSquareBrace"},
+ {ASCII_caret ,"ASCII_caret"},
+ {ASCII_underscore ,"ASCII_underscore"},
+ {ASCII_leftApostrophe ,"ASCII_leftApostrophe"},
+ {ASCII_a ,"ASCII_a"},
+ {ASCII_b ,"ASCII_b"},
+ {ASCII_c ,"ASCII_c"},
+ {ASCII_d ,"ASCII_d"},
+ {ASCII_e ,"ASCII_e"},
+ {ASCII_f ,"ASCII_f"},
+ {ASCII_g ,"ASCII_g"},
+ {ASCII_h ,"ASCII_h"},
+ {ASCII_i ,"ASCII_i"},
+ {ASCII_j ,"ASCII_j"},
+ {ASCII_k ,"ASCII_k"},
+ {ASCII_l ,"ASCII_l"},
+ {ASCII_m ,"ASCII_m"},
+ {ASCII_n ,"ASCII_n"},
+ {ASCII_o ,"ASCII_o"},
+ {ASCII_p ,"ASCII_p"},
+ {ASCII_q ,"ASCII_q"},
+ {ASCII_r ,"ASCII_r"},
+ {ASCII_s ,"ASCII_s"},
+ {ASCII_t ,"ASCII_t"},
+ {ASCII_u ,"ASCII_u"},
+ {ASCII_v ,"ASCII_v"},
+ {ASCII_w ,"ASCII_w"},
+ {ASCII_x ,"ASCII_x"},
+ {ASCII_y ,"ASCII_y"},
+ {ASCII_z ,"ASCII_z"},
+ {ASCII_leftCurlyBrace ,"ASCII_leftCurlyBrace"},
+ {ASCII_verticalBar ,"ASCII_verticalBar"},
+ {ASCII_rightCurlyBrace ,"ASCII_rightCurlyBrace"},
+ {ASCII_tilde ,"ASCII_tilde"},
+ {0 ,"ASCII_unknown"},
+ };
+
+KeyEntry ScanCodes[] = {
+ {KB_padEnter ,"KB_padEnter"},
+ {KB_padMinus ,"KB_padMinus"},
+ {KB_padPlus ,"KB_padPlus"},
+ {KB_padTimes ,"KB_padTimes"},
+ {KB_padDivide ,"KB_padDivide"},
+ {KB_padLeft ,"KB_padLeft"},
+ {KB_padRight ,"KB_padRight"},
+ {KB_padUp ,"KB_padUp"},
+ {KB_padDown ,"KB_padDown"},
+ {KB_padInsert ,"KB_padInsert"},
+ {KB_padDelete ,"KB_padDelete"},
+ {KB_padHome ,"KB_padHome"},
+ {KB_padEnd ,"KB_padEnd"},
+ {KB_padPageUp ,"KB_padPageUp"},
+ {KB_padPageDown ,"KB_padPageDown"},
+ {KB_padCenter ,"KB_padCenter"},
+ {KB_F1 ,"KB_F1"},
+ {KB_F2 ,"KB_F2"},
+ {KB_F3 ,"KB_F3"},
+ {KB_F4 ,"KB_F4"},
+ {KB_F5 ,"KB_F5"},
+ {KB_F6 ,"KB_F6"},
+ {KB_F7 ,"KB_F7"},
+ {KB_F8 ,"KB_F8"},
+ {KB_F9 ,"KB_F9"},
+ {KB_F10 ,"KB_F10"},
+ {KB_F11 ,"KB_F11"},
+ {KB_F12 ,"KB_F12"},
+ {KB_left ,"KB_left"},
+ {KB_right ,"KB_right"},
+ {KB_up ,"KB_up"},
+ {KB_down ,"KB_down"},
+ {KB_insert ,"KB_insert"},
+ {KB_delete ,"KB_delete"},
+ {KB_home ,"KB_home"},
+ {KB_end ,"KB_end"},
+ {KB_pageUp ,"KB_pageUp"},
+ {KB_pageDown ,"KB_pageDown"},
+ {KB_capsLock ,"KB_capsLock"},
+ {KB_numLock ,"KB_numLock"},
+ {KB_scrollLock ,"KB_scrollLock"},
+ {KB_leftShift ,"KB_leftShift"},
+ {KB_rightShift ,"KB_rightShift"},
+ {KB_leftCtrl ,"KB_leftCtrl"},
+ {KB_rightCtrl ,"KB_rightCtrl"},
+ {KB_leftAlt ,"KB_leftAlt"},
+ {KB_rightAlt ,"KB_rightAlt"},
+ {KB_leftWindows ,"KB_leftWindows"},
+ {KB_rightWindows ,"KB_rightWindows"},
+ {KB_menu ,"KB_menu"},
+ {KB_sysReq ,"KB_sysReq"},
+ {KB_esc ,"KB_esc"},
+ {KB_1 ,"KB_1"},
+ {KB_2 ,"KB_2"},
+ {KB_3 ,"KB_3"},
+ {KB_4 ,"KB_4"},
+ {KB_5 ,"KB_5"},
+ {KB_6 ,"KB_6"},
+ {KB_7 ,"KB_7"},
+ {KB_8 ,"KB_8"},
+ {KB_9 ,"KB_9"},
+ {KB_0 ,"KB_0"},
+ {KB_minus ,"KB_minus"},
+ {KB_equals ,"KB_equals"},
+ {KB_backSlash ,"KB_backSlash"},
+ {KB_backspace ,"KB_backspace"},
+ {KB_tab ,"KB_tab"},
+ {KB_Q ,"KB_Q"},
+ {KB_W ,"KB_W"},
+ {KB_E ,"KB_E"},
+ {KB_R ,"KB_R"},
+ {KB_T ,"KB_T"},
+ {KB_Y ,"KB_Y"},
+ {KB_U ,"KB_U"},
+ {KB_I ,"KB_I"},
+ {KB_O ,"KB_O"},
+ {KB_P ,"KB_P"},
+ {KB_leftSquareBrace ,"KB_leftSquareBrace"},
+ {KB_rightSquareBrace ,"KB_rightSquareBrace"},
+ {KB_enter ,"KB_enter"},
+ {KB_A ,"KB_A"},
+ {KB_S ,"KB_S"},
+ {KB_D ,"KB_D"},
+ {KB_F ,"KB_F"},
+ {KB_G ,"KB_G"},
+ {KB_H ,"KB_H"},
+ {KB_J ,"KB_J"},
+ {KB_K ,"KB_K"},
+ {KB_L ,"KB_L"},
+ {KB_semicolon ,"KB_semicolon"},
+ {KB_apostrophe ,"KB_apostrophe"},
+ {KB_Z ,"KB_Z"},
+ {KB_X ,"KB_X"},
+ {KB_C ,"KB_C"},
+ {KB_V ,"KB_V"},
+ {KB_B ,"KB_B"},
+ {KB_N ,"KB_N"},
+ {KB_M ,"KB_M"},
+ {KB_comma ,"KB_comma"},
+ {KB_period ,"KB_period"},
+ {KB_divide ,"KB_divide"},
+ {KB_space ,"KB_space"},
+ {KB_tilde ,"KB_tilde"},
+ {0 ,"KB_unknown"},
+ };
+
+/****************************************************************************
+PARAMETERS:
+x - X coordinate of the mouse cursor position (screen coordinates)
+y - Y coordinate of the mouse cursor position (screen coordinates)
+
+REMARKS:
+This gets called periodically to move the mouse. It will get called when
+the mouse may not have actually moved, so check if it has before redrawing
+it.
+****************************************************************************/
+void EVTAPI moveMouse(
+ int x,
+ int y)
+{
+}
+
+/****************************************************************************
+PARAMETERS:
+code - Code to translate
+keys - Table of translation key values to look up
+
+REMARKS:
+Simple function to look up the printable name for the keyboard code.
+****************************************************************************/
+KeyEntry *FindKey(
+ int code,
+ KeyEntry *keys)
+{
+ KeyEntry *key;
+
+ for (key = keys; key->code != 0; key++) {
+ if (key->code == code)
+ break;
+ }
+ return key;
+}
+
+/****************************************************************************
+PARAMETERS:
+evt - Event to display modifiers for
+
+REMARKS:
+Function to display shift modifiers flags
+****************************************************************************/
+void DisplayModifiers(
+ event_t *evt)
+{
+ if (evt->modifiers & EVT_LEFTBUT)
+ printf(", LBUT");
+ if (evt->modifiers & EVT_RIGHTBUT)
+ printf(", RBUT");
+ if (evt->modifiers & EVT_MIDDLEBUT)
+ printf(", MBUT");
+ if (evt->modifiers & EVT_SHIFTKEY) {
+ if (evt->modifiers & EVT_LEFTSHIFT)
+ printf(", LSHIFT");
+ if (evt->modifiers & EVT_RIGHTSHIFT)
+ printf(", RSHIFT");
+ }
+ if (evt->modifiers & EVT_CTRLSTATE) {
+ if (evt->modifiers & EVT_LEFTCTRL)
+ printf(", LCTRL");
+ if (evt->modifiers & EVT_RIGHTCTRL)
+ printf(", RCTRL");
+ }
+ if (evt->modifiers & EVT_ALTSTATE) {
+ if (evt->modifiers & EVT_LEFTALT)
+ printf(", LALT");
+ if (evt->modifiers & EVT_RIGHTALT)
+ printf(", RALT");
+ }
+}
+
+/****************************************************************************
+PARAMETERS:
+msg - Message to display for type of event
+evt - Event to display
+
+REMARKS:
+Function to display the status of the keyboard event to the screen.
+****************************************************************************/
+void DisplayKey(
+ char *msg,
+ event_t *evt)
+{
+ KeyEntry *ascii,*scan;
+ char ch = EVT_asciiCode(evt->message);
+
+ ascii = FindKey(ch,ASCIICodes);
+ scan = FindKey(EVT_scanCode(evt->message),ScanCodes);
+ printf("%s: 0x%04X -> %s, %s, '%c'",
+ msg, (int)evt->message & 0xFFFF, scan->name, ascii->name, isprint(ch) ? ch : ' ');
+ DisplayModifiers(evt);
+ printf("\n");
+}
+
+/****************************************************************************
+PARAMETERS:
+msg - Message to display for type of event
+evt - Event to display
+
+REMARKS:
+Function to display the status of the mouse event to the screen.
+****************************************************************************/
+void DisplayMouse(
+ char *msg,
+ event_t *evt)
+{
+ printf("%s: ", msg);
+ if (evt->message & EVT_LEFTBMASK)
+ printf("LEFT ");
+ if (evt->message & EVT_RIGHTBMASK)
+ printf("RIGHT ");
+ if (evt->message & EVT_MIDDLEBMASK)
+ printf("MIDDLE ");
+ printf("abs(%d,%d), rel(%d,%d)", evt->where_x, evt->where_y, evt->relative_x, evt->relative_y);
+ DisplayModifiers(evt);
+ if (evt->message & EVT_DBLCLICK)
+ printf(", DBLCLICK");
+ printf("\n");
+}
+
+/****************************************************************************
+PARAMETERS:
+msg - Message to display for type of event
+evt - Event to display
+
+REMARKS:
+Function to display the status of the joystick event to the screen.
+****************************************************************************/
+void DisplayJoy(
+ char *msg,
+ event_t *evt)
+{
+ printf("%s: Joy1(%4d,%4d,%c%c), Joy2(%4d,%4d,%c%c)\n", msg,
+ evt->where_x,evt->where_y,
+ (evt->message & EVT_JOY1_BUTTONA) ? 'A' : 'a',
+ (evt->message & EVT_JOY1_BUTTONB) ? 'B' : 'b',
+ evt->relative_x,evt->relative_y,
+ (evt->message & EVT_JOY2_BUTTONA) ? 'A' : 'a',
+ (evt->message & EVT_JOY2_BUTTONB) ? 'B' : 'b');
+}
+
+/****************************************************************************
+REMARKS:
+Joystick calibration routine
+****************************************************************************/
+void CalibrateJoy(void)
+{
+ event_t evt;
+ if(EVT_joyIsPresent()){
+ printf("Joystick Calibration\nMove the joystick to the upper left corner and press any button.\n");
+ EVT_halt(&evt, EVT_JOYCLICK);
+ EVT_halt(&evt, EVT_JOYCLICK);
+ EVT_joySetUpperLeft();
+ printf("Move the joystick to the lower right corner and press any button.\n");
+ EVT_halt(&evt, EVT_JOYCLICK);
+ EVT_halt(&evt, EVT_JOYCLICK);
+ EVT_joySetLowerRight();
+ printf("Move the joystick to center position and press any button.\n");
+ EVT_halt(&evt, EVT_JOYCLICK);
+ EVT_halt(&evt, EVT_JOYCLICK);
+ EVT_joySetCenter();
+ printf("Joystick calibrated\n");
+ }
+}
+
+/****************************************************************************
+REMARKS:
+Main program entry point
+****************************************************************************/
+int main(void)
+{
+ event_t evt;
+ ibool done = false;
+ PM_HWND hwndConsole;
+
+ hwndConsole = PM_openConsole(0,0,0,0,0,true);
+ EVT_init(&moveMouse);
+ EVT_setMouseRange(1024,768);
+ CalibrateJoy();
+ do {
+ EVT_pollJoystick();
+ if (EVT_getNext(&evt,EVT_EVERYEVT)) {
+ switch (evt.what) {
+ case EVT_KEYDOWN:
+ DisplayKey("EVT_KEYDOWN ", &evt);
+ if (EVT_scanCode(evt.message) == KB_esc)
+ done = true;
+ break;
+ case EVT_KEYREPEAT:
+ DisplayKey("EVT_KEYREPEAT", &evt);
+ break;
+ case EVT_KEYUP:
+ DisplayKey("EVT_KEYUP ", &evt);
+ break;
+ case EVT_MOUSEDOWN:
+ DisplayMouse("EVT_MOUSEDOWN", &evt);
+ break;
+ case EVT_MOUSEAUTO:
+ DisplayMouse("EVT_MOUSEAUTO", &evt);
+ break;
+ case EVT_MOUSEUP:
+ DisplayMouse("EVT_MOUSEUP ", &evt);
+ break;
+ case EVT_MOUSEMOVE:
+ DisplayMouse("EVT_MOUSEMOVE", &evt);
+ break;
+ case EVT_JOYCLICK:
+ DisplayJoy("EVT_JOYCLICK ", &evt);
+ break;
+ case EVT_JOYMOVE:
+ DisplayJoy("EVT_JOYMOVE ", &evt);
+ break;
+ }
+ }
+ } while (!done);
+ EVT_exit();
+ PM_closeConsole(hwndConsole);
+ return 0;
+}
diff --git a/board/MAI/bios_emulator/scitech/src/pm/tests/isvesa.c b/board/MAI/bios_emulator/scitech/src/pm/tests/isvesa.c
new file mode 100644
index 00000000000..9c02452bb3d
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/pm/tests/isvesa.c
@@ -0,0 +1,110 @@
+/****************************************************************************
+*
+* SciTech OS Portability Manager Library
+*
+* ========================================================================
+*
+* The contents of this file are subject to the SciTech MGL Public
+* License Version 1.0 (the "License"); you may not use this file
+* except in compliance with the License. You may obtain a copy of
+* the License at http://www.scitechsoft.com/mgl-license.txt
+*
+* Software distributed under the License is distributed on an
+* "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+* implied. See the License for the specific language governing
+* rights and limitations under the License.
+*
+* The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+*
+* The Initial Developer of the Original Code is SciTech Software, Inc.
+* All Rights Reserved.
+*
+* ========================================================================
+*
+* Language: ANSI C
+* Environment: any
+*
+* Description: Test program to check the ability to allocate real mode
+* memory and to call real mode interrupt handlers such as
+* the VESA VBE BIOS from protected mode. Compile and link
+* with the appropriate command line for your DOS extender.
+*
+* Functions tested: PM_getVESABuf()
+* PM_mapRealPointer()
+* PM_int86x()
+*
+****************************************************************************/
+
+#include <stdlib.h>
+#include <stdio.h>
+#include <string.h>
+#include "pmapi.h"
+
+/* SuperVGA information block */
+
+#pragma pack(1)
+
+typedef struct {
+ char VESASignature[4]; /* 'VESA' 4 byte signature */
+ short VESAVersion; /* VBE version number */
+ ulong OEMStringPtr; /* Far pointer to OEM string */
+ ulong Capabilities; /* Capabilities of video card */
+ ulong VideoModePtr; /* Far pointer to supported modes */
+ short TotalMemory; /* Number of 64kb memory blocks */
+ char reserved[236]; /* Pad to 256 byte block size */
+ } VgaInfoBlock;
+
+#pragma pack()
+
+int main(void)
+{
+ RMREGS regs;
+ RMSREGS sregs;
+ VgaInfoBlock vgaInfo;
+ ushort *mode;
+ uint vgLen;
+ uchar *vgPtr;
+ unsigned r_vgseg,r_vgoff;
+
+ printf("Program running in ");
+ switch (PM_getModeType()) {
+ case PM_realMode:
+ printf("real mode.\n\n");
+ break;
+ case PM_286:
+ printf("16 bit protected mode.\n\n");
+ break;
+ case PM_386:
+ printf("32 bit protected mode.\n\n");
+ break;
+ }
+
+ /* Allocate a 256 byte block of real memory for communicating with
+ * the VESA BIOS.
+ */
+ if ((vgPtr = PM_getVESABuf(&vgLen,&r_vgseg,&r_vgoff)) == NULL) {
+ printf("Unable to allocate VESA memory buffer!\n");
+ exit(1);
+ }
+
+ /* Call the VESA VBE to see if it is out there */
+ regs.x.ax = 0x4F00;
+ regs.x.di = r_vgoff;
+ sregs.es = r_vgseg;
+ memcpy(vgPtr,"VBE2",4);
+ PM_int86x(0x10, ®s, ®s, &sregs);
+ memcpy(&vgaInfo,vgPtr,sizeof(VgaInfoBlock));
+ if (regs.x.ax == 0x4F && strncmp(vgaInfo.VESASignature,"VESA",4) == 0) {
+ printf("VESA VBE version %d.%d BIOS detected\n\n",
+ vgaInfo.VESAVersion >> 8, vgaInfo.VESAVersion & 0xF);
+ printf("Available video modes:\n");
+ mode = PM_mapRealPointer(vgaInfo.VideoModePtr >> 16, vgaInfo.VideoModePtr & 0xFFFF);
+ while (*mode != 0xFFFF) {
+ printf(" %04hXh (%08X)\n", *mode, (int)mode);
+ mode++;
+ }
+ }
+ else
+ printf("VESA VBE not found\n");
+ return 0;
+}
diff --git a/board/MAI/bios_emulator/scitech/src/pm/tests/key.c b/board/MAI/bios_emulator/scitech/src/pm/tests/key.c
new file mode 100644
index 00000000000..cf89f79fb78
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/pm/tests/key.c
@@ -0,0 +1,92 @@
+/****************************************************************************
+*
+* SciTech OS Portability Manager Library
+*
+* ========================================================================
+*
+* The contents of this file are subject to the SciTech MGL Public
+* License Version 1.0 (the "License"); you may not use this file
+* except in compliance with the License. You may obtain a copy of
+* the License at http://www.scitechsoft.com/mgl-license.txt
+*
+* Software distributed under the License is distributed on an
+* "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+* implied. See the License for the specific language governing
+* rights and limitations under the License.
+*
+* The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+*
+* The Initial Developer of the Original Code is SciTech Software, Inc.
+* All Rights Reserved.
+*
+* ========================================================================
+*
+*
+* Language: ANSI C
+* Environment: any
+*
+* Description: Test program to check the ability to install a C based
+* keyboard interrupt handler.
+*
+* Functions tested: PM_setKeyHandler()
+* PM_chainPrevKey()
+* PM_restoreKeyHandler()
+*
+*
+****************************************************************************/
+
+#include <stdlib.h>
+#include <stdio.h>
+#include "pmapi.h"
+
+volatile long count = 0;
+
+#pragma off (check_stack) /* No stack checking under Watcom */
+
+void PMAPI keyHandler(void)
+{
+ count++;
+ PM_chainPrevKey(); /* Chain to previous handler */
+}
+
+int main(void)
+{
+ int ch;
+ PM_lockHandle lh;
+
+ printf("Program running in ");
+ switch (PM_getModeType()) {
+ case PM_realMode:
+ printf("real mode.\n\n");
+ break;
+ case PM_286:
+ printf("16 bit protected mode.\n\n");
+ break;
+ case PM_386:
+ printf("32 bit protected mode.\n\n");
+ break;
+ }
+
+ /* Install our timer handler and lock handler pages in memory. It is
+ * difficult to get the size of a function in C, but we know our
+ * function is well less than 100 bytes (and an entire 4k page will
+ * need to be locked by the server anyway).
+ */
+ PM_lockCodePages((__codePtr)keyHandler,100,&lh);
+ PM_lockDataPages((void*)&count,sizeof(count),&lh);
+ PM_installBreakHandler(); /* We *DONT* want Ctrl-Breaks! */
+ PM_setKeyHandler(keyHandler);
+ printf("Keyboard interrupt handler installed - Type some characters and\n");
+ printf("hit ESC to exit\n");
+ while ((ch = PM_getch()) != 0x1B) {
+ printf("%c", ch);
+ fflush(stdout);
+ }
+
+ PM_restoreKeyHandler();
+ PM_restoreBreakHandler();
+ PM_unlockDataPages((void*)&count,sizeof(count),&lh);
+ PM_unlockCodePages((__codePtr)keyHandler,100,&lh);
+ printf("\n\nKeyboard handler was called %ld times\n", count);
+ return 0;
+}
diff --git a/board/MAI/bios_emulator/scitech/src/pm/tests/key15.c b/board/MAI/bios_emulator/scitech/src/pm/tests/key15.c
new file mode 100644
index 00000000000..5c0d27a1748
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/pm/tests/key15.c
@@ -0,0 +1,96 @@
+/****************************************************************************
+*
+* SciTech OS Portability Manager Library
+*
+* ========================================================================
+*
+* The contents of this file are subject to the SciTech MGL Public
+* License Version 1.0 (the "License"); you may not use this file
+* except in compliance with the License. You may obtain a copy of
+* the License at http://www.scitechsoft.com/mgl-license.txt
+*
+* Software distributed under the License is distributed on an
+* "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+* implied. See the License for the specific language governing
+* rights and limitations under the License.
+*
+* The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+*
+* The Initial Developer of the Original Code is SciTech Software, Inc.
+* All Rights Reserved.
+*
+* ========================================================================
+*
+*
+* Language: ANSI C
+* Environment: any
+*
+* Description: Test program to check the ability to install a C based
+* keyboard Int 15h interrupt handler. This is an alternate
+* way to intercept scancodes from the keyboard by hooking
+* the Int 15h keyboard intercept callout.
+*
+* Functions tested: PM_setKey15Handler()
+* PM_restoreKey15Handler()
+*
+*
+****************************************************************************/
+
+#include <stdlib.h>
+#include <stdio.h>
+#include "pmapi.h"
+
+volatile long count = 0;
+volatile short lastScanCode = 0;
+
+#pragma off (check_stack) /* No stack checking under Watcom */
+
+short PMAPI keyHandler(short scanCode)
+{
+ count++;
+ lastScanCode = scanCode;
+ return scanCode; /* Let BIOS process as normal */
+}
+
+int main(void)
+{
+ int ch;
+ PM_lockHandle lh;
+
+ printf("Program running in ");
+ switch (PM_getModeType()) {
+ case PM_realMode:
+ printf("real mode.\n\n");
+ break;
+ case PM_286:
+ printf("16 bit protected mode.\n\n");
+ break;
+ case PM_386:
+ printf("32 bit protected mode.\n\n");
+ break;
+ }
+
+ /* Install our timer handler and lock handler pages in memory. It is
+ * difficult to get the size of a function in C, but we know our
+ * function is well less than 100 bytes (and an entire 4k page will
+ * need to be locked by the server anyway).
+ */
+ PM_lockCodePages((__codePtr)keyHandler,100,&lh);
+ PM_lockDataPages((void*)&count,sizeof(count),&lh);
+ PM_installBreakHandler(); /* We *DONT* want Ctrl-Break's! */
+ PM_setKey15Handler(keyHandler);
+ printf("Keyboard interrupt handler installed - Type some characters and\n");
+ printf("hit ESC to exit\n");
+ while ((ch = PM_getch()) != 0x1B) {
+ printf("%c", ch);
+ fflush(stdout);
+ }
+
+ PM_restoreKey15Handler();
+ PM_restoreBreakHandler();
+ PM_unlockDataPages((void*)&count,sizeof(count),&lh);
+ PM_unlockCodePages((__codePtr)keyHandler,100,&lh);
+ printf("\n\nKeyboard handler was called %ld times\n", count);
+ printf("Last scan code %04X\n", lastScanCode);
+ return 0;
+}
diff --git a/board/MAI/bios_emulator/scitech/src/pm/tests/memtest.c b/board/MAI/bios_emulator/scitech/src/pm/tests/memtest.c
new file mode 100644
index 00000000000..221bfb1a022
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/pm/tests/memtest.c
@@ -0,0 +1,106 @@
+/****************************************************************************
+*
+* SciTech OS Portability Manager Library
+*
+* ========================================================================
+*
+* The contents of this file are subject to the SciTech MGL Public
+* License Version 1.0 (the "License"); you may not use this file
+* except in compliance with the License. You may obtain a copy of
+* the License at http://www.scitechsoft.com/mgl-license.txt
+*
+* Software distributed under the License is distributed on an
+* "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+* implied. See the License for the specific language governing
+* rights and limitations under the License.
+*
+* The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+*
+* The Initial Developer of the Original Code is SciTech Software, Inc.
+* All Rights Reserved.
+*
+* ========================================================================
+*
+*
+* Language: ANSI C
+* Environment: any
+*
+* Description: Test program to determine just how much memory can be
+* allocated with the compiler in use. Compile and link
+* with the appropriate command line for your DOS extender.
+*
+* Functions tested: PM_malloc()
+* PM_availableMemory()
+*
+*
+****************************************************************************/
+
+#include <stdlib.h>
+#include <stdio.h>
+#include <string.h>
+#include <math.h>
+#include "pmapi.h"
+
+#ifdef __16BIT__
+#define MAXALLOC 64
+#else
+#define MAXALLOC 2000
+#endif
+
+int main(void)
+{
+ int i;
+ ulong allocs;
+ ulong physical,total;
+ char *p,*pa[MAXALLOC];
+
+ printf("Program running in ");
+ switch (PM_getModeType()) {
+ case PM_realMode:
+ printf("real mode.\n\n");
+ break;
+ case PM_286:
+ printf("16 bit protected mode.\n\n");
+ break;
+ case PM_386:
+ printf("32 bit protected mode.\n\n");
+ break;
+ }
+
+ printf("Memory available at start:\n");
+ PM_availableMemory(&physical,&total);
+ printf(" Physical memory: %ld Kb\n", physical / 1024);
+ printf(" Total (including virtual): %ld Kb\n", total / 1024);
+ printf("\n");
+ for (allocs = i = 0; i < MAXALLOC; i++) {
+ if ((pa[i] = PM_malloc(10*1024)) != 0) { /* in 10k blocks */
+ p = pa[allocs];
+ memset(p, 0, 10*1024); /* touch every byte */
+ *p = 'x'; /* do something, anything with */
+ p[1023] = 'y'; /* the allocated memory */
+ allocs++;
+ printf("Allocated %lu bytes\r", 10*(allocs << 10));
+ }
+ else break;
+ if (PM_kbhit() && (PM_getch() == 0x1B))
+ break;
+ }
+
+ printf("\n\nAllocated total of %lu bytes\n", 10 * (allocs << 10));
+
+ printf("\nMemory available at end:\n");
+ PM_availableMemory(&physical,&total);
+ printf(" Physical memory: %ld Kb\n", physical / 1024);
+ printf(" Total (including virtual): %ld Kb\n", total / 1024);
+
+ for (i = allocs-1; i >= 0; i--)
+ PM_free(pa[i]);
+
+ printf("\nMemory available after freeing all blocks (note that under protected mode\n");
+ printf("this will most likely not be correct after freeing blocks):\n\n");
+ PM_availableMemory(&physical,&total);
+ printf(" Physical memory: %ld Kb\n", physical / 1024);
+ printf(" Total (including virtual): %ld Kb\n", total / 1024);
+
+ return 0;
+}
diff --git a/board/MAI/bios_emulator/scitech/src/pm/tests/mouse.c b/board/MAI/bios_emulator/scitech/src/pm/tests/mouse.c
new file mode 100644
index 00000000000..5b426517c82
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/pm/tests/mouse.c
@@ -0,0 +1,109 @@
+/****************************************************************************
+*
+* SciTech OS Portability Manager Library
+*
+* ========================================================================
+*
+* The contents of this file are subject to the SciTech MGL Public
+* License Version 1.0 (the "License"); you may not use this file
+* except in compliance with the License. You may obtain a copy of
+* the License at http://www.scitechsoft.com/mgl-license.txt
+*
+* Software distributed under the License is distributed on an
+* "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+* implied. See the License for the specific language governing
+* rights and limitations under the License.
+*
+* The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+*
+* The Initial Developer of the Original Code is SciTech Software, Inc.
+* All Rights Reserved.
+*
+* ========================================================================
+*
+*
+* Language: ANSI C
+* Environment: any
+*
+* Description: Test program to check the ability to install an assembly
+* language mouse interrupt handler. We use assembly language
+* as it must be a far function and should swap to a local
+* 32 bit stack if it is going to call any C based code (which
+* we do in this example).
+*
+* Functions tested: PM_installMouseHandler()
+* PM_int86()
+*
+*
+****************************************************************************/
+
+#include <stdlib.h>
+#include <stdio.h>
+#include "pmapi.h"
+
+volatile long count = 0;
+
+#pragma off (check_stack) /* No stack checking under Watcom */
+
+void PMAPI mouseHandler(
+ uint mask,
+ uint butstate,
+ int x,
+ int y,
+ int mickeyX,
+ int mickeyY)
+{
+ mask = mask; /* We dont use any of the parameters */
+ butstate = butstate;
+ x = x;
+ y = y;
+ mickeyX = mickeyX;
+ mickeyY = mickeyY;
+ count++;
+}
+
+int main(void)
+{
+ RMREGS regs;
+ PM_lockHandle lh;
+
+ printf("Program running in ");
+ switch (PM_getModeType()) {
+ case PM_realMode:
+ printf("real mode.\n\n");
+ break;
+ case PM_286:
+ printf("16 bit protected mode.\n\n");
+ break;
+ case PM_386:
+ printf("32 bit protected mode.\n\n");
+ break;
+ }
+
+ regs.x.ax = 33; /* Mouse function 33 - Software reset */
+ PM_int86(0x33,®s,®s);
+ if (regs.x.bx == 0) {
+ printf("No mouse installed.\n");
+ exit(1);
+ }
+
+ /* Install our mouse handler and lock handler pages in memory. It is
+ * difficult to get the size of a function in C, but we know our
+ * function is well less than 100 bytes (and an entire 4k page will
+ * need to be locked by the server anyway).
+ */
+ PM_lockCodePages((__codePtr)mouseHandler,100,&lh);
+ PM_lockDataPages((void*)&count,sizeof(count),&lh);
+ if (!PM_setMouseHandler(0xFFFF, mouseHandler)) {
+ printf("Unable to install mouse handler!\n");
+ exit(1);
+ }
+ printf("Mouse handler installed - Hit any key to exit\n");
+ PM_getch();
+
+ PM_restoreMouseHandler();
+ PM_unlockDataPages((void*)&count,sizeof(count),&lh);
+ PM_unlockCodePages((__codePtr)mouseHandler,100,&lh);
+ printf("Mouse handler was called %ld times\n", count);
+ return 0;
+}
diff --git a/board/MAI/bios_emulator/scitech/src/pm/tests/restore.c b/board/MAI/bios_emulator/scitech/src/pm/tests/restore.c
new file mode 100644
index 00000000000..b808052c027
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/pm/tests/restore.c
@@ -0,0 +1,82 @@
+/****************************************************************************
+*
+* SciTech OS Portability Manager Library
+*
+* ========================================================================
+*
+* The contents of this file are subject to the SciTech MGL Public
+* License Version 1.0 (the "License"); you may not use this file
+* except in compliance with the License. You may obtain a copy of
+* the License at http://www.scitechsoft.com/mgl-license.txt
+*
+* Software distributed under the License is distributed on an
+* "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+* implied. See the License for the specific language governing
+* rights and limitations under the License.
+*
+* The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+*
+* The Initial Developer of the Original Code is SciTech Software, Inc.
+* All Rights Reserved.
+*
+* ========================================================================
+*
+* Language: ANSI C
+* Environment: Linux/QNX
+*
+* Description: Program to restore the console state state from a previously
+* saved state if the program crashed while the console
+* was in graphics mode.
+*
+****************************************************************************/
+
+#include <stdlib.h>
+#include <stdio.h>
+#include "pmapi.h"
+
+void setVideoMode(int mode)
+{
+ RMREGS r;
+
+ r.x.ax = mode;
+ PM_int86(0x10, &r, &r);
+}
+
+int main(void)
+{
+ PM_HWND hwndConsole;
+ ulong stateSize;
+ void *stateBuf;
+ FILE *f;
+
+ /* Write the saved console state buffer to disk */
+ if ((f = fopen("/etc/pmsave.dat","rb")) == NULL) {
+ printf("Unable to open /etc/pmsave.dat for reading!\n");
+ return -1;
+ }
+ fread(&stateSize,1,sizeof(stateSize),f);
+ if (stateSize != PM_getConsoleStateSize()) {
+ printf("Size mismatch in /etc/pmsave.dat!\n");
+ return -1;
+ }
+ if ((stateBuf = PM_malloc(stateSize)) == NULL) {
+ printf("Unable to allocate console state buffer!\n");
+ return -1;
+ }
+ fread(stateBuf,1,stateSize,f);
+ fclose(f);
+
+ /* Open the console */
+ hwndConsole = PM_openConsole(0,0,0,0,0,true);
+
+ /* Forcibly set 80x25 text mode using the BIOS */
+ setVideoMode(0x3);
+
+ /* Restore the previous console state */
+ PM_restoreConsoleState(stateBuf,0);
+ PM_closeConsole(hwndConsole);
+ PM_free(stateBuf);
+ printf("Console state successfully restored from /etc/pmsave.dat\n");
+ return 0;
+}
+
diff --git a/board/MAI/bios_emulator/scitech/src/pm/tests/rtc.c b/board/MAI/bios_emulator/scitech/src/pm/tests/rtc.c
new file mode 100644
index 00000000000..07c6eaafd47
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/pm/tests/rtc.c
@@ -0,0 +1,92 @@
+/****************************************************************************
+*
+* SciTech OS Portability Manager Library
+*
+* ========================================================================
+*
+* The contents of this file are subject to the SciTech MGL Public
+* License Version 1.0 (the "License"); you may not use this file
+* except in compliance with the License. You may obtain a copy of
+* the License at http://www.scitechsoft.com/mgl-license.txt
+*
+* Software distributed under the License is distributed on an
+* "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+* implied. See the License for the specific language governing
+* rights and limitations under the License.
+*
+* The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+*
+* The Initial Developer of the Original Code is SciTech Software, Inc.
+* All Rights Reserved.
+*
+* ========================================================================
+*
+* Language: ANSI C
+* Environment: any
+*
+* Description: Test program to check the ability to install a C based
+* Real Time Clock interrupt handler.
+*
+* Functions tested: PM_setRealTimeClockHandler()
+* PM_restoreRealTimeClockHandler()
+*
+****************************************************************************/
+
+#include <stdlib.h>
+#include <stdio.h>
+#include "pmapi.h"
+
+volatile long count = 0;
+
+#pragma off (check_stack) /* No stack checking under Watcom */
+
+void PMAPI RTCHandler(void)
+{
+ count++;
+}
+
+int main(void)
+{
+ long oldCount;
+ PM_lockHandle lh;
+
+ printf("Program running in ");
+ switch (PM_getModeType()) {
+ case PM_realMode:
+ printf("real mode.\n\n");
+ break;
+ case PM_286:
+ printf("16 bit protected mode.\n\n");
+ break;
+ case PM_386:
+ printf("32 bit protected mode.\n\n");
+ break;
+ }
+
+ /* Install our timer handler and lock handler pages in memory. It is
+ * difficult to get the size of a function in C, but we know our
+ * function is well less than 100 bytes (and an entire 4k page will
+ * need to be locked by the server anyway).
+ */
+ PM_lockCodePages((__codePtr)RTCHandler,100,&lh);
+ PM_lockDataPages((void*)&count,sizeof(count),&lh);
+ PM_installBreakHandler(); /* We *DONT* want Ctrl-Breaks! */
+ PM_setRealTimeClockHandler(RTCHandler,128);
+ printf("RealTimeClock interrupt handler installed - Hit ESC to exit\n");
+ oldCount = count;
+ while (1) {
+ if (PM_kbhit() && (PM_getch() == 0x1B))
+ break;
+ if (count != oldCount) {
+ printf("Tick, Tock: %ld\n", count);
+ oldCount = count;
+ }
+ }
+
+ PM_restoreRealTimeClockHandler();
+ PM_restoreBreakHandler();
+ PM_unlockDataPages((void*)&count,sizeof(count),&lh);
+ PM_unlockCodePages((__codePtr)RTCHandler,100,&lh);
+ printf("RealTimeClock handler was called %ld times\n", count);
+ return 0;
+}
diff --git a/board/MAI/bios_emulator/scitech/src/pm/tests/save.c b/board/MAI/bios_emulator/scitech/src/pm/tests/save.c
new file mode 100644
index 00000000000..be96968f62e
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/pm/tests/save.c
@@ -0,0 +1,70 @@
+/****************************************************************************
+*
+* SciTech OS Portability Manager Library
+*
+* ========================================================================
+*
+* The contents of this file are subject to the SciTech MGL Public
+* License Version 1.0 (the "License"); you may not use this file
+* except in compliance with the License. You may obtain a copy of
+* the License at http://www.scitechsoft.com/mgl-license.txt
+*
+* Software distributed under the License is distributed on an
+* "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+* implied. See the License for the specific language governing
+* rights and limitations under the License.
+*
+* The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+*
+* The Initial Developer of the Original Code is SciTech Software, Inc.
+* All Rights Reserved.
+*
+* ========================================================================
+*
+* Language: ANSI C
+* Environment: Linux/QNX
+*
+* Description: Program to save the console state state so that it can
+* be later restored if the program crashed while the console
+* was in graphics mode.
+*
+****************************************************************************/
+
+#include <stdlib.h>
+#include <stdio.h>
+#include "pmapi.h"
+
+int main(void)
+{
+ PM_HWND hwndConsole;
+ ulong stateSize;
+ void *stateBuf;
+ FILE *f;
+
+ /* Allocate a buffer to save console state and save the state */
+ hwndConsole = PM_openConsole(0,0,0,0,0,true);
+ stateSize = PM_getConsoleStateSize();
+ if ((stateBuf = PM_malloc(stateSize)) == NULL) {
+ PM_closeConsole(hwndConsole);
+ printf("Unable to allocate console state buffer!\n");
+ return -1;
+ }
+ PM_saveConsoleState(stateBuf,0);
+
+ /* Restore the console state on exit */
+ PM_restoreConsoleState(stateBuf,0);
+ PM_closeConsole(hwndConsole);
+
+ /* Write the saved console state buffer to disk */
+ if ((f = fopen("/etc/pmsave.dat","wb")) == NULL)
+ printf("Unable to open /etc/pmsave/dat for writing!\n");
+ else {
+ fwrite(&stateSize,1,sizeof(stateSize),f);
+ fwrite(stateBuf,1,stateSize,f);
+ fclose(f);
+ printf("Console state successfully saved to /etc/pmsave.dat\n");
+ }
+ PM_free(stateBuf);
+ return 0;
+}
+
diff --git a/board/MAI/bios_emulator/scitech/src/pm/tests/showpci.c b/board/MAI/bios_emulator/scitech/src/pm/tests/showpci.c
new file mode 100644
index 00000000000..8222b86024b
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/pm/tests/showpci.c
@@ -0,0 +1,253 @@
+/****************************************************************************
+*
+* SciTech OS Portability Manager Library
+*
+* ========================================================================
+*
+* The contents of this file are subject to the SciTech MGL Public
+* License Version 1.0 (the "License"); you may not use this file
+* except in compliance with the License. You may obtain a copy of
+* the License at http://www.scitechsoft.com/mgl-license.txt
+*
+* Software distributed under the License is distributed on an
+* "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+* implied. See the License for the specific language governing
+* rights and limitations under the License.
+*
+* The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+*
+* The Initial Developer of the Original Code is SciTech Software, Inc.
+* All Rights Reserved.
+*
+* ========================================================================
+*
+* Language: ANSI C
+* Environment: any
+*
+* Description: Test program to test the PCI library functions.
+*
+****************************************************************************/
+
+#include "pmapi.h"
+#include "pcilib.h"
+#include <stdio.h>
+#include <stdlib.h>
+#include <string.h>
+#include <stdarg.h>
+
+/*------------------------- Global Variables ------------------------------*/
+
+static int NumPCI = -1;
+static PCIDeviceInfo *PCI;
+static int *BridgeIndex;
+static int *DeviceIndex;
+static int NumBridges;
+static PCIDeviceInfo *AGPBridge = NULL;
+static int NumDevices;
+
+/*-------------------------- Implementation -------------------------------*/
+
+/****************************************************************************
+REMARKS:
+Enumerates the PCI bus and dumps the PCI configuration information to the
+log file.
+****************************************************************************/
+static void EnumeratePCI(void)
+{
+ int i,index;
+ PCIDeviceInfo *info;
+
+ printf("Displaying enumeration of PCI bus (%d devices, %d display devices)\n",
+ NumPCI, NumDevices);
+ for (index = 0; index < NumDevices; index++)
+ printf(" Display device %d is PCI device %d\n",index,DeviceIndex[index]);
+ printf("\n");
+ printf("Bus Slot Fnc DeviceID SubSystem Rev Class IRQ Int Cmd\n");
+ for (i = 0; i < NumPCI; i++) {
+ printf("%2d %2d %2d %04X:%04X %04X:%04X %02X %02X:%02X %02X %02X %04X ",
+ PCI[i].slot.p.Bus,
+ PCI[i].slot.p.Device,
+ PCI[i].slot.p.Function,
+ PCI[i].VendorID,
+ PCI[i].DeviceID,
+ PCI[i].u.type0.SubSystemVendorID,
+ PCI[i].u.type0.SubSystemID,
+ PCI[i].RevID,
+ PCI[i].BaseClass,
+ PCI[i].SubClass,
+ PCI[i].u.type0.InterruptLine,
+ PCI[i].u.type0.InterruptPin,
+ PCI[i].Command);
+ for (index = 0; index < NumDevices; index++) {
+ if (DeviceIndex[index] == i)
+ break;
+ }
+ if (index < NumDevices)
+ printf("<- %d\n", index);
+ else
+ printf("\n");
+ }
+ printf("\n");
+ printf("DeviceID Stat Ifc Cch Lat Hdr BIST\n");
+ for (i = 0; i < NumPCI; i++) {
+ printf("%04X:%04X %04X %02X %02X %02X %02X %02X ",
+ PCI[i].VendorID,
+ PCI[i].DeviceID,
+ PCI[i].Status,
+ PCI[i].Interface,
+ PCI[i].CacheLineSize,
+ PCI[i].LatencyTimer,
+ PCI[i].HeaderType,
+ PCI[i].BIST);
+ for (index = 0; index < NumDevices; index++) {
+ if (DeviceIndex[index] == i)
+ break;
+ }
+ if (index < NumDevices)
+ printf("<- %d\n", index);
+ else
+ printf("\n");
+ }
+ printf("\n");
+ printf("DeviceID Base10h Base14h Base18h Base1Ch Base20h Base24h ROMBase\n");
+ for (i = 0; i < NumPCI; i++) {
+ printf("%04X:%04X %08lX %08lX %08lX %08lX %08lX %08lX %08lX ",
+ PCI[i].VendorID,
+ PCI[i].DeviceID,
+ PCI[i].u.type0.BaseAddress10,
+ PCI[i].u.type0.BaseAddress14,
+ PCI[i].u.type0.BaseAddress18,
+ PCI[i].u.type0.BaseAddress1C,
+ PCI[i].u.type0.BaseAddress20,
+ PCI[i].u.type0.BaseAddress24,
+ PCI[i].u.type0.ROMBaseAddress);
+ for (index = 0; index < NumDevices; index++) {
+ if (DeviceIndex[index] == i)
+ break;
+ }
+ if (index < NumDevices)
+ printf("<- %d\n", index);
+ else
+ printf("\n");
+ }
+ printf("\n");
+ printf("DeviceID BAR10Len BAR14Len BAR18Len BAR1CLen BAR20Len BAR24Len ROMLen\n");
+ for (i = 0; i < NumPCI; i++) {
+ printf("%04X:%04X %08lX %08lX %08lX %08lX %08lX %08lX %08lX ",
+ PCI[i].VendorID,
+ PCI[i].DeviceID,
+ PCI[i].u.type0.BaseAddress10Len,
+ PCI[i].u.type0.BaseAddress14Len,
+ PCI[i].u.type0.BaseAddress18Len,
+ PCI[i].u.type0.BaseAddress1CLen,
+ PCI[i].u.type0.BaseAddress20Len,
+ PCI[i].u.type0.BaseAddress24Len,
+ PCI[i].u.type0.ROMBaseAddressLen);
+ for (index = 0; index < NumDevices; index++) {
+ if (DeviceIndex[index] == i)
+ break;
+ }
+ if (index < NumDevices)
+ printf("<- %d\n", index);
+ else
+ printf("\n");
+ }
+ printf("\n");
+ printf("Displaying enumeration of %d bridge devices\n",NumBridges);
+ printf("\n");
+ printf("DeviceID P# S# B# IOB IOL MemBase MemLimit PreBase PreLimit Ctrl\n");
+ for (i = 0; i < NumBridges; i++) {
+ info = (PCIDeviceInfo*)&PCI[BridgeIndex[i]];
+ printf("%04X:%04X %02X %02X %02X %04X %04X %08X %08X %08X %08X %04X\n",
+ info->VendorID,
+ info->DeviceID,
+ info->u.type1.PrimaryBusNumber,
+ info->u.type1.SecondayBusNumber,
+ info->u.type1.SubordinateBusNumber,
+ ((u16)info->u.type1.IOBase << 8) & 0xF000,
+ info->u.type1.IOLimit ?
+ ((u16)info->u.type1.IOLimit << 8) | 0xFFF : 0,
+ ((u32)info->u.type1.MemoryBase << 16) & 0xFFF00000,
+ info->u.type1.MemoryLimit ?
+ ((u32)info->u.type1.MemoryLimit << 16) | 0xFFFFF : 0,
+ ((u32)info->u.type1.PrefetchableMemoryBase << 16) & 0xFFF00000,
+ info->u.type1.PrefetchableMemoryLimit ?
+ ((u32)info->u.type1.PrefetchableMemoryLimit << 16) | 0xFFFFF : 0,
+ info->u.type1.BridgeControl);
+ }
+ printf("\n");
+}
+
+/****************************************************************************
+RETURNS:
+Number of display devices found.
+
+REMARKS:
+This function enumerates the number of available display devices on the
+PCI bus, and returns the number found.
+****************************************************************************/
+static int PCI_enumerateDevices(void)
+{
+ int i,j;
+ PCIDeviceInfo *info;
+
+ // If this is the first time we have been called, enumerate all
+ // devices on the PCI bus.
+ if (NumPCI == -1) {
+ if ((NumPCI = PCI_getNumDevices()) == 0)
+ return -1;
+ PCI = malloc(NumPCI * sizeof(PCI[0]));
+ BridgeIndex = malloc(NumPCI * sizeof(BridgeIndex[0]));
+ DeviceIndex = malloc(NumPCI * sizeof(DeviceIndex[0]));
+ if (!PCI || !BridgeIndex || !DeviceIndex)
+ return -1;
+ for (i = 0; i < NumPCI; i++)
+ PCI[i].dwSize = sizeof(PCI[i]);
+ if (PCI_enumerate(PCI) == 0)
+ return -1;
+
+ // Build a list of all PCI bridge devices
+ for (i = 0,NumBridges = 0,BridgeIndex[0] = -1; i < NumPCI; i++) {
+ if (PCI[i].BaseClass == PCI_BRIDGE_CLASS)
+ BridgeIndex[NumBridges++] = i;
+ }
+
+ // Now build a list of all display class devices
+ for (i = 0,NumDevices = 1,DeviceIndex[0] = -1; i < NumPCI; i++) {
+ if (PCI_IS_DISPLAY_CLASS(&PCI[i])) {
+ if ((PCI[i].Command & 0x3) == 0x3)
+ DeviceIndex[0] = i;
+ else
+ DeviceIndex[NumDevices++] = i;
+ if (PCI[i].slot.p.Bus != 0) {
+ // This device is on a different bus than the primary
+ // PCI bus, so it is probably an AGP device. Find the
+ // AGP bus device that controls that bus so we can
+ // control it.
+ for (j = 0; j < NumBridges; j++) {
+ info = (PCIDeviceInfo*)&PCI[BridgeIndex[j]];
+ if (info->u.type1.SecondayBusNumber == PCI[i].slot.p.Bus) {
+ AGPBridge = info;
+ break;
+ }
+ }
+ }
+ }
+ }
+
+ // Enumerate all PCI and bridge devices to standard output
+ EnumeratePCI();
+ }
+ return NumDevices;
+}
+
+int main(void)
+{
+ // Enumerate all PCI devices
+ PM_init();
+ if (PCI_enumerateDevices() < 1) {
+ printf("No PCI display devices found!\n");
+ return -1;
+ }
+ return 0;
+}
diff --git a/board/MAI/bios_emulator/scitech/src/pm/tests/tick.c b/board/MAI/bios_emulator/scitech/src/pm/tests/tick.c
new file mode 100644
index 00000000000..ee1014fb9f5
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/pm/tests/tick.c
@@ -0,0 +1,94 @@
+/****************************************************************************
+*
+* SciTech OS Portability Manager Library
+*
+* ========================================================================
+*
+* The contents of this file are subject to the SciTech MGL Public
+* License Version 1.0 (the "License"); you may not use this file
+* except in compliance with the License. You may obtain a copy of
+* the License at http://www.scitechsoft.com/mgl-license.txt
+*
+* Software distributed under the License is distributed on an
+* "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+* implied. See the License for the specific language governing
+* rights and limitations under the License.
+*
+* The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+*
+* The Initial Developer of the Original Code is SciTech Software, Inc.
+* All Rights Reserved.
+*
+* ========================================================================
+*
+* Language: ANSI C
+* Environment: any
+*
+* Description: Test program to check the ability to install a C based
+* timer interrupt handler.
+*
+* Functions tested: PM_setTimerHandler()
+* PM_chainPrevTimer();
+* PM_restoreTimerHandler()
+*
+****************************************************************************/
+
+#include <stdlib.h>
+#include <stdio.h>
+#include "pmapi.h"
+
+volatile long count = 0;
+
+#pragma off (check_stack) /* No stack checking under Watcom */
+
+void PMAPI timerHandler(void)
+{
+ PM_chainPrevTimer(); /* Chain to previous handler */
+ count++;
+}
+
+int main(void)
+{
+ long oldCount;
+ PM_lockHandle lh;
+
+ printf("Program running in ");
+ switch (PM_getModeType()) {
+ case PM_realMode:
+ printf("real mode.\n\n");
+ break;
+ case PM_286:
+ printf("16 bit protected mode.\n\n");
+ break;
+ case PM_386:
+ printf("32 bit protected mode.\n\n");
+ break;
+ }
+
+ /* Install our timer handler and lock handler pages in memory. It is
+ * difficult to get the size of a function in C, but we know our
+ * function is well less than 100 bytes (and an entire 4k page will
+ * need to be locked by the server anyway).
+ */
+ PM_lockCodePages((__codePtr)timerHandler,100,&lh);
+ PM_lockDataPages((void*)&count,sizeof(count),&lh);
+ PM_installBreakHandler(); /* We *DONT* want Ctrl-Breaks! */
+ PM_setTimerHandler(timerHandler);
+ printf("Timer interrupt handler installed - Hit ESC to exit\n");
+ oldCount = count;
+ while (1) {
+ if (PM_kbhit() && (PM_getch() == 0x1B))
+ break;
+ if (count != oldCount) {
+ printf("Tick, Tock: %ld\n", count);
+ oldCount = count;
+ }
+ }
+
+ PM_restoreTimerHandler();
+ PM_restoreBreakHandler();
+ PM_unlockDataPages((void*)&count,sizeof(count),&lh);
+ PM_unlockCodePages((__codePtr)timerHandler,100,&lh);
+ printf("Timer handler was called %ld times\n", count);
+ return 0;
+}
diff --git a/board/MAI/bios_emulator/scitech/src/pm/tests/timerc.c b/board/MAI/bios_emulator/scitech/src/pm/tests/timerc.c
new file mode 100644
index 00000000000..55e95a85d6c
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/pm/tests/timerc.c
@@ -0,0 +1,87 @@
+/****************************************************************************
+*
+* SciTech OS Portability Manager Library
+*
+* ========================================================================
+*
+* The contents of this file are subject to the SciTech MGL Public
+* License Version 1.0 (the "License"); you may not use this file
+* except in compliance with the License. You may obtain a copy of
+* the License at http://www.scitechsoft.com/mgl-license.txt
+*
+* Software distributed under the License is distributed on an
+* "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+* implied. See the License for the specific language governing
+* rights and limitations under the License.
+*
+* The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+*
+* The Initial Developer of the Original Code is SciTech Software, Inc.
+* All Rights Reserved.
+*
+* ========================================================================
+*
+* Language: ANSI C
+* Environment: Any
+*
+* Description: Test program for the Zen Timer Library.
+*
+****************************************************************************/
+
+#include <stdio.h>
+#include "pmapi.h"
+#include "ztimer.h"
+
+#define DELAY_SECS 10
+
+/*-------------------------- Implementation -------------------------------*/
+
+/* The following routine takes a long count in microseconds and outputs
+ * a string representing the count in seconds. It could be modified to
+ * return a pointer to a static string representing the count rather
+ * than printing it out.
+ */
+
+void ReportTime(ulong count)
+{
+ ulong secs;
+
+ secs = count / 1000000L;
+ count = count - secs * 1000000L;
+ printf("Time taken: %lu.%06lu seconds\n",secs,count);
+}
+
+int i,j; /* NON register variables! */
+
+int main(void)
+{
+#ifdef LONG_TEST
+ ulong start,finish;
+#endif
+
+ printf("Processor type: %d %ld MHz\n", CPU_getProcessorType(), CPU_getProcessorSpeed(true));
+
+ ZTimerInit();
+
+ /* Test the long period Zen Timer (we don't check for overflow coz
+ * it would take tooooo long!)
+ */
+
+ LZTimerOn();
+ for (j = 0; j < 10; j++)
+ for (i = 0; i < 20000; i++)
+ i = i;
+ LZTimerOff();
+ ReportTime(LZTimerCount());
+
+ /* Test the ultra long period Zen Timer */
+#ifdef LONG_TEST
+ start = ULZReadTime();
+ delay(DELAY_SECS * 1000);
+ finish = ULZReadTime();
+ printf("Delay of %d secs took %d 1/10ths of a second\n",
+ DELAY_SECS,ULZElapsedTime(start,finish));
+#endif
+
+ return 0;
+}
diff --git a/board/MAI/bios_emulator/scitech/src/pm/tests/timercpp.cpp b/board/MAI/bios_emulator/scitech/src/pm/tests/timercpp.cpp
new file mode 100644
index 00000000000..1258a4bb108
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/pm/tests/timercpp.cpp
@@ -0,0 +1,107 @@
+/****************************************************************************
+*
+* SciTech OS Portability Manager Library
+*
+* ========================================================================
+*
+* The contents of this file are subject to the SciTech MGL Public
+* License Version 1.0 (the "License"); you may not use this file
+* except in compliance with the License. You may obtain a copy of
+* the License at http://www.scitechsoft.com/mgl-license.txt
+*
+* Software distributed under the License is distributed on an
+* "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+* implied. See the License for the specific language governing
+* rights and limitations under the License.
+*
+* The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+*
+* The Initial Developer of the Original Code is SciTech Software, Inc.
+* All Rights Reserved.
+*
+* ========================================================================
+*
+* Language: C++ 3.0
+* Environment: Any
+*
+* Description: Test program for the Zen Timer Library C++ interface.
+*
+****************************************************************************/
+
+#include <iostream.h>
+#include "pmapi.h"
+#include "ztimer.h"
+
+/*-------------------------- Implementation -------------------------------*/
+
+int i,j,k; /* NON register variables! */
+
+void dummy() {}
+
+int main(void)
+{
+ LZTimer ltimer;
+ ULZTimer ultimer;
+
+ ZTimerInit();
+
+ /* Test the long period Zen Timer (we don't check for overflow coz
+ * it would take tooooo long!)
+ */
+
+ cout << endl;
+ ultimer.restart();
+ ltimer.start();
+ for (j = 0; j < 10; j++)
+ for (i = 0; i < 20000; i++)
+ dummy();
+ ltimer.stop();
+ ultimer.stop();
+ cout << "LCount: " << ltimer.count() << endl;
+ cout << "Time: " << ltimer << " secs\n";
+ cout << "ULCount: " << ultimer.count() << endl;
+ cout << "ULTime: " << ultimer << " secs\n";
+
+ cout << endl << "Timing ... \n";
+ ultimer.restart();
+ ltimer.restart();
+ for (j = 0; j < 200; j++)
+ for (i = 0; i < 20000; i++)
+ dummy();
+ ltimer.stop();
+ ultimer.stop();
+ cout << "LCount: " << ltimer.count() << endl;
+ cout << "Time: " << ltimer << " secs\n";
+ cout << "ULCount: " << ultimer.count() << endl;
+ cout << "ULTime: " << ultimer << " secs\n";
+
+ /* Test the lap function of the long period Zen Timer */
+
+ cout << endl << "Timing ... \n";
+ ultimer.restart();
+ ltimer.restart();
+ for (j = 0; j < 20; j++) {
+ for (k = 0; k < 10; k++)
+ for (i = 0; i < 20000; i++)
+ dummy();
+ cout << "lap: " << ltimer.lap() << endl;
+ }
+ ltimer.stop();
+ ultimer.stop();
+ cout << "LCount: " << ltimer.count() << endl;
+ cout << "Time: " << ltimer << " secs\n";
+ cout << "ULCount: " << ultimer.count() << endl;
+ cout << "ULTime: " << ultimer << " secs\n";
+
+#ifdef LONG_TEST
+ /* Test the ultra long period Zen Timer */
+
+ ultimer.start();
+ delay(DELAY_SECS * 1000);
+ ultimer.stop();
+ cout << "Delay of " << DELAY_SECS << " secs took " << ultimer.count()
+ << " 1/10ths of a second\n";
+ cout << "Time: " << ultimer << " secs\n";
+#endif
+ return 0;
+}
diff --git a/board/MAI/bios_emulator/scitech/src/pm/tests/uswc.c b/board/MAI/bios_emulator/scitech/src/pm/tests/uswc.c
new file mode 100644
index 00000000000..0892e25f3a5
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/pm/tests/uswc.c
@@ -0,0 +1,311 @@
+/****************************************************************************
+*
+* SciTech OS Portability Manager Library
+*
+* ========================================================================
+*
+* The contents of this file are subject to the SciTech MGL Public
+* License Version 1.0 (the "License"); you may not use this file
+* except in compliance with the License. You may obtain a copy of
+* the License at http://www.scitechsoft.com/mgl-license.txt
+*
+* Software distributed under the License is distributed on an
+* "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+* implied. See the License for the specific language governing
+* rights and limitations under the License.
+*
+* The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+*
+* The Initial Developer of the Original Code is SciTech Software, Inc.
+* All Rights Reserved.
+*
+* ========================================================================
+*
+* Language: ANSI C
+* Environment: any
+*
+* Description: Simple test program to test the write combine functions.
+*
+* Note that this program should never be used in a production
+* environment, because write combining needs to be handled
+* with more intimate knowledge of the display hardware than
+* you can obtain by simply examining the PCI configuration
+* space.
+*
+****************************************************************************/
+
+#include "pmapi.h"
+#include "pcilib.h"
+#include <stdio.h>
+#include <stdlib.h>
+#include <string.h>
+#include <stdarg.h>
+
+/*------------------------- Global Variables ------------------------------*/
+
+static int NumPCI = -1;
+static PCIDeviceInfo *PCI;
+static int *BridgeIndex;
+static int *DeviceIndex;
+static int NumBridges;
+static PCIDeviceInfo *AGPBridge = NULL;
+static int NumDevices;
+
+/*-------------------------- Implementation -------------------------------*/
+
+/****************************************************************************
+RETURNS:
+Number of display devices found.
+
+REMARKS:
+This function enumerates the number of available display devices on the
+PCI bus, and returns the number found.
+****************************************************************************/
+static int PCI_enumerateDevices(void)
+{
+ int i,j;
+ PCIDeviceInfo *info;
+
+ // If this is the first time we have been called, enumerate all
+ // devices on the PCI bus.
+ if (NumPCI == -1) {
+ if ((NumPCI = PCI_getNumDevices()) == 0)
+ return -1;
+ PCI = malloc(NumPCI * sizeof(PCI[0]));
+ BridgeIndex = malloc(NumPCI * sizeof(BridgeIndex[0]));
+ DeviceIndex = malloc(NumPCI * sizeof(DeviceIndex[0]));
+ if (!PCI || !BridgeIndex || !DeviceIndex)
+ return -1;
+ for (i = 0; i < NumPCI; i++)
+ PCI[i].dwSize = sizeof(PCI[i]);
+ if (PCI_enumerate(PCI) == 0)
+ return -1;
+
+ // Build a list of all PCI bridge devices
+ for (i = 0,NumBridges = 0,BridgeIndex[0] = -1; i < NumPCI; i++) {
+ if (PCI[i].BaseClass == PCI_BRIDGE_CLASS)
+ BridgeIndex[NumBridges++] = i;
+ }
+
+ // Now build a list of all display class devices
+ for (i = 0,NumDevices = 1,DeviceIndex[0] = -1; i < NumPCI; i++) {
+ if (PCI_IS_DISPLAY_CLASS(&PCI[i])) {
+ if ((PCI[i].Command & 0x3) == 0x3)
+ DeviceIndex[0] = i;
+ else
+ DeviceIndex[NumDevices++] = i;
+ if (PCI[i].slot.p.Bus != 0) {
+ // This device is on a different bus than the primary
+ // PCI bus, so it is probably an AGP device. Find the
+ // AGP bus device that controls that bus so we can
+ // control it.
+ for (j = 0; j < NumBridges; j++) {
+ info = (PCIDeviceInfo*)&PCI[BridgeIndex[j]];
+ if (info->u.type1.SecondayBusNumber == PCI[i].slot.p.Bus) {
+ AGPBridge = info;
+ break;
+ }
+ }
+ }
+ }
+ }
+ }
+ return NumDevices;
+}
+
+/****************************************************************************
+REMARKS:
+Enumerates useful information about attached display devices.
+****************************************************************************/
+static void ShowDisplayDevices(void)
+{
+ int i,index;
+
+ printf("Displaying enumeration of %d PCI display devices\n", NumDevices);
+ printf("\n");
+ printf("DeviceID SubSystem Base10h (length ) Base14h (length )\n");
+ for (index = 0; index < NumDevices; index++) {
+ i = DeviceIndex[index];
+ printf("%04X:%04X %04X:%04X %08lX (%6ld KB) %08lX (%6ld KB)\n",
+ PCI[i].VendorID,
+ PCI[i].DeviceID,
+ PCI[i].u.type0.SubSystemVendorID,
+ PCI[i].u.type0.SubSystemID,
+ PCI[i].u.type0.BaseAddress10,
+ PCI[i].u.type0.BaseAddress10Len / 1024,
+ PCI[i].u.type0.BaseAddress14,
+ PCI[i].u.type0.BaseAddress14Len / 1024);
+ }
+ printf("\n");
+}
+
+/****************************************************************************
+REMARKS:
+Dumps the value for a write combine region to the display.
+****************************************************************************/
+static char *DecodeWCType(
+ uint type)
+{
+ static char *names[] = {
+ "UNCACHABLE",
+ "WRCOMB",
+ "UNKNOWN",
+ "UNKNOWN",
+ "WRTHROUGH",
+ "WRPROT",
+ "WRBACK",
+ };
+ if (type <= PM_MTRR_MAX)
+ return names[type];
+ return "UNKNOWN";
+}
+
+/****************************************************************************
+REMARKS:
+Dumps the value for a write combine region to the display.
+****************************************************************************/
+static void PMAPI EnumWriteCombine(
+ ulong base,
+ ulong length,
+ uint type)
+{
+ printf("%08lX %-10ld %s\n", base, length / 1024, DecodeWCType(type));
+}
+
+/****************************************************************************
+PARAMETERS:
+err - Error to log
+
+REMARKS:
+Function to log an error message if the MTRR write combining attempt failed.
+****************************************************************************/
+static void LogMTRRError(
+ int err)
+{
+ if (err == PM_MTRR_ERR_OK)
+ return;
+ switch (err) {
+ case PM_MTRR_NOT_SUPPORTED:
+ printf("Failed: MTRR is not supported by host CPU\n");
+ break;
+ case PM_MTRR_ERR_PARAMS:
+ printf("Failed: Invalid parameters passed to PM_enableWriteCombined!\n");
+ break;
+ case PM_MTRR_ERR_NOT_4KB_ALIGNED:
+ printf("Failed: Address is not 4Kb aligned!\n");
+ break;
+ case PM_MTRR_ERR_BELOW_1MB:
+ printf("Failed: Addresses below 1Mb cannot be write combined!\n");
+ break;
+ case PM_MTRR_ERR_NOT_ALIGNED:
+ printf("Failed: Address is not correctly aligned for processor!\n");
+ break;
+ case PM_MTRR_ERR_OVERLAP:
+ printf("Failed: Address overlaps an existing region!\n");
+ break;
+ case PM_MTRR_ERR_TYPE_MISMATCH:
+ printf("Failed: Adress is contained with existing region, but type is different!\n");
+ break;
+ case PM_MTRR_ERR_NONE_FREE:
+ printf("Failed: Out of MTRR registers!\n");
+ break;
+ case PM_MTRR_ERR_NOWRCOMB:
+ printf("Failed: This processor does not support write combining!\n");
+ break;
+ case PM_MTRR_ERR_NO_OS_SUPPORT:
+ printf("Failed: MTRR is not supported by host OS\n");
+ break;
+ default:
+ printf("Failed: UNKNOWN ERROR!\n");
+ break;
+ }
+ exit(-1);
+}
+
+/****************************************************************************
+REMARKS:
+Shows all write combine regions.
+****************************************************************************/
+static void ShowWriteCombine(void)
+{
+ printf("Base Length(KB) Type\n");
+ LogMTRRError(PM_enumWriteCombine(EnumWriteCombine));
+ printf("\n");
+}
+
+/****************************************************************************
+REMARKS:
+Dumps the value for a write combine region to the display.
+****************************************************************************/
+static void EnableWriteCombine(void)
+{
+ int i,index;
+
+ for (index = 0; index < NumDevices; index++) {
+ i = DeviceIndex[index];
+ if (PCI[i].u.type0.BaseAddress10 & 0x8) {
+ LogMTRRError(PM_enableWriteCombine(
+ PCI[i].u.type0.BaseAddress10 & 0xFFFFFFF0,
+ PCI[i].u.type0.BaseAddress10Len,
+ PM_MTRR_WRCOMB));
+ }
+ if (PCI[i].u.type0.BaseAddress14 & 0x8) {
+ LogMTRRError(PM_enableWriteCombine(
+ PCI[i].u.type0.BaseAddress14 & 0xFFFFFFF0,
+ PCI[i].u.type0.BaseAddress14Len,
+ PM_MTRR_WRCOMB));
+ }
+ }
+ printf("\n");
+ ShowDisplayDevices();
+ ShowWriteCombine();
+}
+
+/****************************************************************************
+REMARKS:
+Dumps the value for a write combine region to the display.
+****************************************************************************/
+static void DisableWriteCombine(void)
+{
+ int i,index;
+
+ for (index = 0; index < NumDevices; index++) {
+ i = DeviceIndex[index];
+ if (PCI[i].u.type0.BaseAddress10 & 0x8) {
+ LogMTRRError(PM_enableWriteCombine(
+ PCI[i].u.type0.BaseAddress10 & 0xFFFFFFF0,
+ PCI[i].u.type0.BaseAddress10Len,
+ PM_MTRR_UNCACHABLE));
+ }
+ if (PCI[i].u.type0.BaseAddress14 & 0x8) {
+ LogMTRRError(PM_enableWriteCombine(
+ PCI[i].u.type0.BaseAddress14 & 0xFFFFFFF0,
+ PCI[i].u.type0.BaseAddress14Len,
+ PM_MTRR_UNCACHABLE));
+ }
+ }
+ printf("\n");
+ ShowDisplayDevices();
+ ShowWriteCombine();
+}
+
+int main(int argc,char *argv[])
+{
+ PM_init();
+ if (PCI_enumerateDevices() < 1) {
+ printf("No PCI display devices found!\n");
+ return -1;
+ }
+ if (argc < 2) {
+ printf("usage: uswc [-show -on -off]\n\n");
+ ShowDisplayDevices();
+ return -1;
+ }
+ if (stricmp(argv[1],"-show") == 0)
+ ShowWriteCombine();
+ else if (stricmp(argv[1],"-on") == 0)
+ EnableWriteCombine();
+ else if (stricmp(argv[1],"-off") == 0)
+ DisableWriteCombine();
+ return 0;
+}
diff --git a/board/MAI/bios_emulator/scitech/src/pm/tests/vftest.c b/board/MAI/bios_emulator/scitech/src/pm/tests/vftest.c
new file mode 100644
index 00000000000..633a76d2b70
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/pm/tests/vftest.c
@@ -0,0 +1,78 @@
+/****************************************************************************
+*
+* SciTech OS Portability Manager Library
+*
+* ========================================================================
+*
+* The contents of this file are subject to the SciTech MGL Public
+* License Version 1.0 (the "License"); you may not use this file
+* except in compliance with the License. You may obtain a copy of
+* the License at http://www.scitechsoft.com/mgl-license.txt
+*
+* Software distributed under the License is distributed on an
+* "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+* implied. See the License for the specific language governing
+* rights and limitations under the License.
+*
+* The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+*
+* The Initial Developer of the Original Code is SciTech Software, Inc.
+* All Rights Reserved.
+*
+* ========================================================================
+*
+* Filename: $Workfile$
+* Version: $Revision: 1.1 $
+*
+* Language: ANSI C
+* Environment: any
+*
+* Description: Test program to test the VFlat virtual framebuffer functions.
+*
+* Functions tested: VF_available()
+* VF_init()
+* VF_exit()
+*
+* $Date: 2002/10/02 15:35:21 $ $Author: hfrieden $
+*
+****************************************************************************/
+
+#include <stdlib.h>
+#include <stdio.h>
+#include "pmapi.h"
+
+uchar code[] = {
+ 0xC3, /* ret */
+ };
+
+int main(void)
+{
+ void *vfBuffer;
+
+ printf("Program running in ");
+ switch (PM_getModeType()) {
+ case PM_realMode:
+ printf("real mode.\n\n");
+ break;
+ case PM_286:
+ printf("16 bit protected mode.\n\n");
+ break;
+ case PM_386:
+ printf("32 bit protected mode.\n\n");
+ break;
+ }
+
+ if (!VF_available()) {
+ printf("Virtual Linear Framebuffer not available.\n");
+ exit(1);
+ }
+
+ vfBuffer = VF_init(0xA0000,64,sizeof(code),code);
+ if (!vfBuffer) {
+ printf("Failure to initialise Virtual Linear Framebuffer!\n");
+ exit(1);
+ }
+ VF_exit();
+ printf("Virtual Linear Framebuffer set up successfully!\n");
+ return 0;
+}
diff --git a/board/MAI/bios_emulator/scitech/src/pm/tests/video.c b/board/MAI/bios_emulator/scitech/src/pm/tests/video.c
new file mode 100644
index 00000000000..7f6f67f67ee
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/pm/tests/video.c
@@ -0,0 +1,200 @@
+/****************************************************************************
+*
+* SciTech OS Portability Manager Library
+*
+* ========================================================================
+*
+* The contents of this file are subject to the SciTech MGL Public
+* License Version 1.0 (the "License"); you may not use this file
+* except in compliance with the License. You may obtain a copy of
+* the License at http://www.scitechsoft.com/mgl-license.txt
+*
+* Software distributed under the License is distributed on an
+* "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+* implied. See the License for the specific language governing
+* rights and limitations under the License.
+*
+* The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+*
+* The Initial Developer of the Original Code is SciTech Software, Inc.
+* All Rights Reserved.
+*
+* ========================================================================
+*
+* Language: ANSI C
+* Environment: any
+*
+* Description: Test program to check the ability to generate real mode
+* interrupts and to be able to obtain direct access to the
+* video memory from protected mode. Compile and link with
+* the appropriate command line for your DOS extender.
+*
+* Functions tested: PM_getBIOSSelector()
+* PM_mapPhysicalAddr()
+* PM_int86()
+*
+****************************************************************************/
+
+#include <stdlib.h>
+#include <stdio.h>
+#include "pmapi.h"
+
+uchar *bios; /* Pointer to BIOS data area */
+uchar *videoPtr; /* Pointer to VGA framebuffer */
+void *stateBuf; /* Console state save buffer */
+
+/* Routine to return the current video mode number */
+
+int getVideoMode(void)
+{
+ return PM_getByte(bios+0x49);
+}
+
+/* Routine to set a specified video mode */
+
+void setVideoMode(int mode)
+{
+ RMREGS r;
+
+ r.x.ax = mode;
+ PM_int86(0x10, &r, &r);
+}
+
+/* Routine to clear a rectangular region on the display by calling the
+ * video BIOS.
+ */
+
+void clearScreen(int startx, int starty, int endx, int endy, unsigned char attr)
+{
+ RMREGS r;
+
+ r.x.ax = 0x0600;
+ r.h.bh = attr;
+ r.h.cl = startx;
+ r.h.ch = starty;
+ r.h.dl = endx;
+ r.h.dh = endy;
+ PM_int86(0x10, &r, &r);
+}
+
+/* Routine to fill a rectangular region on the display using direct
+ * video writes.
+ */
+
+#define SCREEN(x,y) (videoPtr + ((y) * 160) + ((x) << 1))
+
+void fill(int startx, int starty, int endx, int endy, unsigned char c,
+ unsigned char attr)
+{
+ unsigned char *v;
+ int x,y;
+
+ for (y = starty; y <= endy; y++) {
+ v = SCREEN(startx,y);
+ for (x = startx; x <= endx; x++) {
+ *v++ = c;
+ *v++ = attr;
+ }
+ }
+}
+
+/* Routine to display a single character using direct video writes */
+
+void writeChar(int x, int y, unsigned char c, unsigned char attr)
+{
+ unsigned char *v = SCREEN(x,y);
+ *v++ = c;
+ *v = attr;
+}
+
+/* Routine to draw a border around a rectangular area using direct video
+ * writes.
+ */
+
+static unsigned char border_chars[] = {
+ 186, 205, 201, 187, 200, 188 /* double box chars */
+ };
+
+void border(int startx, int starty, int endx, int endy, unsigned char attr)
+{
+ unsigned char *v;
+ unsigned char *b;
+ int i;
+
+ b = border_chars;
+
+ for (i = starty+1; i < endy; i++) {
+ writeChar(startx, i, *b, attr);
+ writeChar(endx, i, *b, attr);
+ }
+ b++;
+ for (i = startx+1, v = SCREEN(startx+1, starty); i < endx; i++) {
+ *v++ = *b;
+ *v++ = attr;
+ }
+ for (i = startx+1, v = SCREEN(startx+1, endy); i < endx; i++) {
+ *v++ = *b;
+ *v++ = attr;
+ }
+ b++;
+ writeChar(startx, starty, *b++, attr);
+ writeChar(endx, starty, *b++, attr);
+ writeChar(startx, endy, *b++, attr);
+ writeChar(endx, endy, *b++, attr);
+}
+
+int main(void)
+{
+ int orgMode;
+ PM_HWND hwndConsole;
+
+ printf("Program running in ");
+ switch (PM_getModeType()) {
+ case PM_realMode:
+ printf("real mode.\n\n");
+ break;
+ case PM_286:
+ printf("16 bit protected mode.\n\n");
+ break;
+ case PM_386:
+ printf("32 bit protected mode.\n\n");
+ break;
+ }
+
+ hwndConsole = PM_openConsole(0,0,0,0,0,true);
+ printf("Hit any key to start 80x25 text mode and perform some direct video output.\n");
+ PM_getch();
+
+ /* Allocate a buffer to save console state and save the state */
+ if ((stateBuf = PM_malloc(PM_getConsoleStateSize())) == NULL) {
+ printf("Unable to allocate console state buffer!\n");
+ exit(1);
+ }
+ PM_saveConsoleState(stateBuf,0);
+ bios = PM_getBIOSPointer();
+ orgMode = getVideoMode();
+ setVideoMode(0x3);
+ if ((videoPtr = PM_mapPhysicalAddr(0xB8000,0xFFFF,true)) == NULL) {
+ printf("Unable to obtain pointer to framebuffer!\n");
+ exit(1);
+ }
+
+ /* Draw some text on the screen */
+ fill(0, 0, 79, 24, 176, 0x1E);
+ border(0, 0, 79, 24, 0x1F);
+ PM_getch();
+ clearScreen(0, 0, 79, 24, 0x7);
+
+ /* Restore the console state on exit */
+ PM_restoreConsoleState(stateBuf,0);
+ PM_free(stateBuf);
+ PM_closeConsole(hwndConsole);
+
+ /* Display useful status information */
+ printf("\n");
+ printf("Original Video Mode = %02X\n", orgMode);
+ printf("BIOS Pointer = %08X\n", (int)bios);
+ printf("Video Memory = %08X\n", (int)videoPtr);
+ return 0;
+}
+
diff --git a/board/MAI/bios_emulator/scitech/src/pm/vdd/cpuinfo.c b/board/MAI/bios_emulator/scitech/src/pm/vdd/cpuinfo.c
new file mode 100644
index 00000000000..3460b724568
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/pm/vdd/cpuinfo.c
@@ -0,0 +1,66 @@
+/****************************************************************************
+*
+* Ultra Long Period Timer
+*
+* ========================================================================
+*
+* The contents of this file are subject to the SciTech MGL Public
+* License Version 1.0 (the "License"); you may not use this file
+* except in compliance with the License. You may obtain a copy of
+* the License at http://www.scitechsoft.com/mgl-license.txt
+*
+* Software distributed under the License is distributed on an
+* "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+* implied. See the License for the specific language governing
+* rights and limitations under the License.
+*
+* The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+*
+* The Initial Developer of the Original Code is SciTech Software, Inc.
+* All Rights Reserved.
+*
+* ========================================================================
+*
+* Language: ANSI C
+* Environment: 32-bit OS/2 VDD
+*
+* Description: VDD specific code for the CPU detection module.
+*
+****************************************************************************/
+
+/*----------------------------- Implementation ----------------------------*/
+
+/****************************************************************************
+REMARKS:
+Do nothing for VDD's
+****************************************************************************/
+#define SetMaxThreadPriority() 0
+
+/****************************************************************************
+REMARKS:
+Do nothing for VDD's
+****************************************************************************/
+#define RestoreThreadPriority(i) (void)(i)
+
+/****************************************************************************
+REMARKS:
+Initialise the counter and return the frequency of the counter.
+****************************************************************************/
+static void GetCounterFrequency(
+ CPU_largeInteger *freq)
+{
+ freq->low = 100000;
+ freq->high = 0;
+}
+
+/****************************************************************************
+REMARKS:
+Read the counter and return the counter value.
+****************************************************************************/
+#define GetCounter(t) \
+{ \
+ ULONG count; \
+ count = VDHQuerySysValue(0, VDHGSV_MSECSBOOT); \
+ (t)->low = count * 100; \
+ (t)->high = 0; \
+}
diff --git a/board/MAI/bios_emulator/scitech/src/pm/vdd/fileio.c b/board/MAI/bios_emulator/scitech/src/pm/vdd/fileio.c
new file mode 100644
index 00000000000..dbbaf37dfa1
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/pm/vdd/fileio.c
@@ -0,0 +1,359 @@
+/****************************************************************************
+*
+* SciTech OS Portability Manager Library
+*
+* ========================================================================
+*
+* The contents of this file are subject to the SciTech MGL Public
+* License Version 1.0 (the "License"); you may not use this file
+* except in compliance with the License. You may obtain a copy of
+* the License at http://www.scitechsoft.com/mgl-license.txt
+*
+* Software distributed under the License is distributed on an
+* "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+* implied. See the License for the specific language governing
+* rights and limitations under the License.
+*
+* The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+*
+* The Initial Developer of the Original Code is SciTech Software, Inc.
+* All Rights Reserved.
+*
+* ========================================================================
+*
+* Language: ANSI C
+* Environment: 32-bit OS/2 VDD
+*
+* Description: C library compatible I/O functions for use within a VDD.
+*
+****************************************************************************/
+
+#include "pmapi.h"
+#include "vddfile.h"
+
+/*------------------------ Main Code Implementation -----------------------*/
+
+#define EOF -1
+
+/* NB: none of the file VDHs are available during the DOS session */
+/* initialzation context! */
+
+/* Macros for Open/Close APIs to allow using this module in both VDDs and */
+/* normal OS/2 applications. Unfortunately VDHRead/Write/Seek don't map to */
+/* their Dos* counterparts so cleanly. */
+#ifdef __OS2_VDD__
+#define _OS2Open VDHOpen
+#define _OS2Close VDHClose
+#else
+#define _OS2Open DosOpen
+#define _OS2Close DosClose
+#endif
+
+/****************************************************************************
+REMARKS:
+VDD implementation of the ANSI C fopen function.
+****************************************************************************/
+FILE * fopen(
+ const char *filename,
+ const char *mode)
+{
+ FILE *f = PM_malloc(sizeof(FILE));
+ long oldpos;
+ ULONG rc, ulAction;
+ ULONG omode, oflags;
+
+ if (f != NULL) {
+ f->offset = 0;
+ f->text = (mode[1] == 't' || mode[2] == 't');
+ f->writemode = (mode[0] == 'w') || (mode[0] == 'a');
+ f->unputc = EOF;
+ f->endp = f->buf + sizeof(f->buf);
+ f->curp = f->startp = f->buf;
+
+ if (mode[0] == 'r') {
+ #ifdef __OS2_VDD__
+ omode = VDHOPEN_ACCESS_READONLY | VDHOPEN_SHARE_DENYNONE;
+ oflags = VDHOPEN_ACTION_OPEN_IF_EXISTS | VDHOPEN_ACTION_FAIL_IF_NEW;
+ #else
+ omode = OPEN_ACCESS_READONLY | OPEN_SHARE_DENYNONE;
+ oflags = OPEN_ACTION_OPEN_IF_EXISTS | OPEN_ACTION_FAIL_IF_NEW;
+ #endif
+ }
+ else if (mode[0] == 'w') {
+ #ifdef __OS2_VDD__
+ omode = VDHOPEN_ACCESS_WRITEONLY | VDHOPEN_SHARE_DENYWRITE;
+ oflags = VDHOPEN_ACTION_REPLACE_IF_EXISTS | VDHOPEN_ACTION_CREATE_IF_NEW;
+ #else
+ omode = OPEN_ACCESS_WRITEONLY | OPEN_SHARE_DENYWRITE;
+ oflags = OPEN_ACTION_REPLACE_IF_EXISTS | OPEN_ACTION_CREATE_IF_NEW;
+ #endif
+ }
+ else {
+ #ifdef __OS2_VDD__
+ omode = VDHOPEN_ACCESS_READWRITE | VDHOPEN_SHARE_DENYWRITE;
+ oflags = VDHOPEN_ACTION_OPEN_IF_EXISTS | VDHOPEN_ACTION_CREATE_IF_NEW;
+ #else
+ omode = OPEN_ACCESS_READWRITE | OPEN_SHARE_DENYWRITE;
+ oflags = OPEN_ACTION_OPEN_IF_EXISTS | OPEN_ACTION_CREATE_IF_NEW;
+ #endif
+ }
+ rc = _OS2Open((PSZ)filename, (PHFILE)&f->handle, &ulAction, 0, VDHOPEN_FILE_NORMAL, oflags, omode, NULL);
+ if (rc != 0) {
+ PM_free(f);
+ return NULL;
+ }
+
+ #ifdef __OS2_VDD__
+ f->filesize = VDHSeek((HFILE)f->handle, 0, VDHSK_END_OF_FILE);
+ #else
+ rc = DosSetFilePtr((HFILE)f->handle, 0, FILE_END, &f->filesize);
+ #endif
+
+ if (mode[0] == 'a')
+ fseek(f,0,2);
+ }
+ return f;
+}
+
+/****************************************************************************
+REMARKS:
+VDD implementation of the ANSI C fread function. Note that unlike Windows VxDs,
+OS/2 VDDs are not limited to 64K reads or writes.
+****************************************************************************/
+size_t fread(
+ void *ptr,
+ size_t size,
+ size_t n,
+ FILE *f)
+{
+ char *buf = ptr;
+ int bytes,readbytes,totalbytes = 0;
+
+ /* First copy any data already read into our buffer */
+ if ((bytes = (f->curp - f->startp)) > 0) {
+ memcpy(buf,f->curp,bytes);
+ f->startp = f->curp = f->buf;
+ buf += bytes;
+ totalbytes += bytes;
+ bytes = (size * n) - bytes;
+ }
+ else
+ bytes = size * n;
+ if (bytes) {
+ #ifdef __OS2_VDD__
+ readbytes = VDHRead((HFILE)f->handle, buf, bytes);
+ #else
+ DosRead((HFILE)f->handle, buf, bytes, &readbytes);
+ #endif
+ totalbytes += readbytes;
+ f->offset += readbytes;
+ }
+ return totalbytes / size;
+}
+
+/****************************************************************************
+REMARKS:
+VDD implementation of the ANSI C fwrite function.
+****************************************************************************/
+size_t fwrite(
+ void *ptr,
+ size_t size,
+ size_t n,
+ FILE *f)
+{
+ char *buf = ptr;
+ int bytes,writtenbytes,totalbytes = 0;
+
+ /* Flush anything already in the buffer */
+ if (!f->writemode)
+ return 0;
+ fflush(f);
+ bytes = size * n;
+ #ifdef __OS2_VDD__
+ writtenbytes = VDHWrite((HFILE)f->handle, buf, bytes);
+ #else
+ DosWrite((HFILE)f->handle, buf, bytes, &writtenbytes);
+ #endif
+ totalbytes += writtenbytes;
+ f->offset += writtenbytes;
+ if (f->offset > f->filesize)
+ f->filesize = f->offset;
+ return totalbytes / size;
+}
+
+/****************************************************************************
+REMARKS:
+VxD implementation of the ANSI C fflush function.
+****************************************************************************/
+int fflush(
+ FILE *f)
+{
+ ULONG bytes;
+
+ /* First copy any data already written into our buffer */
+ if (f->writemode && (bytes = (f->curp - f->startp)) > 0) {
+ #ifdef __OS2_VDD__
+ bytes = VDHWrite((HFILE)f->handle, f->startp, bytes);
+ #else
+ DosWrite((HFILE)f->handle, f->startp, bytes, &bytes);
+ #endif
+ f->offset += bytes;
+ if (f->offset > f->filesize)
+ f->filesize = f->offset;
+ f->startp = f->curp = f->buf;
+ }
+ return 0;
+}
+
+/****************************************************************************
+REMARKS:
+VDD implementation of the ANSI C fseek function.
+****************************************************************************/
+int fseek(
+ FILE *f,
+ long int offset,
+ int whence)
+{
+ fflush(f);
+
+ if (whence == 0)
+ f->offset = offset;
+ else if (whence == 1)
+ f->offset += offset;
+ else if (whence == 2)
+ f->offset = f->filesize + offset;
+
+ #ifdef __OS2_VDD__
+ VDHSeek((HFILE)f->handle, f->offset, VDHSK_ABSOLUTE);
+ #else
+ DosSetFilePtr((HFILE)f->handle, f->offset, FILE_BEGIN, NULL);
+ #endif
+
+ return 0;
+}
+
+/****************************************************************************
+REMARKS:
+VDD implementation of the ANSI C ftell function.
+****************************************************************************/
+long ftell(
+ FILE *f)
+{
+ long offset;
+
+ offset = (f->curp - f->startp);
+ offset += f->offset;
+ return offset;
+}
+
+/****************************************************************************
+REMARKS:
+VDD implementation of the ANSI C feof function.
+****************************************************************************/
+int feof(
+ FILE *f)
+{
+ return (f->offset == f->filesize);
+}
+
+/****************************************************************************
+REMARKS:
+Read a single character from the input file buffer, including translation
+of the character in text transation modes.
+****************************************************************************/
+static int __getc(
+ FILE *f)
+{
+ int c;
+
+ if (f->unputc != EOF) {
+ c = f->unputc;
+ f->unputc = EOF;
+ }
+ else {
+ if (f->startp == f->curp) {
+ int bytes = fread(f->buf,1,sizeof(f->buf),f);
+ if (bytes == 0)
+ return EOF;
+ f->curp = f->startp + bytes;
+ }
+ c = *f->startp++;
+ if (f->text && c == '\r') {
+ int nc = __getc(f);
+ if (nc != '\n')
+ f->unputc = nc;
+ }
+ }
+ return c;
+}
+
+/****************************************************************************
+REMARKS:
+Write a single character from to input buffer, including translation of the
+character in text transation modes.
+****************************************************************************/
+static int __putc(int c,FILE *f)
+{
+ int count = 1;
+ if (f->text && c == '\n') {
+ __putc('\r',f);
+ count = 2;
+ }
+ if (f->curp == f->endp)
+ fflush(f);
+ *f->curp++ = c;
+ return count;
+}
+
+/****************************************************************************
+REMARKS:
+VxD implementation of the ANSI C fgets function.
+****************************************************************************/
+char *fgets(
+ char *s,
+ int n,
+ FILE *f)
+{
+ int c = 0;
+ char *cs;
+
+ cs = s;
+ while (--n > 0 && (c = __getc(f)) != EOF) {
+ *cs++ = c;
+ if (c == '\n')
+ break;
+ }
+ if (c == EOF && cs == s)
+ return NULL;
+ *cs = '\0';
+ return s;
+}
+
+/****************************************************************************
+REMARKS:
+VxD implementation of the ANSI C fputs function.
+****************************************************************************/
+int fputs(
+ const char *s,
+ FILE *f)
+{
+ int r = 0;
+ int c;
+
+ while ((c = *s++) != 0)
+ r = __putc(c, f);
+ return r;
+}
+
+/****************************************************************************
+REMARKS:
+VxD implementation of the ANSI C fclose function.
+****************************************************************************/
+int fclose(
+ FILE *f)
+{
+ fflush(f);
+ _OS2Close((HFILE)f->handle);
+ PM_free(f);
+ return 0;
+}
diff --git a/board/MAI/bios_emulator/scitech/src/pm/vdd/oshdr.h b/board/MAI/bios_emulator/scitech/src/pm/vdd/oshdr.h
new file mode 100644
index 00000000000..03286bdc2ee
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/pm/vdd/oshdr.h
@@ -0,0 +1,29 @@
+/****************************************************************************
+*
+* SciTech OS Portability Manager Library
+*
+* ========================================================================
+*
+* The contents of this file are subject to the SciTech MGL Public
+* License Version 1.0 (the "License"); you may not use this file
+* except in compliance with the License. You may obtain a copy of
+* the License at http://www.scitechsoft.com/mgl-license.txt
+*
+* Software distributed under the License is distributed on an
+* "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+* implied. See the License for the specific language governing
+* rights and limitations under the License.
+*
+* The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+*
+* The Initial Developer of the Original Code is SciTech Software, Inc.
+* All Rights Reserved.
+*
+* ========================================================================
+*
+* Language: ANSI C
+* Environment: 32-bit OS/2 VDD
+*
+* Description: Include file to include all OS specific header files.
+*
+****************************************************************************/
diff --git a/board/MAI/bios_emulator/scitech/src/pm/vdd/pm.c b/board/MAI/bios_emulator/scitech/src/pm/vdd/pm.c
new file mode 100644
index 00000000000..32177f810da
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/pm/vdd/pm.c
@@ -0,0 +1,1050 @@
+/****************************************************************************
+*
+* SciTech OS Portability Manager Library
+*
+* ========================================================================
+*
+* The contents of this file are subject to the SciTech MGL Public
+* License Version 1.0 (the "License"); you may not use this file
+* except in compliance with the License. You may obtain a copy of
+* the License at http://www.scitechsoft.com/mgl-license.txt
+*
+* Software distributed under the License is distributed on an
+* "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+* implied. See the License for the specific language governing
+* rights and limitations under the License.
+*
+* The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+*
+* The Initial Developer of the Original Code is SciTech Software, Inc.
+* All Rights Reserved.
+*
+* ========================================================================
+*
+* Language: ANSI C
+* Environment: 32-bit OS/2 VDD
+*
+* Description: Implementation for the OS Portability Manager Library, which
+* contains functions to implement OS specific services in a
+* generic, cross platform API. Porting the OS Portability
+* Manager library is the first step to porting any SciTech
+* products to a new platform.
+*
+****************************************************************************/
+
+#include "pmapi.h"
+#include "drvlib/os/os.h"
+#include "sdd/sddhelp.h"
+#include "mtrr.h"
+
+#define TRACE(a)
+
+/*--------------------------- Global variables ----------------------------*/
+
+#define MAX_MEMORY_SHARED 100
+#define MAX_MEMORY_MAPPINGS 100
+
+// TODO: I think the global and linear members will be the same, but not sure yet.
+typedef struct {
+ void *linear;
+ ulong global;
+ ulong length;
+ int npages;
+ } memshared;
+
+typedef struct {
+ ulong physical;
+ ulong linear;
+ ulong length;
+ int npages;
+ ibool isCached;
+ } mmapping;
+
+static int numMappings = 0;
+static memshared shared[MAX_MEMORY_MAPPINGS] = {0};
+static mmapping maps[MAX_MEMORY_MAPPINGS];
+ibool _PM_haveBIOS = TRUE;
+char _PM_cntPath[PM_MAX_PATH] = ""; /* there just isn't any */
+uchar *_PM_rmBufAddr = NULL;
+ushort _VARAPI PM_savedDS = 0; /* why can't I use the underscore prefix? */
+
+HVDHSEM hevFarCallRet = NULL;
+HVDHSEM hevIRet = NULL;
+HHOOK hhookUserReturnHook = NULL;
+HHOOK hhookUserIRetHook = NULL;
+
+static void (PMAPIP fatalErrorCleanup)(void) = NULL;
+
+/*----------------------------- Implementation ----------------------------*/
+
+/* Functions to read and write CMOS registers */
+
+ulong PMAPI _PM_getPDB(void);
+uchar PMAPI _PM_readCMOS(int index);
+void PMAPI _PM_writeCMOS(int index,uchar value);
+
+VOID HOOKENTRY UserReturnHook(PVOID pRefData, PCRF pcrf);
+VOID HOOKENTRY UserIRetHook(PVOID pRefData, PCRF pcrf);
+
+void PMAPI PM_init(void)
+{
+ MTRR_init();
+
+ // Initialize VDD-specific data
+ // Note: PM_init must be (obviously) called in VDM task context!
+ VDHCreateSem(&hevFarCallRet, VDH_EVENTSEM);
+ VDHCreateSem(&hevIRet, VDH_EVENTSEM);
+ hhookUserReturnHook = VDHAllocHook(VDH_RETURN_HOOK, (PFNARM)UserReturnHook, 0);
+ hhookUserIRetHook = VDHAllocHook(VDH_RETURN_HOOK, (PFNARM)UserIRetHook, 0);
+
+ if ((hevIRet == NULL) || (hevFarCallRet == NULL) ||
+ (hhookUserReturnHook == NULL) || (hhookUserIRetHook == NULL)) {
+ // something failed, we can't go on
+ // TODO: take some action here!
+ }
+}
+
+/* Do some cleaning up */
+void PMAPI PM_exit(void)
+{
+ /* Note: Hooks allocated during or after VDM creation are deallocated automatically */
+ if (hevIRet != NULL)
+ VDHDestroySem(hevIRet);
+
+ if (hevFarCallRet != NULL)
+ VDHDestroySem(hevFarCallRet);
+}
+
+ibool PMAPI PM_haveBIOSAccess(void)
+{ return _PM_haveBIOS; }
+
+long PMAPI PM_getOSType(void)
+{ return /*_OS_OS2VDD*/ _OS_OS2; } //FIX!!
+
+int PMAPI PM_getModeType(void)
+{ return PM_386; }
+
+void PMAPI PM_backslash(char *s)
+{
+ uint pos = strlen(s);
+ if (s[pos-1] != '\\') {
+ s[pos] = '\\';
+ s[pos+1] = '\0';
+ }
+}
+
+void PMAPI PM_setFatalErrorCleanup(
+ void (PMAPIP cleanup)(void))
+{
+ fatalErrorCleanup = cleanup;
+}
+
+void PMAPI PM_fatalError(const char *msg)
+{
+ if (fatalErrorCleanup)
+ fatalErrorCleanup();
+// Fatal_Error_Handler(msg,0); TODO: implement somehow!
+}
+
+/****************************************************************************
+PARAMETERS:
+len - Place to store the length of the buffer
+rseg - Place to store the real mode segment of the buffer
+roff - Place to store the real mode offset of the buffer
+
+REMARKS:
+This function returns the address and length of the global VESA transfer
+buffer.
+****************************************************************************/
+void * PMAPI PM_getVESABuf(
+ uint *len,
+ uint *rseg,
+ uint *roff)
+{
+ if (_PM_rmBufAddr) {
+ *len = 0; //VESA_BUF_SIZE;
+ *rseg = (ulong)(_PM_rmBufAddr) >> 4;
+ *roff = (ulong)(_PM_rmBufAddr) & 0xF;
+ return _PM_rmBufAddr;
+ }
+ return NULL;
+}
+
+int PMAPI PM_int386(int intno, PMREGS *in, PMREGS *out)
+{
+ /* Unused in VDDs */
+ return 0;
+}
+
+char * PMAPI PM_getCurrentPath(char *path,int maxLen)
+{
+ strncpy(path, _PM_cntPath, maxLen);
+ path[maxLen - 1] = 0;
+ return path;
+}
+
+char PMAPI PM_getBootDrive(void)
+{
+ ulong boot = 3;
+ boot = VDHQuerySysValue(0, VDHGSV_BOOTDRV);
+ return (char)('a' + boot - 1);
+}
+
+const char * PMAPI PM_getVBEAFPath(void)
+{
+ static char path[CCHMAXPATH];
+ strcpy(path,"x:\\");
+ path[0] = PM_getBootDrive();
+ return path;
+}
+
+const char * PMAPI PM_getNucleusPath(void)
+{
+ static char path[CCHMAXPATH];
+ strcpy(path,"x:\\os2\\drivers");
+ path[0] = PM_getBootDrive();
+ PM_backslash(path);
+ strcat(path,"nucleus");
+ return path;
+}
+
+const char * PMAPI PM_getNucleusConfigPath(void)
+{
+ static char path[256];
+ strcpy(path,PM_getNucleusPath());
+ PM_backslash(path);
+ strcat(path,"config");
+ return path;
+}
+
+const char * PMAPI PM_getUniqueID(void)
+{ return PM_getMachineName(); }
+
+const char * PMAPI PM_getMachineName(void)
+{
+ return "Unknown";
+}
+
+int PMAPI PM_kbhit(void)
+{ return 1; }
+
+int PMAPI PM_getch(void)
+{ return 0; }
+
+PM_HWND PMAPI PM_openConsole(PM_HWND hwndUser,int device,int xRes,int yRes,int bpp,ibool fullScreen)
+{
+ /* Unused in VDDs */
+ return NULL;
+}
+
+int PMAPI PM_getConsoleStateSize(void)
+{
+ /* Unused in VDDs */
+ return 1;
+}
+
+void PMAPI PM_saveConsoleState(void *stateBuf,PM_HWND hwndConsole)
+{
+ /* Unused in VDDs */
+}
+
+void PMAPI PM_setSuspendAppCallback(int (_ASMAPIP saveState)(int flags))
+{
+ /* Unused in VDDs */
+}
+
+void PMAPI PM_restoreConsoleState(const void *stateBuf,PM_HWND hwndConsole)
+{
+ /* Unused in VDDs */
+}
+
+void PMAPI PM_closeConsole(PM_HWND hwndConsole)
+{
+ /* Unused in VDDs */
+}
+
+void PMAPI PM_setOSCursorLocation(int x,int y)
+{
+ uchar *_biosPtr = PM_getBIOSPointer();
+ PM_setByte(_biosPtr+0x50,x);
+ PM_setByte(_biosPtr+0x51,y);
+}
+
+void PMAPI PM_setOSScreenWidth(int width,int height)
+{
+ uchar *_biosPtr = PM_getBIOSPointer();
+ PM_setByte(_biosPtr+0x4A,width);
+ PM_setByte(_biosPtr+0x84,height-1);
+}
+
+/****************************************************************************
+REMARKS:
+Allocate a block of shared memory. For OS/2 VDD we allocate shared memory
+as locked, global memory that is accessible from any memory context
+(including interrupt time context), which allows us to load our important
+data structure and code such that we can access it directly from a ring
+0 interrupt context.
+****************************************************************************/
+void * PMAPI PM_mallocShared(long size)
+{
+ ULONG nPages = (size + 0xFFF) >> 12;
+ int i;
+
+ /* First find a free slot in our shared memory table */
+ for (i = 0; i < MAX_MEMORY_SHARED; i++) {
+ if (shared[i].linear == 0)
+ break;
+ }
+ if (i < MAX_MEMORY_SHARED) {
+ shared[i].linear = VDHAllocPages(NULL, nPages, VDHAP_SYSTEM | VDHAP_FIXED);
+ shared[i].npages = nPages;
+ shared[i].global = (ULONG)shared[i].linear;
+ return (void*)shared[i].global;
+ }
+ return NULL;
+}
+
+/****************************************************************************
+REMARKS:
+Free a block of shared memory
+****************************************************************************/
+void PMAPI PM_freeShared(void *p)
+{
+ int i;
+
+ /* Find a shared memory block in our table and free it */
+ for (i = 0; i < MAX_MEMORY_SHARED; i++) {
+ if (shared[i].global == (ulong)p) {
+ VDHFreePages(shared[i].linear);
+ shared[i].linear = 0;
+ break;
+ }
+ }
+}
+
+void * PMAPI PM_mapToProcess(void *base,ulong limit)
+{ return (void*)base; }
+
+ibool PMAPI PM_doBIOSPOST(
+ ushort axVal,
+ ulong BIOSPhysAddr,
+ void *mappedBIOS,
+ ulong BIOSLen)
+{
+ // TODO: Figure out how to do this
+ return false;
+}
+
+void * PMAPI PM_getBIOSPointer(void)
+{ return (void*)0x400; }
+
+void * PMAPI PM_getA0000Pointer(void)
+{ return PM_mapPhysicalAddr(0xA0000,0xFFFF,true); }
+
+/****************************************************************************
+PARAMETERS:
+base - Physical base address of the memory to maps in
+limit - Limit of physical memory to region to maps in
+
+RETURNS:
+Linear address of the newly mapped memory.
+
+REMARKS:
+Maps a physical memory range to a linear memory range.
+****************************************************************************/
+ulong MapPhysicalToLinear(
+ ulong base,
+ ulong limit,
+ int *npages)
+{
+ ulong linear,length = limit+1;
+ int i,ppage,flags;
+#if 0
+ ppage = base >> 12;
+ *npages = (length + (base & 0xFFF) + 4095) >> 12;
+ flags = PR_FIXED | PR_STATIC;
+ if (base == 0xA0000) {
+ /* We require the linear address to be aligned to a 64Kb boundary
+ * for mapping the banked framebuffer (so we can do efficient
+ * carry checking for bank changes in the assembler code). The only
+ * way to ensure this is to force the linear address to be aligned
+ * to a 4Mb boundary.
+ */
+ flags |= PR_4MEG;
+ }
+ if ((linear = (ulong)PageReserve(PR_SYSTEM,*npages,flags)) == (ulong)-1)
+ return 0;
+ if (!PageCommitPhys(linear >> 12,*npages,ppage,PC_INCR | PC_USER | PC_WRITEABLE))
+ return 0;
+#endif
+ return linear + (base & 0xFFF);
+}
+
+/****************************************************************************
+PARAMETERS:
+base - Physical base address of the memory to map in
+limit - Limit of physical memory to region to map in
+isCached - True if the memory should be cached, false if not
+
+RETURNS:
+Linear address of the newly mapped memory.
+
+REMARKS:
+This function maps physical memory to linear memory, which can then be used
+to create a selector or used directly from 32-bit protected mode programs.
+This is better than DPMI 0x800, since it allows you to maps physical
+memory below 1Mb, which gets this memory out of the way of the Windows VxD's
+sticky paws.
+
+NOTE: If the memory is not expected to be cached, this function will
+ directly re-program the PCD (Page Cache Disable) bit in the
+ page tables. There does not appear to be a mechanism in the VMM
+ to control this bit via the regular interface.
+****************************************************************************/
+void * PMAPI PM_mapPhysicalAddr(
+ ulong base,
+ ulong limit,
+ ibool isCached)
+{
+ ulong linear,length = limit+1;
+ int i,npages;
+ ulong PDB,*pPDB;
+
+ /* Search table of existing mappings to see if we have already mapped
+ * a region of memory that will serve this purpose.
+ */
+ for (i = 0; i < numMappings; i++) {
+ if (maps[i].physical == base && maps[i].length == length && maps[i].isCached == isCached)
+ return (void*)maps[i].linear;
+ }
+ if (numMappings == MAX_MEMORY_MAPPINGS)
+ return NULL;
+
+ /* We did not find any previously mapped memory region, so map it in.
+ * Note that we do not use MapPhysToLinear, since this function appears
+ * to have problems mapping memory in the 1Mb physical address space.
+ * Hence we use PageReserve and PageCommitPhys.
+ */
+ if ((linear = MapPhysicalToLinear(base,limit,&npages)) == 0)
+ return NULL;
+ maps[numMappings].physical = base;
+ maps[numMappings].length = length;
+ maps[numMappings].linear = linear;
+ maps[numMappings].npages = npages;
+ maps[numMappings].isCached = isCached;
+ numMappings++;
+
+#if 0
+ /* Finally disable caching where necessary */
+ if (!isCached && (PDB = _PM_getPDB()) != 0) {
+ int startPDB,endPDB,iPDB,startPage,endPage,start,end,iPage;
+ ulong pageTable,*pPageTable;
+
+ if (PDB >= 0x100000)
+ pPDB = (ulong*)MapPhysicalToLinear(PDB,0xFFF,&npages);
+ else
+ pPDB = (ulong*)PDB;
+ if (pPDB) {
+ startPDB = (linear >> 22) & 0x3FF;
+ startPage = (linear >> 12) & 0x3FF;
+ endPDB = ((linear+limit) >> 22) & 0x3FF;
+ endPage = ((linear+limit) >> 12) & 0x3FF;
+ for (iPDB = startPDB; iPDB <= endPDB; iPDB++) {
+ pageTable = pPDB[iPDB] & ~0xFFF;
+ if (pageTable >= 0x100000)
+ pPageTable = (ulong*)MapPhysicalToLinear(pageTable,0xFFF,&npages);
+ else
+ pPageTable = (ulong*)pageTable;
+ start = (iPDB == startPDB) ? startPage : 0;
+ end = (iPDB == endPDB) ? endPage : 0x3FF;
+ for (iPage = start; iPage <= end; iPage++)
+ pPageTable[iPage] |= 0x10;
+ PageFree((ulong)pPageTable,PR_STATIC);
+ }
+ PageFree((ulong)pPDB,PR_STATIC);
+ }
+ }
+#endif
+ return (void*)linear;
+}
+
+void PMAPI PM_freePhysicalAddr(void *ptr,ulong limit)
+{
+ /* We never free the mappings */
+}
+
+void PMAPI PM_sleep(ulong milliseconds)
+{
+ /* We never sleep in a VDD */
+}
+
+int PMAPI PM_getCOMPort(int port)
+{
+ // TODO: Re-code this to determine real values using the Plug and Play
+ // manager for the OS.
+ switch (port) {
+ case 0: return 0x3F8;
+ case 1: return 0x2F8;
+ }
+ return 0;
+}
+
+int PMAPI PM_getLPTPort(int port)
+{
+ // TODO: Re-code this to determine real values using the Plug and Play
+ // manager for the OS.
+ switch (port) {
+ case 0: return 0x3BC;
+ case 1: return 0x378;
+ case 2: return 0x278;
+ }
+ return 0;
+}
+
+ulong PMAPI PM_getPhysicalAddr(void *p)
+{
+ // TODO: This function should find the physical address of a linear
+ // address.
+ return 0xFFFFFFFFUL;
+}
+
+void PMAPI _PM_freeMemoryMappings(void)
+{
+ int i;
+// for (i = 0; i < numMappings; i++)
+// PageFree(maps[i].linear,PR_STATIC);
+}
+
+void * PMAPI PM_mapRealPointer(uint r_seg,uint r_off)
+{ return (void*)MK_PHYS(r_seg,r_off); }
+
+void * PMAPI PM_allocRealSeg(uint size,uint *r_seg,uint *r_off)
+{ return NULL; }
+
+void PMAPI PM_freeRealSeg(void *mem)
+{ }
+
+void PMAPI DPMI_int86(int intno, DPMI_regs *regs)
+{
+ /* Unsed in VDDs */
+}
+
+/****************************************************************************
+REMARKS:
+Load the V86 registers in the client state, and save the original state
+before loading the registers.
+****************************************************************************/
+static void LoadV86Registers(
+ PCRF saveRegs,
+ RMREGS *in,
+ RMSREGS *sregs)
+{
+ PCRF pcrf; // current client register frame
+
+ // get pointer to registers
+ pcrf = (PCRF)VDHQuerySysValue(CURRENT_VDM, VDHLSV_PCRF);
+
+ // Note: We could do VDHPushRegs instead but this should be safer as it
+ // doesn't rely on the VDM session having enough free stack space.
+ *saveRegs = *pcrf; // save all registers
+
+ pcrf->crf_eax = in->e.eax; // load new values
+ pcrf->crf_ebx = in->e.ebx;
+ pcrf->crf_ecx = in->e.ecx;
+ pcrf->crf_edx = in->e.edx;
+ pcrf->crf_esi = in->e.esi;
+ pcrf->crf_edi = in->e.edi;
+ pcrf->crf_es = sregs->es;
+ pcrf->crf_ds = sregs->ds;
+
+}
+
+/****************************************************************************
+REMARKS:
+Read the V86 registers from the client state and restore the original state.
+****************************************************************************/
+static void ReadV86Registers(
+ PCRF saveRegs,
+ RMREGS *out,
+ RMSREGS *sregs)
+{
+ PCRF pcrf; // current client register frame
+
+ // get pointer to registers
+ pcrf = (PCRF)VDHQuerySysValue(CURRENT_VDM, VDHLSV_PCRF);
+
+ // read new register values
+ out->e.eax = pcrf->crf_eax;
+ out->e.ebx = pcrf->crf_ebx;
+ out->e.ecx = pcrf->crf_ecx;
+ out->e.edx = pcrf->crf_edx;
+ out->e.esi = pcrf->crf_esi;
+ out->e.edi = pcrf->crf_edi;
+ sregs->es = pcrf->crf_es;
+ sregs->ds = pcrf->crf_ds;
+
+ // restore original client registers
+ *pcrf = *saveRegs;
+}
+
+/****************************************************************************
+REMARKS: Used for far calls into V86 code
+****************************************************************************/
+VOID HOOKENTRY UserReturnHook(
+ PVOID pRefData,
+ PCRF pcrf )
+{
+ VDHPostEventSem(hevFarCallRet);
+}
+
+/****************************************************************************
+REMARKS: Used for calling BIOS interrupts
+****************************************************************************/
+VOID HOOKENTRY UserIRetHook(
+ PVOID pRefData,
+ PCRF pcrf )
+{
+ VDHPostEventSem(hevIRet);
+}
+
+/****************************************************************************
+REMARKS:
+Call a V86 real mode function with the specified register values
+loaded before the call. The call returns with a far ret.
+Must be called from within a DOS session context!
+****************************************************************************/
+void PMAPI PM_callRealMode(
+ uint seg,
+ uint off,
+ RMREGS *regs,
+ RMSREGS *sregs)
+{
+ CRF saveRegs;
+ FPFN fnAddress;
+ ULONG rc;
+
+ TRACE("SDDHELP: Entering PM_callRealMode()\n");
+ LoadV86Registers(SSToDS(&saveRegs),regs,sregs);
+
+ // set up return hook for call
+ rc = VDHArmReturnHook(hhookUserReturnHook, VDHARH_CSEIP_HOOK);
+
+ VDHResetEventSem(hevFarCallRet);
+
+ // the address is a 16:32 pointer
+ OFFSETOF32(fnAddress) = off;
+ SEGMENTOF32(fnAddress) = seg;
+ rc = VDHPushFarCall(fnAddress);
+ VDHYield(0);
+
+ // wait until the V86 call returns - our return hook posts the semaphore
+ rc = VDHWaitEventSem(hevFarCallRet, SEM_INDEFINITE_WAIT);
+
+ ReadV86Registers(SSToDS(&saveRegs),regs,sregs);
+ TRACE("SDDHELP: Exiting PM_callRealMode()\n");
+}
+
+/****************************************************************************
+REMARKS:
+Issue a V86 real mode interrupt with the specified register values
+loaded before the interrupt.
+Must be called from within a DOS session context!
+****************************************************************************/
+int PMAPI PM_int86(
+ int intno,
+ RMREGS *in,
+ RMREGS *out)
+{
+ RMSREGS sregs = {0};
+ CRF saveRegs;
+ ushort oldDisable;
+ ULONG rc;
+
+ memset(SSToDS(&sregs), 0, sizeof(sregs));
+
+#if 0 // do we need this??
+ /* Disable pass-up to our VDD handler so we directly call BIOS */
+ TRACE("SDDHELP: Entering PM_int86()\n");
+ if (disableTSRFlag) {
+ oldDisable = *disableTSRFlag;
+ *disableTSRFlag = 0;
+ }
+#endif
+
+ LoadV86Registers(SSToDS(&saveRegs), in, SSToDS(&sregs));
+
+ VDHResetEventSem(hevIRet);
+ rc = VDHPushInt(intno);
+
+ // set up return hook for interrupt
+ rc = VDHArmReturnHook(hhookUserIRetHook, VDHARH_NORMAL_IRET);
+
+ VDHYield(0);
+
+ // wait until the V86 IRETs - our return hook posts the semaphore
+ rc = VDHWaitEventSem(hevIRet, 5000); //SEM_INDEFINITE_WAIT);
+
+ ReadV86Registers(SSToDS(&saveRegs), out, SSToDS(&sregs));
+
+#if 0
+ /* Re-enable pass-up to our VDD handler if previously enabled */
+ if (disableTSRFlag)
+ *disableTSRFlag = oldDisable;
+#endif
+
+ TRACE("SDDHELP: Exiting PM_int86()\n");
+ return out->x.ax;
+
+}
+
+/****************************************************************************
+REMARKS:
+Issue a V86 real mode interrupt with the specified register values
+loaded before the interrupt.
+****************************************************************************/
+int PMAPI PM_int86x(
+ int intno,
+ RMREGS *in,
+ RMREGS *out,
+ RMSREGS *sregs)
+{
+ CRF saveRegs;
+ ushort oldDisable;
+ ULONG rc;
+
+#if 0
+ /* Disable pass-up to our VxD handler so we directly call BIOS */
+ TRACE("SDDHELP: Entering PM_int86x()\n");
+ if (disableTSRFlag) {
+ oldDisable = *disableTSRFlag;
+ *disableTSRFlag = 0;
+ }
+#endif
+ LoadV86Registers(SSToDS(&saveRegs), in, sregs);
+
+ VDHResetEventSem(hevIRet);
+ rc = VDHPushInt(intno);
+
+ // set up return hook for interrupt
+ rc = VDHArmReturnHook(hhookUserIRetHook, VDHARH_NORMAL_IRET);
+
+ VDHYield(0);
+
+ // wait until the V86 IRETs - our return hook posts the semaphore
+ rc = VDHWaitEventSem(hevIRet, 5000); //SEM_INDEFINITE_WAIT);
+
+ ReadV86Registers(SSToDS(&saveRegs), out, sregs);
+
+#if 0
+ /* Re-enable pass-up to our VxD handler if previously enabled */
+ if (disableTSRFlag)
+ *disableTSRFlag = oldDisable;
+#endif
+
+ TRACE("SDDHELP: Exiting PM_int86x()\n");
+ return out->x.ax;
+}
+
+void PMAPI PM_availableMemory(ulong *physical,ulong *total)
+{ *physical = *total = 0; }
+
+/****************************************************************************
+REMARKS:
+Allocates a block of locked physical memory.
+****************************************************************************/
+void * PMAPI PM_allocLockedMem(
+ uint size,
+ ulong *physAddr,
+ ibool contiguous,
+ ibool below16M)
+{
+ ULONG flags = VDHAP_SYSTEM;
+ ULONG nPages = (size + 0xFFF) >> 12;
+
+ flags |= (physAddr != NULL) ? VDHAP_PHYSICAL : VDHAP_FIXED;
+
+ return VDHAllocPages(physAddr, nPages, VDHAP_SYSTEM | VDHAP_PHYSICAL);
+}
+
+/****************************************************************************
+REMARKS:
+Frees a block of locked physical memory.
+****************************************************************************/
+void PMAPI PM_freeLockedMem(
+ void *p,
+ uint size,
+ ibool contiguous)
+{
+ if (p)
+ VDHFreePages((PVOID)p);
+}
+
+/****************************************************************************
+REMARKS:
+Lock linear memory so it won't be paged.
+****************************************************************************/
+int PMAPI PM_lockDataPages(void *p,uint len,PM_lockHandle *lh)
+{
+ ULONG lockHandle;
+
+ // TODO: the lock handle is essential for the unlock operation!!
+ lockHandle = VDHLockMem(p, len, 0, (PVOID)VDHLM_NO_ADDR, NULL);
+
+ if (lockHandle != NULL)
+ return 0;
+ else
+ return 1;
+}
+
+/****************************************************************************
+REMARKS:
+Unlock linear memory so it won't be paged.
+****************************************************************************/
+int PMAPI PM_unlockDataPages(void *p,uint len,PM_lockHandle *lh)
+{
+ // TODO: implement - use a table of lock handles?
+ // VDHUnlockPages(lockHandle);
+ return 0;
+}
+
+/****************************************************************************
+REMARKS:
+Lock linear memory so it won't be paged.
+****************************************************************************/
+int PMAPI PM_lockCodePages(void (*p)(),uint len,PM_lockHandle *lh)
+{
+ return PM_lockDataPages((void*)p,len,lh);
+}
+
+/****************************************************************************
+REMARKS:
+Unlock linear memory so it won't be paged.
+****************************************************************************/
+int PMAPI PM_unlockCodePages(void (*p)(),uint len,PM_lockHandle *lh)
+{
+ return PM_unlockDataPages((void*)p,len,lh);
+}
+
+/****************************************************************************
+REMARKS:
+OS specific shared libraries not supported inside a VDD
+****************************************************************************/
+PM_MODULE PMAPI PM_loadLibrary(
+ const char *szDLLName)
+{
+ (void)szDLLName;
+ return NULL;
+}
+
+/****************************************************************************
+REMARKS:
+OS specific shared libraries not supported inside a VDD
+****************************************************************************/
+void * PMAPI PM_getProcAddress(
+ PM_MODULE hModule,
+ const char *szProcName)
+{
+ (void)hModule;
+ (void)szProcName;
+ return NULL;
+}
+
+/****************************************************************************
+REMARKS:
+OS specific shared libraries not supported inside a VDD
+****************************************************************************/
+void PMAPI PM_freeLibrary(
+ PM_MODULE hModule)
+{
+ (void)hModule;
+}
+
+/****************************************************************************
+REMARKS:
+Function to find the first file matching a search criteria in a directory.
+****************************************************************************/
+void *PMAPI PM_findFirstFile(
+ const char *filename,
+ PM_findData *findData)
+{
+ // TODO: This function should start a directory enumeration search
+ // given the filename (with wildcards). The data should be
+ // converted and returned in the findData standard form.
+ (void)filename;
+ (void)findData;
+ return PM_FILE_INVALID;
+}
+
+/****************************************************************************
+REMARKS:
+Function to find the next file matching a search criteria in a directory.
+****************************************************************************/
+ibool PMAPI PM_findNextFile(
+ void *handle,
+ PM_findData *findData)
+{
+ // TODO: This function should find the next file in directory enumeration
+ // search given the search criteria defined in the call to
+ // PM_findFirstFile. The data should be converted and returned
+ // in the findData standard form.
+ (void)handle;
+ (void)findData;
+ return false;
+}
+
+/****************************************************************************
+REMARKS:
+Function to close the find process
+****************************************************************************/
+void PMAPI PM_findClose(
+ void *handle)
+{
+ // TODO: This function should close the find process. This may do
+ // nothing for some OS'es.
+ (void)handle;
+}
+
+/****************************************************************************
+REMARKS:
+Function to determine if a drive is a valid drive or not. Under Unix this
+function will return false for anything except a value of 3 (considered
+the root drive, and equivalent to C: for non-Unix systems). The drive
+numbering is:
+
+ 1 - Drive A:
+ 2 - Drive B:
+ 3 - Drive C:
+ etc
+
+****************************************************************************/
+ibool PMAPI PM_driveValid(
+ char drive)
+{
+ // Not applicable in a VDD
+ (void)drive;
+ return false;
+}
+
+/****************************************************************************
+REMARKS:
+Function to get the current working directory for the specififed drive.
+Under Unix this will always return the current working directory regardless
+of what the value of 'drive' is.
+****************************************************************************/
+void PMAPI PM_getdcwd(
+ int drive,
+ char *dir,
+ int len)
+{
+ // Not applicable in a VDD
+ (void)drive;
+ (void)dir;
+ (void)len;
+}
+
+/****************************************************************************
+PARAMETERS:
+base - The starting physical base address of the region
+size - The size in bytes of the region
+type - Type to place into the MTRR register
+
+RETURNS:
+Error code describing the result.
+
+REMARKS:
+Function to enable write combining for the specified region of memory.
+****************************************************************************/
+int PMAPI PM_enableWriteCombine(
+ ulong base,
+ ulong size,
+ uint type)
+{
+ return MTRR_enableWriteCombine(base,size,type);
+}
+
+/****************************************************************************
+REMARKS:
+Function to change the file attributes for a specific file.
+****************************************************************************/
+void PMAPI PM_setFileAttr(
+ const char *filename,
+ uint attrib)
+{
+ // TODO: Implement this ?
+ (void)filename;
+ (void)attrib;
+ PM_fatalError("PM_setFileAttr not implemented!");
+}
+
+/****************************************************************************
+REMARKS:
+Function to get the file attributes for a specific file.
+****************************************************************************/
+uint PMAPI PM_getFileAttr(
+ const char *filename)
+{
+ // TODO: Implement this ?
+ (void)filename;
+ PM_fatalError("PM_getFileAttr not implemented!");
+ return 0;
+}
+
+/****************************************************************************
+REMARKS:
+Function to create a directory.
+****************************************************************************/
+ibool PMAPI PM_mkdir(
+ const char *filename)
+{
+ // TODO: Implement this ?
+ (void)filename;
+ PM_fatalError("PM_mkdir not implemented!");
+ return false;
+}
+
+/****************************************************************************
+REMARKS:
+Function to remove a directory.
+****************************************************************************/
+ibool PMAPI PM_rmdir(
+ const char *filename)
+{
+ // TODO: Implement this ?
+ (void)filename;
+ PM_fatalError("PM_rmdir not implemented!");
+ return false;
+}
+
+/****************************************************************************
+REMARKS:
+Function to get the file time and date for a specific file.
+****************************************************************************/
+ibool PMAPI PM_getFileTime(
+ const char *filename,
+ ibool gmTime,
+ PM_time *time)
+{
+ // TODO: Implement this ?
+ (void)filename;
+ (void)gmTime;
+ (void)time;
+ PM_fatalError("PM_getFileTime not implemented!");
+ return false;
+}
+
+/****************************************************************************
+REMARKS:
+Function to set the file time and date for a specific file.
+****************************************************************************/
+ibool PMAPI PM_setFileTime(
+ const char *filename,
+ ibool gmTime,
+ PM_time *time)
+{
+ // TODO: Implement this ?
+ (void)filename;
+ (void)gmTime;
+ (void)time;
+ PM_fatalError("PM_setFileTime not implemented!");
+ return false;
+}
diff --git a/board/MAI/bios_emulator/scitech/src/pm/vdd/vflat.c b/board/MAI/bios_emulator/scitech/src/pm/vdd/vflat.c
new file mode 100644
index 00000000000..10c63e3405f
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/pm/vdd/vflat.c
@@ -0,0 +1,45 @@
+/****************************************************************************
+*
+* SciTech OS Portability Manager Library
+*
+* ========================================================================
+*
+* The contents of this file are subject to the SciTech MGL Public
+* License Version 1.0 (the "License"); you may not use this file
+* except in compliance with the License. You may obtain a copy of
+* the License at http://www.scitechsoft.com/mgl-license.txt
+*
+* Software distributed under the License is distributed on an
+* "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+* implied. See the License for the specific language governing
+* rights and limitations under the License.
+*
+* The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+*
+* The Initial Developer of the Original Code is SciTech Software, Inc.
+* All Rights Reserved.
+*
+* ========================================================================
+*
+* Language: ANSI C
+* Environment: Any
+*
+* Description: Dummy module; no virtual framebuffer for this OS
+*
+****************************************************************************/
+
+#include "pmapi.h"
+
+ibool PMAPI VF_available(void)
+{
+ return false;
+}
+
+void * PMAPI VF_init(ulong baseAddr,int bankSize,int codeLen,void *bankFunc)
+{
+ return NULL;
+}
+
+void PMAPI VF_exit(void)
+{
+}
diff --git a/board/MAI/bios_emulator/scitech/src/pm/vdd/ztimer.c b/board/MAI/bios_emulator/scitech/src/pm/vdd/ztimer.c
new file mode 100644
index 00000000000..631f6558ee4
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/pm/vdd/ztimer.c
@@ -0,0 +1,103 @@
+/****************************************************************************
+*
+* Ultra Long Period Timer
+*
+* ========================================================================
+*
+* The contents of this file are subject to the SciTech MGL Public
+* License Version 1.0 (the "License"); you may not use this file
+* except in compliance with the License. You may obtain a copy of
+* the License at http://www.scitechsoft.com/mgl-license.txt
+*
+* Software distributed under the License is distributed on an
+* "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+* implied. See the License for the specific language governing
+* rights and limitations under the License.
+*
+* The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+*
+* The Initial Developer of the Original Code is SciTech Software, Inc.
+* All Rights Reserved.
+*
+* ========================================================================
+*
+* Language: ANSI C
+* Environment: 32-bit OS/2 VDD
+*
+* Description: OS specific implementation for the Zen Timer functions.
+*
+****************************************************************************/
+
+/*---------------------------- Global variables ---------------------------*/
+
+static ulong frequency = 1193180;
+
+/*----------------------------- Implementation ----------------------------*/
+
+/****************************************************************************
+REMARKS:
+Initialise the Zen Timer module internals.
+****************************************************************************/
+#define __ZTimerInit()
+
+/****************************************************************************
+REMARKS:
+Call the assembler Zen Timer functions to do the timing.
+****************************************************************************/
+#define __LZTimerOn(tm) VTD_Get_Real_Time(&tm->start.high,&tm->start.low)
+
+/****************************************************************************
+REMARKS:
+Call the assembler Zen Timer functions to do the timing.
+****************************************************************************/
+static ulong __LZTimerLap(
+ LZTimerObject *tm)
+{
+ CPU_largeInteger lap,count;
+ VTD_Get_Real_Time(&lap.high,&lap.low);
+ _CPU_diffTime64(&tm->start,&lap,&count);
+ return _CPU_calcMicroSec(&count,frequency);
+}
+
+/****************************************************************************
+REMARKS:
+Call the assembler Zen Timer functions to do the timing.
+****************************************************************************/
+#define __LZTimerOff(tm) VTD_Get_Real_Time(&tm->end.high,&tm->end.low)
+
+/****************************************************************************
+REMARKS:
+Call the assembler Zen Timer functions to do the timing.
+****************************************************************************/
+static ulong __LZTimerCount(
+ LZTimerObject *tm)
+{
+ CPU_largeInteger tmCount;
+ _CPU_diffTime64(&tm->start,&tm->end,&tmCount);
+ return _CPU_calcMicroSec(&tmCount,frequency);
+}
+
+/****************************************************************************
+REMARKS:
+Define the resolution of the long period timer as microseconds per timer tick.
+****************************************************************************/
+#define ULZTIMER_RESOLUTION 1000
+
+/****************************************************************************
+REMARKS:
+Read the Long Period timer value from the BIOS timer tick.
+****************************************************************************/
+static ulong __ULZReadTime(void)
+{
+ return VDHQuerySysValue(0, VDHGSV_MSECSBOOT);
+}
+
+/****************************************************************************
+REMARKS:
+Compute the elapsed time from the BIOS timer tick. Note that we check to see
+whether a midnight boundary has passed, and if so adjust the finish time to
+account for this. We cannot detect if more that one midnight boundary has
+passed, so if this happens we will be generating erronous results.
+****************************************************************************/
+ulong __ULZElapsedTime(ulong start,ulong finish)
+{ return finish - start; }
diff --git a/board/MAI/bios_emulator/scitech/src/pm/vxd/_pm.asm b/board/MAI/bios_emulator/scitech/src/pm/vxd/_pm.asm
new file mode 100644
index 00000000000..64a7cecb2dc
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/pm/vxd/_pm.asm
@@ -0,0 +1,299 @@
+;****************************************************************************
+;*
+;* SciTech OS Portability Manager Library
+;*
+;* ========================================================================
+;*
+;* The contents of this file are subject to the SciTech MGL Public
+;* License Version 1.0 (the "License"); you may not use this file
+;* except in compliance with the License. You may obtain a copy of
+;* the License at http://www.scitechsoft.com/mgl-license.txt
+;*
+;* Software distributed under the License is distributed on an
+;* "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+;* implied. See the License for the specific language governing
+;* rights and limitations under the License.
+;*
+;* The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+;*
+;* The Initial Developer of the Original Code is SciTech Software, Inc.
+;* All Rights Reserved.
+;*
+;* ========================================================================
+;*
+;* Language: 80386 Assembler, TASM 4.0 or NASM
+;* Environment: 32-bit Windows VxD
+;*
+;* Description: Low level assembly support for the PM library specific to
+;* Windows VxDs.
+;*
+;****************************************************************************
+
+ IDEAL
+
+include "scitech.mac" ; Memory model macros
+
+header _pm ; Set up memory model
+
+begdataseg _pm
+
+ cextern _PM_savedDS,USHORT
+
+enddataseg _pm
+
+P586
+
+begcodeseg _pm ; Start of code segment
+
+;----------------------------------------------------------------------------
+; void PM_segread(PMSREGS *sregs)
+;----------------------------------------------------------------------------
+; Read the current value of all segment registers
+;----------------------------------------------------------------------------
+cprocstart PM_segread
+
+ ARG sregs:DPTR
+
+ enter_c
+
+ mov ax,es
+ _les _si,[sregs]
+ mov [_ES _si],ax
+ mov [_ES _si+2],cs
+ mov [_ES _si+4],ss
+ mov [_ES _si+6],ds
+ mov [_ES _si+8],fs
+ mov [_ES _si+10],gs
+
+ leave_c
+ ret
+
+cprocend
+
+;----------------------------------------------------------------------------
+; int PM_int386x(int intno, PMREGS *in, PMREGS *out,PMSREGS *sregs)
+;----------------------------------------------------------------------------
+; Issues a software interrupt in protected mode. This routine has been
+; written to allow user programs to load CS and DS with different values
+; other than the default.
+;----------------------------------------------------------------------------
+cprocstart PM_int386x
+
+; Not used for VxDs
+
+ ret
+
+cprocend
+
+;----------------------------------------------------------------------------
+; void PM_saveDS(void)
+;----------------------------------------------------------------------------
+; Save the value of DS into a section of the code segment, so that we can
+; quickly load this value at a later date in the PM_loadDS() routine from
+; inside interrupt handlers etc. The method to do this is different
+; depending on the DOS extender being used.
+;----------------------------------------------------------------------------
+cprocstart PM_saveDS
+
+ mov [_PM_savedDS],ds ; Store away in data segment
+ ret
+
+cprocend
+
+;----------------------------------------------------------------------------
+; void PM_loadDS(void)
+;----------------------------------------------------------------------------
+; Routine to load the DS register with the default value for the current
+; DOS extender. Only the DS register is loaded, not the ES register, so
+; if you wish to call C code, you will need to also load the ES register
+; in 32 bit protected mode.
+;----------------------------------------------------------------------------
+cprocstart PM_loadDS
+
+ mov ds,[cs:_PM_savedDS] ; We can access the proper DS through CS
+ ret
+
+cprocend
+
+;----------------------------------------------------------------------------
+; void PM_setBankA(int bank)
+;----------------------------------------------------------------------------
+cprocstart PM_setBankA
+
+; Not used for VxDs
+
+ ret
+
+cprocend
+
+;----------------------------------------------------------------------------
+; void PM_setBankAB(int bank)
+;----------------------------------------------------------------------------
+cprocstart PM_setBankAB
+
+; Not used for VxDs
+
+ ret
+
+cprocend
+
+;----------------------------------------------------------------------------
+; void PM_setCRTStart(int x,int y,int waitVRT)
+;----------------------------------------------------------------------------
+cprocstart PM_setCRTStart
+
+; Not used for VxDs
+
+ ret
+
+cprocend
+
+; Macro to delay briefly to ensure that enough time has elapsed between
+; successive I/O accesses so that the device being accessed can respond
+; to both accesses even on a very fast PC.
+
+ifdef USE_NASM
+%macro DELAY 0
+ jmp short $+2
+ jmp short $+2
+ jmp short $+2
+%endmacro
+%macro IODELAYN 1
+%rep %1
+ DELAY
+%endrep
+%endmacro
+else
+macro DELAY
+ jmp short $+2
+ jmp short $+2
+ jmp short $+2
+endm
+macro IODELAYN N
+ rept N
+ DELAY
+ endm
+endm
+endif
+
+;----------------------------------------------------------------------------
+; uchar _PM_readCMOS(int index)
+;----------------------------------------------------------------------------
+; Read the value of a specific CMOS register. We do this with both
+; normal interrupts and NMI disabled.
+;----------------------------------------------------------------------------
+cprocstart _PM_readCMOS
+
+ ARG index:UINT
+
+ push _bp
+ mov _bp,_sp
+ pushfd
+ mov al,[BYTE index]
+ or al,80h ; Add disable NMI flag
+ cli
+ out 70h,al
+ IODELAYN 5
+ in al,71h
+ mov ah,al
+ xor al,al
+ IODELAYN 5
+ out 70h,al ; Re-enable NMI
+ mov al,ah ; Return value in AL
+ popfd
+ pop _bp
+ ret
+
+cprocend
+
+;----------------------------------------------------------------------------
+; void _PM_writeCMOS(int index,uchar value)
+;----------------------------------------------------------------------------
+; Read the value of a specific CMOS register. We do this with both
+; normal interrupts and NMI disabled.
+;----------------------------------------------------------------------------
+cprocstart _PM_writeCMOS
+
+ ARG index:UINT, value:UCHAR
+
+ push _bp
+ mov _bp,_sp
+ pushfd
+ mov al,[BYTE index]
+ or al,80h ; Add disable NMI flag
+ cli
+ out 70h,al
+ IODELAYN 5
+ mov al,[value]
+ out 71h,al
+ xor al,al
+ IODELAYN 5
+ out 70h,al ; Re-enable NMI
+ popfd
+ pop _bp
+ ret
+
+cprocend
+
+;----------------------------------------------------------------------------
+; double _ftol(double f)
+;----------------------------------------------------------------------------
+; Calls to __ftol are generated by the Borland C++ compiler for code
+; that needs to convert a floating point type to an integral type.
+;
+; Input: floating point number on the top of the '87.
+;
+; Output: a (signed or unsigned) long in EAX
+; All other registers preserved.
+;-----------------------------------------------------------------------
+cprocstart _ftol
+
+ LOCAL temp1:WORD, temp2:QWORD = LocalSize
+
+ push ebp
+ mov ebp,esp
+ sub esp,LocalSize
+
+ fstcw [temp1] ; save the control word
+ fwait
+ mov al,[BYTE temp1+1]
+ or [BYTE temp1+1],0Ch ; set rounding control to chop
+ fldcw [temp1]
+ fistp [temp2] ; convert to 64-bit integer
+ mov [BYTE temp1+1],al
+ fldcw [temp1] ; restore the control word
+ mov eax,[DWORD temp2] ; return LS 32 bits
+ mov edx,[DWORD temp2+4] ; MS 32 bits
+
+ mov esp,ebp
+ pop ebp
+ ret
+
+cprocend
+
+;----------------------------------------------------------------------------
+; _PM_getPDB - Return the Page Table Directory Base address
+;----------------------------------------------------------------------------
+cprocstart _PM_getPDB
+
+ mov eax,cr3
+ and eax,0FFFFF000h
+ ret
+
+cprocend
+
+;----------------------------------------------------------------------------
+; Flush the Translation Lookaside buffer
+;----------------------------------------------------------------------------
+cprocstart PM_flushTLB
+
+ wbinvd ; Flush the CPU cache
+ mov eax,cr3
+ mov cr3,eax ; Flush the TLB
+ ret
+
+cprocend
+
+endcodeseg _pm
+
+ END ; End of module
diff --git a/board/MAI/bios_emulator/scitech/src/pm/vxd/cpuinfo.c b/board/MAI/bios_emulator/scitech/src/pm/vxd/cpuinfo.c
new file mode 100644
index 00000000000..3c7eaaeaac6
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/pm/vxd/cpuinfo.c
@@ -0,0 +1,66 @@
+/****************************************************************************
+*
+* Ultra Long Period Timer
+*
+* ========================================================================
+*
+* The contents of this file are subject to the SciTech MGL Public
+* License Version 1.0 (the "License"); you may not use this file
+* except in compliance with the License. You may obtain a copy of
+* the License at http://www.scitechsoft.com/mgl-license.txt
+*
+* Software distributed under the License is distributed on an
+* "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+* implied. See the License for the specific language governing
+* rights and limitations under the License.
+*
+* The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+*
+* The Initial Developer of the Original Code is SciTech Software, Inc.
+* All Rights Reserved.
+*
+* ========================================================================
+*
+* Language: ANSI C
+* Environment: 32-bit Windows VxD
+*
+* Description: VxD specific code for the CPU detection module.
+*
+****************************************************************************/
+
+/*----------------------------- Implementation ----------------------------*/
+
+/****************************************************************************
+REMARKS:
+Do nothing for VxD's
+****************************************************************************/
+#define SetMaxThreadPriority() 0
+
+/****************************************************************************
+REMARKS:
+Do nothing for VxD's
+****************************************************************************/
+#define RestoreThreadPriority(i) (void)(i)
+
+/****************************************************************************
+REMARKS:
+Initialise the counter and return the frequency of the counter.
+****************************************************************************/
+static void GetCounterFrequency(
+ CPU_largeInteger *freq)
+{
+ freq->low = 1193180;
+ freq->high = 0;
+}
+
+/****************************************************************************
+REMARKS:
+Read the counter and return the counter value.
+****************************************************************************/
+#define GetCounter(t) \
+{ \
+ CPU_largeInteger count; \
+ VTD_Get_Real_Time(&count.high,&count.low); \
+ (t)->low = count.low; \
+ (t)->high = count.high; \
+}
diff --git a/board/MAI/bios_emulator/scitech/src/pm/vxd/fileio.c b/board/MAI/bios_emulator/scitech/src/pm/vxd/fileio.c
new file mode 100644
index 00000000000..e2ff585839c
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/pm/vxd/fileio.c
@@ -0,0 +1,305 @@
+/****************************************************************************
+*
+* SciTech OS Portability Manager Library
+*
+* ========================================================================
+*
+* The contents of this file are subject to the SciTech MGL Public
+* License Version 1.0 (the "License"); you may not use this file
+* except in compliance with the License. You may obtain a copy of
+* the License at http://www.scitechsoft.com/mgl-license.txt
+*
+* Software distributed under the License is distributed on an
+* "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+* implied. See the License for the specific language governing
+* rights and limitations under the License.
+*
+* The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+*
+* The Initial Developer of the Original Code is SciTech Software, Inc.
+* All Rights Reserved.
+*
+* ========================================================================
+*
+* Language: ANSI C
+* Environment: 32-bit Windows VxD
+*
+* Description: C library compatible I/O functions for use within a VxD.
+*
+****************************************************************************/
+
+#include "pmapi.h"
+#include "vxdfile.h"
+
+/*------------------------ Main Code Implementation -----------------------*/
+
+#define EOF -1
+
+/****************************************************************************
+REMARKS:
+VxD implementation of the ANSI C fopen function.
+****************************************************************************/
+FILE * fopen(
+ const char *filename,
+ const char *mode)
+{
+ FILE *f = PM_malloc(sizeof(FILE));
+ long oldpos;
+
+ if (f) {
+ f->offset = 0;
+ f->text = (mode[1] == 't' || mode[2] == 't');
+ f->writemode = (mode[0] == 'w') || (mode[0] == 'a');
+ if (initComplete) {
+ WORD omode,error;
+ BYTE action;
+
+ if (mode[0] == 'r') {
+ omode = OPEN_ACCESS_READONLY | OPEN_SHARE_COMPATIBLE;
+ action = ACTION_IFEXISTS_OPEN | ACTION_IFNOTEXISTS_FAIL;
+ }
+ else if (mode[0] == 'w') {
+ omode = OPEN_ACCESS_WRITEONLY | OPEN_SHARE_COMPATIBLE;
+ action = ACTION_IFEXISTS_TRUNCATE | ACTION_IFNOTEXISTS_CREATE;
+ }
+ else {
+ omode = OPEN_ACCESS_READWRITE | OPEN_SHARE_COMPATIBLE;
+ action = ACTION_IFEXISTS_OPEN | ACTION_IFNOTEXISTS_CREATE;
+ }
+ f->handle = (int)R0_OpenCreateFile(false,(char*)filename,omode,ATTR_NORMAL,action,0,&error,&action);
+ if (f->handle == 0) {
+ PM_free(f);
+ return NULL;
+ }
+ f->filesize = R0_GetFileSize((HANDLE)f->handle,&error);
+ if (mode[0] == 'a')
+ fseek(f,0,2);
+ }
+ else {
+ int oflag,pmode;
+
+ if (mode[0] == 'r') {
+ pmode = _S_IREAD;
+ oflag = _O_RDONLY;
+ }
+ else if (mode[0] == 'w') {
+ pmode = _S_IWRITE;
+ oflag = _O_WRONLY | _O_CREAT | _O_TRUNC;
+ }
+ else {
+ pmode = _S_IWRITE;
+ oflag = _O_RDWR | _O_CREAT | _O_APPEND;
+ }
+ if (f->text)
+ oflag |= _O_TEXT;
+ else
+ oflag |= _O_BINARY;
+ if ((f->handle = i_open(filename,oflag,pmode)) == -1) {
+ PM_free(f);
+ return NULL;
+ }
+ oldpos = i_lseek(f->handle,0,1);
+ f->filesize = i_lseek(f->handle,0,2);
+ i_lseek(f->handle,oldpos,0);
+ }
+ }
+ return f;
+}
+
+/****************************************************************************
+REMARKS:
+VxD implementation of the ANSI C fread function. Note that the VxD file I/O
+functions are layered on DOS, so can only read up to 64K at a time. Since
+we are expected to handle much larger chunks than this, we handle larger
+blocks automatically in here.
+****************************************************************************/
+size_t fread(
+ void *ptr,
+ size_t size,
+ size_t n,
+ FILE *f)
+{
+ char *buf = ptr;
+ WORD error;
+ int bytes = size * n;
+ int readbytes,totalbytes = 0;
+
+ while (bytes > 0x10000) {
+ if (initComplete) {
+ readbytes = R0_ReadFile(false,(HANDLE)f->handle,buf,0x8000,f->offset,&error);
+ readbytes += R0_ReadFile(false,(HANDLE)f->handle,buf+0x8000,0x8000,f->offset+0x8000,&error);
+ }
+ else {
+ readbytes = i_read(f->handle,buf,0x8000);
+ readbytes += i_read(f->handle,buf+0x8000,0x8000);
+ }
+ totalbytes += readbytes;
+ f->offset += readbytes;
+ buf += 0x10000;
+ bytes -= 0x10000;
+ }
+ if (bytes) {
+ if (initComplete)
+ readbytes = R0_ReadFile(false,(HANDLE)f->handle,buf,bytes,f->offset,&error);
+ else
+ readbytes = i_read(f->handle,buf,bytes);
+ totalbytes += readbytes;
+ f->offset += readbytes;
+ }
+ return totalbytes / size;
+}
+
+/****************************************************************************
+REMARKS:
+VxD implementation of the ANSI C fwrite function. Note that the VxD file I/O
+functions are layered on DOS, so can only read up to 64K at a time. Since
+we are expected to handle much larger chunks than this, we handle larger
+blocks automatically in here.
+****************************************************************************/
+size_t fwrite(
+ const void *ptr,
+ size_t size,
+ size_t n,
+ FILE *f)
+{
+ const char *buf = ptr;
+ WORD error;
+ int bytes = size * n;
+ int writtenbytes,totalbytes = 0;
+
+ if (!f->writemode)
+ return 0;
+ while (bytes > 0x10000) {
+ if (initComplete) {
+ writtenbytes = R0_WriteFile(false,(HANDLE)f->handle,buf,0x8000,f->offset,&error);
+ writtenbytes += R0_WriteFile(false,(HANDLE)f->handle,buf+0x8000,0x8000,f->offset+0x8000,&error);
+ }
+ else {
+ writtenbytes = i_write(f->handle,buf,0x8000);
+ writtenbytes += i_write(f->handle,buf+0x8000,0x8000);
+ }
+ totalbytes += writtenbytes;
+ f->offset += writtenbytes;
+ buf += 0x10000;
+ bytes -= 0x10000;
+ }
+ if (initComplete)
+ writtenbytes = R0_WriteFile(false,(HANDLE)f->handle,buf,bytes,f->offset,&error);
+ else
+ writtenbytes = i_write(f->handle,buf,bytes);
+ totalbytes += writtenbytes;
+ f->offset += writtenbytes;
+ if (f->offset > f->filesize)
+ f->filesize = f->offset;
+ return totalbytes / size;
+}
+
+/****************************************************************************
+REMARKS:
+VxD implementation of the ANSI C fflush function.
+****************************************************************************/
+int fflush(
+ FILE *f)
+{
+ // Nothing to do since we are not doing buffered file I/O
+ (void)f;
+ return 0;
+}
+
+/****************************************************************************
+REMARKS:
+VxD implementation of the ANSI C fseek function.
+****************************************************************************/
+int fseek(
+ FILE *f,
+ long int offset,
+ int whence)
+{
+ if (whence == 0)
+ f->offset = offset;
+ else if (whence == 1)
+ f->offset += offset;
+ else if (whence == 2)
+ f->offset = f->filesize + offset;
+ if (!initComplete)
+ i_lseek(f->handle,f->offset,0);
+ return 0;
+}
+
+/****************************************************************************
+REMARKS:
+VxD implementation of the ANSI C ftell function.
+****************************************************************************/
+long ftell(
+ FILE *f)
+{
+ return f->offset;
+}
+
+/****************************************************************************
+REMARKS:
+VxD implementation of the ANSI C feof function.
+****************************************************************************/
+int feof(
+ FILE *f)
+{
+ return (f->offset == f->filesize);
+}
+
+/****************************************************************************
+REMARKS:
+NT driver implementation of the ANSI C fgets function.
+****************************************************************************/
+char *fgets(
+ char *s,
+ int n,
+ FILE *f)
+{
+ int len;
+ char *cs;
+
+ // Read the entire buffer into memory (our functions are unbuffered!)
+ if ((len = fread(s,1,n,f)) == 0)
+ return NULL;
+
+ // Search for '\n' or end of string
+ if (n > len)
+ n = len;
+ cs = s;
+ while (--n > 0) {
+ if (*cs == '\n')
+ break;
+ cs++;
+ }
+ *cs = '\0';
+ return s;
+}
+
+/****************************************************************************
+REMARKS:
+NT driver implementation of the ANSI C fputs function.
+****************************************************************************/
+int fputs(
+ const char *s,
+ FILE *f)
+{
+ return fwrite(s,1,strlen(s),f);
+}
+
+/****************************************************************************
+REMARKS:
+VxD implementation of the ANSI C fclose function.
+****************************************************************************/
+int fclose(
+ FILE *f)
+{
+ WORD error;
+
+ if (initComplete)
+ R0_CloseFile((HANDLE)f->handle,&error);
+ else
+ i_close(f->handle);
+ PM_free(f);
+ return 0;
+}
+
diff --git a/board/MAI/bios_emulator/scitech/src/pm/vxd/oshdr.h b/board/MAI/bios_emulator/scitech/src/pm/vxd/oshdr.h
new file mode 100644
index 00000000000..7efc0f9f853
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/pm/vxd/oshdr.h
@@ -0,0 +1,29 @@
+/****************************************************************************
+*
+* SciTech OS Portability Manager Library
+*
+* ========================================================================
+*
+* The contents of this file are subject to the SciTech MGL Public
+* License Version 1.0 (the "License"); you may not use this file
+* except in compliance with the License. You may obtain a copy of
+* the License at http://www.scitechsoft.com/mgl-license.txt
+*
+* Software distributed under the License is distributed on an
+* "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+* implied. See the License for the specific language governing
+* rights and limitations under the License.
+*
+* The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+*
+* The Initial Developer of the Original Code is SciTech Software, Inc.
+* All Rights Reserved.
+*
+* ========================================================================
+*
+* Language: ANSI C
+* Environment: 32-bit Windows VxD
+*
+* Description: Include file to include all OS specific header files.
+*
+****************************************************************************/
diff --git a/board/MAI/bios_emulator/scitech/src/pm/vxd/pm.c b/board/MAI/bios_emulator/scitech/src/pm/vxd/pm.c
new file mode 100644
index 00000000000..8d00df9065c
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/pm/vxd/pm.c
@@ -0,0 +1,1360 @@
+/****************************************************************************
+*
+* SciTech OS Portability Manager Library
+*
+* ========================================================================
+*
+* The contents of this file are subject to the SciTech MGL Public
+* License Version 1.0 (the "License"); you may not use this file
+* except in compliance with the License. You may obtain a copy of
+* the License at http://www.scitechsoft.com/mgl-license.txt
+*
+* Software distributed under the License is distributed on an
+* "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+* implied. See the License for the specific language governing
+* rights and limitations under the License.
+*
+* The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+*
+* The Initial Developer of the Original Code is SciTech Software, Inc.
+* All Rights Reserved.
+*
+* ========================================================================
+*
+* Language: ANSI C
+* Environment: 32-bit Windows VxD
+*
+* Description: Implementation for the OS Portability Manager Library, which
+* contains functions to implement OS specific services in a
+* generic, cross platform API. Porting the OS Portability
+* Manager library is the first step to porting any SciTech
+* products to a new platform.
+*
+****************************************************************************/
+
+#include "pmapi.h"
+#include "drvlib/os/os.h"
+#include "sdd/sddhelp.h"
+#include "mtrr.h"
+
+/*--------------------------- Global variables ----------------------------*/
+
+#define MAX_MEMORY_SHARED 100
+#define MAX_MEMORY_MAPPINGS 100
+
+typedef struct {
+ void *linear;
+ ulong global;
+ ulong length;
+ int npages;
+ } memshared;
+
+typedef struct {
+ ulong physical;
+ ulong linear;
+ ulong length;
+ int npages;
+ ibool isCached;
+ } mmapping;
+
+static int numMappings = 0;
+static memshared shared[MAX_MEMORY_MAPPINGS] = {0};
+static mmapping maps[MAX_MEMORY_MAPPINGS];
+extern ibool _PM_haveBIOS;
+char _PM_cntPath[PM_MAX_PATH] = "";
+char _PM_nucleusPath[PM_MAX_PATH] = "";
+uchar *_PM_rmBufAddr = NULL;
+ushort _VARAPI _PM_savedDS = 0;
+static uchar _PM_oldCMOSRegA;
+static uchar _PM_oldCMOSRegB;
+PM_intHandler _PM_rtcHandler = NULL;
+IRQHANDLE RTCIRQHandle = 0;
+VPICD_HWInt_THUNK RTCInt_Thunk;
+
+static char *szWindowsKey = "Software\\Microsoft\\Windows\\CurrentVersion";
+static char *szSystemRoot = "SystemRoot";
+static char *szMachineNameKey = "System\\CurrentControlSet\\control\\ComputerName\\ComputerName";
+static char *szMachineName = "ComputerName";
+static void (PMAPIP fatalErrorCleanup)(void) = NULL;
+
+/*----------------------------- Implementation ----------------------------*/
+
+/* Functions to read and write CMOS registers */
+
+ulong PMAPI _PM_getPDB(void);
+uchar PMAPI _PM_readCMOS(int index);
+void PMAPI _PM_writeCMOS(int index,uchar value);
+
+/****************************************************************************
+REMARKS:
+PM_malloc override function for Nucleus drivers loaded in VxD's.
+****************************************************************************/
+void * VXD_malloc(
+ size_t size)
+{
+ return PM_mallocShared(size);
+}
+
+/****************************************************************************
+REMARKS:
+PM_calloc override function for Nucleus drivers loaded in VxD's.
+****************************************************************************/
+void * VXD_calloc(
+ size_t nelem,
+ size_t size)
+{
+ void *p = PM_mallocShared(nelem * size);
+ if (p)
+ memset(p,0,nelem * size);
+ return p;
+}
+
+/****************************************************************************
+REMARKS:
+PM_realloc override function for Nucleus drivers loaded in VxD's.
+****************************************************************************/
+void * VXD_realloc(
+ void *ptr,
+ size_t size)
+{
+ void *p = PM_mallocShared(size);
+ if (p) {
+ memcpy(p,ptr,size);
+ PM_freeShared(ptr);
+ }
+ return p;
+}
+
+/****************************************************************************
+REMARKS:
+PM_free override function for Nucleus drivers loaded in VxD's.
+****************************************************************************/
+void VXD_free(
+ void *p)
+{
+ PM_freeShared(p);
+}
+
+/****************************************************************************
+REMARKS:
+Initialise the PM library.
+****************************************************************************/
+void PMAPI PM_init(void)
+{
+ /* Override the default memory allocators for all Nucleus drivers
+ * loaded in SDDHELP/PMHELP. We do this so that we can ensure all memory
+ * dynamically allocated by Nucleus drivers and internal C runtime
+ * library functions are shared memory blocks that all processes
+ * connecting to SDDHELP can see.
+ */
+ PM_useLocalMalloc(VXD_malloc,VXD_calloc,VXD_realloc,VXD_free);
+
+ /* Initialiase the MTRR module */
+ MTRR_init();
+}
+
+ibool PMAPI PM_haveBIOSAccess(void)
+{ return _PM_haveBIOS; }
+
+long PMAPI PM_getOSType(void)
+{ return _OS_WIN32VXD; }
+
+int PMAPI PM_getModeType(void)
+{ return PM_386; }
+
+void PMAPI PM_backslash(char *s)
+{
+ uint pos = strlen(s);
+ if (s[pos-1] != '\\') {
+ s[pos] = '\\';
+ s[pos+1] = '\0';
+ }
+}
+
+void PMAPI PM_setFatalErrorCleanup(
+ void (PMAPIP cleanup)(void))
+{
+ fatalErrorCleanup = cleanup;
+}
+
+void PMAPI PM_fatalError(const char *msg)
+{
+ if (fatalErrorCleanup)
+ fatalErrorCleanup();
+ Fatal_Error_Handler(msg,0);
+}
+
+/****************************************************************************
+PARAMETERS:
+len - Place to store the length of the buffer
+rseg - Place to store the real mode segment of the buffer
+roff - Place to store the real mode offset of the buffer
+
+REMARKS:
+This function returns the address and length of the global VESA transfer
+buffer that is used for communicating with the VESA BIOS functions from
+Win16 and Win32 programs under Windows.
+****************************************************************************/
+void * PMAPI PM_getVESABuf(
+ uint *len,
+ uint *rseg,
+ uint *roff)
+{
+ /* If the VxD is dynamically loaded we will not have a real mode
+ * transfer buffer to return, so we fail the call.
+ */
+ if (_PM_rmBufAddr) {
+ *len = VESA_BUF_SIZE;
+ *rseg = (ulong)(_PM_rmBufAddr) >> 4;
+ *roff = (ulong)(_PM_rmBufAddr) & 0xF;
+ return _PM_rmBufAddr;
+ }
+ return NULL;
+}
+
+int PMAPI PM_int386(
+ int intno,
+ PMREGS *in,
+ PMREGS *out)
+{
+ /* Unused in VxDs */
+ return 0;
+}
+
+void PMAPI _PM_getRMvect(
+ int intno,
+ long *realisr)
+{
+ WORD seg;
+ DWORD off;
+
+ Get_V86_Int_Vector(intno,&seg,&off);
+ *realisr = ((long)seg << 16) | (off & 0xFFFF);
+}
+
+void PMAPI _PM_setRMvect(
+ int intno,
+ long realisr)
+{
+ Set_V86_Int_Vector(intno,realisr >> 16,realisr & 0xFFFF);
+}
+
+char * PMAPI PM_getCurrentPath(
+ char *path,
+ int maxLen)
+{
+ strncpy(path,_PM_cntPath,maxLen);
+ path[maxLen-1] = 0;
+ return path;
+}
+
+char PMAPI PM_getBootDrive(void)
+{ return 'c'; }
+
+const char * PMAPI PM_getVBEAFPath(void)
+{ return "c:\\"; }
+
+/****************************************************************************
+PARAMETERS:
+szKey - Key to query (can contain version number formatting)
+szValue - Value to get information for
+value - Place to store the registry key data read
+size - Size of the string buffer to read into
+
+RETURNS:
+true if the key was found, false if not.
+****************************************************************************/
+static ibool REG_queryString(
+ char *szKey,
+ char *szValue,
+ char *value,
+ ulong size)
+{
+ HKEY hKey;
+ ulong type;
+ ibool status = false;
+
+ memset(value,0,sizeof(value));
+ if (RegOpenKey(HKEY_LOCAL_MACHINE,szKey,&hKey) == ERROR_SUCCESS) {
+ if (RegQueryValueEx(hKey,(PCHAR)szValue,(ulong*)NULL,(ulong*)&type,value,(ulong*)&size) == ERROR_SUCCESS)
+ status = true;
+ RegCloseKey(hKey);
+ }
+ return status;
+}
+
+const char * PMAPI PM_getNucleusPath(void)
+{
+ static char path[256];
+
+ if (strlen(_PM_nucleusPath) > 0) {
+ strcpy(path,_PM_nucleusPath);
+ PM_backslash(path);
+ return path;
+ }
+ if (!REG_queryString(szWindowsKey,szSystemRoot,path,sizeof(path)))
+ strcpy(path,"c:\\windows");
+ PM_backslash(path);
+ strcat(path,"system\\nucleus");
+ return path;
+}
+
+const char * PMAPI PM_getNucleusConfigPath(void)
+{
+ static char path[256];
+ strcpy(path,PM_getNucleusPath());
+ PM_backslash(path);
+ strcat(path,"config");
+ return path;
+}
+
+const char * PMAPI PM_getUniqueID(void)
+{ return PM_getMachineName(); }
+
+const char * PMAPI PM_getMachineName(void)
+{
+ static char name[256];
+ if (REG_queryString(szMachineNameKey,szMachineName,name,sizeof(name)))
+ return name;
+ return "Unknown";
+}
+
+int PMAPI PM_kbhit(void)
+{ return 1; }
+
+int PMAPI PM_getch(void)
+{ return 0; }
+
+PM_HWND PMAPI PM_openConsole(
+ PM_HWND hwndUser,
+ int device,
+ int xRes,
+ int yRes,
+ int bpp,
+ ibool fullScreen)
+{
+ /* Unused in VxDs */
+ return NULL;
+}
+
+int PMAPI PM_getConsoleStateSize(void)
+{
+ /* Unused in VxDs */
+ return 1;
+}
+
+void PMAPI PM_saveConsoleState(
+ void *stateBuf,
+ PM_HWND hwndConsole)
+{
+ /* Unused in VxDs */
+}
+
+void PMAPI PM_setSuspendAppCallback(
+ int (_ASMAPIP saveState)(
+ int flags))
+{
+ /* Unused in VxDs */
+}
+
+void PMAPI PM_restoreConsoleState(
+ const void *stateBuf,
+ PM_HWND hwndConsole)
+{
+ /* Unused in VxDs */
+}
+
+void PMAPI PM_closeConsole(
+ PM_HWND hwndConsole)
+{
+ /* Unused in VxDs */
+}
+
+void PM_setOSCursorLocation(
+ int x,
+ int y)
+{
+ uchar *_biosPtr = PM_getBIOSPointer();
+ PM_setByte(_biosPtr+0x50,x);
+ PM_setByte(_biosPtr+0x51,y);
+}
+
+void PM_setOSScreenWidth(
+ int width,
+ int height)
+{
+ uchar *_biosPtr = PM_getBIOSPointer();
+ PM_setByte(_biosPtr+0x4A,width);
+ PM_setByte(_biosPtr+0x84,height-1);
+}
+
+/****************************************************************************
+REMARKS:
+Allocate a block of shared memory. For Win9x we allocate shared memory
+as locked, global memory that is accessible from any memory context
+(including interrupt time context), which allows us to load our important
+data structure and code such that we can access it directly from a ring
+0 interrupt context.
+****************************************************************************/
+void * PMAPI PM_mallocShared(
+ long size)
+{
+ MEMHANDLE hMem;
+ DWORD pgNum,nPages = (size + 0xFFF) >> 12;
+ int i;
+
+ /* First find a free slot in our shared memory table */
+ for (i = 0; i < MAX_MEMORY_SHARED; i++) {
+ if (shared[i].linear == 0)
+ break;
+ }
+ if (i < MAX_MEMORY_SHARED) {
+ PageAllocate(nPages,PG_SYS,0,0,0,0,NULL,0,&hMem,&shared[i].linear);
+ shared[i].npages = nPages;
+ pgNum = (ulong)shared[i].linear >> 12;
+ shared[i].global = LinPageLock(pgNum,nPages,PAGEMAPGLOBAL);
+ return (void*)shared[i].global;
+ }
+ return NULL;
+}
+
+/****************************************************************************
+REMARKS:
+Free a block of shared memory
+****************************************************************************/
+void PMAPI PM_freeShared(void *p)
+{
+ int i;
+
+ /* Find a shared memory block in our table and free it */
+ for (i = 0; i < MAX_MEMORY_SHARED; i++) {
+ if (shared[i].global == (ulong)p) {
+ LinPageUnLock(shared[i].global >> 12,shared[i].npages,PAGEMAPGLOBAL);
+ PageFree((ulong)shared[i].linear,0);
+ shared[i].linear = 0;
+ break;
+ }
+ }
+}
+
+/****************************************************************************
+REMARKS:
+Maps a shared memory block into process address space. Does nothing since
+the memory blocks are already globally7 mapped into all processes.
+****************************************************************************/
+void * PMAPI PM_mapToProcess(
+ void *base,
+ ulong limit)
+{
+ return (void*)base;
+}
+
+ibool PMAPI PM_doBIOSPOST(
+ ushort axVal,
+ ulong BIOSPhysAddr,
+ void *mappedBIOS,
+ ulong BIOSLen)
+{
+ // TODO: Figure out how to do this
+ return false;
+}
+
+void * PMAPI PM_getBIOSPointer(void)
+{ return (void*)0x400; }
+
+void * PMAPI PM_getA0000Pointer(void)
+{ return PM_mapPhysicalAddr(0xA0000,0xFFFF,true); }
+
+/****************************************************************************
+PARAMETERS:
+base - Physical base address of the memory to maps in
+limit - Limit of physical memory to region to maps in
+
+RETURNS:
+Linear address of the newly mapped memory.
+
+REMARKS:
+Maps a physical memory range to a linear memory range.
+****************************************************************************/
+ulong _PM_mapPhysicalToLinear(
+ ulong base,
+ ulong limit,
+ int *npages)
+{
+ ulong linear,length = limit+1;
+ int i,ppage,flags;
+
+ if (base < 0x100000) {
+ /* Windows 9x is zero based for the first meg of memory */
+ return base;
+ }
+ ppage = base >> 12;
+ *npages = (length + (base & 0xFFF) + 4095) >> 12;
+ flags = PR_FIXED | PR_STATIC;
+ if (base == 0xA0000) {
+ /* We require the linear address to be aligned to a 64Kb boundary
+ * for mapping the banked framebuffer (so we can do efficient
+ * carry checking for bank changes in the assembler code). The only
+ * way to ensure this is to force the linear address to be aligned
+ * to a 4Mb boundary.
+ */
+ flags |= PR_4MEG;
+ }
+ if ((linear = (ulong)PageReserve(PR_SYSTEM,*npages,flags)) == (ulong)-1)
+ return 0xFFFFFFFF;
+ if (!PageCommitPhys(linear >> 12,*npages,ppage,PC_INCR | PC_USER | PC_WRITEABLE))
+ return 0xFFFFFFFF;
+ return linear + (base & 0xFFF);
+}
+
+// Page table flags
+
+#define PAGE_FLAGS_PRESENT 0x00000001
+#define PAGE_FLAGS_WRITEABLE 0x00000002
+#define PAGE_FLAGS_USER 0x00000004
+#define PAGE_FLAGS_WRITE_THROUGH 0x00000008
+#define PAGE_FLAGS_CACHE_DISABLE 0x00000010
+#define PAGE_FLAGS_ACCESSED 0x00000020
+#define PAGE_FLAGS_DIRTY 0x00000040
+#define PAGE_FLAGS_4MB 0x00000080
+
+/****************************************************************************
+PARAMETERS:
+base - Physical base address of the memory to maps in
+limit - Limit of physical memory to region to maps in
+isCached - True if the memory should be cached, false if not
+
+RETURNS:
+Linear address of the newly mapped memory.
+
+REMARKS:
+This function maps physical memory to linear memory, which can then be used
+to create a selector or used directly from 32-bit protected mode programs.
+This is better than DPMI 0x800, since it allows you to maps physical
+memory below 1Mb, which gets this memory out of the way of the Windows VDD's
+sticky paws.
+
+NOTE: If the memory is not expected to be cached, this function will
+ directly re-program the PCD (Page Cache Disable) bit in the
+ page tables. There does not appear to be a mechanism in the VMM
+ to control this bit via the regular interface.
+****************************************************************************/
+void * PMAPI PM_mapPhysicalAddr(
+ ulong base,
+ ulong limit,
+ ibool isCached)
+{
+ ulong linear,length = limit+1;
+ int i,npages;
+ ulong PDB,*pPDB;
+
+ /* Search table of existing mappings to see if we have already mapped
+ * a region of memory that will serve this purpose.
+ */
+ for (i = 0; i < numMappings; i++) {
+ if (maps[i].physical == base && maps[i].length == length && maps[i].isCached == isCached)
+ return (void*)maps[i].linear;
+ }
+ if (numMappings == MAX_MEMORY_MAPPINGS)
+ return NULL;
+
+ /* We did not find any previously mapped memory region, so maps it in.
+ * Note that we do not use MapPhysToLinear, since this function appears
+ * to have problems mapping memory in the 1Mb physical address space.
+ * Hence we use PageReserve and PageCommitPhys.
+ */
+ if ((linear = _PM_mapPhysicalToLinear(base,limit,&npages)) == 0xFFFFFFFF)
+ return NULL;
+ maps[numMappings].physical = base;
+ maps[numMappings].length = length;
+ maps[numMappings].linear = linear;
+ maps[numMappings].npages = npages;
+ maps[numMappings].isCached = isCached;
+ numMappings++;
+
+ /* Finally disable caching where necessary */
+ if (!isCached && (PDB = _PM_getPDB()) != 0) {
+ int startPDB,endPDB,iPDB,startPage,endPage,start,end,iPage;
+ ulong pageTable,*pPageTable;
+ pPDB = (ulong*)_PM_mapPhysicalToLinear(PDB,0xFFF,&npages);
+ if (pPDB) {
+ startPDB = (linear >> 22) & 0x3FF;
+ startPage = (linear >> 12) & 0x3FF;
+ endPDB = ((linear+limit) >> 22) & 0x3FF;
+ endPage = ((linear+limit) >> 12) & 0x3FF;
+ for (iPDB = startPDB; iPDB <= endPDB; iPDB++) {
+ // Set the bits in the page directory entry - required as per
+ // Pentium 4 manual. This also takes care of the 4MB page entries
+ pPDB[iPDB] = pPDB[iPDB] |= (PAGE_FLAGS_WRITE_THROUGH | PAGE_FLAGS_CACHE_DISABLE);
+ if (!(pPDB[iPDB] & PAGE_FLAGS_4MB)) {
+ // If we are dealing with 4KB pages then we need to iterate
+ // through each of the page table entries
+ pageTable = pPDB[iPDB] & ~0xFFF;
+ pPageTable = (ulong*)_PM_mapPhysicalToLinear(pageTable,0xFFF,&npages);
+ start = (iPDB == startPDB) ? startPage : 0;
+ end = (iPDB == endPDB) ? endPage : 0x3FF;
+ for (iPage = start; iPage <= end; iPage++)
+ pPageTable[iPage] |= (PAGE_FLAGS_WRITE_THROUGH | PAGE_FLAGS_CACHE_DISABLE);
+ PageFree((ulong)pPageTable,PR_STATIC);
+ }
+ }
+ PageFree((ulong)pPDB,PR_STATIC);
+ PM_flushTLB();
+ }
+ }
+ return (void*)linear;
+}
+
+void PMAPI PM_freePhysicalAddr(
+ void *ptr,
+ ulong limit)
+{
+ /* We never free the mappings */
+}
+
+void PMAPI PM_sleep(ulong milliseconds)
+{
+ /* We never sleep in a VxD */
+}
+
+int PMAPI PM_getCOMPort(int port)
+{
+ // TODO: Re-code this to determine real values using the Plug and Play
+ // manager for the OS.
+ switch (port) {
+ case 0: return 0x3F8;
+ case 1: return 0x2F8;
+ case 2: return 0x3E8;
+ case 3: return 0x2E8;
+ }
+ return 0;
+}
+
+int PMAPI PM_getLPTPort(int port)
+{
+ // TODO: Re-code this to determine real values using the Plug and Play
+ // manager for the OS.
+ switch (port) {
+ case 0: return 0x3BC;
+ case 1: return 0x378;
+ case 2: return 0x278;
+ }
+ return 0;
+}
+
+ulong PMAPI PM_getPhysicalAddr(
+ void *p)
+{
+ DWORD pte;
+
+ // Touch the memory before calling CopyPageTable. For some reason
+ // we need to do this on Windows 9x, otherwise the memory may not
+ // be paged in correctly. Of course if the passed in pointer is
+ // invalid, this function will fault, but we shouldn't be passed bogus
+ // pointers anyway ;-)
+ pte = *((ulong*)p);
+
+ // Return assembled address value only if VMM service succeeds
+ if (CopyPageTable(((DWORD)p) >> 12, 1, (PVOID*)&pte, 0))
+ return (pte & ~0xFFF) | (((DWORD)p) & 0xFFF);
+
+ // Return failure to the caller!
+ return 0xFFFFFFFFUL;
+}
+
+ibool PMAPI PM_getPhysicalAddrRange(
+ void *p,
+ ulong length,
+ ulong *physAddress)
+{
+ int i;
+ ulong linear = (ulong)p & ~0xFFF;
+
+ for (i = (length + 0xFFF) >> 12; i > 0; i--) {
+ if ((*physAddress++ = PM_getPhysicalAddr((void*)linear)) == 0xFFFFFFFF)
+ return false;
+ linear += 4096;
+ }
+ return true;
+}
+
+void PMAPI _PM_freeMemoryMappings(void)
+{
+ int i;
+ for (i = 0; i < numMappings; i++)
+ PageFree(maps[i].linear,PR_STATIC);
+}
+
+void * PMAPI PM_mapRealPointer(
+ uint r_seg,
+ uint r_off)
+{
+ return (void*)MK_PHYS(r_seg,r_off);
+}
+
+void * PMAPI PM_allocRealSeg(
+ uint size,
+ uint *r_seg,
+ uint *r_off)
+{
+ return NULL;
+}
+
+void PMAPI PM_freeRealSeg(
+ void *mem)
+{
+}
+
+void PMAPI DPMI_int86(
+ int intno,
+ DPMI_regs *regs)
+{
+ /* Unsed in VxD's */
+}
+
+/****************************************************************************
+REMARKS:
+Load the V86 registers in the client state, and save the original state
+before loading the registers.
+****************************************************************************/
+static void LoadV86Registers(
+ CLIENT_STRUCT *saveRegs,
+ RMREGS *in,
+ RMSREGS *sregs)
+{
+ CLIENT_STRUCT newRegs;
+
+ Save_Client_State(saveRegs);
+ newRegs = *saveRegs;
+ newRegs.CRS.Client_EAX = in->e.eax;
+ newRegs.CRS.Client_EBX = in->e.ebx;
+ newRegs.CRS.Client_ECX = in->e.ecx;
+ newRegs.CRS.Client_EDX = in->e.edx;
+ newRegs.CRS.Client_ESI = in->e.esi;
+ newRegs.CRS.Client_EDI = in->e.edi;
+ newRegs.CRS.Client_ES = sregs->es;
+ newRegs.CRS.Client_DS = sregs->ds;
+ Restore_Client_State(&newRegs);
+}
+
+/****************************************************************************
+REMARKS:
+Read the V86 registers from the client state and restore the original state.
+****************************************************************************/
+static void ReadV86Registers(
+ CLIENT_STRUCT *saveRegs,
+ RMREGS *out,
+ RMSREGS *sregs)
+{
+ CLIENT_STRUCT newRegs;
+
+ Save_Client_State(&newRegs);
+ out->e.eax = newRegs.CRS.Client_EAX;
+ out->e.ebx = newRegs.CRS.Client_EBX;
+ out->e.ecx = newRegs.CRS.Client_ECX;
+ out->e.edx = newRegs.CRS.Client_EDX;
+ out->e.esi = newRegs.CRS.Client_ESI;
+ out->e.edi = newRegs.CRS.Client_EDI;
+ sregs->es = newRegs.CRS.Client_ES;
+ sregs->ds = newRegs.CRS.Client_DS;
+ Restore_Client_State(saveRegs);
+}
+
+/****************************************************************************
+REMARKS:
+Call a V86 real mode function with the specified register values
+loaded before the call. The call returns with a far ret.
+****************************************************************************/
+void PMAPI PM_callRealMode(
+ uint seg,
+ uint off,
+ RMREGS *regs,
+ RMSREGS *sregs)
+{
+ CLIENT_STRUCT saveRegs;
+
+ /* Bail if we do not have BIOS access (ie: the VxD was dynamically
+ * loaded, and not statically loaded.
+ */
+ if (!_PM_haveBIOS)
+ return;
+
+ _TRACE("SDDHELP: Entering PM_callRealMode()\n");
+ Begin_Nest_V86_Exec();
+ LoadV86Registers(&saveRegs,regs,sregs);
+ Simulate_Far_Call(seg, off);
+ Resume_Exec();
+ ReadV86Registers(&saveRegs,regs,sregs);
+ End_Nest_Exec();
+ _TRACE("SDDHELP: Exiting PM_callRealMode()\n");
+}
+
+/****************************************************************************
+REMARKS:
+Issue a V86 real mode interrupt with the specified register values
+loaded before the interrupt.
+****************************************************************************/
+int PMAPI PM_int86(
+ int intno,
+ RMREGS *in,
+ RMREGS *out)
+{
+ RMSREGS sregs = {0};
+ CLIENT_STRUCT saveRegs;
+ ushort oldDisable;
+
+ /* Bail if we do not have BIOS access (ie: the VxD was dynamically
+ * loaded, and not statically loaded.
+ */
+ if (!_PM_haveBIOS) {
+ *out = *in;
+ return out->x.ax;
+ }
+
+ /* Disable pass-up to our VxD handler so we directly call BIOS */
+ _TRACE("SDDHELP: Entering PM_int86()\n");
+ if (disableTSRFlag) {
+ oldDisable = *disableTSRFlag;
+ *disableTSRFlag = 0;
+ }
+ Begin_Nest_V86_Exec();
+ LoadV86Registers(&saveRegs,in,&sregs);
+ Exec_Int(intno);
+ ReadV86Registers(&saveRegs,out,&sregs);
+ End_Nest_Exec();
+
+ /* Re-enable pass-up to our VxD handler if previously enabled */
+ if (disableTSRFlag)
+ *disableTSRFlag = oldDisable;
+
+ _TRACE("SDDHELP: Exiting PM_int86()\n");
+ return out->x.ax;
+}
+
+/****************************************************************************
+REMARKS:
+Issue a V86 real mode interrupt with the specified register values
+loaded before the interrupt.
+****************************************************************************/
+int PMAPI PM_int86x(
+ int intno,
+ RMREGS *in,
+ RMREGS *out,
+ RMSREGS *sregs)
+{
+ CLIENT_STRUCT saveRegs;
+ ushort oldDisable;
+
+ /* Bail if we do not have BIOS access (ie: the VxD was dynamically
+ * loaded, and not statically loaded.
+ */
+ if (!_PM_haveBIOS) {
+ *out = *in;
+ return out->x.ax;
+ }
+
+ /* Disable pass-up to our VxD handler so we directly call BIOS */
+ _TRACE("SDDHELP: Entering PM_int86x()\n");
+ if (disableTSRFlag) {
+ oldDisable = *disableTSRFlag;
+ *disableTSRFlag = 0;
+ }
+ Begin_Nest_V86_Exec();
+ LoadV86Registers(&saveRegs,in,sregs);
+ Exec_Int(intno);
+ ReadV86Registers(&saveRegs,out,sregs);
+ End_Nest_Exec();
+
+ /* Re-enable pass-up to our VxD handler if previously enabled */
+ if (disableTSRFlag)
+ *disableTSRFlag = oldDisable;
+
+ _TRACE("SDDHELP: Exiting PM_int86x()\n");
+ return out->x.ax;
+}
+
+/****************************************************************************
+REMARKS:
+Returns available memory. Not possible under Windows.
+****************************************************************************/
+void PMAPI PM_availableMemory(
+ ulong *physical,
+ ulong *total)
+{
+ *physical = *total = 0;
+}
+
+/****************************************************************************
+REMARKS:
+Allocates a block of locked physical memory.
+****************************************************************************/
+void * PMAPI PM_allocLockedMem(
+ uint size,
+ ulong *physAddr,
+ ibool contiguous,
+ ibool below16M)
+{
+ MEMHANDLE hMem;
+ DWORD nPages = (size + 0xFFF) >> 12;
+ DWORD flags = PAGEFIXED | PAGEUSEALIGN | (contiguous ? PAGECONTIG : 0);
+ DWORD maxPhys = below16M ? 0x00FFFFFF : 0xFFFFFFFF;
+ void *p;
+
+ // TODO: This may need to be modified if the memory needs to be globally
+ // accessible. Check how we implemented PM_mallocShared() as we
+ // may need to do something similar in here.
+ PageAllocate(nPages,PG_SYS,0,0,0,maxPhys,physAddr,flags,&hMem,&p);
+
+ // TODO: We may need to modify the memory blocks to disable caching via
+ // the page tables (PCD|PWT) since DMA memory blocks *cannot* be
+ // cached!
+ return p;
+}
+
+/****************************************************************************
+REMARKS:
+Frees a block of locked physical memory.
+****************************************************************************/
+void PMAPI PM_freeLockedMem(
+ void *p,
+ uint size,
+ ibool contiguous)
+{
+ if (p)
+ PageFree((ulong)p,0);
+}
+
+/****************************************************************************
+REMARKS:
+Allocates a page aligned and page sized block of memory
+****************************************************************************/
+void * PMAPI PM_allocPage(
+ ibool locked)
+{
+ MEMHANDLE hMem;
+ void *p;
+
+ // TODO: This will need to be modified if the memory needs to be globally
+ // accessible. Check how we implemented PM_mallocShared() as we
+ // may need to do something similar in here.
+ PageAllocate(1,PG_SYS,0,0,0,0,0,PAGEFIXED,&hMem,&p);
+ return p;
+}
+
+/****************************************************************************
+REMARKS:
+Free a page aligned and page sized block of memory
+****************************************************************************/
+void PMAPI PM_freePage(
+ void *p)
+{
+ if (p)
+ PageFree((ulong)p,0);
+}
+
+/****************************************************************************
+REMARKS:
+Lock linear memory so it won't be paged.
+****************************************************************************/
+int PMAPI PM_lockDataPages(
+ void *p,
+ uint len,
+ PM_lockHandle *lh)
+{
+ DWORD pgNum = (ulong)p >> 12;
+ DWORD nPages = (len + (ulong)p - (pgNum << 12) + 0xFFF) >> 12;
+ return LinPageLock(pgNum,nPages,0);
+}
+
+/****************************************************************************
+REMARKS:
+Unlock linear memory so it won't be paged.
+****************************************************************************/
+int PMAPI PM_unlockDataPages(
+ void *p,
+ uint len,
+ PM_lockHandle *lh)
+{
+ DWORD pgNum = (ulong)p >> 12;
+ DWORD nPages = (len + (ulong)p - (pgNum << 12) + 0xFFF) >> 12;
+ return LinPageUnLock(pgNum,nPages,0);
+}
+
+/****************************************************************************
+REMARKS:
+Lock linear memory so it won't be paged.
+****************************************************************************/
+int PMAPI PM_lockCodePages(
+ void (*p)(),
+ uint len,
+ PM_lockHandle *lh)
+{
+ return PM_lockDataPages((void*)p,len,lh);
+}
+
+/****************************************************************************
+REMARKS:
+Unlock linear memory so it won't be paged.
+****************************************************************************/
+int PMAPI PM_unlockCodePages(
+ void (*p)(),
+ uint len,
+ PM_lockHandle *lh)
+{
+ return PM_unlockDataPages((void*)p,len,lh);
+}
+
+/****************************************************************************
+REMARKS:
+Set the real time clock frequency (for stereo modes).
+****************************************************************************/
+void PMAPI PM_setRealTimeClockFrequency(
+ int frequency)
+{
+ static short convert[] = {
+ 8192,
+ 4096,
+ 2048,
+ 1024,
+ 512,
+ 256,
+ 128,
+ 64,
+ 32,
+ 16,
+ 8,
+ 4,
+ 2,
+ -1,
+ };
+ int i;
+
+ /* First clear any pending RTC timeout if not cleared */
+ _PM_readCMOS(0x0C);
+ if (frequency == 0) {
+ /* Disable RTC timout */
+ _PM_writeCMOS(0x0A,_PM_oldCMOSRegA);
+ _PM_writeCMOS(0x0B,_PM_oldCMOSRegB & 0x0F);
+ }
+ else {
+ /* Convert frequency value to RTC clock indexes */
+ for (i = 0; convert[i] != -1; i++) {
+ if (convert[i] == frequency)
+ break;
+ }
+
+ /* Set RTC timout value and enable timeout */
+ _PM_writeCMOS(0x0A,0x20 | (i+3));
+ _PM_writeCMOS(0x0B,(_PM_oldCMOSRegB & 0x0F) | 0x40);
+ }
+}
+
+/****************************************************************************
+REMARKS:
+Real time clock interrupt handler, which calls the user registered C code.
+****************************************************************************/
+static BOOL __stdcall RTCInt_Handler(
+ VMHANDLE hVM,
+ IRQHANDLE hIRQ)
+{
+ static char inside = 0;
+
+ /* Clear priority interrupt controller and re-enable interrupts so we
+ * dont lock things up for long.
+ */
+ VPICD_Phys_EOI(hIRQ);
+
+ /* Clear real-time clock timeout */
+ _PM_readCMOS(0x0C);
+
+ /* Now call the C based interrupt handler (but check for mutual
+ * exclusion since we may still be servicing an old interrupt when a
+ * new one comes along; if that happens we ignore the old one).
+ */
+ if (!inside) {
+ inside = 1;
+ enable();
+ _PM_rtcHandler();
+ inside = 0;
+ }
+ return TRUE;
+}
+
+/****************************************************************************
+REMARKS:
+Set the real time clock handler (used for software stereo modes).
+****************************************************************************/
+ibool PMAPI PM_setRealTimeClockHandler(
+ PM_intHandler ih,
+ int frequency)
+{
+ struct VPICD_IRQ_Descriptor IRQdesc;
+
+ /* Save the old CMOS real time clock values */
+ _PM_oldCMOSRegA = _PM_readCMOS(0x0A);
+ _PM_oldCMOSRegB = _PM_readCMOS(0x0B);
+
+ /* Set the real time clock interrupt handler */
+ CHECK(ih != NULL);
+ _PM_rtcHandler = ih;
+ IRQdesc.VID_IRQ_Number = 0x8;
+ IRQdesc.VID_Options = 0;
+ IRQdesc.VID_Hw_Int_Proc = (DWORD)VPICD_Thunk_HWInt(RTCInt_Handler, &RTCInt_Thunk);
+ IRQdesc.VID_EOI_Proc = 0;
+ IRQdesc.VID_Virt_Int_Proc = 0;
+ IRQdesc.VID_Mask_Change_Proc= 0;
+ IRQdesc.VID_IRET_Proc = 0;
+ IRQdesc.VID_IRET_Time_Out = 500;
+ if ((RTCIRQHandle = VPICD_Virtualize_IRQ(&IRQdesc)) == 0)
+ return false;
+
+ /* Program the real time clock default frequency */
+ PM_setRealTimeClockFrequency(frequency);
+
+ /* Unmask IRQ8 in the PIC */
+ VPICD_Physically_Unmask(RTCIRQHandle);
+ return true;
+}
+
+/****************************************************************************
+REMARKS:
+Restore the original real time clock handler.
+****************************************************************************/
+void PMAPI PM_restoreRealTimeClockHandler(void)
+{
+ if (RTCIRQHandle) {
+ /* Restore CMOS registers and mask RTC clock */
+ _PM_writeCMOS(0x0A,_PM_oldCMOSRegA);
+ _PM_writeCMOS(0x0B,_PM_oldCMOSRegB);
+
+ /* Restore the interrupt vector */
+ VPICD_Set_Auto_Masking(RTCIRQHandle);
+ VPICD_Force_Default_Behavior(RTCIRQHandle);
+ RTCIRQHandle = 0;
+ }
+}
+
+/****************************************************************************
+REMARKS:
+OS specific shared libraries not supported inside a VxD
+****************************************************************************/
+PM_MODULE PMAPI PM_loadLibrary(
+ const char *szDLLName)
+{
+ (void)szDLLName;
+ return NULL;
+}
+
+/****************************************************************************
+REMARKS:
+OS specific shared libraries not supported inside a VxD
+****************************************************************************/
+void * PMAPI PM_getProcAddress(
+ PM_MODULE hModule,
+ const char *szProcName)
+{
+ (void)hModule;
+ (void)szProcName;
+ return NULL;
+}
+
+/****************************************************************************
+REMARKS:
+OS specific shared libraries not supported inside a VxD
+****************************************************************************/
+void PMAPI PM_freeLibrary(
+ PM_MODULE hModule)
+{
+ (void)hModule;
+}
+
+/****************************************************************************
+REMARKS:
+Function to find the first file matching a search criteria in a directory.
+****************************************************************************/
+void *PMAPI PM_findFirstFile(
+ const char *filename,
+ PM_findData *findData)
+{
+ // TODO: This function should start a directory enumeration search
+ // given the filename (with wildcards). The data should be
+ // converted and returned in the findData standard form.
+ (void)filename;
+ (void)findData;
+ return PM_FILE_INVALID;
+}
+
+/****************************************************************************
+REMARKS:
+Function to find the next file matching a search criteria in a directory.
+****************************************************************************/
+ibool PMAPI PM_findNextFile(
+ void *handle,
+ PM_findData *findData)
+{
+ // TODO: This function should find the next file in directory enumeration
+ // search given the search criteria defined in the call to
+ // PM_findFirstFile. The data should be converted and returned
+ // in the findData standard form.
+ (void)handle;
+ (void)findData;
+ return false;
+}
+
+/****************************************************************************
+REMARKS:
+Function to close the find process
+****************************************************************************/
+void PMAPI PM_findClose(
+ void *handle)
+{
+ // TODO: This function should close the find process. This may do
+ // nothing for some OS'es.
+ (void)handle;
+}
+
+/****************************************************************************
+REMARKS:
+Function to determine if a drive is a valid drive or not. Under Unix this
+function will return false for anything except a value of 3 (considered
+the root drive, and equivalent to C: for non-Unix systems). The drive
+numbering is:
+
+ 1 - Drive A:
+ 2 - Drive B:
+ 3 - Drive C:
+ etc
+
+****************************************************************************/
+ibool PMAPI PM_driveValid(
+ char drive)
+{
+ // Not supported in a VxD
+ (void)drive;
+ return false;
+}
+
+/****************************************************************************
+REMARKS:
+Function to get the current working directory for the specififed drive.
+Under Unix this will always return the current working directory regardless
+of what the value of 'drive' is.
+****************************************************************************/
+void PMAPI PM_getdcwd(
+ int drive,
+ char *dir,
+ int len)
+{
+ // Not supported in a VxD
+ (void)drive;
+ (void)dir;
+ (void)len;
+}
+
+/****************************************************************************
+PARAMETERS:
+base - The starting physical base address of the region
+size - The size in bytes of the region
+type - Type to place into the MTRR register
+
+RETURNS:
+Error code describing the result.
+
+REMARKS:
+Function to enable write combining for the specified region of memory.
+****************************************************************************/
+int PMAPI PM_enableWriteCombine(
+ ulong base,
+ ulong size,
+ uint type)
+{
+ return MTRR_enableWriteCombine(base,size,type);
+}
+
+/****************************************************************************
+REMARKS:
+Function to change the file attributes for a specific file.
+****************************************************************************/
+void PMAPI PM_setFileAttr(
+ const char *filename,
+ uint attrib)
+{
+ // TODO: Implement this
+ (void)filename;
+ (void)attrib;
+ PM_fatalError("PM_setFileAttr not implemented yet!");
+}
+
+/****************************************************************************
+REMARKS:
+Function to get the file attributes for a specific file.
+****************************************************************************/
+uint PMAPI PM_getFileAttr(
+ const char *filename)
+{
+ // TODO: Implement this
+ (void)filename;
+ PM_fatalError("PM_getFileAttr not implemented yet!");
+ return 0;
+}
+
+/****************************************************************************
+REMARKS:
+Function to create a directory.
+****************************************************************************/
+ibool PMAPI PM_mkdir(
+ const char *filename)
+{
+ // TODO: Implement this
+ (void)filename;
+ PM_fatalError("PM_mkdir not implemented yet!");
+ return false;
+}
+
+/****************************************************************************
+REMARKS:
+Function to remove a directory.
+****************************************************************************/
+ibool PMAPI PM_rmdir(
+ const char *filename)
+{
+ // TODO: Implement this
+ (void)filename;
+ PM_fatalError("PM_rmdir not implemented yet!");
+ return false;
+}
+
+/****************************************************************************
+REMARKS:
+Function to get the file time and date for a specific file.
+****************************************************************************/
+ibool PMAPI PM_getFileTime(
+ const char *filename,
+ ibool gmTime,
+ PM_time *time)
+{
+ // TODO: Implement this!
+ (void)filename;
+ (void)gmTime;
+ (void)time;
+ PM_fatalError("PM_getFileTime not implemented yet!");
+ return false;
+}
+
+/****************************************************************************
+REMARKS:
+Function to set the file time and date for a specific file.
+****************************************************************************/
+ibool PMAPI PM_setFileTime(
+ const char *filename,
+ ibool gmTime,
+ PM_time *time)
+{
+ // TODO: Implement this!
+ (void)filename;
+ (void)gmTime;
+ (void)time;
+ PM_fatalError("PM_setFileTime not implemented yet!");
+ return false;
+}
+
diff --git a/board/MAI/bios_emulator/scitech/src/pm/vxd/vflat.c b/board/MAI/bios_emulator/scitech/src/pm/vxd/vflat.c
new file mode 100644
index 00000000000..901ce1cf037
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/pm/vxd/vflat.c
@@ -0,0 +1,45 @@
+/****************************************************************************
+*
+* SciTech OS Portability Manager Library
+*
+* ========================================================================
+*
+* The contents of this file are subject to the SciTech MGL Public
+* License Version 1.0 (the "License"); you may not use this file
+* except in compliance with the License. You may obtain a copy of
+* the License at http://www.scitechsoft.com/mgl-license.txt
+*
+* Software distributed under the License is distributed on an
+* "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+* implied. See the License for the specific language governing
+* rights and limitations under the License.
+*
+* The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+*
+* The Initial Developer of the Original Code is SciTech Software, Inc.
+* All Rights Reserved.
+*
+* ========================================================================
+*
+* Language: ANSI C
+* Environment: Any
+*
+* Description: Dummy module; no virtual framebuffer for this OS
+*
+****************************************************************************/
+
+#include "pmapi.h"
+
+ibool PMAPI VF_available(void)
+{
+ return false;
+}
+
+void * PMAPI VF_init(ulong baseAddr,int bankSize,int codeLen,void *bankFunc)
+{
+ return NULL;
+}
+
+void PMAPI VF_exit(void)
+{
+}
diff --git a/board/MAI/bios_emulator/scitech/src/pm/vxd/ztimer.c b/board/MAI/bios_emulator/scitech/src/pm/vxd/ztimer.c
new file mode 100644
index 00000000000..76df48c38b7
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/pm/vxd/ztimer.c
@@ -0,0 +1,105 @@
+/****************************************************************************
+*
+* Ultra Long Period Timer
+*
+* ========================================================================
+*
+* The contents of this file are subject to the SciTech MGL Public
+* License Version 1.0 (the "License"); you may not use this file
+* except in compliance with the License. You may obtain a copy of
+* the License at http://www.scitechsoft.com/mgl-license.txt
+*
+* Software distributed under the License is distributed on an
+* "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+* implied. See the License for the specific language governing
+* rights and limitations under the License.
+*
+* The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+*
+* The Initial Developer of the Original Code is SciTech Software, Inc.
+* All Rights Reserved.
+*
+* ========================================================================
+*
+* Language: ANSI C
+* Environment: 32-bit Windows VxD
+*
+* Description: OS specific implementation for the Zen Timer functions.
+*
+****************************************************************************/
+
+/*---------------------------- Global variables ---------------------------*/
+
+static ulong frequency = 1193180;
+
+/*----------------------------- Implementation ----------------------------*/
+
+/****************************************************************************
+REMARKS:
+Initialise the Zen Timer module internals.
+****************************************************************************/
+#define __ZTimerInit()
+
+/****************************************************************************
+REMARKS:
+Call the assembler Zen Timer functions to do the timing.
+****************************************************************************/
+#define __LZTimerOn(tm) VTD_Get_Real_Time(&tm->start.high,&tm->start.low)
+
+/****************************************************************************
+REMARKS:
+Call the assembler Zen Timer functions to do the timing.
+****************************************************************************/
+static ulong __LZTimerLap(
+ LZTimerObject *tm)
+{
+ CPU_largeInteger lap,count;
+ VTD_Get_Real_Time(&lap.high,&lap.low);
+ _CPU_diffTime64(&tm->start,&lap,&count);
+ return _CPU_calcMicroSec(&count,frequency);
+}
+
+/****************************************************************************
+REMARKS:
+Call the assembler Zen Timer functions to do the timing.
+****************************************************************************/
+#define __LZTimerOff(tm) VTD_Get_Real_Time(&tm->end.high,&tm->end.low)
+
+/****************************************************************************
+REMARKS:
+Call the assembler Zen Timer functions to do the timing.
+****************************************************************************/
+static ulong __LZTimerCount(
+ LZTimerObject *tm)
+{
+ CPU_largeInteger tmCount;
+ _CPU_diffTime64(&tm->start,&tm->end,&tmCount);
+ return _CPU_calcMicroSec(&tmCount,frequency);
+}
+
+/****************************************************************************
+REMARKS:
+Define the resolution of the long period timer as microseconds per timer tick.
+****************************************************************************/
+#define ULZTIMER_RESOLUTION 1000
+
+/****************************************************************************
+REMARKS:
+Read the Long Period timer value from the BIOS timer tick.
+****************************************************************************/
+static ulong __ULZReadTime(void)
+{
+ CPU_largeInteger count;
+ VTD_Get_Real_Time(&count.high,&count.low);
+ return (count.low * 1000.0 / frequency);
+}
+
+/****************************************************************************
+REMARKS:
+Compute the elapsed time from the BIOS timer tick. Note that we check to see
+whether a midnight boundary has passed, and if so adjust the finish time to
+account for this. We cannot detect if more that one midnight boundary has
+passed, so if this happens we will be generating erronous results.
+****************************************************************************/
+ulong __ULZElapsedTime(ulong start,ulong finish)
+{ return finish - start; }
diff --git a/board/MAI/bios_emulator/scitech/src/pm/win32/_pmwin32.asm b/board/MAI/bios_emulator/scitech/src/pm/win32/_pmwin32.asm
new file mode 100644
index 00000000000..7c242b57243
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/pm/win32/_pmwin32.asm
@@ -0,0 +1,78 @@
+;****************************************************************************
+;*
+;* SciTech OS Portability Manager Library
+;*
+;* ========================================================================
+;*
+;* The contents of this file are subject to the SciTech MGL Public
+;* License Version 1.0 (the "License"); you may not use this file
+;* except in compliance with the License. You may obtain a copy of
+;* the License at http://www.scitechsoft.com/mgl-license.txt
+;*
+;* Software distributed under the License is distributed on an
+;* "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+;* implied. See the License for the specific language governing
+;* rights and limitations under the License.
+;*
+;* The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+;*
+;* The Initial Developer of the Original Code is SciTech Software, Inc.
+;* All Rights Reserved.
+;*
+;* ========================================================================
+;*
+;* Language: 80386 Assembler, TASM 4.0 or NASM
+;* Environment: Win32
+;*
+;* Description: Low level assembly support for the PM library specific
+;* to Windows.
+;*
+;****************************************************************************
+
+ IDEAL
+
+include "scitech.mac" ; Memory model macros
+
+header _pmwin32 ; Set up memory model
+
+begdataseg _pmwin32
+
+ cglobal _PM_ioentry
+ cglobal _PM_gdt
+_PM_ioentry dd 0 ; Offset to call gate
+_PM_gdt dw 0 ; Selector to call gate
+
+enddataseg _pmwin32
+
+begcodeseg _pmwin32 ; Start of code segment
+
+;----------------------------------------------------------------------------
+; int PM_setIOPL(int iopl)
+;----------------------------------------------------------------------------
+; Change the IOPL level for the 32-bit task. Returns the previous level
+; so it can be restored for the task correctly.
+;----------------------------------------------------------------------------
+cprocstart _PM_setIOPLViaCallGate
+
+ ARG iopl:UINT
+
+ enter_c
+ pushfd ; Save the old EFLAGS for later
+ mov ecx,[iopl] ; ECX := IOPL level
+ xor ebx,ebx ; Change IOPL level function code
+ifdef USE_NASM
+ call far dword [_PM_ioentry]
+else
+ call [FWORD _PM_ioentry]
+endif
+ pop eax
+ and eax,0011000000000000b
+ shr eax,12
+ leave_c
+ ret
+
+cprocend
+
+endcodeseg _pmwin32
+
+ END ; End of module
diff --git a/board/MAI/bios_emulator/scitech/src/pm/win32/cpuinfo.c b/board/MAI/bios_emulator/scitech/src/pm/win32/cpuinfo.c
new file mode 100644
index 00000000000..5978b9f76e2
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/pm/win32/cpuinfo.c
@@ -0,0 +1,94 @@
+/****************************************************************************
+*
+* Ultra Long Period Timer
+*
+* ========================================================================
+*
+* The contents of this file are subject to the SciTech MGL Public
+* License Version 1.0 (the "License"); you may not use this file
+* except in compliance with the License. You may obtain a copy of
+* the License at http://www.scitechsoft.com/mgl-license.txt
+*
+* Software distributed under the License is distributed on an
+* "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+* implied. See the License for the specific language governing
+* rights and limitations under the License.
+*
+* The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+*
+* The Initial Developer of the Original Code is SciTech Software, Inc.
+* All Rights Reserved.
+*
+* ========================================================================
+*
+* Language: ANSI C
+* Environment: Win32
+*
+* Description: Module to implement OS specific services to measure the
+* CPU frequency.
+*
+****************************************************************************/
+
+/*---------------------------- Global variables ---------------------------*/
+
+static ibool havePerformanceCounter;
+
+/*----------------------------- Implementation ----------------------------*/
+
+/****************************************************************************
+REMARKS:
+Increase the thread priority to maximum, if possible.
+****************************************************************************/
+static int SetMaxThreadPriority(void)
+{
+ int oldPriority;
+ HANDLE hThread = GetCurrentThread();
+
+ oldPriority = GetThreadPriority(hThread);
+ if (oldPriority != THREAD_PRIORITY_ERROR_RETURN)
+ SetThreadPriority(hThread, THREAD_PRIORITY_TIME_CRITICAL);
+ return oldPriority;
+}
+
+/****************************************************************************
+REMARKS:
+Restore the original thread priority.
+****************************************************************************/
+static void RestoreThreadPriority(
+ int oldPriority)
+{
+ HANDLE hThread = GetCurrentThread();
+
+ if (oldPriority != THREAD_PRIORITY_ERROR_RETURN)
+ SetThreadPriority(hThread, oldPriority);
+}
+
+/****************************************************************************
+REMARKS:
+Initialise the counter and return the frequency of the counter.
+****************************************************************************/
+static void GetCounterFrequency(
+ CPU_largeInteger *freq)
+{
+ if (!QueryPerformanceFrequency((LARGE_INTEGER*)freq)) {
+ havePerformanceCounter = false;
+ freq->low = 100000;
+ freq->high = 0;
+ }
+ else
+ havePerformanceCounter = true;
+}
+
+/****************************************************************************
+REMARKS:
+Read the counter and return the counter value.
+****************************************************************************/
+#define GetCounter(t) \
+{ \
+ if (havePerformanceCounter) \
+ QueryPerformanceCounter((LARGE_INTEGER*)t); \
+ else { \
+ (t)->low = timeGetTime() * 100; \
+ (t)->high = 0; \
+ } \
+}
diff --git a/board/MAI/bios_emulator/scitech/src/pm/win32/ddraw.c b/board/MAI/bios_emulator/scitech/src/pm/win32/ddraw.c
new file mode 100644
index 00000000000..cf89401fe64
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/pm/win32/ddraw.c
@@ -0,0 +1,583 @@
+/****************************************************************************
+*
+* SciTech Multi-platform Graphics Library
+*
+* ========================================================================
+*
+* The contents of this file are subject to the SciTech MGL Public
+* License Version 1.0 (the "License"); you may not use this file
+* except in compliance with the License. You may obtain a copy of
+* the License at http://www.scitechsoft.com/mgl-license.txt
+*
+* Software distributed under the License is distributed on an
+* "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+* implied. See the License for the specific language governing
+* rights and limitations under the License.
+*
+* The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+*
+* The Initial Developer of the Original Code is SciTech Software, Inc.
+* All Rights Reserved.
+*
+* ========================================================================
+*
+* Language: ANSI C
+* Environment: Win32
+*
+* Description: Win32 implementation for the SciTech cross platform
+* event library.
+*
+****************************************************************************/
+
+#include "event.h"
+#include "pmapi.h"
+#include "win32/oshdr.h"
+#include "nucleus/graphics.h"
+
+/*---------------------------- Global Variables ---------------------------*/
+
+/* Publicly accessible variables */
+
+int _PM_deskX,_PM_deskY;/* Desktop dimentions */
+HWND _PM_hwndConsole; /* Window handle for console */
+#ifdef __INTEL__
+uint _PM_cw_default; /* Default FPU control word */
+#endif
+
+/* Private internal variables */
+
+static HINSTANCE hInstApp = NULL;/* Application instance handle */
+static HWND hwndUser = NULL;/* User window handle */
+static HINSTANCE hInstDD = NULL; /* Handle to DirectDraw DLL */
+static LPDIRECTDRAW lpDD = NULL; /* DirectDraw object */
+static LONG oldWndStyle; /* Info about old user window */
+static LONG oldExWndStyle; /* Info about old user window */
+static int oldWinPosX; /* Old window position X coordinate */
+static int oldWinPosY; /* Old window pisition Y coordinate */
+static int oldWinSizeX; /* Old window size X */
+static int oldWinSizeY; /* Old window size Y */
+static WNDPROC oldWinProc = NULL;
+static PM_saveState_cb suspendApp = NULL;
+static ibool waitActive = false;
+static ibool isFullScreen = false;
+static ibool backInGDI = false;
+
+/* Internal strings */
+
+static char *szWinClassName = "SciTechDirectDrawWindow";
+static char *szAutoPlayKey = "Software\\Microsoft\\Windows\\CurrentVersion\\Policies\\Explorer";
+static char *szAutoPlayValue = "NoDriveTypeAutoRun";
+
+/* Dynalinks to DirectDraw functions */
+
+static HRESULT (WINAPI *pDirectDrawCreate)(GUID FAR *lpGUID, LPDIRECTDRAW FAR *lplpDD, IUnknown FAR *pUnkOuter);
+
+/*---------------------------- Implementation -----------------------------*/
+
+/****************************************************************************
+REMARKS:
+Temporarily disables AutoPlay operation while we are running in fullscreen
+graphics modes.
+****************************************************************************/
+static void DisableAutoPlay(void)
+{
+ DWORD dwAutoPlay,dwSize = sizeof(dwAutoPlay);
+ HKEY hKey;
+
+ if (RegOpenKeyEx(HKEY_CURRENT_USER,szAutoPlayKey,0,KEY_EXECUTE | KEY_WRITE,&hKey) == ERROR_SUCCESS) {
+ RegQueryValueEx(hKey,szAutoPlayValue,NULL,NULL,(void*)&dwAutoPlay,&dwSize);
+ dwAutoPlay |= AUTOPLAY_DRIVE_CDROM;
+ RegSetValueEx(hKey,szAutoPlayValue,0,REG_DWORD,(void*)&dwAutoPlay,dwSize);
+ RegCloseKey(hKey);
+ }
+}
+
+/****************************************************************************
+REMARKS:
+Re-enables AutoPlay operation when we return to regular GDI mode.
+****************************************************************************/
+static void RestoreAutoPlay(void)
+{
+ DWORD dwAutoPlay,dwSize = sizeof(dwAutoPlay);
+ HKEY hKey;
+
+ if (RegOpenKeyEx(HKEY_CURRENT_USER,szAutoPlayKey,0,KEY_EXECUTE | KEY_WRITE,&hKey) == ERROR_SUCCESS) {
+ RegQueryValueEx(hKey,szAutoPlayValue,NULL,NULL,(void*)&dwAutoPlay,&dwSize);
+ dwAutoPlay &= ~AUTOPLAY_DRIVE_CDROM;
+ RegSetValueEx(hKey,szAutoPlayValue,0,REG_DWORD,(void*)&dwAutoPlay,dwSize);
+ RegCloseKey(hKey);
+ }
+}
+
+/****************************************************************************
+REMARKS:
+Suspends the application by switching back to the GDI desktop, allowing
+normal application code to be processed, and then waiting for the
+application activate command to bring us back to fullscreen mode with our
+window minimised.
+****************************************************************************/
+static void LeaveFullScreen(void)
+{
+ int retCode = PM_SUSPEND_APP;
+
+ if (backInGDI)
+ return;
+ if (suspendApp)
+ retCode = suspendApp(PM_DEACTIVATE);
+ RestoreAutoPlay();
+ backInGDI = true;
+
+ /* Now process messages normally until we are re-activated */
+ waitActive = true;
+ if (retCode != PM_NO_SUSPEND_APP) {
+ while (waitActive) {
+ _EVT_pumpMessages();
+ Sleep(200);
+ }
+ }
+}
+
+/****************************************************************************
+REMARKS:
+Reactivate all the surfaces for DirectDraw and set the system back up for
+fullscreen rendering.
+****************************************************************************/
+static void RestoreFullScreen(void)
+{
+ static ibool firstTime = true;
+
+ if (firstTime) {
+ /* Clear the message queue while waiting for the surfaces to be
+ * restored.
+ */
+ firstTime = false;
+ while (1) {
+ /* Continue looping until out application has been restored
+ * and we have reset the display mode.
+ */
+ _EVT_pumpMessages();
+ if (GetActiveWindow() == _PM_hwndConsole) {
+ if (suspendApp)
+ suspendApp(PM_REACTIVATE);
+ DisableAutoPlay();
+ backInGDI = false;
+ waitActive = false;
+ firstTime = true;
+ return;
+ }
+ Sleep(200);
+ }
+ }
+}
+
+/****************************************************************************
+REMARKS:
+This function suspends the application by switching back to the GDI desktop,
+allowing normal application code to be processed and then waiting for the
+application activate command to bring us back to fullscreen mode with our
+window minimised.
+
+This version only gets called if we have not captured the screen switch in
+our activate message loops and will occur if the DirectDraw drivers lose a
+surface for some reason while rendering. This should not normally happen,
+but it is included just to be sure (it can happen on WinNT/2000 if the user
+hits the Ctrl-Alt-Del key combination). Note that this code will always
+spin loop, and we cannot disable the spin looping from this version (ie:
+if the user hits Ctrl-Alt-Del under WinNT/2000 the application main loop
+will cease to be executed until the user switches back to the application).
+****************************************************************************/
+void PMAPI PM_doSuspendApp(void)
+{
+ static ibool firstTime = true;
+
+ /* Call system DLL version if found */
+ if (_PM_imports.PM_doSuspendApp != PM_doSuspendApp) {
+ _PM_imports.PM_doSuspendApp();
+ return;
+ }
+
+ if (firstTime) {
+ if (suspendApp)
+ suspendApp(PM_DEACTIVATE);
+ RestoreAutoPlay();
+ firstTime = false;
+ backInGDI = true;
+ }
+ RestoreFullScreen();
+ firstTime = true;
+}
+
+/****************************************************************************
+REMARKS:
+Main Window proc for the full screen DirectDraw Window that we create while
+running in full screen mode. Here we capture all mouse and keyboard events
+for the window and plug them into our event queue.
+****************************************************************************/
+static LONG CALLBACK PM_winProc(
+ HWND hwnd,
+ UINT msg,
+ WPARAM wParam,
+ LONG lParam)
+{
+ switch (msg) {
+ case WM_SYSCHAR:
+ /* Stop Alt-Space from pausing our application */
+ return 0;
+ case WM_KEYDOWN:
+ case WM_SYSKEYDOWN:
+ if (HIWORD(lParam) & KF_REPEAT) {
+ if (msg == WM_SYSKEYDOWN)
+ return 0;
+ break;
+ }
+ /* Fall through for keydown events */
+ case WM_KEYUP:
+ case WM_SYSKEYUP:
+ if (msg == WM_SYSKEYDOWN || msg == WM_SYSKEYUP) {
+ if ((HIWORD(lParam) & KF_ALTDOWN) && wParam == VK_RETURN)
+ break;
+ /* We ignore the remainder of the system keys to stop the
+ * system menu from being activated from the keyboard and pausing
+ * our app while fullscreen (ie: pressing the Alt key).
+ */
+ return 0;
+ }
+ break;
+ case WM_SYSCOMMAND:
+ switch (wParam & ~0x0F) {
+ case SC_SCREENSAVE:
+ case SC_MONITORPOWER:
+ /* Ignore screensaver requests in fullscreen modes */
+ return 0;
+ }
+ break;
+ case WM_SIZE:
+ if (waitActive && backInGDI && (wParam != SIZE_MINIMIZED)) {
+ /* Start the re-activation process */
+ PostMessage(hwnd,WM_DO_SUSPEND_APP,WM_PM_RESTORE_FULLSCREEN,0);
+ }
+ else if (!waitActive && isFullScreen && !backInGDI && (wParam == SIZE_MINIMIZED)) {
+ /* Start the de-activation process */
+ PostMessage(hwnd,WM_DO_SUSPEND_APP,WM_PM_LEAVE_FULLSCREEN,0);
+ }
+ break;
+ case WM_DO_SUSPEND_APP:
+ switch (wParam) {
+ case WM_PM_RESTORE_FULLSCREEN:
+ RestoreFullScreen();
+ break;
+ case WM_PM_LEAVE_FULLSCREEN:
+ LeaveFullScreen();
+ break;
+ }
+ return 0;
+ }
+ if (oldWinProc)
+ return oldWinProc(hwnd,msg,wParam,lParam);
+ return DefWindowProc(hwnd,msg,wParam,lParam);
+}
+
+/****************************************************************************
+PARAMETERS:
+hwnd - User window to convert
+width - Window of the fullscreen window
+height - Height of the fullscreen window
+
+RETURNS:
+Handle to converted fullscreen Window.
+
+REMARKS:
+This function takes the original user window handle and modifies the size,
+position and attributes for the window to convert it into a fullscreen
+window that we can use.
+****************************************************************************/
+static PM_HWND _PM_convertUserWindow(
+ HWND hwnd,
+ int width,
+ int height)
+{
+ RECT window;
+
+ GetWindowRect(hwnd,&window);
+ oldWinPosX = window.left;
+ oldWinPosY = window.top;
+ oldWinSizeX = window.right - window.left;
+ oldWinSizeY = window.bottom - window.top;
+ oldWndStyle = SetWindowLong(hwnd,GWL_STYLE,WS_POPUP | WS_SYSMENU);
+ oldExWndStyle = SetWindowLong(hwnd,GWL_EXSTYLE,WS_EX_APPWINDOW);
+ ShowWindow(hwnd,SW_SHOW);
+ MoveWindow(hwnd,0,0,width,height,TRUE);
+ SetWindowPos(hwnd,HWND_TOPMOST,0,0,0,0,SWP_NOMOVE | SWP_NOSIZE);
+ oldWinProc = (WNDPROC)SetWindowLong(hwnd,GWL_WNDPROC, (LPARAM)PM_winProc);
+ return hwnd;
+}
+
+/****************************************************************************
+PARAMETERS:
+hwnd - User window to restore
+
+REMARKS:
+This function restores the original attributes of the user window and put's
+it back into it's original state before it was converted to a fullscreen
+window.
+****************************************************************************/
+static void _PM_restoreUserWindow(
+ HWND hwnd)
+{
+ SetWindowLong(hwnd,GWL_WNDPROC, (LPARAM)oldWinProc);
+ SetWindowLong(hwnd,GWL_EXSTYLE,oldExWndStyle);
+ SetWindowLong(hwnd,GWL_STYLE,oldWndStyle);
+ SetWindowPos(hwnd,HWND_NOTOPMOST,0,0,0,0,SWP_NOMOVE | SWP_NOSIZE);
+ ShowWindow(hwnd,SW_SHOW);
+ MoveWindow(hwnd,oldWinPosX,oldWinPosY,oldWinSizeX,oldWinSizeY,TRUE);
+ oldWinProc = NULL;
+}
+
+/****************************************************************************
+PARAMETERS:
+device - Index of the device to load DirectDraw for (0 for primary)
+
+REMARKS:
+Attempts to dynamically load the DirectDraw DLL's and create the DirectDraw
+objects that we need.
+****************************************************************************/
+void * PMAPI PM_loadDirectDraw(
+ int device)
+{
+ HDC hdc;
+ int bits;
+
+ /* Call system DLL version if found */
+ if (_PM_imports.PM_loadDirectDraw != PM_loadDirectDraw)
+ return _PM_imports.PM_loadDirectDraw(device);
+
+ // TODO: Handle multi-monitor!!
+ if (device != 0)
+ return NULL;
+
+ /* Load the DirectDraw DLL if not presently loaded */
+ GET_DEFAULT_CW();
+ if (!hInstDD) {
+ hdc = GetDC(NULL);
+ bits = GetDeviceCaps(hdc,BITSPIXEL);
+ ReleaseDC(NULL,hdc);
+ if (bits < 8)
+ return NULL;
+ if ((hInstDD = LoadLibrary("ddraw.dll")) == NULL)
+ return NULL;
+ pDirectDrawCreate = (void*)GetProcAddress(hInstDD,"DirectDrawCreate");
+ if (!pDirectDrawCreate)
+ return NULL;
+ }
+
+ /* Create the DirectDraw object */
+ if (!lpDD && pDirectDrawCreate(NULL, &lpDD, NULL) != DD_OK) {
+ lpDD = NULL;
+ return NULL;
+ }
+ RESET_DEFAULT_CW();
+ return lpDD;
+}
+
+/****************************************************************************
+PARAMETERS:
+device - Index of the device to unload DirectDraw for (0 for primary)
+
+REMARKS:
+Frees any DirectDraw objects for the device. We never actually explicitly
+unload the ddraw.dll library, since unloading and reloading it is
+unnecessary since we only want to unload it when the application exits and
+that happens automatically.
+****************************************************************************/
+void PMAPI PM_unloadDirectDraw(
+ int device)
+{
+ /* Call system DLL version if found */
+ if (_PM_imports.PM_unloadDirectDraw != PM_unloadDirectDraw) {
+ _PM_imports.PM_unloadDirectDraw(device);
+ return;
+ }
+ if (lpDD) {
+ IDirectDraw_Release(lpDD);
+ lpDD = NULL;
+ }
+ (void)device;
+}
+
+/****************************************************************************
+REMARKS:
+Open a console for output to the screen, creating the main event handling
+window if necessary.
+****************************************************************************/
+PM_HWND PMAPI PM_openConsole(
+ PM_HWND hWndUser,
+ int device,
+ int xRes,
+ int yRes,
+ int bpp,
+ ibool fullScreen)
+{
+ WNDCLASS cls;
+ static ibool classRegistered = false;
+
+ /* Call system DLL version if found */
+ GA_getSystemPMImports();
+ if (_PM_imports.PM_openConsole != PM_openConsole) {
+ if (fullScreen) {
+ _PM_deskX = xRes;
+ _PM_deskY = yRes;
+ }
+ return _PM_imports.PM_openConsole(hWndUser,device,xRes,yRes,bpp,fullScreen);
+ }
+
+ /* Create the fullscreen window if necessary */
+ hwndUser = hWndUser;
+ if (fullScreen) {
+ if (!classRegistered) {
+ /* Create a Window class for the fullscreen window in here, since
+ * we need to register one that will do all our event handling for
+ * us.
+ */
+ hInstApp = GetModuleHandle(NULL);
+ cls.hCursor = LoadCursor(NULL,IDC_ARROW);
+ cls.hIcon = LoadIcon(hInstApp,MAKEINTRESOURCE(1));
+ cls.lpszMenuName = NULL;
+ cls.lpszClassName = szWinClassName;
+ cls.hbrBackground = GetStockObject(BLACK_BRUSH);
+ cls.hInstance = hInstApp;
+ cls.style = CS_DBLCLKS;
+ cls.lpfnWndProc = PM_winProc;
+ cls.cbWndExtra = 0;
+ cls.cbClsExtra = 0;
+ if (!RegisterClass(&cls))
+ return NULL;
+ classRegistered = true;
+ }
+ _PM_deskX = xRes;
+ _PM_deskY = yRes;
+ if (!hwndUser) {
+ char windowTitle[80];
+ if (LoadString(hInstApp,1,windowTitle,sizeof(windowTitle)) == 0)
+ strcpy(windowTitle,"MGL Fullscreen Application");
+ _PM_hwndConsole = CreateWindowEx(WS_EX_APPWINDOW,szWinClassName,
+ windowTitle,WS_POPUP | WS_SYSMENU,0,0,xRes,yRes,
+ NULL,NULL,hInstApp,NULL);
+ }
+ else {
+ _PM_hwndConsole = _PM_convertUserWindow(hwndUser,xRes,yRes);
+ }
+ ShowCursor(false);
+ isFullScreen = true;
+ }
+ else {
+ _PM_hwndConsole = hwndUser;
+ isFullScreen = false;
+ }
+ SetFocus(_PM_hwndConsole);
+ SetForegroundWindow(_PM_hwndConsole);
+ DisableAutoPlay();
+ (void)bpp;
+ return _PM_hwndConsole;
+}
+
+/****************************************************************************
+REMARKS:
+Find the size of the console state buffer.
+****************************************************************************/
+int PMAPI PM_getConsoleStateSize(void)
+{
+ /* Call system DLL version if found */
+ if (_PM_imports.PM_getConsoleStateSize != PM_getConsoleStateSize)
+ return _PM_imports.PM_getConsoleStateSize();
+
+ /* Not used in Windows */
+ return 1;
+}
+
+/****************************************************************************
+REMARKS:
+Save the state of the console.
+****************************************************************************/
+void PMAPI PM_saveConsoleState(
+ void *stateBuf,
+ PM_HWND hwndConsole)
+{
+ /* Call system DLL version if found */
+ if (_PM_imports.PM_saveConsoleState != PM_saveConsoleState) {
+ _PM_imports.PM_saveConsoleState(stateBuf,hwndConsole);
+ return;
+ }
+
+ /* Not used in Windows */
+ (void)stateBuf;
+ (void)hwndConsole;
+}
+
+/****************************************************************************
+REMARKS:
+Set the suspend application callback for the fullscreen console.
+****************************************************************************/
+void PMAPI PM_setSuspendAppCallback(
+ PM_saveState_cb saveState)
+{
+ /* Call system DLL version if found */
+ if (_PM_imports.PM_setSuspendAppCallback != PM_setSuspendAppCallback) {
+ _PM_imports.PM_setSuspendAppCallback(saveState);
+ return;
+ }
+ suspendApp = saveState;
+}
+
+/****************************************************************************
+REMARKS:
+Restore the console state.
+****************************************************************************/
+void PMAPI PM_restoreConsoleState(
+ const void *stateBuf,
+ PM_HWND hwndConsole)
+{
+ /* Call system DLL version if found */
+ if (_PM_imports.PM_restoreConsoleState != PM_restoreConsoleState) {
+ _PM_imports.PM_restoreConsoleState(stateBuf,hwndConsole);
+ return;
+ }
+
+ /* Not used in Windows */
+ (void)stateBuf;
+ (void)hwndConsole;
+}
+
+/****************************************************************************
+REMARKS:
+Close the fullscreen console.
+****************************************************************************/
+void PMAPI PM_closeConsole(
+ PM_HWND hwndConsole)
+{
+ /* Call system DLL version if found */
+ if (_PM_imports.PM_closeConsole != PM_closeConsole) {
+ _PM_imports.PM_closeConsole(hwndConsole);
+ return;
+ }
+ ShowCursor(true);
+ RestoreAutoPlay();
+ if (hwndUser)
+ _PM_restoreUserWindow(hwndConsole);
+ else
+ DestroyWindow(hwndConsole);
+ hwndUser = NULL;
+ _PM_hwndConsole = NULL;
+}
+
+/****************************************************************************
+REMARKS:
+Return the DirectDraw window handle used by the application.
+****************************************************************************/
+PM_HWND PMAPI PM_getDirectDrawWindow(void)
+{
+ /* Call system DLL version if found */
+ if (_PM_imports.PM_getDirectDrawWindow != PM_getDirectDrawWindow)
+ return _PM_imports.PM_getDirectDrawWindow();
+ return _PM_hwndConsole;
+}
+
diff --git a/board/MAI/bios_emulator/scitech/src/pm/win32/event.c b/board/MAI/bios_emulator/scitech/src/pm/win32/event.c
new file mode 100644
index 00000000000..c14377dcda3
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/pm/win32/event.c
@@ -0,0 +1,460 @@
+/****************************************************************************
+*
+* SciTech Multi-platform Graphics Library
+*
+* ========================================================================
+*
+* The contents of this file are subject to the SciTech MGL Public
+* License Version 1.0 (the "License"); you may not use this file
+* except in compliance with the License. You may obtain a copy of
+* the License at http://www.scitechsoft.com/mgl-license.txt
+*
+* Software distributed under the License is distributed on an
+* "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+* implied. See the License for the specific language governing
+* rights and limitations under the License.
+*
+* The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+*
+* The Initial Developer of the Original Code is SciTech Software, Inc.
+* All Rights Reserved.
+*
+* ========================================================================
+*
+* Language: ANSI C
+* Environment: Win32
+*
+* Description: Win32 implementation for the SciTech cross platform
+* event library.
+*
+****************************************************************************/
+
+/*---------------------------- Global Variables ---------------------------*/
+
+static ushort keyUpMsg[256] = {0}; /* Table of key up messages */
+static int rangeX,rangeY; /* Range of mouse coordinates */
+
+/*---------------------------- Implementation -----------------------------*/
+
+/* These are not used under Win32 */
+#define _EVT_disableInt() 1
+#define _EVT_restoreInt(flags) (void)(flags)
+
+/****************************************************************************
+PARAMETERS:
+scanCode - Scan code to test
+
+REMARKS:
+This macro determines if a specified key is currently down at the
+time that the call is made.
+****************************************************************************/
+#define _EVT_isKeyDown(scanCode) (keyUpMsg[scanCode] != 0)
+
+/****************************************************************************
+REMARKS:
+This function is used to return the number of ticks since system
+startup in milliseconds. This should be the same value that is placed into
+the time stamp fields of events, and is used to implement auto mouse down
+events.
+****************************************************************************/
+ulong _EVT_getTicks(void)
+{ return timeGetTime(); }
+
+/****************************************************************************
+REMARKS:
+Pumps all messages in the message queue from Win32 into our event queue.
+****************************************************************************/
+void _EVT_pumpMessages(void)
+{
+ MSG msg;
+ MSG charMsg;
+ event_t evt;
+
+ // TODO: Add support for DirectInput! We can't support relative mouse
+ // movement motion counters without DirectInput ;-(.
+ while (PeekMessage(&msg,NULL,0,0,PM_REMOVE)) {
+ memset(&evt,0,sizeof(evt));
+ switch (msg.message) {
+ case WM_MOUSEMOVE:
+ evt.what = EVT_MOUSEMOVE;
+ break;
+ case WM_LBUTTONDBLCLK:
+ evt.what = EVT_MOUSEDOWN;
+ evt.message = EVT_LEFTBMASK | EVT_DBLCLICK;
+ break;
+ case WM_LBUTTONDOWN:
+ evt.what = EVT_MOUSEDOWN;
+ evt.message = EVT_LEFTBMASK;
+ break;
+ case WM_LBUTTONUP:
+ evt.what = EVT_MOUSEUP;
+ evt.message = EVT_LEFTBMASK;
+ break;
+ case WM_RBUTTONDBLCLK:
+ evt.what = EVT_MOUSEDOWN | EVT_DBLCLICK;
+ evt.message = EVT_RIGHTBMASK;
+ break;
+ case WM_RBUTTONDOWN:
+ evt.what = EVT_MOUSEDOWN;
+ evt.message = EVT_RIGHTBMASK;
+ break;
+ case WM_RBUTTONUP:
+ evt.what = EVT_MOUSEUP;
+ evt.message = EVT_RIGHTBMASK;
+ break;
+ case WM_MBUTTONDBLCLK:
+ evt.what = EVT_MOUSEDOWN | EVT_DBLCLICK;
+ evt.message = EVT_MIDDLEBMASK;
+ break;
+ case WM_MBUTTONDOWN:
+ evt.what = EVT_MOUSEDOWN;
+ evt.message = EVT_MIDDLEBMASK;
+ break;
+ case WM_MBUTTONUP:
+ evt.what = EVT_MOUSEUP;
+ evt.message = EVT_MIDDLEBMASK;
+ break;
+ case WM_KEYDOWN:
+ case WM_SYSKEYDOWN:
+ if (HIWORD(msg.lParam) & KF_REPEAT) {
+ evt.what = EVT_KEYREPEAT;
+ }
+ else {
+ evt.what = EVT_KEYDOWN;
+ }
+ break;
+ case WM_KEYUP:
+ case WM_SYSKEYUP:
+ evt.what = EVT_KEYUP;
+ break;
+ }
+
+ /* Convert mouse event modifier flags */
+ if (evt.what & EVT_MOUSEEVT) {
+ if (_PM_deskX) {
+ evt.where_x = ((long)msg.pt.x * rangeX) / _PM_deskX;
+ evt.where_y = ((long)msg.pt.y * rangeY) / _PM_deskY;
+ }
+ else {
+ ScreenToClient(_PM_hwndConsole, &msg.pt);
+ evt.where_x = msg.pt.x;
+ evt.where_y = msg.pt.y;
+ }
+ if (evt.what == EVT_MOUSEMOVE) {
+ /* Save the current mouse position */
+ EVT.mx = evt.where_x;
+ EVT.my = evt.where_y;
+ if (EVT.oldMove != -1) {
+ EVT.evtq[EVT.oldMove].where_x = evt.where_x;/* Modify existing one */
+ EVT.evtq[EVT.oldMove].where_y = evt.where_y;
+// EVT.evtq[EVT.oldMove].relative_x += mickeyX; // TODO!
+// EVT.evtq[EVT.oldMove].relative_y += mickeyY; // TODO!
+ evt.what = 0;
+ }
+ else {
+ EVT.oldMove = EVT.freeHead; /* Save id of this move event */
+// evt.relative_x = mickeyX; // TODO!
+// evt.relative_y = mickeyY; // TODO!
+ }
+ }
+ else
+ EVT.oldMove = -1;
+ if (msg.wParam & MK_LBUTTON)
+ evt.modifiers |= EVT_LEFTBUT;
+ if (msg.wParam & MK_RBUTTON)
+ evt.modifiers |= EVT_RIGHTBUT;
+ if (msg.wParam & MK_MBUTTON)
+ evt.modifiers |= EVT_MIDDLEBUT;
+ if (msg.wParam & MK_SHIFT)
+ evt.modifiers |= EVT_SHIFTKEY;
+ if (msg.wParam & MK_CONTROL)
+ evt.modifiers |= EVT_CTRLSTATE;
+ }
+
+ /* Convert keyboard codes */
+ TranslateMessage(&msg);
+ if (evt.what & EVT_KEYEVT) {
+ int scanCode = (msg.lParam >> 16) & 0xFF;
+ if (evt.what == EVT_KEYUP) {
+ /* Get message for keyup code from table of cached down values */
+ evt.message = keyUpMsg[scanCode];
+ keyUpMsg[scanCode] = 0;
+ }
+ else {
+ if (PeekMessage(&charMsg,NULL,WM_CHAR,WM_CHAR,PM_REMOVE))
+ evt.message = charMsg.wParam;
+ if (PeekMessage(&charMsg,NULL,WM_SYSCHAR,WM_SYSCHAR,PM_REMOVE))
+ evt.message = charMsg.wParam;
+ evt.message |= ((msg.lParam >> 8) & 0xFF00);
+ keyUpMsg[scanCode] = (ushort)evt.message;
+ }
+ if (evt.what == EVT_KEYREPEAT)
+ evt.message |= (msg.lParam << 16);
+ if (HIWORD(msg.lParam) & KF_ALTDOWN)
+ evt.modifiers |= EVT_ALTSTATE;
+ if (GetKeyState(VK_SHIFT) & 0x8000U)
+ evt.modifiers |= EVT_SHIFTKEY;
+ if (GetKeyState(VK_CONTROL) & 0x8000U)
+ evt.modifiers |= EVT_CTRLSTATE;
+ EVT.oldMove = -1;
+ }
+
+ if (evt.what != 0) {
+ /* Add time stamp and add the event to the queue */
+ evt.when = msg.time;
+ if (EVT.count < EVENTQSIZE)
+ addEvent(&evt);
+ }
+ DispatchMessage(&msg);
+ }
+}
+
+/****************************************************************************
+REMARKS:
+This macro/function is used to converts the scan codes reported by the
+keyboard to our event libraries normalised format. We only have one scan
+code for the 'A' key, and use shift modifiers to determine if it is a
+Ctrl-F1, Alt-F1 etc. The raw scan codes from the keyboard work this way,
+but the OS gives us 'cooked' scan codes, we have to translate them back
+to the raw format.
+****************************************************************************/
+#define _EVT_maskKeyCode(evt)
+
+/****************************************************************************
+REMARKS:
+Safely abort the event module upon catching a fatal error.
+****************************************************************************/
+void _EVT_abort(
+ int signal)
+{
+ (void)signal;
+ EVT_exit();
+ PM_fatalError("Unhandled exception!");
+}
+
+/****************************************************************************
+PARAMETERS:
+mouseMove - Callback function to call wheneve the mouse needs to be moved
+
+REMARKS:
+Initiliase the event handling module. Here we install our mouse handling ISR
+to be called whenever any button's are pressed or released. We also build
+the free list of events in the event queue.
+
+We use handler number 2 of the mouse libraries interrupt handlers for our
+event handling routines.
+****************************************************************************/
+void EVTAPI EVT_init(
+ _EVT_mouseMoveHandler mouseMove)
+{
+ /* Initialise the event queue */
+ EVT.mouseMove = mouseMove;
+ initEventQueue();
+ memset(keyUpMsg,0,sizeof(keyUpMsg));
+
+ /* Catch program termination signals so we can clean up properly */
+ signal(SIGABRT, _EVT_abort);
+ signal(SIGFPE, _EVT_abort);
+ signal(SIGINT, _EVT_abort);
+}
+
+/****************************************************************************
+REMARKS
+Changes the range of coordinates returned by the mouse functions to the
+specified range of values. This is used when changing between graphics
+modes set the range of mouse coordinates for the new display mode.
+****************************************************************************/
+void EVTAPI EVT_setMouseRange(
+ int xRes,
+ int yRes)
+{
+ rangeX = xRes;
+ rangeY = yRes;
+}
+
+/****************************************************************************
+REMARKS
+Modifes the mouse coordinates as necessary if scaling to OS coordinates,
+and sets the OS mouse cursor position.
+****************************************************************************/
+void _EVT_setMousePos(
+ int *x,
+ int *y)
+{
+ /* Scale coordinates up to desktop coordinates first */
+ int scaledX = (*x * _PM_deskX) / rangeX;
+ int scaledY = (*y * _PM_deskY) / rangeY;
+
+ /* Scale coordinates back to screen coordinates again */
+ *x = (scaledX * rangeX) / _PM_deskX;
+ *y = (scaledY * rangeY) / _PM_deskY;
+ SetCursorPos(scaledX,scaledY);
+}
+
+/****************************************************************************
+REMARKS:
+Initiailises the internal event handling modules. The EVT_suspend function
+can be called to suspend event handling (such as when shelling out to DOS),
+and this function can be used to resume it again later.
+****************************************************************************/
+void EVT_resume(void)
+{
+ // Do nothing for Win32
+}
+
+/****************************************************************************
+REMARKS
+Suspends all of our event handling operations. This is also used to
+de-install the event handling code.
+****************************************************************************/
+void EVT_suspend(void)
+{
+ // Do nothing for Win32
+}
+
+/****************************************************************************
+REMARKS
+Exits the event module for program terminatation.
+****************************************************************************/
+void EVT_exit(void)
+{
+ /* Restore signal handlers */
+ signal(SIGABRT, SIG_DFL);
+ signal(SIGFPE, SIG_DFL);
+ signal(SIGINT, SIG_DFL);
+}
+
+/****************************************************************************
+DESCRIPTION:
+Returns the mask indicating what joystick axes are attached.
+
+HEADER:
+event.h
+
+REMARKS:
+This function is used to detect the attached joysticks, and determine
+what axes are present and functioning. This function will re-detect any
+attached joysticks when it is called, so if the user forgot to attach
+the joystick when the application started, you can call this function to
+re-detect any newly attached joysticks.
+
+SEE ALSO:
+EVT_joySetLowerRight, EVT_joySetCenter, EVT_joyIsPresent
+****************************************************************************/
+int EVTAPI EVT_joyIsPresent(void)
+{
+ // TODO: Implement joystick code based on DirectX!
+ return 0;
+}
+
+/****************************************************************************
+DESCRIPTION:
+Polls the joystick for position and button information.
+
+HEADER:
+event.h
+
+REMARKS:
+This routine is used to poll analogue joysticks for button and position
+information. It should be called once for each main loop of the user
+application, just before processing all pending events via EVT_getNext.
+All information polled from the joystick will be posted to the event
+queue for later retrieval.
+
+Note: Most analogue joysticks will provide readings that change even
+ though the joystick has not moved. Hence if you call this routine
+ you will likely get an EVT_JOYMOVE event every time through your
+ event loop.
+
+SEE ALSO:
+EVT_getNext, EVT_peekNext, EVT_joySetUpperLeft, EVT_joySetLowerRight,
+EVT_joySetCenter, EVT_joyIsPresent
+****************************************************************************/
+void EVTAPI EVT_pollJoystick(void)
+{
+}
+
+/****************************************************************************
+DESCRIPTION:
+Calibrates the joystick upper left position
+
+HEADER:
+event.h
+
+REMARKS:
+This function can be used to zero in on better joystick calibration factors,
+which may work better than the default simplistic calibration (which assumes
+the joystick is centered when the event library is initialised).
+To use this function, ask the user to hold the stick in the upper left
+position and then have them press a key or button. and then call this
+function. This function will then read the joystick and update the
+calibration factors.
+
+Usually, assuming that the stick was centered when the event library was
+initialized, you really only need to call EVT_joySetLowerRight since the
+upper left position is usually always 0,0 on most joysticks. However, the
+safest procedure is to call all three calibration functions.
+
+SEE ALSO:
+EVT_joySetUpperLeft, EVT_joySetLowerRight, EVT_joyIsPresent
+****************************************************************************/
+void EVTAPI EVT_joySetUpperLeft(void)
+{
+}
+
+/****************************************************************************
+DESCRIPTION:
+Calibrates the joystick lower right position
+
+HEADER:
+event.h
+
+REMARKS:
+This function can be used to zero in on better joystick calibration factors,
+which may work better than the default simplistic calibration (which assumes
+the joystick is centered when the event library is initialised).
+To use this function, ask the user to hold the stick in the lower right
+position and then have them press a key or button. and then call this
+function. This function will then read the joystick and update the
+calibration factors.
+
+Usually, assuming that the stick was centered when the event library was
+initialized, you really only need to call EVT_joySetLowerRight since the
+upper left position is usually always 0,0 on most joysticks. However, the
+safest procedure is to call all three calibration functions.
+
+SEE ALSO:
+EVT_joySetUpperLeft, EVT_joySetCenter, EVT_joyIsPresent
+****************************************************************************/
+void EVTAPI EVT_joySetLowerRight(void)
+{
+}
+
+/****************************************************************************
+DESCRIPTION:
+Calibrates the joystick center position
+
+HEADER:
+event.h
+
+REMARKS:
+This function can be used to zero in on better joystick calibration factors,
+which may work better than the default simplistic calibration (which assumes
+the joystick is centered when the event library is initialised).
+To use this function, ask the user to hold the stick in the center
+position and then have them press a key or button. and then call this
+function. This function will then read the joystick and update the
+calibration factors.
+
+Usually, assuming that the stick was centered when the event library was
+initialized, you really only need to call EVT_joySetLowerRight since the
+upper left position is usually always 0,0 on most joysticks. However, the
+safest procedure is to call all three calibration functions.
+
+SEE ALSO:
+EVT_joySetUpperLeft, EVT_joySetLowerRight, EVT_joySetCenter
+****************************************************************************/
+void EVTAPI EVT_joySetCenter(void)
+{
+}
+
diff --git a/board/MAI/bios_emulator/scitech/src/pm/win32/ntservc.c b/board/MAI/bios_emulator/scitech/src/pm/win32/ntservc.c
new file mode 100644
index 00000000000..a3324d33b84
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/pm/win32/ntservc.c
@@ -0,0 +1,259 @@
+/****************************************************************************
+*
+* SciTech Display Doctor
+*
+* Copyright (C) 1991-2001 SciTech Software, Inc.
+* All rights reserved.
+*
+* ======================================================================
+* |REMOVAL OR MODIFICATION OF THIS HEADER IS STRICTLY PROHIBITED BY LAW|
+* | |
+* |This copyrighted computer code is a proprietary trade secret of |
+* |SciTech Software, Inc., located at 505 Wall Street, Chico, CA 95928 |
+* |USA (www.scitechsoft.com). ANY UNAUTHORIZED POSSESSION, USE, |
+* |VIEWING, COPYING, MODIFICATION OR DISSEMINATION OF THIS CODE IS |
+* |STRICTLY PROHIBITED BY LAW. Unless you have current, express |
+* |written authorization from SciTech to possess or use this code, you |
+* |may be subject to civil and/or criminal penalties. |
+* | |
+* |If you received this code in error or you would like to report |
+* |improper use, please immediately contact SciTech Software, Inc. at |
+* |530-894-8400. |
+* | |
+* |REMOVAL OR MODIFICATION OF THIS HEADER IS STRICTLY PROHIBITED BY LAW|
+* ======================================================================
+*
+* Language: ANSI C
+* Environment: Windows NT, Windows 2K or Windows XP.
+*
+* Description: Main module to do the installation of the SDD and GLDirect
+* device driver components under Windows NT/2K/XP.
+*
+****************************************************************************/
+
+#include "pmapi.h"
+#include "win32/oshdr.h"
+
+/*----------------------------- Implementation ----------------------------*/
+
+/****************************************************************************
+PARAMETERS:
+szDriverName - Actual name of the driver to install in the system
+szServiceName - Name of the service to create
+szLoadGroup - Load group for the driver (NULL for normal drivers)
+dwServiceType - Service type to create
+
+RETURNS:
+True on success, false on failure.
+
+REMARKS:
+This function does all the work to install the driver into the system.
+The driver is not however activated; for that you must use the Start_SddFilt
+function.
+****************************************************************************/
+ulong PMAPI PM_installService(
+ const char *szDriverName,
+ const char *szServiceName,
+ const char *szLoadGroup,
+ ulong dwServiceType)
+{
+ SC_HANDLE scmHandle;
+ SC_HANDLE driverHandle;
+ char szDriverPath[MAX_PATH];
+ HKEY key;
+ char keyPath[MAX_PATH];
+ ulong status;
+
+ // Obtain a handle to the service control manager requesting all access
+ if ((scmHandle = OpenSCManager(NULL, NULL, SC_MANAGER_ALL_ACCESS)) == NULL)
+ return GetLastError();
+
+ // Find the path to the driver in system directory
+ GetSystemDirectory(szDriverPath, sizeof(szDriverPath));
+ strcat(szDriverPath, "\\drivers\\");
+ strcat(szDriverPath, szDriverName);
+
+ // Create the service with the Service Control Manager.
+ driverHandle = CreateService(scmHandle,
+ szServiceName,
+ szServiceName,
+ SERVICE_ALL_ACCESS,
+ dwServiceType,
+ SERVICE_BOOT_START,
+ SERVICE_ERROR_NORMAL,
+ szDriverPath,
+ szLoadGroup,
+ NULL,
+ NULL,
+ NULL,
+ NULL);
+
+ // Check to see if the driver could actually be installed.
+ if (!driverHandle) {
+ status = GetLastError();
+ CloseServiceHandle(scmHandle);
+ return status;
+ }
+
+ // Get a handle to the key for driver so that it can be altered in the
+ // next step.
+ strcpy(keyPath, "SYSTEM\\CurrentControlSet\\Services\\");
+ strcat(keyPath, szServiceName);
+ if ((status = RegOpenKeyEx(HKEY_LOCAL_MACHINE,keyPath,0,KEY_ALL_ACCESS,&key)) != ERROR_SUCCESS) {
+ // A problem has occured. Delete the service so that it is not installed.
+ status = GetLastError();
+ DeleteService(driverHandle);
+ CloseServiceHandle(driverHandle);
+ CloseServiceHandle(scmHandle);
+ return status;
+ }
+
+ // Delete the ImagePath value in the newly created key so that the
+ // system looks for the driver in the normal location.
+ if ((status = RegDeleteValue(key, "ImagePath")) != ERROR_SUCCESS) {
+ // A problem has occurred. Delete the service so that it is not
+ // installed and will not try to start.
+ RegCloseKey(key);
+ DeleteService(driverHandle);
+ CloseServiceHandle(driverHandle);
+ CloseServiceHandle(scmHandle);
+ return status;
+ }
+
+ // Clean up and exit
+ RegCloseKey(key);
+ CloseServiceHandle(driverHandle);
+ CloseServiceHandle(scmHandle);
+ return ERROR_SUCCESS;
+}
+
+/****************************************************************************
+PARAMETERS:
+szServiceName - Name of the service to start
+
+RETURNS:
+True on success, false on failure.
+
+REMARKS:
+This function is used to start the specified service and make it active.
+****************************************************************************/
+ulong PMAPI PM_startService(
+ const char *szServiceName)
+{
+ SC_HANDLE scmHandle;
+ SC_HANDLE driverHandle;
+ SERVICE_STATUS serviceStatus;
+ ulong status;
+
+ // Obtain a handle to the service control manager requesting all access
+ if ((scmHandle = OpenSCManager(NULL, NULL, SC_MANAGER_ALL_ACCESS)) == NULL)
+ return GetLastError();
+
+ // Open the service with the Service Control Manager.
+ if ((driverHandle = OpenService(scmHandle,szServiceName,SERVICE_ALL_ACCESS)) == NULL) {
+ status = GetLastError();
+ CloseServiceHandle(scmHandle);
+ return status;
+ }
+
+ // Start the service
+ if (!StartService(driverHandle,0,NULL)) {
+ status = GetLastError();
+ CloseServiceHandle(driverHandle);
+ CloseServiceHandle(scmHandle);
+ return status;
+ }
+
+ // Query the service to make sure it is there
+ if (!QueryServiceStatus(driverHandle,&serviceStatus)) {
+ status = GetLastError();
+ CloseServiceHandle(driverHandle);
+ CloseServiceHandle(scmHandle);
+ return status;
+ }
+ CloseServiceHandle(driverHandle);
+ CloseServiceHandle(scmHandle);
+ return ERROR_SUCCESS;
+}
+
+/****************************************************************************
+PARAMETERS:
+szServiceName - Name of the service to stop
+
+RETURNS:
+True on success, false on failure.
+
+REMARKS:
+This function is used to stop the specified service and disable it.
+****************************************************************************/
+ulong PMAPI PM_stopService(
+ const char *szServiceName)
+{
+ SC_HANDLE scmHandle;
+ SC_HANDLE driverHandle;
+ SERVICE_STATUS serviceStatus;
+ ulong status;
+
+ // Obtain a handle to the service control manager requesting all access
+ if ((scmHandle = OpenSCManager(NULL, NULL, SC_MANAGER_ALL_ACCESS)) == NULL)
+ return GetLastError();
+
+ // Open the service with the Service Control Manager.
+ if ((driverHandle = OpenService(scmHandle,szServiceName,SERVICE_ALL_ACCESS)) == NULL) {
+ status = GetLastError();
+ CloseServiceHandle(scmHandle);
+ return status;
+ }
+
+ // Stop the service from running
+ if (!ControlService(driverHandle, SERVICE_CONTROL_STOP, &serviceStatus)) {
+ status = GetLastError();
+ CloseServiceHandle(driverHandle);
+ CloseServiceHandle(scmHandle);
+ return status;
+ }
+ CloseServiceHandle(driverHandle);
+ CloseServiceHandle(scmHandle);
+ return ERROR_SUCCESS;
+}
+
+/****************************************************************************
+PARAMETERS:
+szServiceName - Name of the service to remove
+
+RETURNS:
+True on success, false on failure.
+
+REMARKS:
+This function is used to remove a service completely from the system.
+****************************************************************************/
+ulong PMAPI PM_removeService(
+ const char *szServiceName)
+{
+ SC_HANDLE scmHandle;
+ SC_HANDLE driverHandle;
+ ulong status;
+
+ // Obtain a handle to the service control manager requesting all access
+ if ((scmHandle = OpenSCManager(NULL, NULL, SC_MANAGER_ALL_ACCESS)) == NULL)
+ return GetLastError();
+
+ // Open the service with the Service Control Manager.
+ if ((driverHandle = OpenService(scmHandle,szServiceName,SERVICE_ALL_ACCESS)) == NULL) {
+ status = GetLastError();
+ CloseServiceHandle(scmHandle);
+ return status;
+ }
+
+ // Remove the service
+ if (!DeleteService(driverHandle)) {
+ status = GetLastError();
+ CloseServiceHandle(driverHandle);
+ CloseServiceHandle(scmHandle);
+ return status;
+ }
+ CloseServiceHandle(driverHandle);
+ CloseServiceHandle(scmHandle);
+ return ERROR_SUCCESS;
+}
+
diff --git a/board/MAI/bios_emulator/scitech/src/pm/win32/oshdr.h b/board/MAI/bios_emulator/scitech/src/pm/win32/oshdr.h
new file mode 100644
index 00000000000..018c936d8aa
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/pm/win32/oshdr.h
@@ -0,0 +1,80 @@
+/****************************************************************************
+*
+* SciTech OS Portability Manager Library
+*
+* ========================================================================
+*
+* The contents of this file are subject to the SciTech MGL Public
+* License Version 1.0 (the "License"); you may not use this file
+* except in compliance with the License. You may obtain a copy of
+* the License at http://www.scitechsoft.com/mgl-license.txt
+*
+* Software distributed under the License is distributed on an
+* "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+* implied. See the License for the specific language governing
+* rights and limitations under the License.
+*
+* The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+*
+* The Initial Developer of the Original Code is SciTech Software, Inc.
+* All Rights Reserved.
+*
+* ========================================================================
+*
+* Language: ANSI C
+* Environment: Win32
+*
+* Description: Include file to include all OS specific header files.
+*
+****************************************************************************/
+
+#define WIN32_LEAN_AND_MEAN
+#define STRICT
+#include <windows.h>
+#include <mmsystem.h>
+#include <float.h>
+#define NONAMELESSUNION
+#include "pm/ddraw.h"
+
+/* Macros to save and restore the default control word. Windows 9x has
+ * some bugs in it such that calls to load any DLL's which load 16-bit
+ * DLL's cause the floating point control word to get trashed. We fix
+ * this by saving and restoring the control word across problematic
+ * calls.
+ */
+
+#if defined(__INTEL__)
+#define GET_DEFAULT_CW() \
+{ \
+ if (_PM_cw_default == 0) \
+ _PM_cw_default = _control87(0,0); \
+}
+#define RESET_DEFAULT_CW() \
+ _control87(_PM_cw_default,0xFFFFFFFF)
+#else
+#define GET_DEFAULT_CW()
+#define RESET_DEFAULT_CW()
+#endif
+
+/* Custom window messages */
+
+#define WM_DO_SUSPEND_APP WM_USER
+#define WM_PM_LEAVE_FULLSCREEN 0
+#define WM_PM_RESTORE_FULLSCREEN 1
+
+/* Macro for disabling AutoPlay on a use system */
+
+#define AUTOPLAY_DRIVE_CDROM 0x20
+
+/*--------------------------- Global Variables ----------------------------*/
+
+#ifdef __INTEL__
+extern uint _PM_cw_default; /* Default FPU control word */
+#endif
+extern int _PM_deskX,_PM_deskY; /* Desktop dimensions */
+extern HWND _PM_hwndConsole; /* Window handle for console */
+
+/*-------------------------- Internal Functions ---------------------------*/
+
+void _EVT_pumpMessages(void);
+
diff --git a/board/MAI/bios_emulator/scitech/src/pm/win32/pm.c b/board/MAI/bios_emulator/scitech/src/pm/win32/pm.c
new file mode 100644
index 00000000000..d08da4c630d
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/pm/win32/pm.c
@@ -0,0 +1,1460 @@
+/****************************************************************************
+*
+* SciTech OS Portability Manager Library
+*
+* ========================================================================
+*
+* The contents of this file are subject to the SciTech MGL Public
+* License Version 1.0 (the "License"); you may not use this file
+* except in compliance with the License. You may obtain a copy of
+* the License at http://www.scitechsoft.com/mgl-license.txt
+*
+* Software distributed under the License is distributed on an
+* "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+* implied. See the License for the specific language governing
+* rights and limitations under the License.
+*
+* The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+*
+* The Initial Developer of the Original Code is SciTech Software, Inc.
+* All Rights Reserved.
+*
+* ========================================================================
+*
+* Language: ANSI C
+* Environment: Win32
+*
+* Description: Implementation for the OS Portability Manager Library, which
+* contains functions to implement OS specific services in a
+* generic, cross platform API. Porting the OS Portability
+* Manager library is the first step to porting any SciTech
+* products to a new platform.
+*
+****************************************************************************/
+
+#define WIN32_LEAN_AND_MEAN
+#define STRICT
+#include <windows.h>
+#include <mmsystem.h>
+#include <stdio.h>
+#include <stdlib.h>
+#include <string.h>
+#include <direct.h>
+#include "pmapi.h"
+#include "drvlib/os/os.h"
+#include "pm_help.h"
+
+/*--------------------------- Global variables ----------------------------*/
+
+ibool _PM_haveWinNT; /* True if we are running on NT */
+static uint VESABuf_len = 1024; /* Length of the VESABuf buffer */
+static void *VESABuf_ptr = NULL;/* Near pointer to VESABuf */
+static uint VESABuf_rseg; /* Real mode segment of VESABuf */
+static uint VESABuf_roff; /* Real mode offset of VESABuf */
+HANDLE _PM_hDevice = NULL; /* Handle to Win32 VxD */
+static ibool inited = false; /* Flags if we are initialised */
+static void (PMAPIP fatalErrorCleanup)(void) = NULL;
+
+static char *szMachineNameKey = "System\\CurrentControlSet\\control\\ComputerName\\ComputerName";
+static char *szMachineNameKeyNT = "System\\CurrentControlSet\\control\\ComputerName\\ActiveComputerName";
+static char *szMachineName = "ComputerName";
+
+/*----------------------------- Implementation ----------------------------*/
+
+/* Macro to check for a valid, loaded version of PMHELP. We check this
+ * on demand when we need these services rather than when PM_init() is
+ * called because if we are running on DirectDraw we don't need PMHELP.VXD.
+ */
+
+#define CHECK_FOR_PMHELP() \
+{ \
+ if (_PM_hDevice == INVALID_HANDLE_VALUE) \
+ if (_PM_haveWinNT) \
+ PM_fatalError("Unable to connect to PMHELP.SYS or SDDHELP.SYS!"); \
+ else \
+ PM_fatalError("Unable to connect to PMHELP.VXD or SDDHELP.VXD!"); \
+}
+
+/****************************************************************************
+REMARKS:
+Initialise the PM library and connect to our helper device driver. If we
+cannot connect to our helper device driver, we bail out with an error
+message. Our Windows 9x VxD is dynamically loadable, so it can be loaded
+after the system has started.
+****************************************************************************/
+void PMAPI PM_init(void)
+{
+ DWORD inBuf[1]; /* Buffer to receive data from VxD */
+ DWORD outBuf[1]; /* Buffer to receive data from VxD */
+ DWORD count; /* Count of bytes returned from VxD */
+ char cntPath[PM_MAX_PATH];
+ char *env;
+
+ /* Create a file handle for the static VxD if possible, otherwise
+ * dynamically load the PMHELP helper VxD. Note that if an old version
+ * of SDD is loaded, we use the PMHELP VxD instead.
+ */
+ if (!inited) {
+ /* Determine if we are running under Windows NT or not and
+ * set the global OS type variable.
+ */
+ _PM_haveWinNT = false;
+ if ((GetVersion() & 0x80000000UL) == 0)
+ _PM_haveWinNT = true;
+ ___drv_os_type = (_PM_haveWinNT) ? _OS_WINNT : _OS_WIN95;
+
+ /* Now try to connect to SDDHELP.VXD or SDDHELP.SYS */
+ _PM_hDevice = CreateFile(SDDHELP_MODULE_PATH, 0,0,0, CREATE_NEW, FILE_FLAG_DELETE_ON_CLOSE, 0);
+ if (_PM_hDevice != INVALID_HANDLE_VALUE) {
+ if (!DeviceIoControl(_PM_hDevice, PMHELP_GETVER32, NULL, 0,
+ outBuf, sizeof(outBuf), &count, NULL) || outBuf[0] < PMHELP_VERSION) {
+ /* Old version of SDDHELP loaded, so use PMHELP instead */
+ CloseHandle(_PM_hDevice);
+ _PM_hDevice = INVALID_HANDLE_VALUE;
+ }
+ }
+ if (_PM_hDevice == INVALID_HANDLE_VALUE) {
+ /* First try to see if there is a currently loaded PMHELP driver.
+ * This is usually the case when we are running under Windows NT/2K.
+ */
+ _PM_hDevice = CreateFile(PMHELP_MODULE_PATH, 0,0,0, CREATE_NEW, FILE_FLAG_DELETE_ON_CLOSE, 0);
+ if (_PM_hDevice == INVALID_HANDLE_VALUE) {
+ /* The driver was not staticly loaded, so try creating a file handle
+ * to a dynamic version of the VxD if possible. Note that on WinNT/2K we
+ * cannot support dynamically loading the drivers.
+ */
+ _PM_hDevice = CreateFile(PMHELP_VXD_PATH, 0,0,0, CREATE_NEW, FILE_FLAG_DELETE_ON_CLOSE, 0);
+ }
+ }
+ if (_PM_hDevice != INVALID_HANDLE_VALUE) {
+ /* Call the driver to determine the version number */
+ if (!DeviceIoControl(_PM_hDevice, PMHELP_GETVER32, inBuf, sizeof(inBuf),
+ outBuf, sizeof(outBuf), &count, NULL) || outBuf[0] < PMHELP_VERSION) {
+ if (_PM_haveWinNT)
+ PM_fatalError("Older version of PMHELP.SYS found!");
+ else
+ PM_fatalError("Older version of PMHELP.VXD found!");
+ }
+
+ /* Now set the current path inside the VxD so it knows what the
+ * current directory is for loading Nucleus drivers.
+ */
+ inBuf[0] = (ulong)PM_getCurrentPath(cntPath,sizeof(cntPath));
+ if (!DeviceIoControl(_PM_hDevice, PMHELP_SETCNTPATH32, inBuf, sizeof(inBuf), outBuf, sizeof(outBuf), &count, NULL))
+ PM_fatalError("Unable to set VxD current path!");
+
+ /* Now pass down the NUCLEUS_PATH environment variable to the device
+ * driver so it can use this value if it is found.
+ */
+ if ((env = getenv("NUCLEUS_PATH")) != NULL) {
+ inBuf[0] = (ulong)env;
+ if (!DeviceIoControl(_PM_hDevice, PMHELP_SETNUCLEUSPATH32, inBuf, sizeof(inBuf), outBuf, sizeof(outBuf), &count, NULL))
+ PM_fatalError("Unable to set VxD Nucleus path!");
+ }
+
+ /* Enable IOPL for ring-3 code by default if driver is present */
+ if (_PM_haveWinNT)
+ PM_setIOPL(3);
+ }
+
+ /* Indicate that we have been initialised */
+ inited = true;
+ }
+}
+
+/****************************************************************************
+REMARKS:
+We do have BIOS access under Windows 9x, but not under Windows NT.
+****************************************************************************/
+int PMAPI PM_setIOPL(
+ int iopl)
+{
+ DWORD inBuf[1]; /* Buffer to receive data from VxD */
+ DWORD outBuf[1]; /* Buffer to receive data from VxD */
+ DWORD count; /* Count of bytes returned from VxD */
+ static int cntIOPL = 0;
+ int oldIOPL = cntIOPL;
+
+ /* Enable I/O by adjusting the I/O permissions map on Windows NT */
+ if (_PM_haveWinNT) {
+ CHECK_FOR_PMHELP();
+ if (iopl == 3)
+ DeviceIoControl(_PM_hDevice, PMHELP_ENABLERING3IOPL, inBuf, sizeof(inBuf),outBuf, sizeof(outBuf), &count, NULL);
+ else
+ DeviceIoControl(_PM_hDevice, PMHELP_DISABLERING3IOPL, inBuf, sizeof(inBuf),outBuf, sizeof(outBuf), &count, NULL);
+ cntIOPL = iopl;
+ return oldIOPL;
+ }
+
+ /* We always have IOPL on Windows 9x */
+ return 3;
+}
+
+/****************************************************************************
+REMARKS:
+We do have BIOS access under Windows 9x, but not under Windows NT.
+****************************************************************************/
+ibool PMAPI PM_haveBIOSAccess(void)
+{
+ if (PM_getOSType() == _OS_WINNT)
+ return false;
+ else
+ return _PM_hDevice != INVALID_HANDLE_VALUE;
+}
+
+/****************************************************************************
+REMARKS:
+Return the operating system type identifier.
+****************************************************************************/
+long PMAPI PM_getOSType(void)
+{
+ if ((GetVersion() & 0x80000000UL) == 0)
+ return ___drv_os_type = _OS_WINNT;
+ else
+ return ___drv_os_type = _OS_WIN95;
+}
+
+/****************************************************************************
+REMARKS:
+Return the runtime type identifier.
+****************************************************************************/
+int PMAPI PM_getModeType(void)
+{
+ return PM_386;
+}
+
+/****************************************************************************
+REMARKS:
+Add a file directory separator to the end of the filename.
+****************************************************************************/
+void PMAPI PM_backslash(
+ char *s)
+{
+ uint pos = strlen(s);
+ if (s[pos-1] != '\\') {
+ s[pos] = '\\';
+ s[pos+1] = '\0';
+ }
+}
+
+/****************************************************************************
+REMARKS:
+Add a user defined PM_fatalError cleanup function.
+****************************************************************************/
+void PMAPI PM_setFatalErrorCleanup(
+ void (PMAPIP cleanup)(void))
+{
+ fatalErrorCleanup = cleanup;
+}
+
+/****************************************************************************
+REMARKS:
+Report a fatal error condition and halt the program.
+****************************************************************************/
+void PMAPI PM_fatalError(
+ const char *msg)
+{
+ if (fatalErrorCleanup)
+ fatalErrorCleanup();
+ MessageBox(NULL,msg,"Fatal Error!", MB_ICONEXCLAMATION);
+ exit(1);
+}
+
+/****************************************************************************
+REMARKS:
+Allocate the real mode VESA transfer buffer for communicating with the BIOS.
+****************************************************************************/
+void * PMAPI PM_getVESABuf(
+ uint *len,
+ uint *rseg,
+ uint *roff)
+{
+ DWORD outBuf[4]; /* Buffer to receive data from VxD */
+ DWORD count; /* Count of bytes returned from VxD */
+
+ /* We require the helper VxD to be loaded staticly in order to support
+ * the VESA transfer buffer. We do not support dynamically allocating
+ * real mode memory buffers from Win32 programs (we need a 16-bit DLL
+ * for this, and Windows 9x becomes very unstable if you free the
+ * memory blocks out of order).
+ */
+ if (!inited)
+ PM_init();
+ if (!VESABuf_ptr) {
+ CHECK_FOR_PMHELP();
+ if (DeviceIoControl(_PM_hDevice, PMHELP_GETVESABUF32, NULL, 0,
+ outBuf, sizeof(outBuf), &count, NULL)) {
+ if (!outBuf[0])
+ return NULL;
+ VESABuf_ptr = (void*)outBuf[0];
+ VESABuf_len = outBuf[1];
+ VESABuf_rseg = outBuf[2];
+ VESABuf_roff = outBuf[3];
+ }
+ }
+ *len = VESABuf_len;
+ *rseg = VESABuf_rseg;
+ *roff = VESABuf_roff;
+ return VESABuf_ptr;
+}
+
+/****************************************************************************
+REMARKS:
+Check if a key has been pressed.
+****************************************************************************/
+int PMAPI PM_kbhit(void)
+{
+ /* Not used in Windows */
+ return true;
+}
+
+/****************************************************************************
+REMARKS:
+Wait for and return the next keypress.
+****************************************************************************/
+int PMAPI PM_getch(void)
+{
+ /* Not used in Windows */
+ return 0xD;
+}
+
+/****************************************************************************
+REMARKS:
+Set the location of the OS console cursor.
+****************************************************************************/
+void PM_setOSCursorLocation(
+ int x,
+ int y)
+{
+ /* Nothing to do for Windows */
+ (void)x;
+ (void)y;
+}
+
+/****************************************************************************
+REMARKS:
+Set the width of the OS console.
+****************************************************************************/
+void PM_setOSScreenWidth(
+ int width,
+ int height)
+{
+ /* Nothing to do for Windows */
+ (void)width;
+ (void)height;
+}
+
+/****************************************************************************
+REMARKS:
+Set the real time clock handler (used for software stereo modes).
+****************************************************************************/
+ibool PMAPI PM_setRealTimeClockHandler(
+ PM_intHandler ih,
+ int frequency)
+{
+ /* We do not support this from Win32 programs. Rather the VxD handles
+ * this stuff it will take care of hooking the stereo flip functions at
+ * the VxD level.
+ */
+ (void)ih;
+ (void)frequency;
+ return false;
+}
+
+/****************************************************************************
+REMARKS:
+Set the real time clock frequency (for stereo modes).
+****************************************************************************/
+void PMAPI PM_setRealTimeClockFrequency(
+ int frequency)
+{
+ /* Not supported under Win32 */
+ (void)frequency;
+}
+
+/****************************************************************************
+REMARKS:
+Restore the original real time clock handler.
+****************************************************************************/
+void PMAPI PM_restoreRealTimeClockHandler(void)
+{
+ /* Not supported under Win32 */
+}
+
+/****************************************************************************
+REMARKS:
+Return the current operating system path or working directory.
+****************************************************************************/
+char * PMAPI PM_getCurrentPath(
+ char *path,
+ int maxLen)
+{
+ return getcwd(path,maxLen);
+}
+
+/****************************************************************************
+REMARKS:
+Query a string from the registry (extended version).
+****************************************************************************/
+static ibool REG_queryStringEx(
+ HKEY hKey,
+ const char *szValue,
+ char *value,
+ ulong size)
+{
+ DWORD type;
+
+ if (RegQueryValueEx(hKey,(PCHAR)szValue,(PDWORD)NULL,(PDWORD)&type,(LPBYTE)value,(PDWORD)&size) == ERROR_SUCCESS)
+ return true;
+ return false;
+}
+
+/****************************************************************************
+REMARKS:
+Query a string from the registry.
+****************************************************************************/
+static ibool REG_queryString(
+ const char *szKey,
+ const char *szValue,
+ char *value,
+ DWORD size)
+{
+ HKEY hKey;
+ ibool status = false;
+
+ memset(value,0,sizeof(value));
+ if (RegOpenKey(HKEY_LOCAL_MACHINE,szKey,&hKey) == ERROR_SUCCESS) {
+ status = REG_queryStringEx(hKey,szValue,value,size);
+ RegCloseKey(hKey);
+ }
+ return status;
+}
+
+/****************************************************************************
+REMARKS:
+Return the drive letter for the boot drive.
+****************************************************************************/
+char PMAPI PM_getBootDrive(void)
+{
+ static char path[256];
+ GetSystemDirectory(path,sizeof(path));
+ return path[0];
+}
+
+/****************************************************************************
+REMARKS:
+Return the path to the VBE/AF driver files.
+****************************************************************************/
+const char * PMAPI PM_getVBEAFPath(void)
+{
+ return "c:\\";
+}
+
+/****************************************************************************
+REMARKS:
+Return the path to the Nucleus driver files.
+****************************************************************************/
+const char * PMAPI PM_getNucleusPath(void)
+{
+ static char path[256];
+ char *env;
+
+ if ((env = getenv("NUCLEUS_PATH")) != NULL)
+ return env;
+ GetSystemDirectory(path,sizeof(path));
+ strcat(path,"\\nucleus");
+ return path;
+}
+
+/****************************************************************************
+REMARKS:
+Return the path to the Nucleus configuration files.
+****************************************************************************/
+const char * PMAPI PM_getNucleusConfigPath(void)
+{
+ static char path[256];
+ strcpy(path,PM_getNucleusPath());
+ PM_backslash(path);
+ strcat(path,"config");
+ return path;
+}
+
+/****************************************************************************
+REMARKS:
+Return a unique identifier for the machine if possible.
+****************************************************************************/
+const char * PMAPI PM_getUniqueID(void)
+{
+ return PM_getMachineName();
+}
+
+/****************************************************************************
+REMARKS:
+Get the name of the machine on the network.
+****************************************************************************/
+const char * PMAPI PM_getMachineName(void)
+{
+ static char name[256];
+
+ if (REG_queryString(szMachineNameKey,szMachineName,name,sizeof(name)))
+ return name;
+ if (REG_queryString(szMachineNameKeyNT,szMachineName,name,sizeof(name)))
+ return name;
+ return "Unknown";
+}
+
+/****************************************************************************
+REMARKS:
+Return a pointer to the real mode BIOS data area.
+****************************************************************************/
+void * PMAPI PM_getBIOSPointer(void)
+{
+ if (_PM_haveWinNT) {
+ /* On Windows NT we have to map it physically directly */
+ return PM_mapPhysicalAddr(0x400, 0x1000, true);
+ }
+ else {
+ /* For Windows 9x we can access this memory directly */
+ return (void*)0x400;
+ }
+}
+
+/****************************************************************************
+REMARKS:
+Return a pointer to 0xA0000 physical VGA graphics framebuffer.
+****************************************************************************/
+void * PMAPI PM_getA0000Pointer(void)
+{
+ if (_PM_haveWinNT) {
+ /* On Windows NT we have to map it physically directly */
+ return PM_mapPhysicalAddr(0xA0000, 0x0FFFF, false);
+ }
+ else {
+ /* Always use the 0xA0000 linear address so that we will use
+ * whatever page table mappings are set up for us (ie: for virtual
+ * bank switching.
+ */
+ return (void*)0xA0000;
+ }
+}
+
+/****************************************************************************
+REMARKS:
+Map a physical address to a linear address in the callers process.
+****************************************************************************/
+void * PMAPI PM_mapPhysicalAddr(
+ ulong base,
+ ulong limit,
+ ibool isCached)
+{
+ DWORD inBuf[3]; /* Buffer to send data to VxD */
+ DWORD outBuf[1]; /* Buffer to receive data from VxD */
+ DWORD count; /* Count of bytes returned from VxD */
+
+ if (!inited)
+ PM_init();
+ inBuf[0] = base;
+ inBuf[1] = limit;
+ inBuf[2] = isCached;
+ CHECK_FOR_PMHELP();
+ if (DeviceIoControl(_PM_hDevice, PMHELP_MAPPHYS32, inBuf, sizeof(inBuf),
+ outBuf, sizeof(outBuf), &count, NULL))
+ return (void*)outBuf[0];
+ return NULL;
+}
+
+/****************************************************************************
+REMARKS:
+Free a physical address mapping allocated by PM_mapPhysicalAddr.
+****************************************************************************/
+void PMAPI PM_freePhysicalAddr(
+ void *ptr,
+ ulong limit)
+{
+ /* We never free the mappings under Win32 (the VxD tracks them and
+ * reissues the same mappings until the system is rebooted).
+ */
+ (void)ptr;
+ (void)limit;
+}
+
+/****************************************************************************
+REMARKS:
+Find the physical address of a linear memory address in current process.
+****************************************************************************/
+ulong PMAPI PM_getPhysicalAddr(
+ void *p)
+{
+ DWORD inBuf[1]; /* Buffer to send data to VxD */
+ DWORD outBuf[1]; /* Buffer to receive data from VxD */
+ DWORD count; /* Count of bytes returned from VxD */
+
+ if (!inited)
+ PM_init();
+ inBuf[0] = (ulong)p;
+ CHECK_FOR_PMHELP();
+ if (DeviceIoControl(_PM_hDevice, PMHELP_GETPHYSICALADDR32, inBuf, sizeof(inBuf),
+ outBuf, sizeof(outBuf), &count, NULL))
+ return outBuf[0];
+ return 0xFFFFFFFFUL;
+}
+
+/****************************************************************************
+REMARKS:
+Find the physical address of a linear memory address in current process.
+****************************************************************************/
+ibool PMAPI PM_getPhysicalAddrRange(
+ void *p,
+ ulong length,
+ ulong *physAddress)
+{
+ DWORD inBuf[3]; /* Buffer to send data to VxD */
+ DWORD outBuf[1]; /* Buffer to receive data from VxD */
+ DWORD count; /* Count of bytes returned from VxD */
+
+ if (!inited)
+ PM_init();
+ inBuf[0] = (ulong)p;
+ inBuf[1] = (ulong)length;
+ inBuf[2] = (ulong)physAddress;
+ CHECK_FOR_PMHELP();
+ if (DeviceIoControl(_PM_hDevice, PMHELP_GETPHYSICALADDRRANGE32, inBuf, sizeof(inBuf),
+ outBuf, sizeof(outBuf), &count, NULL))
+ return outBuf[0];
+ return false;
+}
+
+/****************************************************************************
+REMARKS:
+Sleep for the specified number of milliseconds.
+****************************************************************************/
+void PMAPI PM_sleep(
+ ulong milliseconds)
+{
+ Sleep(milliseconds);
+}
+
+/****************************************************************************
+REMARKS:
+Return the base I/O port for the specified COM port.
+****************************************************************************/
+int PMAPI PM_getCOMPort(int port)
+{
+ // TODO: Re-code this to determine real values using the Plug and Play
+ // manager for the OS.
+ switch (port) {
+ case 0: return 0x3F8;
+ case 1: return 0x2F8;
+ case 2: return 0x3E8;
+ case 3: return 0x2E8;
+ }
+ return 0;
+}
+
+/****************************************************************************
+REMARKS:
+Return the base I/O port for the specified LPT port.
+****************************************************************************/
+int PMAPI PM_getLPTPort(int port)
+{
+ // TODO: Re-code this to determine real values using the Plug and Play
+ // manager for the OS.
+ switch (port) {
+ case 0: return 0x3BC;
+ case 1: return 0x378;
+ case 2: return 0x278;
+ }
+ return 0;
+}
+
+/****************************************************************************
+REMARKS:
+Allocate a block of shared memory. For Win9x we allocate shared memory
+as locked, global memory that is accessible from any memory context
+(including interrupt time context), which allows us to load our important
+data structure and code such that we can access it directly from a ring
+0 interrupt context.
+****************************************************************************/
+void * PMAPI PM_mallocShared(
+ long size)
+{
+ DWORD inBuf[1]; /* Buffer to send data to VxD */
+ DWORD outBuf[1]; /* Buffer to receive data from VxD */
+ DWORD count; /* Count of bytes returned from VxD */
+
+ inBuf[0] = size;
+ CHECK_FOR_PMHELP();
+ if (DeviceIoControl(_PM_hDevice, PMHELP_MALLOCSHARED32, inBuf, sizeof(inBuf),
+ outBuf, sizeof(outBuf), &count, NULL))
+ return (void*)outBuf[0];
+ return NULL;
+}
+
+/****************************************************************************
+REMARKS:
+Free a block of shared memory.
+****************************************************************************/
+void PMAPI PM_freeShared(
+ void *ptr)
+{
+ DWORD inBuf[1]; /* Buffer to send data to VxD */
+
+ inBuf[0] = (ulong)ptr;
+ CHECK_FOR_PMHELP();
+ DeviceIoControl(_PM_hDevice, PMHELP_FREESHARED32, inBuf, sizeof(inBuf), NULL, 0, NULL, NULL);
+}
+
+/****************************************************************************
+REMARKS:
+Map a linear memory address to the calling process address space. The
+address will have been allocated in another process using the
+PM_mapPhysicalAddr function.
+****************************************************************************/
+void * PMAPI PM_mapToProcess(
+ void *base,
+ ulong limit)
+{
+ (void)base;
+ (void)limit;
+ return base;
+}
+
+/****************************************************************************
+REMARKS:
+Map a real mode pointer to a protected mode pointer.
+****************************************************************************/
+void * PMAPI PM_mapRealPointer(
+ uint r_seg,
+ uint r_off)
+{
+ return (void*)(MK_PHYS(r_seg,r_off));
+}
+
+/****************************************************************************
+REMARKS:
+Allocate a block of real mode memory
+****************************************************************************/
+void * PMAPI PM_allocRealSeg(
+ uint size,
+ uint *r_seg,
+ uint *r_off)
+{
+ /* We do not support dynamically allocating real mode memory buffers
+ * from Win32 programs (we need a 16-bit DLL for this, and Windows
+ * 9x becomes very unstable if you free the memory blocks out of order).
+ */
+ (void)size;
+ (void)r_seg;
+ (void)r_off;
+ return NULL;
+}
+
+/****************************************************************************
+REMARKS:
+Free a block of real mode memory.
+****************************************************************************/
+void PMAPI PM_freeRealSeg(
+ void *mem)
+{
+ /* Not supported in Windows */
+ (void)mem;
+}
+
+/****************************************************************************
+REMARKS:
+Issue a real mode interrupt (parameters in DPMI compatible structure)
+****************************************************************************/
+void PMAPI DPMI_int86(
+ int intno,
+ DPMI_regs *regs)
+{
+ DWORD inBuf[2]; /* Buffer to send data to VxD */
+ DWORD count; /* Count of bytes returned from VxD */
+
+ if (!inited)
+ PM_init();
+ inBuf[0] = intno;
+ inBuf[1] = (ulong)regs;
+ CHECK_FOR_PMHELP();
+ DeviceIoControl(_PM_hDevice, PMHELP_DPMIINT8632, inBuf, sizeof(inBuf),
+ NULL, 0, &count, NULL);
+}
+
+/****************************************************************************
+REMARKS:
+Issue a real mode interrupt.
+****************************************************************************/
+int PMAPI PM_int86(
+ int intno,
+ RMREGS *in,
+ RMREGS *out)
+{
+ DWORD inBuf[3]; /* Buffer to send data to VxD */
+ DWORD outBuf[1]; /* Buffer to receive data from VxD */
+ DWORD count; /* Count of bytes returned from VxD */
+
+ if (!inited)
+ PM_init();
+ inBuf[0] = intno;
+ inBuf[1] = (ulong)in;
+ inBuf[2] = (ulong)out;
+ CHECK_FOR_PMHELP();
+ if (DeviceIoControl(_PM_hDevice, PMHELP_INT8632, inBuf, sizeof(inBuf),
+ outBuf, sizeof(outBuf), &count, NULL))
+ return outBuf[0];
+ return 0;
+}
+
+/****************************************************************************
+REMARKS:
+Issue a real mode interrupt.
+****************************************************************************/
+int PMAPI PM_int86x(
+ int intno,
+ RMREGS *in,
+ RMREGS *out,
+ RMSREGS *sregs)
+{
+ DWORD inBuf[4]; /* Buffer to send data to VxD */
+ DWORD outBuf[1]; /* Buffer to receive data from VxD */
+ DWORD count; /* Count of bytes returned from VxD */
+
+ if (!inited)
+ PM_init();
+ inBuf[0] = intno;
+ inBuf[1] = (ulong)in;
+ inBuf[2] = (ulong)out;
+ inBuf[3] = (ulong)sregs;
+ CHECK_FOR_PMHELP();
+ if (DeviceIoControl(_PM_hDevice, PMHELP_INT86X32, inBuf, sizeof(inBuf),
+ outBuf, sizeof(outBuf), &count, NULL))
+ return outBuf[0];
+ return 0;
+}
+
+/****************************************************************************
+REMARKS:
+Call a real mode far function.
+****************************************************************************/
+void PMAPI PM_callRealMode(
+ uint seg,
+ uint off,
+ RMREGS *in,
+ RMSREGS *sregs)
+{
+ DWORD inBuf[4]; /* Buffer to send data to VxD */
+ DWORD count; /* Count of bytes returned from VxD */
+
+ if (!inited)
+ PM_init();
+ inBuf[0] = seg;
+ inBuf[1] = off;
+ inBuf[2] = (ulong)in;
+ inBuf[3] = (ulong)sregs;
+ CHECK_FOR_PMHELP();
+ DeviceIoControl(_PM_hDevice, PMHELP_CALLREALMODE32, inBuf, sizeof(inBuf),
+ NULL, 0, &count, NULL);
+}
+
+/****************************************************************************
+REMARKS:
+Return the amount of available memory.
+****************************************************************************/
+void PMAPI PM_availableMemory(
+ ulong *physical,
+ ulong *total)
+{
+ /* We don't support this under Win32 at the moment */
+ *physical = *total = 0;
+}
+
+/****************************************************************************
+REMARKS:
+Allocate a block of locked, physical memory for DMA operations.
+****************************************************************************/
+void * PMAPI PM_allocLockedMem(
+ uint size,
+ ulong *physAddr,
+ ibool contiguous,
+ ibool below16M)
+{
+ DWORD inBuf[4]; /* Buffer to send data to VxD */
+ DWORD outBuf[1]; /* Buffer to receive data from VxD */
+ DWORD count; /* Count of bytes returned from VxD */
+
+ if (!inited)
+ PM_init();
+ inBuf[0] = size;
+ inBuf[1] = (ulong)physAddr;
+ inBuf[2] = (ulong)contiguous;
+ inBuf[3] = (ulong)below16M;
+ CHECK_FOR_PMHELP();
+ if (DeviceIoControl(_PM_hDevice, PMHELP_ALLOCLOCKED32, inBuf, sizeof(inBuf),
+ outBuf, sizeof(outBuf), &count, NULL))
+ return (void*)outBuf[0];
+ return NULL;
+}
+
+/****************************************************************************
+REMARKS:
+Free a block of locked physical memory.
+****************************************************************************/
+void PMAPI PM_freeLockedMem(
+ void *p,
+ uint size,
+ ibool contiguous)
+{
+ DWORD inBuf[3]; /* Buffer to send data to VxD */
+ DWORD count; /* Count of bytes returned from VxD */
+
+ if (!inited)
+ PM_init();
+ inBuf[0] = (ulong)p;
+ inBuf[1] = size;
+ inBuf[2] = contiguous;
+ CHECK_FOR_PMHELP();
+ DeviceIoControl(_PM_hDevice, PMHELP_FREELOCKED32, inBuf, sizeof(inBuf),
+ NULL, 0, &count, NULL);
+}
+
+/****************************************************************************
+REMARKS:
+Allocates a page aligned and page sized block of memory
+****************************************************************************/
+void * PMAPI PM_allocPage(
+ ibool locked)
+{
+ DWORD inBuf[2]; /* Buffer to send data to VxD */
+ DWORD outBuf[1]; /* Buffer to receive data from VxD */
+ DWORD count; /* Count of bytes returned from VxD */
+
+ if (!inited)
+ PM_init();
+ inBuf[0] = locked;
+ CHECK_FOR_PMHELP();
+ if (DeviceIoControl(_PM_hDevice, PMHELP_ALLOCPAGE32, inBuf, sizeof(inBuf),
+ outBuf, sizeof(outBuf), &count, NULL))
+ return (void*)outBuf[0];
+ return NULL;
+}
+
+/****************************************************************************
+REMARKS:
+Free a page aligned and page sized block of memory
+****************************************************************************/
+void PMAPI PM_freePage(
+ void *p)
+{
+ DWORD inBuf[1]; /* Buffer to send data to VxD */
+ DWORD count; /* Count of bytes returned from VxD */
+
+ if (!inited)
+ PM_init();
+ inBuf[0] = (ulong)p;
+ CHECK_FOR_PMHELP();
+ DeviceIoControl(_PM_hDevice, PMHELP_FREEPAGE32, inBuf, sizeof(inBuf),
+ NULL, 0, &count, NULL);
+}
+
+/****************************************************************************
+REMARKS:
+Lock linear memory so it won't be paged.
+****************************************************************************/
+int PMAPI PM_lockDataPages(void *p,uint len,PM_lockHandle *lh)
+{
+ DWORD inBuf[2]; /* Buffer to send data to VxD */
+ DWORD outBuf[1]; /* Buffer to receive data from VxD */
+ DWORD count; /* Count of bytes returned from VxD */
+
+ inBuf[0] = (ulong)p;
+ inBuf[1] = len;
+ inBuf[2] = (ulong)lh;
+ CHECK_FOR_PMHELP();
+ if (DeviceIoControl(_PM_hDevice, PMHELP_LOCKDATAPAGES32, inBuf, sizeof(inBuf),
+ outBuf, sizeof(outBuf), &count, NULL))
+ return outBuf[0];
+ return 0;
+}
+
+/****************************************************************************
+REMARKS:
+Unlock linear memory so it won't be paged.
+****************************************************************************/
+int PMAPI PM_unlockDataPages(void *p,uint len,PM_lockHandle *lh)
+{
+ DWORD inBuf[2]; /* Buffer to send data to VxD */
+ DWORD outBuf[1]; /* Buffer to receive data from VxD */
+ DWORD count; /* Count of bytes returned from VxD */
+
+ inBuf[0] = (ulong)p;
+ inBuf[1] = len;
+ inBuf[2] = (ulong)lh;
+ CHECK_FOR_PMHELP();
+ if (DeviceIoControl(_PM_hDevice, PMHELP_UNLOCKDATAPAGES32, inBuf, sizeof(inBuf),
+ outBuf, sizeof(outBuf), &count, NULL))
+ return outBuf[0];
+ return 0;
+}
+
+/****************************************************************************
+REMARKS:
+Lock linear memory so it won't be paged.
+****************************************************************************/
+int PMAPI PM_lockCodePages(void (*p)(),uint len,PM_lockHandle *lh)
+{
+ DWORD inBuf[2]; /* Buffer to send data to VxD */
+ DWORD outBuf[1]; /* Buffer to receive data from VxD */
+ DWORD count; /* Count of bytes returned from VxD */
+
+ inBuf[0] = (ulong)p;
+ inBuf[1] = len;
+ inBuf[2] = (ulong)lh;
+ CHECK_FOR_PMHELP();
+ if (DeviceIoControl(_PM_hDevice, PMHELP_LOCKCODEPAGES32, inBuf, sizeof(inBuf),
+ outBuf, sizeof(outBuf), &count, NULL))
+ return outBuf[0];
+ return 0;
+}
+
+/****************************************************************************
+REMARKS:
+Unlock linear memory so it won't be paged.
+****************************************************************************/
+int PMAPI PM_unlockCodePages(void (*p)(),uint len,PM_lockHandle *lh)
+{
+ DWORD inBuf[2]; /* Buffer to send data to VxD */
+ DWORD outBuf[1]; /* Buffer to receive data from VxD */
+ DWORD count; /* Count of bytes returned from VxD */
+
+ inBuf[0] = (ulong)p;
+ inBuf[1] = len;
+ inBuf[2] = (ulong)lh;
+ CHECK_FOR_PMHELP();
+ if (DeviceIoControl(_PM_hDevice, PMHELP_UNLOCKCODEPAGES32, inBuf, sizeof(inBuf),
+ outBuf, sizeof(outBuf), &count, NULL))
+ return outBuf[0];
+ return 0;
+}
+
+/****************************************************************************
+REMARKS:
+Call the VBE/Core software interrupt to change display banks.
+****************************************************************************/
+void PMAPI PM_setBankA(
+ int bank)
+{
+ RMREGS regs;
+ regs.x.ax = 0x4F05;
+ regs.x.bx = 0x0000;
+ regs.x.dx = bank;
+ PM_int86(0x10,®s,®s);
+}
+
+/****************************************************************************
+REMARKS:
+Call the VBE/Core software interrupt to change display banks.
+****************************************************************************/
+void PMAPI PM_setBankAB(
+ int bank)
+{
+ RMREGS regs;
+ regs.x.ax = 0x4F05;
+ regs.x.bx = 0x0000;
+ regs.x.dx = bank;
+ PM_int86(0x10,®s,®s);
+ regs.x.ax = 0x4F05;
+ regs.x.bx = 0x0001;
+ regs.x.dx = bank;
+ PM_int86(0x10,®s,®s);
+}
+
+/****************************************************************************
+REMARKS:
+Call the VBE/Core software interrupt to change display start address.
+****************************************************************************/
+void PMAPI PM_setCRTStart(
+ int x,
+ int y,
+ int waitVRT)
+{
+ RMREGS regs;
+ regs.x.ax = 0x4F07;
+ regs.x.bx = waitVRT;
+ regs.x.cx = x;
+ regs.x.dx = y;
+ PM_int86(0x10,®s,®s);
+}
+
+/****************************************************************************
+REMARKS:
+Enable write combining for the memory region.
+****************************************************************************/
+ibool PMAPI PM_enableWriteCombine(
+ ulong base,
+ ulong length,
+ uint type)
+{
+ DWORD inBuf[3]; /* Buffer to send data to VxD */
+ DWORD outBuf[1]; /* Buffer to receive data from VxD */
+ DWORD count; /* Count of bytes returned from VxD */
+
+ if (!inited)
+ PM_init();
+ inBuf[0] = base;
+ inBuf[1] = length;
+ inBuf[2] = type;
+ CHECK_FOR_PMHELP();
+ if (DeviceIoControl(_PM_hDevice, PMHELP_ENABLELFBCOMB32, inBuf, sizeof(inBuf),
+ outBuf, sizeof(outBuf), &count, NULL))
+ return outBuf[0];
+ return false;
+}
+
+/****************************************************************************
+REMARKS:
+Get the page directory base register value
+****************************************************************************/
+ulong PMAPI _PM_getPDB(void)
+{
+ DWORD outBuf[1]; /* Buffer to receive data from VxD */
+ DWORD count; /* Count of bytes returned from VxD */
+
+ CHECK_FOR_PMHELP();
+ if (DeviceIoControl(_PM_hDevice, PMHELP_GETPDB32, NULL, 0,
+ outBuf, sizeof(outBuf), &count, NULL))
+ return outBuf[0];
+ return 0;
+}
+
+/****************************************************************************
+REMARKS:
+Flush the translation lookaside buffer.
+****************************************************************************/
+void PMAPI PM_flushTLB(void)
+{
+ CHECK_FOR_PMHELP();
+ DeviceIoControl(_PM_hDevice, PMHELP_FLUSHTLB32, NULL, 0, NULL, 0, NULL, NULL);
+}
+
+/****************************************************************************
+REMARKS:
+Execute the POST on the secondary BIOS for a controller.
+****************************************************************************/
+ibool PMAPI PM_doBIOSPOST(
+ ushort axVal,
+ ulong BIOSPhysAddr,
+ void *mappedBIOS,
+ ulong BIOSLen)
+{
+ /* This is never done by Win32 programs, but rather done by the VxD
+ * when the system boots.
+ */
+ (void)axVal;
+ (void)BIOSPhysAddr;
+ (void)mappedBIOS;
+ (void)BIOSLen;
+ return false;
+}
+
+/****************************************************************************
+REMARKS:
+Load an OS specific shared library or DLL. If the OS does not support
+shared libraries, simply return NULL.
+****************************************************************************/
+PM_MODULE PMAPI PM_loadLibrary(
+ const char *szDLLName)
+{
+ return (PM_MODULE)LoadLibrary(szDLLName);
+}
+
+/****************************************************************************
+REMARKS:
+Get the address of a named procedure from a shared library.
+****************************************************************************/
+void * PMAPI PM_getProcAddress(
+ PM_MODULE hModule,
+ const char *szProcName)
+{
+ return (void*)GetProcAddress((HINSTANCE)hModule,szProcName);
+}
+
+/****************************************************************************
+REMARKS:
+Unload a shared library.
+****************************************************************************/
+void PMAPI PM_freeLibrary(
+ PM_MODULE hModule)
+{
+ FreeLibrary((HINSTANCE)hModule);
+}
+
+/****************************************************************************
+REMARKS:
+Internal function to convert the find data to the generic interface.
+****************************************************************************/
+static void convertFindData(
+ PM_findData *findData,
+ WIN32_FIND_DATA *blk)
+{
+ ulong dwSize = findData->dwSize;
+
+ memset(findData,0,findData->dwSize);
+ findData->dwSize = dwSize;
+ if (blk->dwFileAttributes & FILE_ATTRIBUTE_READONLY)
+ findData->attrib |= PM_FILE_READONLY;
+ if (blk->dwFileAttributes & FILE_ATTRIBUTE_DIRECTORY)
+ findData->attrib |= PM_FILE_DIRECTORY;
+ if (blk->dwFileAttributes & FILE_ATTRIBUTE_ARCHIVE)
+ findData->attrib |= PM_FILE_ARCHIVE;
+ if (blk->dwFileAttributes & FILE_ATTRIBUTE_HIDDEN)
+ findData->attrib |= PM_FILE_HIDDEN;
+ if (blk->dwFileAttributes & FILE_ATTRIBUTE_SYSTEM)
+ findData->attrib |= PM_FILE_SYSTEM;
+ findData->sizeLo = blk->nFileSizeLow;
+ findData->sizeHi = blk->nFileSizeHigh;
+ strncpy(findData->name,blk->cFileName,PM_MAX_PATH);
+ findData->name[PM_MAX_PATH-1] = 0;
+}
+
+/****************************************************************************
+REMARKS:
+Function to find the first file matching a search criteria in a directory.
+****************************************************************************/
+void *PMAPI PM_findFirstFile(
+ const char *filename,
+ PM_findData *findData)
+{
+ WIN32_FIND_DATA blk;
+ HANDLE hfile;
+
+ if ((hfile = FindFirstFile(filename,&blk)) != INVALID_HANDLE_VALUE) {
+ convertFindData(findData,&blk);
+ return (void*)hfile;
+ }
+ return PM_FILE_INVALID;
+}
+
+/****************************************************************************
+REMARKS:
+Function to find the next file matching a search criteria in a directory.
+****************************************************************************/
+ibool PMAPI PM_findNextFile(
+ void *handle,
+ PM_findData *findData)
+{
+ WIN32_FIND_DATA blk;
+
+ if (FindNextFile((HANDLE)handle,&blk)) {
+ convertFindData(findData,&blk);
+ return true;
+ }
+ return false;
+}
+
+/****************************************************************************
+REMARKS:
+Function to close the find process
+****************************************************************************/
+void PMAPI PM_findClose(
+ void *handle)
+{
+ FindClose((HANDLE)handle);
+}
+
+/****************************************************************************
+REMARKS:
+Function to determine if a drive is a valid drive or not. Under Unix this
+function will return false for anything except a value of 3 (considered
+the root drive, and equivalent to C: for non-Unix systems). The drive
+numbering is:
+
+ 1 - Drive A:
+ 2 - Drive B:
+ 3 - Drive C:
+ etc
+
+****************************************************************************/
+ibool PMAPI PM_driveValid(
+ char drive)
+{
+ char buf[5];
+ int type;
+
+ sprintf(buf,"%c:\\", drive);
+ return ((type = GetDriveType(buf)) != 0 && type != 1);
+}
+
+/****************************************************************************
+REMARKS:
+Function to get the current working directory for the specififed drive.
+Under Unix this will always return the current working directory regardless
+of what the value of 'drive' is.
+****************************************************************************/
+void PMAPI PM_getdcwd(
+ int drive,
+ char *dir,
+ int len)
+{
+ // NT stores the current directory for drive N in the magic environment
+ // variable =N: so we simply look for that environment variable.
+ char envname[4];
+
+ envname[0] = '=';
+ envname[1] = drive - 1 + 'A';
+ envname[2] = ':';
+ envname[3] = '\0';
+ if (GetEnvironmentVariable(envname,dir,len) == 0) {
+ // The current directory or the drive has not been set yet, so
+ // simply set it to the root.
+ dir[0] = envname[1];
+ dir[1] = ':';
+ dir[2] = '\\';
+ dir[3] = '\0';
+ SetEnvironmentVariable(envname,dir);
+ }
+}
+
+/****************************************************************************
+REMARKS:
+Function to change the file attributes for a specific file.
+****************************************************************************/
+void PMAPI PM_setFileAttr(
+ const char *filename,
+ uint attrib)
+{
+ DWORD attr = 0;
+
+ if (attrib & PM_FILE_READONLY)
+ attr |= FILE_ATTRIBUTE_READONLY;
+ if (attrib & PM_FILE_ARCHIVE)
+ attr |= FILE_ATTRIBUTE_ARCHIVE;
+ if (attrib & PM_FILE_HIDDEN)
+ attr |= FILE_ATTRIBUTE_HIDDEN;
+ if (attrib & PM_FILE_SYSTEM)
+ attr |= FILE_ATTRIBUTE_SYSTEM;
+ SetFileAttributes((LPSTR)filename, attr);
+}
+
+/****************************************************************************
+REMARKS:
+Function to get the file attributes for a specific file.
+****************************************************************************/
+uint PMAPI PM_getFileAttr(
+ const char *filename)
+{
+ DWORD attr = GetFileAttributes(filename);
+ uint attrib = 0;
+
+ if (attr & FILE_ATTRIBUTE_READONLY)
+ attrib |= PM_FILE_READONLY;
+ if (attr & FILE_ATTRIBUTE_ARCHIVE)
+ attrib |= PM_FILE_ARCHIVE;
+ if (attr & FILE_ATTRIBUTE_HIDDEN)
+ attrib |= PM_FILE_HIDDEN;
+ if (attr & FILE_ATTRIBUTE_SYSTEM)
+ attrib |= PM_FILE_SYSTEM;
+ return attrib;
+}
+
+/****************************************************************************
+REMARKS:
+Function to create a directory.
+****************************************************************************/
+ibool PMAPI PM_mkdir(
+ const char *filename)
+{
+ return CreateDirectory(filename,NULL);
+}
+
+/****************************************************************************
+REMARKS:
+Function to remove a directory.
+****************************************************************************/
+ibool PMAPI PM_rmdir(
+ const char *filename)
+{
+ return RemoveDirectory(filename);
+}
+
+/****************************************************************************
+REMARKS:
+Function to get the file time and date for a specific file.
+****************************************************************************/
+ibool PMAPI PM_getFileTime(
+ const char *filename,
+ ibool gmTime,
+ PM_time *time)
+{
+ HFILE f;
+ OFSTRUCT of;
+ FILETIME utcTime,localTime;
+ SYSTEMTIME sysTime;
+ ibool status = false;
+
+ of.cBytes = sizeof(of);
+ if ((f = OpenFile(filename,&of,OF_READ)) == HFILE_ERROR)
+ return false;
+ if (!GetFileTime((HANDLE)f,NULL,NULL,&utcTime))
+ goto Exit;
+ if (!gmTime) {
+ if (!FileTimeToLocalFileTime(&utcTime,&localTime))
+ goto Exit;
+ }
+ else
+ localTime = utcTime;
+ if (!FileTimeToSystemTime(&localTime,&sysTime))
+ goto Exit;
+ time->year = sysTime.wYear;
+ time->mon = sysTime.wMonth-1;
+ time->day = sysTime.wYear;
+ time->hour = sysTime.wHour;
+ time->min = sysTime.wMinute;
+ time->sec = sysTime.wSecond;
+ status = true;
+
+Exit:
+ CloseHandle((HANDLE)f);
+ return status;
+}
+
+/****************************************************************************
+REMARKS:
+Function to set the file time and date for a specific file.
+****************************************************************************/
+ibool PMAPI PM_setFileTime(
+ const char *filename,
+ ibool gmTime,
+ PM_time *time)
+{
+ HFILE f;
+ OFSTRUCT of;
+ FILETIME utcTime,localTime;
+ SYSTEMTIME sysTime;
+ ibool status = false;
+
+ of.cBytes = sizeof(of);
+ if ((f = OpenFile(filename,&of,OF_WRITE)) == HFILE_ERROR)
+ return false;
+ sysTime.wYear = time->year;
+ sysTime.wMonth = time->mon+1;
+ sysTime.wYear = time->day;
+ sysTime.wHour = time->hour;
+ sysTime.wMinute = time->min;
+ sysTime.wSecond = time->sec;
+ if (!SystemTimeToFileTime(&sysTime,&localTime))
+ goto Exit;
+ if (!gmTime) {
+ if (!LocalFileTimeToFileTime(&localTime,&utcTime))
+ goto Exit;
+ }
+ else
+ utcTime = localTime;
+ if (!SetFileTime((HANDLE)f,NULL,NULL,&utcTime))
+ goto Exit;
+ status = true;
+
+Exit:
+ CloseHandle((HANDLE)f);
+ return status;
+}
+
diff --git a/board/MAI/bios_emulator/scitech/src/pm/win32/vflat.c b/board/MAI/bios_emulator/scitech/src/pm/win32/vflat.c
new file mode 100644
index 00000000000..70491cdb801
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/pm/win32/vflat.c
@@ -0,0 +1,53 @@
+/****************************************************************************
+*
+* SciTech OS Portability Manager Library
+*
+* ========================================================================
+*
+* The contents of this file are subject to the SciTech MGL Public
+* License Version 1.0 (the "License"); you may not use this file
+* except in compliance with the License. You may obtain a copy of
+* the License at http://www.scitechsoft.com/mgl-license.txt
+*
+* Software distributed under the License is distributed on an
+* "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+* implied. See the License for the specific language governing
+* rights and limitations under the License.
+*
+* The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+*
+* The Initial Developer of the Original Code is SciTech Software, Inc.
+* All Rights Reserved.
+*
+* ========================================================================
+*
+* Language: ANSI C
+* Environment: Any
+*
+* Description: Dummy module; no virtual framebuffer for this OS
+*
+****************************************************************************/
+
+#include "pmapi.h"
+
+ibool PMAPI VF_available(void)
+{
+ return false;
+}
+
+void * PMAPI VF_init(
+ ulong baseAddr,
+ int bankSize,
+ int codeLen,
+ void *bankFunc)
+{
+ (void)baseAddr;
+ (void)bankSize;
+ (void)codeLen;
+ (void)bankFunc;
+ return NULL;
+}
+
+void PMAPI VF_exit(void)
+{
+}
diff --git a/board/MAI/bios_emulator/scitech/src/pm/win32/ztimer.c b/board/MAI/bios_emulator/scitech/src/pm/win32/ztimer.c
new file mode 100644
index 00000000000..318929a2c03
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/pm/win32/ztimer.c
@@ -0,0 +1,136 @@
+/****************************************************************************
+*
+* Ultra Long Period Timer
+*
+* ========================================================================
+*
+* The contents of this file are subject to the SciTech MGL Public
+* License Version 1.0 (the "License"); you may not use this file
+* except in compliance with the License. You may obtain a copy of
+* the License at http://www.scitechsoft.com/mgl-license.txt
+*
+* Software distributed under the License is distributed on an
+* "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+* implied. See the License for the specific language governing
+* rights and limitations under the License.
+*
+* The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+*
+* The Initial Developer of the Original Code is SciTech Software, Inc.
+* All Rights Reserved.
+*
+* ========================================================================
+*
+* Language: ANSI C
+* Environment: Win32
+*
+* Description: OS specific implementation for the Zen Timer functions.
+*
+****************************************************************************/
+
+/*---------------------------- Global variables ---------------------------*/
+
+static CPU_largeInteger countFreq;
+static ibool havePerformanceCounter;
+static ulong start,finish;
+
+/*----------------------------- Implementation ----------------------------*/
+
+/****************************************************************************
+REMARKS:
+Initialise the Zen Timer module internals.
+****************************************************************************/
+void __ZTimerInit(void)
+{
+#ifdef NO_ASSEMBLER
+ havePerformanceCounter = false;
+#else
+ havePerformanceCounter = QueryPerformanceFrequency((LARGE_INTEGER*)&countFreq);
+#endif
+}
+
+/****************************************************************************
+REMARKS:
+Start the Zen Timer counting.
+****************************************************************************/
+static void __LZTimerOn(
+ LZTimerObject *tm)
+{
+ if (havePerformanceCounter)
+ QueryPerformanceCounter((LARGE_INTEGER*)&tm->start);
+ else
+ tm->start.low = timeGetTime();
+}
+
+/****************************************************************************
+REMARKS:
+Compute the lap time since the timer was started.
+****************************************************************************/
+static ulong __LZTimerLap(
+ LZTimerObject *tm)
+{
+ CPU_largeInteger tmLap,tmCount;
+
+ if (havePerformanceCounter) {
+ QueryPerformanceCounter((LARGE_INTEGER*)&tmLap);
+ _CPU_diffTime64(&tm->start,&tmLap,&tmCount);
+ return _CPU_calcMicroSec(&tmCount,countFreq.low);
+ }
+ else {
+ tmLap.low = timeGetTime();
+ return (tmLap.low - tm->start.low) * 1000L;
+ }
+}
+
+/****************************************************************************
+REMARKS:
+Stop the Zen Timer counting.
+****************************************************************************/
+static void __LZTimerOff(
+ LZTimerObject *tm)
+{
+ if (havePerformanceCounter)
+ QueryPerformanceCounter((LARGE_INTEGER*)&tm->end);
+ else
+ tm->end.low = timeGetTime();
+}
+
+/****************************************************************************
+REMARKS:
+Compute the elapsed time in microseconds between start and end timings.
+****************************************************************************/
+static ulong __LZTimerCount(
+ LZTimerObject *tm)
+{
+ CPU_largeInteger tmCount;
+
+ if (havePerformanceCounter) {
+ _CPU_diffTime64(&tm->start,&tm->end,&tmCount);
+ return _CPU_calcMicroSec(&tmCount,countFreq.low);
+ }
+ else
+ return (tm->end.low - tm->start.low) * 1000L;
+}
+
+/****************************************************************************
+REMARKS:
+Define the resolution of the long period timer as microseconds per timer tick.
+****************************************************************************/
+#define ULZTIMER_RESOLUTION 1000
+
+/****************************************************************************
+REMARKS:
+Read the Long Period timer from the OS
+****************************************************************************/
+static ulong __ULZReadTime(void)
+{ return timeGetTime(); }
+
+/****************************************************************************
+REMARKS:
+Compute the elapsed time from the BIOS timer tick. Note that we check to see
+whether a midnight boundary has passed, and if so adjust the finish time to
+account for this. We cannot detect if more that one midnight boundary has
+passed, so if this happens we will be generating erronous results.
+****************************************************************************/
+ulong __ULZElapsedTime(ulong start,ulong finish)
+{ return finish - start; }
diff --git a/board/MAI/bios_emulator/scitech/src/pm/x11/event.c b/board/MAI/bios_emulator/scitech/src/pm/x11/event.c
new file mode 100644
index 00000000000..23b938023de
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/pm/x11/event.c
@@ -0,0 +1,307 @@
+/****************************************************************************
+*
+* SciTech OS Portability Manager Library
+*
+* ========================================================================
+*
+* The contents of this file are subject to the SciTech MGL Public
+* License Version 1.0 (the "License"); you may not use this file
+* except in compliance with the License. You may obtain a copy of
+* the License at http://www.scitechsoft.com/mgl-license.txt
+*
+* Software distributed under the License is distributed on an
+* "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+* implied. See the License for the specific language governing
+* rights and limitations under the License.
+*
+* The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+*
+* The Initial Developer of the Original Code is SciTech Software, Inc.
+* All Rights Reserved.
+*
+* ========================================================================
+*
+* Language: ANSI C
+* Environment: Unix / X11
+*
+* Description: X11 event queue implementation for the MGL.
+* This can be used both for windowed and fullscreen (DGA) modes.
+*
+****************************************************************************/
+
+/*---------------------------- Global Variables ---------------------------*/
+
+static ushort keyUpMsg[256] = {0};/* Table of key up messages */
+static int rangeX,rangeY; /* Range of mouse coordinates */
+
+static Display *_EVT_dpy;
+static Window _EVT_win;
+
+typedef struct {
+ int keycode;
+ int scancode;
+} xkeymap;
+
+xkeymap xkeymaps[] = {
+ { 9, KB_esc},
+ {24, KB_Q},
+ {25, KB_W},
+ {26, KB_E},
+ {27, KB_R},
+ {28, KB_T},
+ {29, KB_Y},
+ {30, KB_U},
+ {31, KB_I},
+ {32, KB_O},
+ {33, KB_P},
+};
+
+/*---------------------------- Implementation -----------------------------*/
+
+/* These are not used under non-DOS systems */
+#define _EVT_disableInt() 1
+#define _EVT_restoreInt(flags)
+
+/****************************************************************************
+PARAMETERS:
+scanCode - Scan code to test
+
+REMARKS:
+This macro determines if a specified key is currently down at the
+time that the call is made.
+****************************************************************************/
+#define _EVT_isKeyDown(scanCode) (keyUpMsg[scanCode] != 0)
+
+/****************************************************************************
+REMARKS:
+This function is used to return the number of ticks since system
+startup in milliseconds. This should be the same value that is placed into
+the time stamp fields of events, and is used to implement auto mouse down
+events.
+****************************************************************************/
+ulong _EVT_getTicks(void)
+{
+ static unsigned starttime = 0;
+ struct timeval t;
+
+ gettimeofday(&t, NULL);
+ if (starttime == 0)
+ starttime = t.tv_sec * 1000 + (t.tv_usec/1000);
+ return ((t.tv_sec * 1000 + (t.tv_usec/1000)) - starttime);
+}
+
+static int getScancode(int keycode)
+{
+ return keycode-8;
+}
+
+/****************************************************************************
+REMARKS:
+Pumps all messages in the application message queue into our event queue.
+****************************************************************************/
+#ifdef X11_CORE
+static void _EVT_pumpX11Messages(void)
+#else
+static void _EVT_pumpMessages(void)
+#endif
+{
+ // TODO: The purpose of this function is to read all keyboard and mouse
+ // events from the OS specific event queue, translate them and post
+ // them into the SciTech event queue.
+ event_t evt;
+ XEvent ev;
+ static int old_mx = 0, old_my = 0, buts = 0, c;
+ char buf[2];
+
+ while (XPending(_EVT_dpy) && XNextEvent(_EVT_dpy,&ev)) {
+ evt.when = _MGL_getTicks();
+
+ switch(ev.type){
+ case KeyPress:
+ c = getScancode(ev.xkey.keycode);
+ evt.what = EVT_KEYDOWN;
+ evt.message = c << 8;
+ XLookupString(&ev.xkey, buf, 2, NULL, NULL);
+ evt.message |= buf[0];
+ break;
+ case KeyRelease:
+ c = getScancode(ev.xkey.keycode);
+ evt.what = EVT_KEYUP;
+ evt.message = keyUpMsg[c];
+ if(count < EVENTQSIZE)
+ addEvent(&evt);
+ keyUpMsg[c] = 0;
+ repeatKey[c] = 0;
+ break;
+ case ButtonPress:
+ evt.what = EVT_MOUSEDOWN;
+ if(ev.xbutton.button == 1){
+ buts |= EVT_LEFTBUT;
+ evt.message = EVT_LEFTBMASK;
+ }else if(ev.xbutton.button == 2){
+ buts |= EVT_MIDDLEBUT;
+ evt.message = EVT_MIDDLEBMASK;
+ }else if(ev.xbutton.button == 3){
+ buts |= EVT_RIGHTBUT;
+ evt.message = EVT_RIGHTBMASK;
+ }
+ evt.modifiers = modifiers | buts;
+
+ break;
+ case ButtonRelease:
+ evt.what = EVT_MOUSEUP;
+ if(ev.xbutton.button == 1){
+ buts &= ~EVT_LEFTBUT;
+ evt.message = EVT_LEFTBMASK;
+ }else if(ev.xbutton.button == 2){
+ buts &= ~EVT_MIDDLEBUT;
+ evt.message = EVT_MIDDLEBMASK;
+ }else if(ev.xbutton.button == 3){
+ buts &= ~EVT_RIGHTBUT;
+ evt.message = EVT_RIGHTBMASK;
+ }
+ evt.modifiers = modifiers | buts;
+
+ break;
+ case MotionNotify:
+ evt.what = EVT_MOUSEMOVE;
+ evt.where_x = ev.xmotion.x;
+ evt.where_y = ev.xmotion.y;
+ evt.relative_x = evt.where_x - old_mx;
+ evt.relative_y = evt.where_y - old_my;
+ old_mx = evt.where_x;
+ old_my = evt.where_y;
+ break;
+ }
+ if (count < EVENTQSIZE)
+ addEvent(&evt);
+ }
+
+}
+
+/****************************************************************************
+REMARKS:
+This macro/function is used to converts the scan codes reported by the
+keyboard to our event libraries normalised format. We only have one scan
+code for the 'A' key, and use shift modifiers to determine if it is a
+Ctrl-F1, Alt-F1 etc. The raw scan codes from the keyboard work this way,
+but the OS gives us 'cooked' scan codes, we have to translate them back
+to the raw format.
+****************************************************************************/
+#define _EVT_maskKeyCode(evt)
+
+/****************************************************************************
+REMARKS:
+Safely abort the event module upon catching a fatal error.
+****************************************************************************/
+void _EVT_abort()
+{
+ EVT_exit();
+ PM_fatalError("Unhandled exception!");
+}
+
+/****************************************************************************
+PARAMETERS:
+mouseMove - Callback function to call wheneve the mouse needs to be moved
+
+REMARKS:
+Initiliase the event handling module. Here we install our mouse handling ISR
+to be called whenever any button's are pressed or released. We also build
+the free list of events in the event queue.
+
+We use handler number 2 of the mouse libraries interrupt handlers for our
+event handling routines.
+****************************************************************************/
+#ifdef X11_CORE
+void EVTAPI EVT_initX11(
+#else
+void EVTAPI EVT_init(
+#endif
+ _EVT_mouseMoveHandler mouseMove)
+{
+ int result, i,j,k;
+ XDeviceInfoPtr list,slist;
+
+ /* Initialise the event queue */
+ _mouseMove = mouseMove;
+ initEventQueue();
+ memset(keyUpMsg,0,sizeof(keyUpMsg));
+
+
+ /* query server for input extensions */
+ result =XQueryExtension(_EVT_dpy,"XInputExtension",&i,&j,&k);
+ if(!result) {
+ fprintf(stderr,"Your server doesn't support XInput Extensions\n");
+ fprintf(stderr,"X11 Joystick disabled\n");
+ }
+ list = XListInputDevices(_EVT_dpy,&result);
+ if (!list) {
+ fprintf(stderr,"No extended input devices found !!\n");
+ fprintf(stderr,"X11 Joystick disabled\n");
+ }
+
+
+ /* Catch program termination signals so we can clean up properly */
+ signal(SIGABRT, _EVT_abort);
+ signal(SIGFPE, _EVT_abort);
+ signal(SIGINT, _EVT_abort);
+}
+
+/****************************************************************************
+REMARKS
+Changes the range of coordinates returned by the mouse functions to the
+specified range of values. This is used when changing between graphics
+modes set the range of mouse coordinates for the new display mode.
+****************************************************************************/
+void EVTAPI EVT_setMouseRange(
+ int xRes,
+ int yRes)
+{
+ rangeX = xRes;
+ rangeY = yRes;
+}
+
+/****************************************************************************
+REMARKS:
+Initiailises the internal event handling modules. The EVT_suspend function
+can be called to suspend event handling (such as when shelling out to DOS),
+and this function can be used to resume it again later.
+****************************************************************************/
+void EVT_resume(void)
+{
+ // Do nothing for non DOS systems
+}
+
+/****************************************************************************
+REMARKS
+Suspends all of our event handling operations. This is also used to
+de-install the event handling code.
+****************************************************************************/
+void EVT_suspend(void)
+{
+ // Do nothing for non DOS systems
+}
+
+/****************************************************************************
+REMARKS
+Exits the event module for program terminatation.
+****************************************************************************/
+void EVT_exit(void)
+{
+ /* Restore signal handlers */
+ signal(SIGABRT, SIG_DFL);
+ signal(SIGFPE, SIG_DFL);
+ signal(SIGINT, SIG_DFL);
+
+ // TODO: Do any OS specific cleanup in here
+}
+
+/****************************************************************************
+REMARKS
+Sets the current X11 display
+****************************************************************************/
+void EVT_setX11Display(Display *dpy, Window win)
+{
+ _EVT_dpy = dpy;
+ _EVT_win = win;
+}
diff --git a/board/MAI/bios_emulator/scitech/src/pm/x11/oshdr.h b/board/MAI/bios_emulator/scitech/src/pm/x11/oshdr.h
new file mode 100644
index 00000000000..45d7451be55
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/pm/x11/oshdr.h
@@ -0,0 +1,38 @@
+/****************************************************************************
+*
+* SciTech OS Portability Manager Library
+*
+* ========================================================================
+*
+* The contents of this file are subject to the SciTech MGL Public
+* License Version 1.0 (the "License"); you may not use this file
+* except in compliance with the License. You may obtain a copy of
+* the License at http://www.scitechsoft.com/mgl-license.txt
+*
+* Software distributed under the License is distributed on an
+* "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+* implied. See the License for the specific language governing
+* rights and limitations under the License.
+*
+* The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+*
+* The Initial Developer of the Original Code is SciTech Software, Inc.
+* All Rights Reserved.
+*
+* ========================================================================
+*
+* Language: ANSI C
+* Environment: BeOS
+*
+* Description: Include file to include all OS specific header files.
+*
+****************************************************************************/
+
+#include <X11/Xlib.h>
+#include <X11/keysym.h>
+#include <time.h>
+#include <signal.h>
+#ifdef USE_OS_JOYSTICK
+#include <X11/extensions/XI.h>
+#include <X11/extensions/XInput.h>
+#endif
diff --git a/board/MAI/bios_emulator/scitech/src/pm/z_samples.vpj b/board/MAI/bios_emulator/scitech/src/pm/z_samples.vpj
new file mode 100644
index 00000000000..0c6c80f0543
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/pm/z_samples.vpj
@@ -0,0 +1,74 @@
+[SciTech]
+compiler=wc10-
+targetos=d32
+[COMPILER]
+version=5.0b
+MACRO=enable_current_compiler\n
+activeconfig=,getch.exe
+FILTERNAME=Source Files\n
+FILTERPATTERN=*.c;*.cpp;*.cxx;*.prg;*.pas;*.dpr;*.bas;*.java;*.sc;*.e;*.cob;*.html;*.rc\n
+FILTERASSOCIATEFILETYPES=0
+FILTERAPPCOMMAND=\n
+vcsproject=SCC:Perforce SCM://depot
+vcslocalpath=SCC:Perforce SCM:c:\
+compile=concur|capture|:Compile:&Compile,dmake %n.obj
+make=concur|capture|clear|saveall|:Build:&Build,dmake %b
+rebuild=concur|capture|clear|saveall|:Rebuild:&Rebuild,dmake -u %b
+debug=concur|capture|savenone|nochangedir|:Debug:&Debug,wdn %b
+execute=hide|savenone|nochangedir|:Execute:E&xecute,
+user1=hide|nochangedir|:User 1:User 1,
+user2=hide|nochangedir|:User 2:User 2,
+usertool_build_all=concur|capture|clear|savenone|:Build All:Build All,dmake all
+usertool_rebuild_all=concur|capture|clear|savenone|:Rebuild All:Rebuild All,dmake -u all
+usertool_clean_directory=concur|capture|savenone|:Clean Directory:&Clean Directory,dmake cleanexe
+workingdir=.
+includedirs=%(SCITECH)\include;%(PRIVATE)\include
+reffile=
+[FILES]
+tests\altbrk.c
+tests\altcrit.c
+tests\biosptr.c
+tests\block.c
+tests\brk.c
+tests\callreal.c
+tests\checks.c
+tests\cpu.c
+tests\critical.c
+tests\getch.c
+tests\isvesa.c
+tests\key.c
+tests\key15.c
+tests\memtest.c
+tests\mouse.c
+tests\rtc.c
+tests\showpci.c
+tests\tick.c
+tests\timerc.c
+tests\timercpp.cpp
+tests\uswc.c
+tests\vftest.c
+tests\video.c
+[ASSOCIATION]
+[CONFIGURATIONS]
+config=,altbrk.exe
+config=,altcrit.exe
+config=,biosptr.exe
+config=,block.exe
+config=,brk.exe
+config=,callreal.exe
+config=,cpu.exe
+config=,critical.exe
+config=,getch.exe
+config=,isvesa.exe
+config=,key.exe
+config=,key15.exe
+config=,memtest.exe
+config=,mouse.exe
+config=,rtc.exe
+config=,showpci.exe
+config=,tick.exe
+config=,timerc.exe
+config=,timercpp.exe
+config=,uswc.exe
+config=,vftest.exe
+config=,video.exe
diff --git a/board/MAI/bios_emulator/scitech/src/pm/ztimer.c b/board/MAI/bios_emulator/scitech/src/pm/ztimer.c
new file mode 100644
index 00000000000..35081e9a367
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/pm/ztimer.c
@@ -0,0 +1,517 @@
+/****************************************************************************
+*
+* SciTech OS Portability Manager Library
+*
+* ========================================================================
+*
+* The contents of this file are subject to the SciTech MGL Public
+* License Version 1.0 (the "License"); you may not use this file
+* except in compliance with the License. You may obtain a copy of
+* the License at http://www.scitechsoft.com/mgl-license.txt
+*
+* Software distributed under the License is distributed on an
+* "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
+* implied. See the License for the specific language governing
+* rights and limitations under the License.
+*
+* The Original Code is Copyright (C) 1991-1998 SciTech Software, Inc.
+*
+* The Initial Developer of the Original Code is SciTech Software, Inc.
+* All Rights Reserved.
+*
+* ========================================================================
+*
+* Language: ANSI C
+* Environment: Any
+*
+* Description: Module to implement high precision timing on each OS.
+*
+****************************************************************************/
+
+#include "ztimer.h"
+#include "pmapi.h"
+#include "oshdr.h"
+
+/*---------------------------- Global variables ---------------------------*/
+
+static LZTimerObject LZTimer;
+static ulong start,finish;
+#ifdef __INTEL__
+static long cpuSpeed = -1;
+static ibool haveRDTSC = false;
+#endif
+
+/*----------------------------- Implementation ----------------------------*/
+
+/* External Intel assembler functions */
+#ifdef __INTEL__
+/* {secret} */
+void _ASMAPI _CPU_readTimeStamp(CPU_largeInteger *time);
+/* {secret} */
+ulong _ASMAPI _CPU_diffTime64(CPU_largeInteger *t1,CPU_largeInteger *t2,CPU_largeInteger *t);
+/* {secret} */
+ulong _ASMAPI _CPU_calcMicroSec(CPU_largeInteger *count,ulong freq);
+#endif
+
+#if defined(__SMX32__)
+#include "smx/ztimer.c"
+#elif defined(__RTTARGET__)
+#include "rttarget/ztimer.c"
+#elif defined(__REALDOS__)
+#include "dos/ztimer.c"
+#elif defined(__NT_DRIVER__)
+#include "ntdrv/ztimer.c"
+#elif defined(__WIN32_VXD__)
+#include "vxd/ztimer.c"
+#elif defined(__WINDOWS32__)
+#include "win32/ztimer.c"
+#elif defined(__OS2_VDD__)
+#include "vdd/ztimer.c"
+#elif defined(__OS2__)
+#include "os2/ztimer.c"
+#elif defined(__LINUX__)
+#include "linux/ztimer.c"
+#elif defined(__QNX__)
+#include "qnx/ztimer.c"
+#elif defined(__BEOS__)
+#include "beos/ztimer.c"
+#else
+#error Timer library not ported to this platform yet!
+#endif
+
+/*------------------------ Public interface routines ----------------------*/
+
+/****************************************************************************
+DESCRIPTION:
+Initializes the Zen Timer library (extended)
+
+PARAMETERS:
+accurate - True of the speed should be measured accurately
+
+HEADER:
+ztimer.h
+
+REMARKS:
+This function initializes the Zen Timer library, and /must/ be called before
+any of the remaining Zen Timer library functions are called. The accurate
+parameter is used to determine whether highly accurate timing should be
+used or not. If high accuracy is needed, more time is spent profiling the
+actual speed of the CPU so that we can obtain highly accurate timing
+results, but the time spent in the initialisation routine will be
+significantly longer (on the order of 5 seconds).
+****************************************************************************/
+void ZAPI ZTimerInitExt(
+ ibool accurate)
+{
+ if (cpuSpeed == -1) {
+ __ZTimerInit();
+#ifdef __INTEL__
+ cpuSpeed = CPU_getProcessorSpeedInHZ(accurate);
+ haveRDTSC = CPU_haveRDTSC() && (cpuSpeed > 0);
+#endif
+ }
+}
+
+/****************************************************************************
+DESCRIPTION:
+Initializes the Zen Timer library.
+
+HEADER:
+ztimer.h
+
+REMARKS:
+This function initializes the Zen Timer library, and /must/ be called before
+any of the remaining Zen Timer library functions are called.
+****************************************************************************/
+void ZAPI ZTimerInit(void)
+{
+ ZTimerInitExt(false);
+}
+
+/****************************************************************************
+DESCRIPTION:
+Starts the Long Period Zen Timer counting.
+
+HEADER:
+ztimer.h
+
+PARAMETERS:
+tm - Timer object to start timing with
+
+REMARKS:
+Starts the Long Period Zen Timer counting. Once you have started the timer,
+you can stop it with LZTimerOff or you can latch the current count with
+LZTimerLap.
+
+The Long Period Zen Timer uses a number of different high precision timing
+mechanisms to obtain microsecond accurate timings results whenever possible.
+The following different techniques are used depending on the operating
+system, runtime environment and CPU on the target machine. If the target
+system has a Pentium CPU installed which supports the Read Time Stamp
+Counter instruction (RDTSC), the Zen Timer library will use this to
+obtain the maximum timing precision available.
+
+Under 32-bit Windows, if the Pentium RDTSC instruction is not available, we
+first try to use the Win32 QueryPerformanceCounter API, and if that is not
+available we fall back on the timeGetTime API which is always supported.
+
+Under 32-bit DOS, if the Pentium RDTSC instruction is not available, we
+then do all timing using the old style 8253 timer chip. The 8253 timer
+routines provide highly accurate timings results in pure DOS mode, however
+in a DOS box under Windows or other Operating Systems the virtualization
+of the timer can produce inaccurate results.
+
+Note: Because the Long Period Zen Timer stores the results in a 32-bit
+ unsigned integer, you can only time periods of up to 2^32 microseconds,
+ or about 1hr 20mins. For timing longer periods use the Ultra Long
+ Period Zen Timer.
+
+SEE ALSO:
+LZTimerOff, LZTimerLap, LZTimerCount
+****************************************************************************/
+void ZAPI LZTimerOnExt(
+ LZTimerObject *tm)
+{
+#ifdef __INTEL__
+ if (haveRDTSC) {
+ _CPU_readTimeStamp(&tm->start);
+ }
+ else
+#endif
+ __LZTimerOn(tm);
+}
+
+/****************************************************************************
+DESCRIPTION:
+Returns the current count for the Long Period Zen Timer and keeps it
+running.
+
+HEADER:
+ztimer.h
+
+PARAMETERS:
+tm - Timer object to do lap timing with
+
+RETURNS:
+Count that has elapsed in microseconds.
+
+REMARKS:
+Returns the current count that has elapsed since the last call to
+LZTimerOn in microseconds. The time continues to run after this function is
+called so you can call this function repeatedly.
+
+SEE ALSO:
+LZTimerOn, LZTimerOff, LZTimerCount
+****************************************************************************/
+ulong ZAPI LZTimerLapExt(
+ LZTimerObject *tm)
+{
+#ifdef __INTEL__
+ CPU_largeInteger tmLap,tmCount;
+
+ if (haveRDTSC) {
+ _CPU_readTimeStamp(&tmLap);
+ _CPU_diffTime64(&tm->start,&tmLap,&tmCount);
+ return _CPU_calcMicroSec(&tmCount,cpuSpeed);
+ }
+ else
+#endif
+ return __LZTimerLap(tm);
+}
+
+/****************************************************************************
+DESCRIPTION:
+Stops the Long Period Zen Timer counting.
+
+HEADER:
+ztimer.h
+
+PARAMETERS:
+tm - Timer object to stop timing with
+
+REMARKS:
+Stops the Long Period Zen Timer counting and latches the count. Once you
+have stopped the timer you can read the count with LZTimerCount. If you need
+highly accurate timing, you should use the on and off functions rather than
+the lap function since the lap function does not subtract the overhead of
+the function calls from the timed count.
+
+SEE ALSO:
+LZTimerOn, LZTimerLap, LZTimerCount
+****************************************************************************/
+void ZAPI LZTimerOffExt(
+ LZTimerObject *tm)
+{
+#ifdef __INTEL__
+ if (haveRDTSC) {
+ _CPU_readTimeStamp(&tm->end);
+ }
+ else
+#endif
+ __LZTimerOff(tm);
+}
+
+/****************************************************************************
+DESCRIPTION:
+Returns the current count for the Long Period Zen Timer.
+
+HEADER:
+ztimer.h
+
+PARAMETERS:
+tm - Timer object to compute the elapsed time with.
+
+RETURNS:
+Count that has elapsed in microseconds.
+
+REMARKS:
+Returns the current count that has elapsed between calls to
+LZTimerOn and LZTimerOff in microseconds.
+
+SEE ALSO:
+LZTimerOn, LZTimerOff, LZTimerLap
+****************************************************************************/
+ulong ZAPI LZTimerCountExt(
+ LZTimerObject *tm)
+{
+#ifdef __INTEL__
+ CPU_largeInteger tmCount;
+
+ if (haveRDTSC) {
+ _CPU_diffTime64(&tm->start,&tm->end,&tmCount);
+ return _CPU_calcMicroSec(&tmCount,cpuSpeed);
+ }
+ else
+#endif
+ return __LZTimerCount(tm);
+}
+
+/****************************************************************************
+DESCRIPTION:
+Starts the Long Period Zen Timer counting.
+
+HEADER:
+ztimer.h
+
+REMARKS:
+Obsolete function. You should use the LZTimerOnExt function instead
+which allows for multiple timers running at the same time.
+****************************************************************************/
+void ZAPI LZTimerOn(void)
+{ LZTimerOnExt(&LZTimer); }
+
+/****************************************************************************
+DESCRIPTION:
+Returns the current count for the Long Period Zen Timer and keeps it
+running.
+
+HEADER:
+ztimer.h
+
+RETURNS:
+Count that has elapsed in microseconds.
+
+REMARKS:
+Obsolete function. You should use the LZTimerLapExt function instead
+which allows for multiple timers running at the same time.
+****************************************************************************/
+ulong ZAPI LZTimerLap(void)
+{ return LZTimerLapExt(&LZTimer); }
+
+/****************************************************************************
+DESCRIPTION:
+Stops the Long Period Zen Timer counting.
+
+HEADER:
+ztimer.h
+
+REMARKS:
+Obsolete function. You should use the LZTimerOffExt function instead
+which allows for multiple timers running at the same time.
+****************************************************************************/
+void ZAPI LZTimerOff(void)
+{ LZTimerOffExt(&LZTimer); }
+
+/****************************************************************************
+DESCRIPTION:
+Returns the current count for the Long Period Zen Timer.
+
+HEADER:
+ztimer.h
+
+RETURNS:
+Count that has elapsed in microseconds.
+
+REMARKS:
+Obsolete function. You should use the LZTimerCountExt function instead
+which allows for multiple timers running at the same time.
+****************************************************************************/
+ulong ZAPI LZTimerCount(void)
+{ return LZTimerCountExt(&LZTimer); }
+
+/****************************************************************************
+DESCRIPTION:
+Starts the Ultra Long Period Zen Timer counting.
+
+HEADER:
+ztimer.h
+
+REMARKS:
+Starts the Ultra Long Period Zen Timer counting. Once you have started the
+timer, you can stop it with ULZTimerOff or you can latch the current count
+with ULZTimerLap.
+
+The Ultra Long Period Zen Timer uses the available operating system services
+to obtain accurate timings results with as much precision as the operating
+system provides, but with enough granularity to time longer periods of
+time than the Long Period Zen Timer. Note that the resolution of the timer
+ticks is not constant between different platforms, and you should use the
+ULZTimerResolution function to determine the number of seconds in a single
+tick of the timer, and use this to convert the timer counts to seconds.
+
+Under 32-bit Windows, we use the timeGetTime function which provides a
+resolution of 1 millisecond (0.001 of a second). Given that the timer
+count is returned as an unsigned 32-bit integer, this we can time intervals
+that are a maximum of 2^32 milliseconds in length (or about 1,200 hours or
+50 days!).
+
+Under 32-bit DOS, we use the system timer tick which runs at 18.2 times per
+second. Given that the timer count is returned as an unsigned 32-bit integer,
+this we can time intervals that are a maximum of 2^32 * (1/18.2) in length
+(or about 65,550 hours or 2731 days!).
+
+SEE ALSO:
+ULZTimerOff, ULZTimerLap, ULZTimerCount, ULZElapsedTime, ULZReadTime
+****************************************************************************/
+void ZAPI ULZTimerOn(void)
+{ start = __ULZReadTime(); }
+
+/****************************************************************************
+DESCRIPTION:
+Returns the current count for the Ultra Long Period Zen Timer and keeps it
+running.
+
+HEADER:
+ztimer.h
+
+RETURNS:
+Count that has elapsed in resolution counts.
+
+REMARKS:
+Returns the current count that has elapsed since the last call to
+ULZTimerOn in microseconds. The time continues to run after this function is
+called so you can call this function repeatedly.
+
+SEE ALSO:
+ULZTimerOn, ULZTimerOff, ULZTimerCount
+****************************************************************************/
+ulong ZAPI ULZTimerLap(void)
+{ return (__ULZReadTime() - start); }
+
+/****************************************************************************
+DESCRIPTION:
+Stops the Long Period Zen Timer counting.
+
+HEADER:
+ztimer.h
+
+REMARKS:
+Stops the Ultra Long Period Zen Timer counting and latches the count. Once
+you have stopped the timer you can read the count with ULZTimerCount.
+
+SEE ALSO:
+ULZTimerOn, ULZTimerLap, ULZTimerCount
+****************************************************************************/
+void ZAPI ULZTimerOff(void)
+{ finish = __ULZReadTime(); }
+
+/****************************************************************************
+DESCRIPTION:
+Returns the current count for the Ultra Long Period Zen Timer.
+
+HEADER:
+ztimer.h
+
+RETURNS:
+Count that has elapsed in resolution counts.
+
+REMARKS:
+Returns the current count that has elapsed between calls to
+ULZTimerOn and ULZTimerOff in resolution counts.
+
+SEE ALSO:
+ULZTimerOn, ULZTimerOff, ULZTimerLap, ULZTimerResolution
+****************************************************************************/
+ulong ZAPI ULZTimerCount(void)
+{ return (finish - start); }
+
+/****************************************************************************
+DESCRIPTION:
+Reads the current time from the Ultra Long Period Zen Timer.
+
+HEADER:
+ztimer.h
+
+RETURNS:
+Current timer value in resolution counts.
+
+REMARKS:
+Reads the current Ultra Long Period Zen Timer and returns it’s current
+count. You can use the ULZElapsedTime function to find the elapsed time
+between two timer count readings.
+
+SEE ALSO:
+ULZElapsedTime, ULZTimerResolution
+****************************************************************************/
+ulong ZAPI ULZReadTime(void)
+{ return __ULZReadTime(); }
+
+/****************************************************************************
+DESCRIPTION:
+Compute the elapsed time between two timer counts.
+
+HEADER:
+ztimer.h
+
+PARAMETERS:
+start - Starting time for elapsed count
+finish - Ending time for elapsed count
+
+RETURNS:
+Elapsed timer in resolution counts.
+
+REMARKS:
+Returns the elapsed time for the Ultra Long Period Zen Timer in units of the
+timers resolution (1/18th of a second under DOS). This function correctly
+computes the difference even if a midnight boundary has been crossed
+during the timing period.
+
+SEE ALSO:
+ULZReadTime, ULZTimerResolution
+****************************************************************************/
+ulong ZAPI ULZElapsedTime(
+ ulong start,
+ ulong finish)
+{ return __ULZElapsedTime(start,finish); }
+
+/****************************************************************************
+DESCRIPTION:
+Returns the resolution of the Ultra Long Period Zen Timer.
+
+HEADER:
+ztimer.h
+
+PARAMETERS:
+resolution - Place to store the timer in microseconds per timer count.
+
+REMARKS:
+Returns the resolution of the Ultra Long Period Zen Timer as a 32-bit
+integer value measured in microseconds per timer count.
+
+SEE ALSO:
+ULZReadTime, ULZElapsedTime, ULZTimerCount
+****************************************************************************/
+void ZAPI ULZTimerResolution(
+ ulong *resolution)
+{ *resolution = ULZTIMER_RESOLUTION; }
+
diff --git a/board/MAI/bios_emulator/scitech/src/v86bios/AsmMacros.h b/board/MAI/bios_emulator/scitech/src/v86bios/AsmMacros.h
new file mode 100644
index 00000000000..e824299c050
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/v86bios/AsmMacros.h
@@ -0,0 +1,450 @@
+/* $XConsortium: AsmMacros.h /main/13 1996/10/25 11:33:12 kaleb $ */
+/*
+ * (c) Copyright 1993,1994 by David Wexelblat <dwex@xfree86.org>
+ *
+ * Permission is hereby granted, free of charge, to any person obtaining a
+ * copy of this software and associated documentation files (the "Software"),
+ * to deal in the Software without restriction, including without limitation
+ * the rights to use, copy, modify, merge, publish, distribute, sublicense,
+ * and/or sell copies of the Software, and to permit persons to whom the
+ * Software is furnished to do so, subject to the following conditions:
+ *
+ * The above copyright notice and this permission notice shall be included in
+ * all copies or substantial portions of the Software.
+ *
+ * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
+ * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
+ * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL
+ * DAVID WEXELBLAT 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.
+ *
+ * Except as contained in this notice, the name of David Wexelblat shall not be
+ * used in advertising or otherwise to promote the sale, use or other dealings
+ * in this Software without prior written authorization from David Wexelblat.
+ *
+ */
+/*
+ * Copyright 1997
+ * Digital Equipment Corporation. All rights reserved.
+ * This software is furnished under license and may be used and copied only in
+ * accordance with the following terms and conditions. Subject to these
+ * conditions, you may download, copy, install, use, modify and distribute
+ * this software in source and/or binary form. No title or ownership is
+ * transferred hereby.
+ *
+ * 1) Any source code used, modified or distributed must reproduce and retain
+ * this copyright notice and list of conditions as they appear in the source
+ * file.
+ *
+ * 2) No right is granted to use any trade name, trademark, or logo of Digital
+ * Equipment Corporation. Neither the "Digital Equipment Corporation" name
+ * nor any trademark or logo of Digital Equipment Corporation may be used
+ * to endorse or promote products derived from this software without the
+ * prior written permission of Digital Equipment Corporation.
+ *
+ * 3) This software is provided "AS-IS" and any express or implied warranties,
+ * including but not limited to, any implied warranties of merchantability,
+ * fitness for a particular purpose, or non-infringement are disclaimed. In
+ * no event shall DIGITAL be liable for any damages whatsoever, and in
+ * particular, DIGITAL shall not be liable for special, indirect,
+ * consequential, or incidental damages or damages for
+ * lost profits, loss of revenue or loss of use, whether such damages arise
+ * in contract,
+ * negligence, tort, under statute, in equity, at law or otherwise, even if
+ * advised of the possibility of such damage.
+ *
+ */
+
+/* $XFree86: xc/programs/Xserver/hw/xfree86/SuperProbe/AsmMacros.h,v 3.14 1999/09/25 14:36:58 dawes Exp $ */
+
+#if defined(__GNUC__)
+#if defined(linux) && (defined(__alpha__) || defined(__ia64__))
+#undef inb
+#define inb _inb
+#undef inw
+#define inw _inw
+#undef inl
+#define inl _inl
+#undef outb
+#define outb(p,v) _outb((v),(p))
+#undef outw
+#define outw(p,v) _outw((v),(p))
+#undef outl
+#define outl(p,v) _outl((v),(p))
+#else
+#if defined(__sparc__)
+#ifndef ASI_PL
+#define ASI_PL 0x88
+#endif
+
+static __inline__ void
+outb(port, val)
+unsigned long port;
+char val;
+{
+ __asm__ __volatile__("stba %0, [%1] %2" : : "r" (val), "r" (port), "i" (ASI_PL));
+}
+
+static __inline__ void
+outw(port, val)
+unsigned long port;
+char val;
+{
+ __asm__ __volatile__("stha %0, [%1] %2" : : "r" (val), "r" (port), "i" (ASI_PL));
+}
+
+static __inline__ void
+outl(port, val)
+unsigned long port;
+char val;
+{
+ __asm__ __volatile__("sta %0, [%1] %2" : : "r" (val), "r" (port), "i" (ASI_PL));
+}
+
+static __inline__ unsigned int
+inb(port)
+unsigned long port;
+{
+ unsigned char ret;
+ __asm__ __volatile__("lduba [%1] %2, %0" : "=r" (ret) : "r" (port), "i" (ASI_PL));
+ return ret;
+}
+
+static __inline__ unsigned int
+inw(port)
+unsigned long port;
+{
+ unsigned char ret;
+ __asm__ __volatile__("lduha [%1] %2, %0" : "=r" (ret) : "r" (port), "i" (ASI_PL));
+ return ret;
+}
+
+static __inline__ unsigned int
+inl(port)
+unsigned long port;
+{
+ unsigned char ret;
+ __asm__ __volatile__("lda [%1] %2, %0" : "=r" (ret) : "r" (port), "i" (ASI_PL));
+ return ret;
+}
+#else
+#ifdef __arm32__
+unsigned int IOPortBase; /* Memory mapped I/O port area */
+
+static __inline__ void
+outb(port, val)
+ short port;
+ char val;
+{
+ if ((unsigned short)port >= 0x400) return;
+
+ *(volatile unsigned char*)(((unsigned short)(port))+IOPortBase) = val;
+}
+
+static __inline__ void
+outw(port, val)
+ short port;
+ short val;
+{
+ if ((unsigned short)port >= 0x400) return;
+
+ *(volatile unsigned short*)(((unsigned short)(port))+IOPortBase) = val;
+}
+
+static __inline__ void
+outl(port, val)
+ short port;
+ int val;
+{
+ if ((unsigned short)port >= 0x400) return;
+
+ *(volatile unsigned long*)(((unsigned short)(port))+IOPortBase) = val;
+}
+
+static __inline__ unsigned int
+inb(port)
+ short port;
+{
+ if ((unsigned short)port >= 0x400) return((unsigned int)-1);
+
+ return(*(volatile unsigned char*)(((unsigned short)(port))+IOPortBase));
+}
+
+static __inline__ unsigned int
+inw(port)
+ short port;
+{
+ if ((unsigned short)port >= 0x400) return((unsigned int)-1);
+
+ return(*(volatile unsigned short*)(((unsigned short)(port))+IOPortBase));
+}
+
+static __inline__ unsigned int
+inl(port)
+ short port;
+{
+ if ((unsigned short)port >= 0x400) return((unsigned int)-1);
+
+ return(*(volatile unsigned long*)(((unsigned short)(port))+IOPortBase));
+}
+#else /* __arm32__ */
+#if defined(Lynx) && defined(__powerpc__)
+extern unsigned char *ioBase;
+
+static volatile void
+eieio()
+{
+ __asm__ __volatile__ ("eieio");
+}
+
+static void
+outb(port, value)
+short port;
+unsigned char value;
+{
+ *(uchar *)(ioBase + port) = value; eieio();
+}
+
+static void
+outw(port, value)
+short port;
+unsigned short value;
+{
+ *(unsigned short *)(ioBase + port) = value; eieio();
+}
+
+static void
+outl(port, value)
+short port;
+unsigned long value;
+{
+ *(unsigned long *)(ioBase + port) = value; eieio();
+}
+
+static unsigned char
+inb(port)
+short port;
+{
+ unsigned char val;
+
+ val = *((unsigned char *)(ioBase + port)); eieio();
+ return(val);
+}
+
+static unsigned short
+inw(port)
+short port;
+{
+ unsigned short val;
+
+ val = *((unsigned short *)(ioBase + port)); eieio();
+ return(val);
+}
+
+static unsigned long
+inl(port)
+short port;
+{
+ unsigned long val;
+
+ val = *((unsigned long *)(ioBase + port)); eieio();
+ return(val);
+}
+
+#else
+#if defined(__FreeBSD__) && defined(__alpha__)
+
+#include <sys/types.h>
+
+extern void outb(u_int32_t port, u_int8_t val);
+extern void outw(u_int32_t port, u_int16_t val);
+extern void outl(u_int32_t port, u_int32_t val);
+extern u_int8_t inb(u_int32_t port);
+extern u_int16_t inw(u_int32_t port);
+extern u_int32_t inl(u_int32_t port);
+
+#else
+#ifdef GCCUSESGAS
+static __inline__ void
+outb(port, val)
+short port;
+char val;
+{
+ __asm__ __volatile__("outb %0,%1" : :"a" (val), "d" (port));
+}
+
+static __inline__ void
+outw(port, val)
+short port;
+short val;
+{
+ __asm__ __volatile__("outw %0,%1" : :"a" (val), "d" (port));
+}
+
+static __inline__ void
+outl(port, val)
+short port;
+unsigned int val;
+{
+ __asm__ __volatile__("outl %0,%1" : :"a" (val), "d" (port));
+}
+
+static __inline__ unsigned int
+inb(port)
+short port;
+{
+ unsigned char ret;
+ __asm__ __volatile__("inb %1,%0" :
+ "=a" (ret) :
+ "d" (port));
+ return ret;
+}
+
+static __inline__ unsigned int
+inw(port)
+short port;
+{
+ unsigned short ret;
+ __asm__ __volatile__("inw %1,%0" :
+ "=a" (ret) :
+ "d" (port));
+ return ret;
+}
+
+static __inline__ unsigned int
+inl(port)
+short port;
+{
+ unsigned int ret;
+ __asm__ __volatile__("inl %1,%0" :
+ "=a" (ret) :
+ "d" (port));
+ return ret;
+}
+
+#else /* GCCUSESGAS */
+
+static __inline__ void
+outb(port, val)
+ short port;
+ char val;
+{
+ __asm__ __volatile__("out%B0 (%1)" : :"a" (val), "d" (port));
+}
+
+static __inline__ void
+outw(port, val)
+ short port;
+ short val;
+{
+ __asm__ __volatile__("out%W0 (%1)" : :"a" (val), "d" (port));
+}
+
+static __inline__ void
+outl(port, val)
+ short port;
+ unsigned int val;
+{
+ __asm__ __volatile__("out%L0 (%1)" : :"a" (val), "d" (port));
+}
+
+static __inline__ unsigned int
+inb(port)
+ short port;
+{
+ unsigned int ret;
+ __asm__ __volatile__("in%B0 (%1)" :
+ "=a" (ret) :
+ "d" (port));
+ return ret;
+}
+
+static __inline__ unsigned int
+inw(port)
+ short port;
+{
+ unsigned int ret;
+ __asm__ __volatile__("in%W0 (%1)" :
+ "=a" (ret) :
+ "d" (port));
+ return ret;
+}
+
+static __inline__ unsigned int
+inl(port)
+ short port;
+{
+ unsigned int ret;
+ __asm__ __volatile__("in%L0 (%1)" :
+ "=a" (ret) :
+ "d" (port));
+ return ret;
+}
+
+#endif /* GCCUSESGAS */
+#endif /* Lynx && __powerpc__ */
+#endif /* arm32 */
+#endif /* linux && __sparc__ */
+#endif /* linux && __alpha__ */
+#endif /* __FreeBSD__ && __alpha__ */
+
+#if defined(linux) || defined(__arm32__) || (defined(Lynx) && defined(__powerpc__))
+
+#define intr_disable()
+#define intr_enable()
+
+#else
+
+static __inline__ void
+intr_disable()
+{
+ __asm__ __volatile__("cli");
+}
+
+static __inline__ void
+intr_enable()
+{
+ __asm__ __volatile__("sti");
+}
+
+#endif /* else !linux && !__arm32__ */
+
+#else /* __GNUC__ */
+
+#if defined(_MINIX) && defined(_ACK)
+
+/* inb, outb, inw and outw are defined in the library */
+/* ... but I've no idea if the same is true for inl & outl */
+
+u8_t inb(U16_t);
+void outb(U16_t, U8_t);
+u16_t inw(U16_t);
+void outw(U16_t, U16_t);
+u32_t inl(U16_t);
+void outl(U16_t, U32_t);
+
+#else /* not _MINIX and _ACK */
+
+# if defined(__STDC__) && (__STDC__ == 1)
+# ifndef NCR
+# define asm __asm
+# endif
+# endif
+# ifdef SVR4
+# include <sys/types.h>
+# ifndef __USLC__
+# define __USLC__
+# endif
+# endif
+#ifndef SCO325
+# include <sys/inline.h>
+#else
+# include "../common/scoasm.h"
+#endif
+#define intr_disable() asm("cli")
+#define intr_enable() asm("sti")
+
+#endif /* _MINIX and _ACK */
+#endif /* __GNUC__ */
diff --git a/board/MAI/bios_emulator/scitech/src/v86bios/README b/board/MAI/bios_emulator/scitech/src/v86bios/README
new file mode 100644
index 00000000000..4b7d0fa0299
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/v86bios/README
@@ -0,0 +1,35 @@
+
+This is a preliminary version of a VGA softbooter for LINUX.
+
+It makes use of the of the vm86() call and is therefore only
+usable on ix86 systems.
+There are plans to port this program to use a x86 emulator
+like x86emu. Also it may be ported to other operating systems.
+
+So far it has been tested on a small number of cards. It might
+well be that it will fail on your card.
+
+If you need to make modifications to the programs to be able
+to boot your card please let the author know.
+
+So far there is no command line interface. All options need
+to be hardcoded. You can do this by editing debug.h. You can
+turn on a bunch of debug output. Other options allow you to
+boot the primary card (CONFIG_ACTIVE_DEVICE), save the bios
+to a file (SAVE_BIOS), and map the original system bios
+(MAP_SYS_BIOS).
+
+The author wants to thank
+ Hans Lermen (dosemu)
+ and
+ Kendall Bennett (x86emu)
+for their support.
+
+Parts of the code - especially in v86.c and io.c - are based on code
+taken from dosemu. Parts of the code in int.c are based on code taken
+from x86emu
+
+Egbert Eich. <Egbert.Eich@Physik.TU-Darmstadt.DE>
+
+
+
diff --git a/board/MAI/bios_emulator/scitech/src/v86bios/awk.scr b/board/MAI/bios_emulator/scitech/src/v86bios/awk.scr
new file mode 100644
index 00000000000..9d2a80d7d8a
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/v86bios/awk.scr
@@ -0,0 +1,15 @@
+/.*\(0x3da.*/||/.*\(0x3ba.*/ {
+ if (v_3da != 1) print "_v_retrace_";
+ v_3da = 1;
+ next;
+ }
+/.*\(0x42.*/||/.*\(0x43.*/ {
+ if (v_4x != 1) print "_timer_";
+ v_4x = 1;
+ next;
+}
+{
+ print;
+ v_3da = 0;
+ v_4x = 0;
+}
diff --git a/board/MAI/bios_emulator/scitech/src/v86bios/cbios.c b/board/MAI/bios_emulator/scitech/src/v86bios/cbios.c
new file mode 100644
index 00000000000..4173c953ba9
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/v86bios/cbios.c
@@ -0,0 +1,415 @@
+#include <unistd.h>
+#include <fcntl.h>
+#include <stdio.h>
+#include <sys/mman.h>
+#include <sys/types.h>
+#include <string.h>
+#include <stdlib.h>
+#include <signal.h>
+#include <sys/stat.h>
+#include <getopt.h>
+#if defined(__alpha__) || defined (__ia64__)
+#include <sys/io.h>
+#elif defined(HAVE_SYS_PERM)
+#include <sys/perm.h>
+#endif
+#include "debug.h"
+#include "v86bios.h"
+#include "pci.h"
+#include "AsmMacros.h"
+
+#define SIZE 0x100000
+#define VRAM_START 0xA0000
+#define VRAM_SIZE 0x1FFFF
+#define V_BIOS_SIZE 0x1FFFF
+#define BIOS_START 0x7C00 /* default BIOS entry */
+#define BIOS_MEM 0x600
+
+CARD8 code[] = { 0xcd, 0x10, 0xf4 };
+struct config Config;
+
+static int map(void);
+static void unmap(void);
+static void runBIOS(int argc, char **argv);
+static int map_vram(void);
+static void unmap_vram(void);
+static int copy_vbios(memType base);
+static int copy_sys_bios(void);
+static CARD32 setup_int_vect(void);
+static void update_bios_vars(void);
+static int chksum(CARD8 *start);
+static void setup_bios_regs(i86biosRegsPtr regs, int argc, char **argv);
+static void print_regs(i86biosRegsPtr regs);
+void dprint(unsigned long start, unsigned long size);
+
+void loadCodeToMem(unsigned char *ptr, CARD8 *code);
+
+static int vram_mapped = 0;
+static char* bios_var;
+
+
+int
+main(int argc,char **argv)
+{
+ CARD32 vbios_base;
+
+ Config.PrintPort = PRINT_PORT;
+ Config.IoStatistics = IO_STATISTICS;
+ Config.PrintIrq = PRINT_IRQ;
+ Config.PrintPci = PRINT_PCI;
+ Config.ShowAllDev = SHOW_ALL_DEV;
+ Config.PrintIp = PRINT_IP;
+ Config.SaveBios = SAVE_BIOS;
+ Config.Trace = TRACE;
+ Config.ConfigActiveOnly = CONFIG_ACTIVE_ONLY;
+ Config.ConfigActiveDevice = CONFIG_ACTIVE_DEVICE;
+ Config.MapSysBios = MAP_SYS_BIOS;
+ Config.Resort = RESORT;
+ Config.FixRom = FIX_ROM;
+ Config.NoConsole = NO_CONSOLE;
+ Config.Verbose = VERBOSE;
+
+ if (!map())
+ exit(1);
+ if (!copy_sys_bios())
+ exit(1);
+ if (!(vbios_base = setup_int_vect()))
+ exit(1);
+ if (!map_vram())
+ exit(1);
+ if (!copy_vbios(vbios_base))
+ exit(1);
+
+ iopl(3);
+ setup_io();
+ runBIOS(argc,argv);
+ update_bios_vars();
+ unmap_vram();
+ iopl(0);
+ unmap();
+ printf("done !\n");
+ exit (1);
+}
+
+int
+map(void)
+{
+ void* mem;
+
+ mem = mmap(0, (size_t)SIZE,
+ PROT_EXEC | PROT_READ | PROT_WRITE,
+ MAP_FIXED | MAP_PRIVATE | MAP_ANON,
+ -1, 0 );
+ if (mem != 0) {
+ perror("anonymous map");
+ return (0);
+ }
+ memset(mem,0,SIZE);
+
+ loadCodeToMem((unsigned char *) BIOS_START, code);
+ return (1);
+}
+
+static int
+copy_sys_bios(void)
+{
+#define SYS_BIOS 0xF0000
+ int mem_fd;
+
+ if ((mem_fd = open(MEM_FILE,O_RDONLY))<0) {
+ perror("opening memory");
+ return (0);
+ }
+
+ if (lseek(mem_fd,(off_t) SYS_BIOS,SEEK_SET) != (off_t) SYS_BIOS)
+ goto Error;
+ if (read(mem_fd, (char *)SYS_BIOS, (size_t) 0xFFFF) != (size_t) 0xFFFF)
+ goto Error;
+
+ close(mem_fd);
+ return (1);
+
+Error:
+ perror("sys_bios");
+ close(mem_fd);
+ return (0);
+}
+
+static int
+map_vram(void)
+{
+ int mem_fd;
+
+#ifdef __ia64__
+ if ((mem_fd = open(MEM_FILE,O_RDWR | O_SYNC))<0)
+#else
+ if ((mem_fd = open(MEM_FILE,O_RDWR))<0)
+#endif
+ {
+ perror("opening memory");
+ return 0;
+ }
+
+#ifndef __alpha__
+ if (mmap((void *) VRAM_START, (size_t) VRAM_SIZE,
+ PROT_EXEC | PROT_READ | PROT_WRITE, MAP_SHARED | MAP_FIXED,
+ mem_fd, VRAM_START) == (void *) -1)
+#else
+ if (!_bus_base()) sparse_shift = 7; /* Uh, oh, JENSEN... */
+ if (!_bus_base_sparse()) sparse_shift = 0;
+ if ((vram_map = mmap(0,(size_t) (VRAM_SIZE << sparse_shift),
+ PROT_READ | PROT_WRITE,
+ MAP_SHARED,
+ mem_fd, (VRAM_START << sparse_shift)
+ | _bus_base_sparse())) == (void *) -1)
+#endif
+ {
+ perror("mmap error in map_hardware_ram");
+ close(mem_fd);
+ return (0);
+ }
+ vram_mapped = 1;
+ close(mem_fd);
+ return (1);
+}
+
+static int
+copy_vbios(memType v_base)
+{
+ int mem_fd;
+ unsigned char *tmp;
+ int size;
+
+ if ((mem_fd = open(MEM_FILE,O_RDONLY))<0) {
+ perror("opening memory");
+ return (0);
+ }
+
+ if (lseek(mem_fd,(off_t) v_base, SEEK_SET) != (off_t) v_base) {
+ fprintf(stderr,"Cannot lseek\n");
+ goto Error;
+ }
+ tmp = (unsigned char *)malloc(3);
+ if (read(mem_fd, (char *)tmp, (size_t) 3) != (size_t) 3) {
+ fprintf(stderr,"Cannot read\n");
+ goto Error;
+ }
+ if (lseek(mem_fd,(off_t) v_base,SEEK_SET) != (off_t) v_base)
+ goto Error;
+
+ if (*tmp != 0x55 || *(tmp+1) != 0xAA ) {
+ fprintf(stderr,"No bios found at: 0x%lx\n",v_base);
+ goto Error;
+ }
+#ifdef DEBUG
+ dprint((unsigned long)tmp,0x100);
+#endif
+ size = *(tmp+2) * 512;
+
+ if (read(mem_fd, (char *)v_base, (size_t) size) != (size_t) size) {
+ fprintf(stderr,"Cannot read\n");
+ goto Error;
+ }
+ free(tmp);
+ close(mem_fd);
+ if (!chksum((CARD8*)v_base))
+ return (0);
+
+ return (1);
+
+Error:
+ perror("v_bios");
+ close(mem_fd);
+ return (0);
+}
+
+static void
+unmap(void)
+{
+ munmap(0,SIZE);
+}
+
+static void
+unmap_vram(void)
+{
+ if (!vram_mapped) return;
+
+ munmap((void*)VRAM_START,VRAM_SIZE);
+ vram_mapped = 0;
+}
+
+static void
+runBIOS(int argc, char ** argv)
+{
+ i86biosRegs bRegs;
+#ifdef V86BIOS_DEBUG
+ printf("starting BIOS\n");
+#endif
+ setup_bios_regs(&bRegs, argc, argv);
+ do_x86(BIOS_START,&bRegs);
+ print_regs(&bRegs);
+#ifdef V86BIOS_DEBUG
+ printf("done\n");
+#endif
+}
+
+static CARD32
+setup_int_vect(void)
+{
+ int mem_fd;
+ CARD32 vbase;
+ void *map;
+
+ if ((mem_fd = open(MEM_FILE,O_RDONLY))<0) {
+ perror("opening memory");
+ return (0);
+ }
+
+ if ((map = mmap((void *) 0, (size_t) 0x2000,
+ PROT_EXEC | PROT_READ | PROT_WRITE, MAP_SHARED,
+ mem_fd, 0)) == (void *)-1) {
+ perror("mmap error in map_hardware_ram");
+ close(mem_fd);
+ return (0);
+ }
+
+ close(mem_fd);
+ memcpy(0,map,BIOS_MEM);
+ munmap(map,0x2000);
+ /*
+ * create a backup copy of the bios variables to write back the
+ * modified values
+ */
+ bios_var = (char *)malloc(BIOS_MEM);
+ memcpy(bios_var,0,BIOS_MEM);
+
+ vbase = (*((CARD16*)(0x10 << 2) + 1)) << 4;
+ fprintf(stderr,"vbase: 0x%x\n",vbase);
+ return vbase;
+}
+
+static void
+update_bios_vars(void)
+{
+ int mem_fd;
+ void *map;
+ memType i;
+
+#ifdef __ia64__
+ if ((mem_fd = open(MEM_FILE,O_RDWR | O_SYNC))<0)
+#else
+ if ((mem_fd = open(MEM_FILE,O_RDWR))<0)
+#endif
+ {
+ perror("opening memory");
+ return;
+ }
+
+ if ((map = mmap((void *) 0, (size_t) 0x2000,
+ PROT_EXEC | PROT_READ | PROT_WRITE, MAP_SHARED,
+ mem_fd, 0)) == (void *)-1) {
+ perror("mmap error in map_hardware_ram");
+ close(mem_fd);
+ return;
+ }
+
+ for (i = 0; i < BIOS_MEM; i++) {
+ if (bios_var[i] != *(CARD8*)i)
+ *((CARD8*)map + i) = *(CARD8*)i;
+ }
+
+ munmap(map,0x2000);
+ close(mem_fd);
+}
+
+
+static void
+setup_bios_regs(i86biosRegsPtr regs, int argc, char **argv)
+{
+ int c;
+
+ regs->ax = 0;
+ regs->bx = 0;
+ regs->cx = 0;
+ regs->dx = 0;
+ regs->es = 0;
+ regs->di = 0;
+ opterr = 0;
+ while ((c = getopt(argc,argv,"a:b:c:d:e:i:")) != EOF) {
+ switch (c) {
+ case 'a':
+ regs->ax = strtol(optarg,NULL,0);
+ break;
+ case 'b':
+ regs->bx = strtol(optarg,NULL,0);
+ break;
+ case 'c':
+ regs->cx = strtol(optarg,NULL,0);
+ break;
+ case 'd':
+ regs->dx = strtol(optarg,NULL,0);
+ break;
+ case 'e':
+ regs->es = strtol(optarg,NULL,0);
+ break;
+ case 'i':
+ regs->di = strtol(optarg,NULL,0);
+ break;
+ }
+ }
+}
+
+
+static int
+chksum(CARD8 *start)
+{
+ CARD16 size;
+ CARD8 val = 0;
+ int i;
+
+ size = *(start+2) * 512;
+ for (i = 0; i<size; i++)
+ val += *(start + i);
+
+ if (!val)
+ return 1;
+
+ fprintf(stderr,"BIOS cksum wrong!\n");
+ return 0;
+}
+
+static void
+print_regs(i86biosRegsPtr regs)
+{
+ printf("ax=%x bx=%x cx=%x dx=%x es=%x di=%x\n",(CARD16)regs->ax,
+ (CARD16)regs->bx,(CARD16)regs->cx,(CARD16)regs->dx,
+ (CARD16)regs->es,(CARD16)regs->di);
+}
+
+void
+loadCodeToMem(unsigned char *ptr, CARD8 code[])
+{
+ int i;
+ CARD8 val;
+
+ for ( i=0;;i++) {
+ val = code[i];
+ *ptr++ = val;
+ if (val == 0xf4) break;
+ }
+ return;
+}
+
+void
+dprint(unsigned long start, unsigned long size)
+{
+ int i,j;
+ char *c = (char *)start;
+
+ for (j = 0; j < (size >> 4); j++) {
+ printf ("\n0x%lx: ",(unsigned long)c);
+ for (i = 0; i<16; i++)
+ printf("%x ",(unsigned char) (*(c++)));
+ }
+ printf("\n");
+}
diff --git a/board/MAI/bios_emulator/scitech/src/v86bios/command.c b/board/MAI/bios_emulator/scitech/src/v86bios/command.c
new file mode 100644
index 00000000000..3a468da3138
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/v86bios/command.c
@@ -0,0 +1,41 @@
+#include <stdio.h>
+#include <readline/readline.h>
+#include <readline/history.h>
+#include <malloc.h>
+
+#define PROMPT ">"
+
+
+void
+getline(char *buf,int *num,int max_num)
+{
+ static int line_len = 0;
+ static char *line = NULL;
+ static char *line_pointer = NULL;
+ static int len = 0;
+ int tmp_len;
+ char *buff;
+
+ if (len <= 0) {
+ buff = readline(PROMPT);
+ add_history(buff);
+
+ if ((tmp_len = strlen(buff)) > line_len) {
+ free(line);
+ line = malloc(tmp_len);
+ line_len = tmp_len;
+ }
+ sprintf(line,"%s\n",buff);
+ free(buff);
+ line_pointer = line;
+ len = strlen(line);
+ }
+
+ *num = max_num > len? len : max_num;
+ strncpy(buf,line_pointer,*num);
+ line_pointer = line_pointer + *num;
+ len = len - *num;
+}
+
+
+
diff --git a/board/MAI/bios_emulator/scitech/src/v86bios/console.c b/board/MAI/bios_emulator/scitech/src/v86bios/console.c
new file mode 100644
index 00000000000..46805155f87
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/v86bios/console.c
@@ -0,0 +1,104 @@
+/*
+ * Copyright 1999 Egbert Eich
+ *
+ * Permission to use, copy, modify, distribute, and sell this software and its
+ * documentation for any purpose is hereby granted without fee, provided that
+ * the above copyright notice appear in all copies and that both that
+ * copyright notice and this permission notice appear in supporting
+ * documentation, and that the name of the authors not be used in
+ * advertising or publicity pertaining to distribution of the software without
+ * specific, written prior permission. The authors makes no representations
+ * about the suitability of this software for any purpose. It is provided
+ * "as is" without express or implied warranty.
+ *
+ * THE AUTHORS DISCLAIMS ALL WARRANTIES WITH REGARD TO THIS SOFTWARE,
+ * INCLUDING ALL IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS, IN NO
+ * EVENT SHALL THE AUTHORS BE LIABLE FOR ANY SPECIAL, INDIRECT OR
+ * CONSEQUENTIAL DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF USE,
+ * DATA OR PROFITS, WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE OR OTHER
+ * TORTIOUS ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE OR
+ * PERFORMANCE OF THIS SOFTWARE.
+ */
+#include <sys/ioctl.h>
+#include <sys/vt.h>
+#include <sys/kd.h>
+#include <stdio.h>
+#include <fcntl.h>
+#include <unistd.h>
+#include "debug.h"
+#include "v86bios.h"
+
+console
+open_console(void)
+{
+ int fd;
+ int VTno;
+ char VTname[11];
+ console Con = {-1,-1};
+ struct vt_stat vts;
+
+ if (NO_CONSOLE)
+ return Con;
+
+ if ((fd = open("/dev/tty0",O_WRONLY,0)) < 0)
+ return Con;
+
+ if ((ioctl(fd, VT_OPENQRY, &VTno) < 0) || (VTno == -1)) {
+ fprintf(stderr,"cannot get a vt\n");
+ return Con;
+ }
+
+ close(fd);
+ sprintf(VTname,"/dev/tty%i",VTno);
+
+ if ((fd = open(VTname, O_RDWR|O_NDELAY, 0)) < 0) {
+ fprintf(stderr,"cannot open console\n");
+ return Con;
+ }
+
+ if (ioctl(fd, VT_GETSTATE, &vts) == 0)
+ Con.vt = vts.v_active;
+
+ if (ioctl(fd, VT_ACTIVATE, VTno) != 0) {
+ fprintf(stderr,"cannot activate console\n");
+ close(fd);
+ return Con;
+ }
+ if (ioctl(fd, VT_WAITACTIVE, VTno) != 0) {
+ fprintf(stderr,"wait for active console failed\n");
+ close(fd);
+ return Con;
+ }
+#if 0
+ if (ioctl(fd, KDSETMODE, KD_GRAPHICS) < 0) {
+ close(fd);
+ return Con;
+ }
+#endif
+ Con.fd = fd;
+ return Con;
+}
+
+void
+close_console(console Con)
+{
+ if (Con.fd == -1)
+ return;
+
+#if 0
+ ioctl(Con.fd, KDSETMODE, KD_TEXT);
+#endif
+ if (Con.vt >=0)
+ ioctl(Con.fd, VT_ACTIVATE, Con.vt);
+
+ close(Con.fd);
+}
+
+
+
+
+
+
+
+
+
diff --git a/board/MAI/bios_emulator/scitech/src/v86bios/debug.h b/board/MAI/bios_emulator/scitech/src/v86bios/debug.h
new file mode 100644
index 00000000000..bc0b1117db2
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/v86bios/debug.h
@@ -0,0 +1,62 @@
+/*
+ * Copyright 1999 Egbert Eich
+ *
+ * Permission to use, copy, modify, distribute, and sell this software and its
+ * documentation for any purpose is hereby granted without fee, provided that
+ * the above copyright notice appear in all copies and that both that
+ * copyright notice and this permission notice appear in supporting
+ * documentation, and that the name of the authors not be used in
+ * advertising or publicity pertaining to distribution of the software without
+ * specific, written prior permission. The authors makes no representations
+ * about the suitability of this software for any purpose. It is provided
+ * "as is" without express or implied warranty.
+ *
+ * THE AUTHORS DISCLAIMS ALL WARRANTIES WITH REGARD TO THIS SOFTWARE,
+ * INCLUDING ALL IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS, IN NO
+ * EVENT SHALL THE AUTHORS BE LIABLE FOR ANY SPECIAL, INDIRECT OR
+ * CONSEQUENTIAL DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF USE,
+ * DATA OR PROFITS, WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE OR OTHER
+ * TORTIOUS ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE OR
+ * PERFORMANCE OF THIS SOFTWARE.
+ */
+//#define V86BIOS_DEBUG
+
+/*
+ * uncomment the following if needed
+ * should be command line options
+ */
+
+#define PRINT_PORT 0
+#define IO_STATISTICS 0
+#define PRINT_IRQ 0
+#define PRINT_PCI 1
+#define PRINT_IP 0 /* print IP address with PIO information */
+#define TRACE 0 /* turn on debugger in x86emu */
+ /* requires x86emu compiled with -DDEBUG */
+
+/*
+ * these should not be here.
+ * Should be converted to command line options.
+ */
+#define CONFIG_ACTIVE_ONLY 0
+#define CONFIG_ACTIVE_DEVICE 1
+#define SAVE_BIOS 0
+#define MAP_SYS_BIOS 1
+#define RESORT 1
+#define FIX_ROM 0
+#define NO_CONSOLE 0
+#define SHOW_ALL_DEV 0
+#define VERBOSE 0
+
+//#define V_BIOS 0xe0000
+//#define V_BIOS 0xe4000
+
+
+
+
+#if (PRINT_IO == 1) && (PRINT_PORT == 0)
+# define PRINT_IO 0
+#endif
+#if (IO_STATISTICS == 1) && (PRINT_PORT == 0)
+# define IO_STATISTICS 0
+#endif
diff --git a/board/MAI/bios_emulator/scitech/src/v86bios/happy_cards b/board/MAI/bios_emulator/scitech/src/v86bios/happy_cards
new file mode 100644
index 00000000000..943d44ede4b
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/v86bios/happy_cards
@@ -0,0 +1,76 @@
+What I had to do to make cards happy:
+
+1. Tseng ET4000 W32P
+This card wants to call the original system BIOS video routines.
+It sets the int 0x42 vector to F000:F065, the entry point to the
+system bios video routines.
+CAVE: don't catch int 0x42 and use the vbios int 0x10 routines.
+At early stage during initialization they call int 0x42. This
+causes an infinite loop.
+
+2. ATi Mach64 Rage IIc AGP
+This card does similar things like the Tseng ET4000 W32P.
+However it doesn't have the problem with the ininite loop.
+
+3. Elsa Victory II-A16 AGP Banshee
+This card is very clever: It knows it is an AGP card. Therefore
+it knows it is behind a PCI-PCI bridge. It also knows that noone
+else is behind this bridge. Therefore it start reprogramming the
+bridge! For this it assumes the AGP bridge is on bus 1.
+
+4. Elsa Gloria Synergy 8 ViVo AGP PM2
+This card likes to see a complete interrupt vector table. If
+we fill this table with 0 the VBIOS detects this and quits
+initialization.
+
+5. Dimond Viper 330 AGP NVIDIA Riva 128.
+This card has a similar problem like the Elsa Gloria. It wants
+to read the system BIOS date at 0xffffd.
+
+6. Matrox Mystique PCI
+This card reads the IO port 0x62. If it doesn't like what it sees
+it loops forever. To keep the card happy put 0xfc into 0xffffe.
+This location holds the system model id. 0xfc means IBM-AT.
+ One can make an interesting observation: this card likes to know
+with whom it has to share the system. Therefore it accesses PCI
+config space of all the other cards. It does this bypassing the
+PCI BIOS by reading the PCI access ports directly.
+
+7. Matrox G100 AGP
+This card has the same problem as the Mystique.
+
+Apperantly this works now. However not all combinations of cards are
+checked, yet.
+
+Further notes:
+the IO register 0x42-0x43 as well as 0x61-0x63 are of special interest
+for many graphic cards. They should be emulated.
+The so called "Industry Standard BIOS Entry Points" to int 0x42 (0xFF065)
+and to int 0x1a (0xFFE6E) should be filled with useful code. This code
+needs to return as if it was called as int.
+The subvendor ID PCI registers might cause problems. On some chipsets
+they are programmed in a non-obivous non-PCI conformant way.
+V_Bioses are seen to modify the following int:
+0x10 (default video), 0x1f(font table), 0x42(copy of default video),
+0x43 (??), 0x6d (copy of default video - same as 0x10?)
+
+TODO:
+Int 0x6d needs to be done.
+All interrupts where there is no default industry standard entry point
+should point to an unused location in the 0xF000 segmant (possibly
+0xF0000). This way they could be trapped. A trap handler for
+a. int 0x42 and int 0x1a needs to be implemented.
+The default "industry entry point" for video and PCI (0xFFE6E) should
+also be implemented. (any others?) They should either be routed to
+int 0x42(0x6d?) (video) and 0x1A (PCI) or some other interrupts to
+trap them. Mapping of system bios might not be a good idea. Maybe
+the system bios area should just be filled with "hlt" to trap any
+access there.
+Handling of timer IO registers 0x42, 0x43 and IO registers 0x61, 0x62.
+
+Find documentation:
+- on interrupt vector table
+- on industry standard entry points to the system bios
+- on IO registers 0x61 and 0x62
+
+
diff --git a/board/MAI/bios_emulator/scitech/src/v86bios/hexdump b/board/MAI/bios_emulator/scitech/src/v86bios/hexdump
new file mode 100644
index 00000000000..4f359e5eddb
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/v86bios/hexdump
@@ -0,0 +1,3 @@
+"%06.6_ax " 16/1 "%02x "
+" " 16/1 "%_p"
+"\n"
diff --git a/board/MAI/bios_emulator/scitech/src/v86bios/int.c b/board/MAI/bios_emulator/scitech/src/v86bios/int.c
new file mode 100644
index 00000000000..40b17b1d702
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/v86bios/int.c
@@ -0,0 +1,238 @@
+/*
+ * Copyright 1999 Egbert Eich
+ *
+ * Permission to use, copy, modify, distribute, and sell this software and its
+ * documentation for any purpose is hereby granted without fee, provided that
+ * the above copyright notice appear in all copies and that both that
+ * copyright notice and this permission notice appear in supporting
+ * documentation, and that the name of the authors not be used in
+ * advertising or publicity pertaining to distribution of the software without
+ * specific, written prior permission. The authors makes no representations
+ * about the suitability of this software for any purpose. It is provided
+ * "as is" without express or implied warranty.
+ *
+ * THE AUTHORS DISCLAIMS ALL WARRANTIES WITH REGARD TO THIS SOFTWARE,
+ * INCLUDING ALL IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS, IN NO
+ * EVENT SHALL THE AUTHORS BE LIABLE FOR ANY SPECIAL, INDIRECT OR
+ * CONSEQUENTIAL DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF USE,
+ * DATA OR PROFITS, WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE OR OTHER
+ * TORTIOUS ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE OR
+ * PERFORMANCE OF THIS SOFTWARE.
+ */
+#include "debug.h"
+#if defined(__alpha__) || defined (__ia64__)
+#include <sys/io.h>
+#endif
+
+#include "v86bios.h"
+#include "AsmMacros.h"
+#include "pci.h"
+
+static int int1A_handler(struct regs86 *regs);
+static int int42_handler(int num, struct regs86 *regs);
+
+int
+int_handler(int num, struct regs86 *regs)
+{
+ switch (num) {
+ case 0x10:
+ case 0x42:
+ return (int42_handler(num,regs));
+ case 0x1A:
+ return (int1A_handler(regs));
+ default:
+ return 0;
+ }
+ return 0;
+}
+
+static int
+int42_handler(int num,struct regs86 *regs)
+{
+ unsigned char c;
+ CARD32 val;
+
+ i_printf("int 0x%x: ax:0x%lx bx:0x%lx cx:0x%lx dx:0x%lx\n",num,
+ regs->eax,regs->ebx, regs->ecx, regs->edx);
+
+ /*
+ * video bios has modified these -
+ * leave it to the video bios to do this
+ */
+
+ val = getIntVect(num);
+ if (val != 0xF000F065)
+ return 0;
+
+ if ((regs->ebx & 0xff) == 0x32) {
+ switch (regs->eax & 0xFFFF) {
+ case 0x1200:
+ i_printf("enabling video\n");
+ c = inb(0x3cc);
+ c |= 0x02;
+ outb(0x3c2,c);
+ return 1;
+ case 0x1201:
+ i_printf("disabling video\n");
+ c = inb(0x3cc);
+ c &= ~0x02;
+ outb(0x3c2,c);
+ return 1;
+ default:
+ }
+ }
+ if (num == 0x42)
+ return 1;
+ else
+ return 0;
+}
+
+#define SUCCESSFUL 0x00
+#define DEVICE_NOT_FOUND 0x86
+#define BAD_REGISTER_NUMBER 0x87
+
+static int
+int1A_handler(struct regs86 *regs)
+{
+ CARD32 Slot;
+ PciStructPtr pPci;
+
+ if (! CurrentPci) return 0; /* oops */
+
+ i_printf("int 0x1a: ax=0x%lx bx=0x%lx cx=0x%lx dx=0x%lx di=0x%lx"
+ " si=0x%lx\n", regs->eax,regs->ebx,regs->ecx,regs->edx,
+ regs->edi,regs->esi);
+ switch (regs->eax & 0xFFFF) {
+ case 0xb101:
+ regs->eax &= 0xFF00; /* no config space/special cycle support */
+ regs->edx = 0x20494350; /* " ICP" */
+ regs->ebx = 0x0210; /* Version 2.10 */
+ regs->ecx &= 0xFF00;
+ regs->ecx |= (pciMaxBus & 0xFF); /* Max bus number in system */
+ regs->eflags &= ~((unsigned long)0x01); /* clear carry flag */
+ i_printf("ax=0x%lx dx=0x%lx bx=0x%lx cx=0x%lx flags=0x%lx\n",
+ regs->eax,regs->edx,regs->ebx,regs->ecx,regs->eflags);
+ return 1;
+ case 0xb102:
+ if (((regs->edx & 0xFFFF) == CurrentPci->VendorID) &&
+ ((regs->ecx & 0xFFFF) == CurrentPci->DeviceID) &&
+ (regs->esi == 0)) {
+ regs->eax = (regs->eax & 0x00FF) | (SUCCESSFUL << 8);
+ regs->eflags &= ~((unsigned long)0x01); /* clear carry flag */
+ regs->ebx = pciSlotBX(CurrentPci);
+ }
+ else if (Config.ShowAllDev &&
+ (pPci = findPciDevice(regs->edx,regs->ecx,regs->esi)) != NULL) {
+ regs->eax = (regs->eax & 0x00FF) | (SUCCESSFUL << 8);
+ regs->eflags &= ~((unsigned long)0x01); /* clear carry flag */
+ regs->ebx = pciSlotBX(pPci);
+ } else {
+ regs->eax = (regs->eax & 0x00FF) | (DEVICE_NOT_FOUND << 8);
+ regs->eflags |= ((unsigned long)0x01); /* set carry flag */
+ }
+ i_printf("ax=0x%lx bx=0x%lx flags=0x%lx\n",
+ regs->eax,regs->ebx,regs->eflags);
+ return 1;
+ case 0xb103:
+ if (((regs->ecx & 0xFF) == CurrentPci->Interface) &&
+ (((regs->ecx & 0xFF00) >> 8) == CurrentPci->SubClass) &&
+ (((regs->ecx & 0xFFFF0000) >> 16) == CurrentPci->BaseClass) &&
+ ((regs->esi & 0xff) == 0)) {
+ regs->eax = (regs->eax & 0x00FF) | (SUCCESSFUL << 8);
+ regs->ebx = pciSlotBX(CurrentPci);
+ regs->eflags &= ~((unsigned long)0x01); /* clear carry flag */
+ }
+ else if (Config.ShowAllDev
+ && (pPci = findPciClass(regs->ecx & 0xFF, (regs->ecx & 0xff00) >> 8,
+ (regs->ecx & 0xffff0000) >> 16, regs->esi)) != NULL) {
+ regs->eax = (regs->eax & 0x00FF) | (SUCCESSFUL << 8);
+ regs->ebx = pciSlotBX(pPci);
+ regs->eflags &= ~((unsigned long)0x01); /* clear carry flag */
+ } else {
+ regs->eax = (regs->eax & 0x00FF) | (DEVICE_NOT_FOUND << 8);
+ regs->eflags |= ((unsigned long)0x01); /* set carry flag */
+ }
+ i_printf("ax=0x%lx flags=0x%lx\n",regs->eax,regs->eflags);
+ return 1;
+ case 0xb108:
+ i_printf("Slot=0x%x\n",CurrentPci->Slot.l);
+ if ((Slot = findPci(regs->ebx))) {
+ regs->ecx &= 0xFFFFFF00;
+ regs->ecx |= PciRead8(regs->edi,Slot);
+ regs->eax = (regs->eax & 0x00FF) | (SUCCESSFUL << 8);
+ regs->eflags &= ~((unsigned long)0x01); /* clear carry flag */
+ } else {
+ regs->eax = (regs->eax & 0x00FF) | (BAD_REGISTER_NUMBER << 8);
+ regs->eflags |= ((unsigned long)0x01); /* set carry flag */
+ }
+ i_printf("ax=0x%lx cx=0x%lx flags=0x%lx\n",
+ regs->eax,regs->ecx,regs->eflags);
+ return 1;
+ case 0xb109:
+ i_printf("Slot=0x%x\n",CurrentPci->Slot.l);
+ if ((Slot = findPci(regs->ebx))) {
+ regs->ecx &= 0xFFFF0000;
+ regs->ecx |= PciRead16(regs->edi,Slot);
+ regs->eax = (regs->eax & 0x00FF) | (SUCCESSFUL << 8);
+ regs->eflags &= ~((unsigned long)0x01); /* clear carry flag */
+ } else {
+ regs->eax = (regs->eax & 0x00FF) | (BAD_REGISTER_NUMBER << 8);
+ regs->eflags |= ((unsigned long)0x01); /* set carry flag */
+ }
+ i_printf("ax=0x%lx cx=0x%lx flags=0x%lx\n",
+ regs->eax,regs->ecx,regs->eflags);
+ return 1;
+ case 0xb10a:
+ i_printf("Slot=0x%x\n",CurrentPci->Slot.l);
+ if ((Slot = findPci(regs->ebx))) {
+ regs->ecx &= 0;
+ regs->ecx |= PciRead32(regs->edi,Slot);
+ regs->eax = (regs->eax & 0x00FF) | (SUCCESSFUL << 8);
+ regs->eflags &= ~((unsigned long)0x01); /* clear carry flag */
+ } else {
+ regs->eax = (regs->eax & 0x00FF) | (BAD_REGISTER_NUMBER << 8);
+ regs->eflags |= ((unsigned long)0x01); /* set carry flag */
+ }
+ i_printf("ax=0x%lx cx=0x%lx flags=0x%lx\n",
+ regs->eax,regs->ecx,regs->eflags);
+ return 1;
+ case 0xb10b:
+ i_printf("Slot=0x%x\n",CurrentPci->Slot.l);
+ if ((Slot = findPci(regs->ebx))) {
+ PciWrite8(regs->edi,(CARD8)regs->ecx,Slot);
+ regs->eax = (regs->eax & 0x00FF) | (SUCCESSFUL << 8);
+ regs->eflags &= ~((unsigned long)0x01); /* clear carry flag */
+ } else {
+ regs->eax = (regs->eax & 0x00FF) | (BAD_REGISTER_NUMBER << 8);
+ regs->eflags |= ((unsigned long)0x01); /* set carry flag */
+ }
+ i_printf("ax=0x%lx flags=0x%lx\n", regs->eax,regs->eflags);
+ return 1;
+ case 0xb10c:
+ i_printf("Slot=0x%x\n",CurrentPci->Slot.l);
+ if ((Slot = findPci(regs->ebx))) {
+ PciWrite16(regs->edi,(CARD16)regs->ecx,Slot);
+ regs->eax = (regs->eax & 0x00FF) | (SUCCESSFUL << 8);
+ regs->eflags &= ~((unsigned long)0x01); /* clear carry flag */
+ } else {
+ regs->eax = (regs->eax & 0x00FF) | (BAD_REGISTER_NUMBER << 8);
+ regs->eflags |= ((unsigned long)0x01); /* set carry flag */
+ }
+ i_printf("ax=0x%lx flags=0x%lx\n", regs->eax,regs->eflags);
+ return 1;
+ case 0xb10d:
+ i_printf("Slot=0x%x\n",CurrentPci->Slot.l);
+ if ((Slot = findPci(regs->ebx))) {
+ PciWrite32(regs->edi,(CARD32)regs->ecx,Slot);
+ regs->eax = (regs->eax & 0x00FF) | (SUCCESSFUL << 8);
+ regs->eflags &= ~((unsigned long)0x01); /* clear carry flag */
+ } else {
+ regs->eax = (regs->eax & 0x00FF) | (BAD_REGISTER_NUMBER << 8);
+ regs->eflags |= ((unsigned long)0x01); /* set carry flag */
+ }
+ i_printf("ax=0x%lx flags=0x%lx\n", regs->eax,regs->eflags);
+ return 1;
+ default:
+ return 0;
+ }
+}
diff --git a/board/MAI/bios_emulator/scitech/src/v86bios/io.c b/board/MAI/bios_emulator/scitech/src/v86bios/io.c
new file mode 100644
index 00000000000..129e24f383f
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/v86bios/io.c
@@ -0,0 +1,257 @@
+/*
+ * Copyright 1999 Egbert Eich
+ *
+ * Permission to use, copy, modify, distribute, and sell this software and its
+ * documentation for any purpose is hereby granted without fee, provided that
+ * the above copyright notice appear in all copies and that both that
+ * copyright notice and this permission notice appear in supporting
+ * documentation, and that the name of the authors not be used in
+ * advertising or publicity pertaining to distribution of the software without
+ * specific, written prior permission. The authors makes no representations
+ * about the suitability of this software for any purpose. It is provided
+ * "as is" without express or implied warranty.
+ *
+ * THE AUTHORS DISCLAIMS ALL WARRANTIES WITH REGARD TO THIS SOFTWARE,
+ * INCLUDING ALL IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS, IN NO
+ * EVENT SHALL THE AUTHORS BE LIABLE FOR ANY SPECIAL, INDIRECT OR
+ * CONSEQUENTIAL DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF USE,
+ * DATA OR PROFITS, WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE OR OTHER
+ * TORTIOUS ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE OR
+ * PERFORMANCE OF THIS SOFTWARE.
+ */
+#include "debug.h"
+
+#include <stdio.h>
+#if defined(__alpha__) || defined (__ia64__)
+#include <sys/io.h>
+#endif
+#include "AsmMacros.h"
+#include "v86bios.h"
+#include "pci.h"
+
+int r_inb = 0, r_inw = 0, r_inl = 0, r_outb = 0, r_outw = 0, r_outl = 0;
+int in_b = 0, in_w = 0, in_l = 0, out_b = 0, out_w = 0, out_l = 0;
+
+
+int
+port_rep_inb(CARD16 port, CARD8 *base, int d_f, CARD32 count)
+{
+ register int inc = d_f ? -1 : 1;
+ CARD8 *dst = base;
+
+ p_printf(" rep_insb(%#x) %d bytes at %p %s",
+ port, count, base, d_f?"up":"down");
+ if (Config.PrintIp)
+ p_printf(" %x\n",getIP());
+ else p_printf("\n");
+
+ r_inb++;
+ while (count--) {
+ *dst = inb(port);
+ dst += inc;
+ }
+ return (dst-base);
+}
+
+int
+port_rep_inw(CARD16 port, CARD16 *base, int d_f, CARD32 count)
+{
+ register int inc = d_f ? -1 : 1;
+ CARD16 *dst = base;
+
+ p_printf(" rep_insw(%#x) %d bytes at %p %s",
+ port, count, base, d_f?"up":"down");
+ if (Config.PrintIp)
+ p_printf(" %x\n",getIP());
+ else p_printf("\n");
+
+ r_inw++;
+ while (count--) {
+ *dst = inw(port);
+ dst += inc;
+ }
+ return (dst-base);
+}
+
+int
+port_rep_inl(CARD16 port, CARD32 *base, int d_f, CARD32 count)
+{
+ register int inc = d_f ? -1 : 1;
+ CARD32 *dst = base;
+
+ p_printf(" rep_insl(%#x) %d bytes at %p %s",
+ port, count, base, d_f?"up":"down");
+ if (Config.PrintIp)
+ p_printf(" %x\n",getIP());
+ else p_printf("\n");
+
+ r_inl++;
+ while (count--) {
+ *dst = inl(port);
+ dst += inc;
+ }
+ return (dst-base);
+}
+
+int
+port_rep_outb(CARD16 port, CARD8 *base, int d_f, CARD32 count)
+{
+ register int inc = d_f ? -1 : 1;
+ CARD8 *dst = base;
+
+ p_printf(" rep_outb(%#x) %d bytes at %p %s",
+ port, count, base, d_f?"up":"down");
+ if (Config.PrintIp)
+ p_printf(" %x\n",getIP());
+ else p_printf("\n");
+
+ r_outb++;
+ while (count--) {
+ outb(port,*dst);
+ dst += inc;
+ }
+ return (dst-base);
+}
+
+int
+port_rep_outw(CARD16 port, CARD16 *base, int d_f, CARD32 count)
+{
+ register int inc = d_f ? -1 : 1;
+ CARD16 *dst = base;
+
+ p_printf(" rep_outw(%#x) %d bytes at %p %s",
+ port, count, base, d_f?"up":"down");
+ if (Config.PrintIp)
+ p_printf(" %x\n",getIP());
+ else p_printf("\n");
+
+ r_outw++;
+ while (count--) {
+ outw(port,*dst);
+ dst += inc;
+ }
+ return (dst-base);
+}
+
+int
+port_rep_outl(CARD16 port, CARD32 *base, int d_f, CARD32 count)
+{
+ register int inc = d_f ? -1 : 1;
+ CARD32 *dst = base;
+
+ p_printf(" rep_outl(%#x) %d bytes at %p %s",
+ port, count, base, d_f?"up":"down");
+ if (Config.PrintIp)
+ p_printf(" %x\n",getIP());
+ else p_printf("\n");
+
+ r_outl++;
+ while (count--) {
+ outl(port,*dst);
+ dst += inc;
+ }
+ return (dst-base);
+}
+
+CARD8
+p_inb(CARD16 port)
+{
+ CARD8 val = 0;
+ in_b++;
+ val = inb(port);
+ p_printf(" inb(%#x) = %2.2x",port,val);
+ if (Config.PrintIp)
+ p_printf(" %x\n",getIP());
+ else p_printf("\n");
+
+ return val;
+}
+
+CARD16
+p_inw(CARD16 port)
+{
+ CARD16 val = 0;
+ in_w++;
+ val = inw(port);
+ p_printf(" inw(%#x) = %4.4x",port,val);
+ if (Config.PrintIp)
+ p_printf(" %x\n",getIP());
+ else p_printf("\n");
+
+ return val;
+}
+
+CARD32
+p_inl(CARD16 port)
+{
+ CARD32 val = 0;
+ in_l++;
+#ifdef NEED_PCI_IO
+ if (cfg1in(port,&val))
+ return val;
+ else
+#endif
+ val = inl(port);
+ p_printf(" inl(%#x) = %8.8x",port,val);
+ if (Config.PrintIp)
+ p_printf(" %x\n",getIP());
+ else p_printf("\n");
+
+ return val;
+}
+
+void
+p_outb(CARD16 port, CARD8 val)
+{
+ out_b++;
+ p_printf(" outb(%#x, %2.2x)",port,val);
+ if (Config.PrintIp)
+ p_printf(" %x\n",getIP());
+ else p_printf("\n");
+
+ outb(port,val);
+}
+
+void
+p_outw(CARD16 port, CARD16 val)
+{
+ out_w++;
+ p_printf(" outw(%#x, %4.4x)",port,val);
+ if (Config.PrintIp)
+ p_printf(" %x\n",getIP());
+ else p_printf("\n");
+
+ outw(port,val);
+}
+
+void
+p_outl(CARD16 port, CARD32 val)
+{
+ out_l++;
+ p_printf(" outl(%#x, %8.8x)",port,val);
+ if (Config.PrintIp)
+ p_printf(" %x\n",getIP());
+ else p_printf("\n");
+
+#ifdef NEED_PCI_IO
+ if (cfg1out(port,val))
+ return;
+#endif
+ outl(port,val);
+}
+
+void
+io_statistics(void)
+{
+ p_printf("rep: inb: %i, inw: %i, inl: %i, outb: %i, outw: %i, outl: %i\n",
+ r_inb,r_inw,r_inl,r_outb,r_outw,r_outl);
+ p_printf("inb: %i, inw: %i, inl: %i, outb: %i, outw: %i, outl: %i\n",
+ in_b,in_w,in_l,out_b,out_w,out_l);
+}
+
+void
+clear_stat(void)
+{
+ r_inb = r_inw = r_inl = r_outb = r_outw = r_outl = 0;
+ in_b = in_w = in_l = out_b = out_w = out_l = 0;
+}
diff --git a/board/MAI/bios_emulator/scitech/src/v86bios/lex.l b/board/MAI/bios_emulator/scitech/src/v86bios/lex.l
new file mode 100644
index 00000000000..3a3391c7b41
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/v86bios/lex.l
@@ -0,0 +1,79 @@
+%{
+#include "parser.h"
+
+#include <string.h>
+#include <stdio.h>
+
+ void getline(char *buf,int *num,int max_num);
+
+#define YY_INPUT(buf,result,max_size) {\
+ getline(buf,&result,max_size);\
+ }
+
+ void
+ yyerror (char *s)
+ {
+ printf ("%s\n", s);
+ }
+
+%}
+
+DIGIT [0-9a-fA-F]
+
+%%
+
+"0x"?{DIGIT}+ { yylval = strtol(yytext,NULL,0); return TOK_NUM; }
+"ax" { return TOK_REG_AX; }
+"bx" { return TOK_REG_BX; }
+"cx" { return TOK_REG_CX; }
+"dx" { return TOK_REG_DX; }
+"di" { return TOK_REG_SI; }
+"si" { return TOK_REG_DI; }
+"ds" { return TOK_SEG_DS; }
+"es" { return TOK_SEG_ES; }
+":" { return TOK_SEP;}
+"$"{DIGIT}{1,2} { yylval = strtol(yytext+1,NULL,0); return TOK_VAR; }
+"$mem" { return TOK_VAR_MEM; }
+[ \t]+
+"#".*[\n] { return TOK_END; }
+"boot" { return TOK_COMMAND_BOOT; }
+"do" { return TOK_COMMAND_EXEC; }
+"\"".*"\"" { yylval = (unsigned long) yytext; return TOK_STRING; }
+"byte" { return TOK_BYTE; }
+"word" { return TOK_WORD; }
+"long" { return TOK_LONG; }
+"setmem" { return TOK_COMMAND_MEMSET; }
+"dumpmem" { return TOK_COMMAND_MEMDUMP; }
+"quit" { return TOK_COMMAND_QUIT; }
+"\n" { return TOK_END; }
+"select" { return TOK_SELECT; }
+"isa" { return TOK_ISA; }
+"pci" { return TOK_PCI; }
+"pport" { return TOK_PRINT_PORT; }
+"iostat" { return TOK_IOSTAT; }
+"pirq" { return TOK_PRINT_IRQ; }
+"ppci" { return TOK_PPCI; }
+"pip" { return TOK_PIP; }
+"trace" { return TOK_TRACE; }
+"on" { return TOK_ON; }
+"off" { return TOK_OFF; }
+"verbose" { return TOK_VERBOSE; }
+"log" { return TOK_LOG; }
+"print" { return TOK_STDOUT; }
+"clstat" { return TOK_CLSTAT; }
+"hlt" { return TOK_HLT; }
+"del" { return TOK_DEL; }
+"ioperm" { return TOK_IOPERM; }
+"lpci" { return TOK_DUMP_PCI; }
+"bootbios" { return TOK_BOOT_BIOS; }
+"?" { return '?'; }
+. { return TOK_ERROR; }
+
+%%
+
+
+
+
+
+
+
diff --git a/board/MAI/bios_emulator/scitech/src/v86bios/main.c b/board/MAI/bios_emulator/scitech/src/v86bios/main.c
new file mode 100644
index 00000000000..b73d05776e2
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/v86bios/main.c
@@ -0,0 +1,616 @@
+/*
+ * Copyright 1999 Egbert Eich
+ *
+ * Permission to use, copy, modify, distribute, and sell this software and its
+ * documentation for any purpose is hereby granted without fee, provided that
+ * the above copyright notice appear in all copies and that both that
+ * copyright notice and this permission notice appear in supporting
+ * documentation, and that the name of the authors not be used in
+ * advertising or publicity pertaining to distribution of the software without
+ * specific, written prior permission. The authors makes no representations
+ * about the suitability of this software for any purpose. It is provided
+ * "as is" without express or implied warranty.
+ *
+ * THE AUTHORS DISCLAIMS ALL WARRANTIES WITH REGARD TO THIS SOFTWARE,
+ * INCLUDING ALL IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS, IN NO
+ * EVENT SHALL THE AUTHORS BE LIABLE FOR ANY SPECIAL, INDIRECT OR
+ * CONSEQUENTIAL DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF USE,
+ * DATA OR PROFITS, WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE OR OTHER
+ * TORTIOUS ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE OR
+ * PERFORMANCE OF THIS SOFTWARE.
+ */
+#define DELETE
+#include <unistd.h>
+#include <fcntl.h>
+#include <stdio.h>
+#include <sys/mman.h>
+#include <sys/types.h>
+#include <string.h>
+#include <stdlib.h>
+#include <signal.h>
+#include <sys/stat.h>
+#if defined(__alpha__) || defined (__ia64__)
+#include <sys/io.h>
+#elif defined(HAVE_SYS_PERM)
+#include <sys/perm.h>
+#endif
+#include "debug.h"
+#include "v86bios.h"
+#include "pci.h"
+#include "AsmMacros.h"
+
+#define SIZE 0x100000
+#define VRAM_START 0xA0000
+#define VRAM_SIZE 0x1FFFF
+#define V_BIOS_SIZE 0x1FFFF
+#define BIOS_START 0x7C00 /* default BIOS entry */
+
+//CARD8 code[] = { 0xb8 , 0xf0 , 0xf0, 0xf4 };
+#define VB_X(x) (V_BIOS >> x) & 0xFF
+CARD8 code[] = { 0x9a, 0x03, 0x00, 0x00, VB_X(12), 0xf4 };
+//CARD8 code[] = { 0x9a, 0x03, 0x00, 0x00, VB_X(12), 0xb8, 0x03, 0x00,
+//0xcd, 0x10, 0xf4 };
+//CARD8 code[] = { 0xb8 , 0xf0 , 0xf0 ,0xf4 };
+
+static void sig_handler(int);
+static int map(void);
+static void unmap(void);
+static void bootBIOS(CARD16 ax);
+static int map_vram(void);
+static void unmap_vram(void);
+static int copy_vbios(void);
+static int copy_sys_bios(void);
+static void save_bios_to_file(void);
+static int setup_system_bios(void);
+static void setup_int_vect(void);
+static int chksum(CARD8 *start);
+static void setup_bios_regs(i86biosRegsPtr regs, CARD32 ax);
+
+void loadCodeToMem(unsigned char *ptr, CARD8 *code);
+void dprint(unsigned long start, unsigned long size);
+
+static int vram_mapped = 0;
+static CARD8 save_msr;
+static CARD8 save_pos102;
+static CARD8 save_vse;
+static CARD8 save_46e8;
+console Console;
+struct config Config;
+
+
+int
+main(void)
+{
+ int Active_is_Pci = 0;
+#ifdef DELETE
+ Config.PrintPort = PRINT_PORT;
+ Config.IoStatistics = IO_STATISTICS;
+ Config.PrintIrq = PRINT_IRQ;
+ Config.PrintPci = PRINT_PCI;
+ Config.ShowAllDev = SHOW_ALL_DEV;
+ Config.PrintIp = PRINT_IP;
+ Config.SaveBios = SAVE_BIOS;
+ Config.Trace = TRACE;
+ Config.ConfigActiveOnly = CONFIG_ACTIVE_ONLY;
+ Config.ConfigActiveDevice = CONFIG_ACTIVE_DEVICE;
+ Config.MapSysBios = MAP_SYS_BIOS;
+ Config.Resort = RESORT;
+ Config.FixRom = FIX_ROM;
+ Config.NoConsole = NO_CONSOLE;
+ Config.Verbose = VERBOSE;
+
+ if (!map())
+ exit(1);
+
+ if (!setup_system_bios())
+ exit(1);
+
+ iopl(3);
+ setup_io();
+
+ scan_pci();
+ if (!CurrentPci && !Config.ConfigActiveDevice && !Config.ConfigActiveOnly)
+ exit (1);
+#endif
+ Console = open_console();
+
+ if (Config.ConfigActiveOnly) {
+ CARD16 ax;
+ int activePci = 0;
+ int error = 0;
+
+ while (CurrentPci) {
+ if (CurrentPci->active) {
+ activePci = 1;
+ if (!(mapPciRom(NULL) && chksum((CARD8*)V_BIOS)))
+ error = 1;
+ break;
+ }
+ CurrentPci = CurrentPci->next;
+ }
+ ax = ((CARD16)(CurrentPci->bus) << 8)
+ | (CurrentPci->dev << 3) | (CurrentPci->func & 0x7);
+ P_printf("ax: 0x%x\n",ax);
+ setup_int_vect();
+ if (!error && (activePci || copy_vbios())) {
+
+ if (Config.SaveBios) save_bios_to_file();
+ if (map_vram()) {
+ printf("initializing ISA\n");
+ bootBIOS(0);
+ }
+ }
+ unmap_vram();
+ sleep(1);
+ } else {
+ /* disable primary card */
+ save_msr = inb(0x3CC);
+ save_vse = inb(0x3C3);
+ save_46e8 = inb(0x46e8);
+ save_pos102 = inb(0x102);
+
+ signal(2,sig_handler);
+ signal(11,sig_handler);
+
+ outb(0x3C2,~(CARD8)0x03 & save_msr);
+ outb(0x3C3,~(CARD8)0x01 & save_vse);
+ outb(0x46e8, ~(CARD8)0x08 & save_46e8);
+ outb(0x102, ~(CARD8)0x01 & save_pos102);
+
+ pciVideoDisable();
+
+ while (CurrentPci) {
+ CARD16 ax;
+
+ if (CurrentPci->active) {
+ Active_is_Pci = 1;
+ if (!Config.ConfigActiveDevice) {
+ CurrentPci = CurrentPci->next;
+ continue;
+ }
+ }
+
+ EnableCurrent();
+
+ if (CurrentPci->active) {
+ outb(0x102, save_pos102);
+ outb(0x46e8, save_46e8);
+ outb(0x3C3, save_vse);
+ outb(0x3C2, save_msr);
+ }
+
+ /* clear interrupt vectors */
+ setup_int_vect();
+
+ ax = ((CARD16)(CurrentPci->bus) << 8)
+ | (CurrentPci->dev << 3) | (CurrentPci->func & 0x7);
+ P_printf("ax: 0x%x\n",ax);
+
+ if (!((mapPciRom(NULL) && chksum((CARD8*)V_BIOS))
+ || (CurrentPci->active && copy_vbios()))) {
+ CurrentPci = CurrentPci->next;
+ continue;
+ }
+ if (!map_vram()) {
+ CurrentPci = CurrentPci->next;
+ continue;
+ }
+ if (Config.SaveBios) save_bios_to_file();
+ printf("initializing PCI bus: %i dev: %i func: %i\n",CurrentPci->bus,
+ CurrentPci->dev,CurrentPci->func);
+ bootBIOS(ax);
+ unmap_vram();
+
+ CurrentPci = CurrentPci->next;
+ }
+
+ /* We have an ISA device - configure if requested */
+ if (!Active_is_Pci && Config.ConfigActiveDevice) {
+ pciVideoDisable();
+
+ outb(0x102, save_pos102);
+ outb(0x46e8, save_46e8);
+ outb(0x3C3, save_vse);
+ outb(0x3C2, save_msr);
+
+ setup_int_vect();
+ if (copy_vbios()) {
+
+ if (Config.SaveBios) save_bios_to_file();
+ if (map_vram()) {
+ printf("initializing ISA\n");
+ bootBIOS(0);
+ }
+ }
+
+ unmap_vram();
+ sleep(1);
+ }
+
+ pciVideoRestore();
+
+ outb(0x102, save_pos102);
+ outb(0x46e8, save_46e8);
+ outb(0x3C3, save_vse);
+ outb(0x3C2, save_msr);
+ }
+
+ close_console(Console);
+#ifdef DELETE
+ iopl(0);
+ unmap();
+
+ printf("done !\n");
+#endif
+ if (Config.IoStatistics)
+ io_statistics();
+#ifdef DELETE
+ exit(0);
+#endif
+}
+
+int
+map(void)
+{
+ void* mem;
+
+ mem = mmap(0, (size_t)SIZE,
+ PROT_EXEC | PROT_READ | PROT_WRITE,
+ MAP_FIXED | MAP_PRIVATE | MAP_ANON,
+ -1, 0 );
+ if (mem != 0) {
+ perror("anonymous map");
+ return (0);
+ }
+ memset(mem,0,SIZE);
+
+ loadCodeToMem((unsigned char *) BIOS_START, code);
+ return (1);
+}
+
+static void
+unmap(void)
+{
+ munmap(0,SIZE);
+}
+
+static void
+bootBIOS(CARD16 ax)
+{
+ i86biosRegs bRegs;
+#ifdef V86BIOS_DEBUG
+ printf("starting BIOS\n");
+#endif
+ setup_bios_regs(&bRegs, ax);
+ do_x86(BIOS_START,&bRegs);
+#ifdef V86BIOS_DEBUG
+ printf("done\n");
+#endif
+}
+
+static int
+map_vram(void)
+{
+ int mem_fd;
+
+#ifdef __ia64__
+ if ((mem_fd = open(MEM_FILE,O_RDWR | O_SYNC))<0)
+#else
+ if ((mem_fd = open(MEM_FILE,O_RDWR))<0)
+#endif
+ {
+ perror("opening memory");
+ return 0;
+ }
+
+#ifndef __alpha__
+ if (mmap((void *) VRAM_START, (size_t) VRAM_SIZE,
+ PROT_EXEC | PROT_READ | PROT_WRITE, MAP_SHARED | MAP_FIXED,
+ mem_fd, VRAM_START) == (void *) -1)
+#else
+ if (!_bus_base()) sparse_shift = 7; /* Uh, oh, JENSEN... */
+ if (!_bus_base_sparse()) sparse_shift = 0;
+ if ((vram_map = mmap(0,(size_t) (VRAM_SIZE << sparse_shift),
+ PROT_READ | PROT_WRITE,
+ MAP_SHARED,
+ mem_fd, (VRAM_START << sparse_shift)
+ | _bus_base_sparse())) == (void *) -1)
+#endif
+ {
+ perror("mmap error in map_hardware_ram");
+ close(mem_fd);
+ return (0);
+ }
+ vram_mapped = 1;
+ close(mem_fd);
+ return (1);
+}
+
+static void
+unmap_vram(void)
+{
+ if (!vram_mapped) return;
+
+ munmap((void*)VRAM_START,VRAM_SIZE);
+ vram_mapped = 0;
+}
+
+static int
+copy_vbios(void)
+{
+ int mem_fd;
+ unsigned char *tmp;
+ int size;
+
+ if ((mem_fd = open(MEM_FILE,O_RDONLY))<0) {
+ perror("opening memory");
+ return (0);
+ }
+
+ if (lseek(mem_fd,(off_t) V_BIOS, SEEK_SET) != (off_t) V_BIOS) {
+ fprintf(stderr,"Cannot lseek\n");
+ goto Error;
+ }
+ tmp = (unsigned char *)malloc(3);
+ if (read(mem_fd, (char *)tmp, (size_t) 3) != (size_t) 3) {
+ fprintf(stderr,"Cannot read\n");
+ goto Error;
+ }
+ if (lseek(mem_fd,(off_t) V_BIOS,SEEK_SET) != (off_t) V_BIOS)
+ goto Error;
+
+ if (*tmp != 0x55 || *(tmp+1) != 0xAA ) {
+#ifdef DEBUG
+ dprint((unsigned long)tmp,0x100);
+#endif
+ fprintf(stderr,"No bios found at: 0x%x\n",V_BIOS);
+ goto Error;
+ }
+ size = *(tmp+2) * 512;
+
+ if (read(mem_fd, (char *)V_BIOS, (size_t) size) != (size_t) size) {
+ fprintf(stderr,"Cannot read\n");
+ goto Error;
+ }
+ free(tmp);
+ close(mem_fd);
+ if (!chksum((CARD8)V_BIOS))
+ return (0);
+
+ return (1);
+
+Error:
+ perror("v_bios");
+ close(mem_fd);
+ return (0);
+}
+
+static int
+copy_sys_bios(void)
+{
+#define SYS_BIOS 0xF0000
+ int mem_fd;
+
+ if ((mem_fd = open(MEM_FILE,O_RDONLY))<0) {
+ perror("opening memory");
+ return (0);
+ }
+
+ if (lseek(mem_fd,(off_t) SYS_BIOS,SEEK_SET) != (off_t) SYS_BIOS)
+ goto Error;
+ if (read(mem_fd, (char *)SYS_BIOS, (size_t) 0xFFFF) != (size_t) 0xFFFF)
+ goto Error;
+
+ close(mem_fd);
+ return (1);
+
+Error:
+ perror("sys_bios");
+ close(mem_fd);
+ return (0);
+}
+
+void
+loadCodeToMem(unsigned char *ptr, CARD8 code[])
+{
+ int i;
+ CARD8 val;
+
+ for ( i=0;;i++) {
+ val = code[i];
+ *ptr++ = val;
+ if (val == 0xf4) break;
+ }
+ return;
+}
+
+void
+dprint(unsigned long start, unsigned long size)
+{
+ int i,j;
+ char *c = (char *)start;
+
+ for (j = 0; j < (size >> 4); j++) {
+ char *d = c;
+ printf("\n0x%lx: ",(unsigned long)c);
+ for (i = 0; i<16; i++)
+ printf("%2.2x ",(unsigned char) (*(c++)));
+ c = d;
+ for (i = 0; i<16; i++) {
+ printf("%c",((((CARD8)(*c)) > 32) && (((CARD8)(*c)) < 128)) ?
+ (unsigned char) (*(c)): '.');
+ c++;
+ }
+ }
+ printf("\n");
+}
+
+static void
+save_bios_to_file(void)
+{
+ static int num = 0;
+ int size, count;
+ char file_name[256];
+ int fd;
+
+ sprintf(file_name,"bios_%i.fil",num);
+ if ((fd = open(file_name,O_WRONLY | O_CREAT | O_TRUNC,00644)) == -1)
+ return;
+ size = (*(unsigned char*)(V_BIOS + 2)) * 512;
+#ifdef V86BIOS_DEBUG
+ dprint(V_BIOS,20);
+#endif
+ if ((count = write(fd,(void *)(V_BIOS),size)) != size)
+ fprintf(stderr,"only saved %i of %i bytes\n",size,count);
+ num++;
+}
+
+static void
+sig_handler(int unused)
+{
+ fflush(stdout);
+ fflush(stderr);
+
+ /* put system back in a save state */
+ unmap_vram();
+ pciVideoRestore();
+ outb(0x102, save_pos102);
+ outb(0x46e8, save_46e8);
+ outb(0x3C3, save_vse);
+ outb(0x3C2, save_msr);
+
+ close_console(Console);
+ iopl(0);
+ unmap();
+
+ exit(1);
+}
+
+/*
+ * For initialization we just pass ax to the BIOS.
+ * PCI BIOSes need this. All other register are set 0.
+ */
+static void setup_bios_regs(i86biosRegsPtr regs, CARD32 ax)
+{
+ regs->ax = ax;
+ regs->bx = 0;
+ regs->cx = 0;
+ regs->dx = 0;
+ regs->es = 0;
+ regs->di = 0;
+}
+
+/*
+ * here we are really paranoid about faking a "real"
+ * BIOS. Most of this information was pulled from
+ * dosem.
+ */
+static void
+setup_int_vect(void)
+{
+ const CARD16 cs = 0x0000;
+ const CARD16 ip = 0x0;
+ int i;
+
+ /* let the int vects point to the SYS_BIOS seg */
+ for (i=0; i<0x80; i++) {
+ ((CARD16*)0)[i<<1] = ip;
+ ((CARD16*)0)[(i<<1)+1] = cs;
+ }
+ /* video interrupts default location */
+ ((CARD16*)0)[(0x42<<1)+1] = 0xf000;
+ ((CARD16*)0)[0x42<<1] = 0xf065;
+ ((CARD16*)0)[(0x10<<1)+1] = 0xf000;
+ ((CARD16*)0)[0x10<<1] = 0xf065;
+ /* video param table default location (int 1d) */
+ ((CARD16*)0)[(0x1d<<1)+1] = 0xf000;
+ ((CARD16*)0)[0x1d<<1] = 0xf0A4;
+ /* font tables default location (int 1F) */
+ ((CARD16*)0)[(0x1f<<1)+1] = 0xf000;
+ ((CARD16*)0)[0x1f<<1] = 0xfa6e;
+
+ /* int 11 default location */
+ ((CARD16*)0)[(0x11<1)+1] = 0xf000;
+ ((CARD16*)0)[0x11<<1] = 0xf84d;
+ /* int 12 default location */
+ ((CARD16*)0)[(0x12<<1)+1] = 0xf000;
+ ((CARD16*)0)[0x12<<1] = 0xf841;
+ /* int 15 default location */
+ ((CARD16*)0)[(0x15<<1)+1] = 0xf000;
+ ((CARD16*)0)[0x15<<1] = 0xf859;
+ /* int 1A default location */
+ ((CARD16*)0)[(0x1a<<1)+1] = 0xf000;
+ ((CARD16*)0)[0x1a<<1] = 0xff6e;
+ /* int 05 default location */
+ ((CARD16*)0)[(0x05<<1)+1] = 0xf000;
+ ((CARD16*)0)[0x05<<1] = 0xff54;
+ /* int 08 default location */
+ ((CARD16*)0)[(0x8<<1)+1] = 0xf000;
+ ((CARD16*)0)[0x8<<1] = 0xfea5;
+ /* int 13 default location (fdd) */
+ ((CARD16*)0)[(0x13<<1)+1] = 0xf000;
+ ((CARD16*)0)[0x13<<1] = 0xec59;
+ /* int 0E default location */
+ ((CARD16*)0)[(0xe<<1)+1] = 0xf000;
+ ((CARD16*)0)[0xe<<1] = 0xef57;
+ /* int 17 default location */
+ ((CARD16*)0)[(0x17<<1)+1] = 0xf000;
+ ((CARD16*)0)[0x17<<1] = 0xefd2;
+ /* fdd table default location (int 1e) */
+ ((CARD16*)0)[(0x1e<<1)+1] = 0xf000;
+ ((CARD16*)0)[0x1e<<1] = 0xefc7;
+}
+
+static int
+setup_system_bios(void)
+{
+ char *date = "06/01/99";
+ char *eisa_ident = "PCI/ISA";
+
+#if MAP_SYS_BIOS
+ if (!copy_sys_bios()) return 0;
+ return 1;
+#endif
+// memset((void *)0xF0000,0xf4,0xfff7);
+
+ /*
+ * we trap the "industry standard entry points" to the BIOS
+ * and all other locations by filling them with "hlt"
+ * TODO: implement hlt-handler for these
+ */
+ memset((void *)0xF0000,0xf4,0x10000);
+
+ /*
+ * TODO: we should copy the fdd table (0xfec59-0xfec5b)
+ * the video parameter table (0xf0ac-0xf0fb)
+ * and the font tables (0xfa6e-0xfe6d)
+ * from the original bios here
+ */
+
+ /* set bios date */
+ strcpy((char *)0xFFFF5,date);
+ /* set up eisa ident string */
+ strcpy((char *)0xFFFD9,eisa_ident);
+ /* write system model id for IBM-AT */
+ ((char *)0)[0xFFFFE] = 0xfc;
+
+ return 1;
+}
+
+static int
+chksum(CARD8 *start)
+{
+ CARD16 size;
+ CARD8 val = 0;
+ int i;
+
+ size = *(start+2) * 512;
+ for (i = 0; i<size; i++)
+ val += *(start + i);
+
+ if (!val)
+ return 1;
+
+ fprintf(stderr,"BIOS cksum wrong!\n");
+ return 0;
+}
diff --git a/board/MAI/bios_emulator/scitech/src/v86bios/makefile.linux b/board/MAI/bios_emulator/scitech/src/v86bios/makefile.linux
new file mode 100644
index 00000000000..5dfe3069917
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/v86bios/makefile.linux
@@ -0,0 +1,59 @@
+CFLAGS=-g -I/usr/include -I../../include/ -O0 -Wall
+CC=gcc
+
+.y.c:
+ bison -d -o $@ $<
+.l.c:
+ flex -o$@ $<
+
+SRCS = main.c io.c x86emu.c int.c pci.c
+OBJS = main.o io.o x86emu.o int.o pci.o
+
+all : vbios.vm86 v86bios.vm86 cbios.vm86 cbios.x86emu vbios.x86emu v86bios.x86emu
+#all : cbios.x86emu vbios.x86emu v86bios.x86emu
+
+parser.c : parser.y
+lex.c : lex.l
+cbios.o : cbios.c v86bios.h debug.h
+main.o : main.c v86bios.h pci.h debug.h
+io.o : v86bios.h AsmMacros.h debug.h
+mem.o : mem.c debug.h v86bios.h
+int.o : int.c v86bios.h debug.h
+pci.o : pci.c pci.h debug.h
+console.o : console.c v86bios.h debug.h
+v86.o : v86.c debug.h
+parser.o : parser.c
+lex.o : lex.c
+v86bios.o: v86bios.c v86bios.h pci.h debug.h
+logging.o: logging.c v86bios.h
+x86emu.o : x86emu.c v86bios.h debug.h
+ $(CC) -c -DX86EMU $(CFLAGS) $*.c
+
+vbios.x86emu : main.o x86emu.o io.o int.o pci.o console.o mem.o logging.o
+ gcc -Wl,-defsym -Wl,printk=lprintf -o vbios.x86emu main.o \
+ x86emu.o io.o int.o pci.o console.o mem.o logging.o \
+ -L../x86emu -lx86emud -lc
+vbios.vm86 : main.o v86.o io.o int.o pci.o console.o logging.o
+ gcc -o vbios.vm86 main.o v86.o io.o int.o pci.o console.o \
+ logging.o -lc
+cbios.x86emu : cbios.o x86emu.o io.o int.o pci.o console.o mem.o logging.o
+ gcc -Wl,-defsym -Wl,printk=lprintf -o cbios.x86emu cbios.o \
+ x86emu.o io.o int.o pci.o console.o mem.o logging.o \
+ -L../x86emu -lx86emud -lc
+cbios.vm86 : cbios.o v86.o io.o int.o pci.o console.o logging.o
+ gcc -o cbios.vm86 cbios.o v86.o io.o int.o pci.o console.o \
+ logging.o -lc
+v86bios.vm86: command.o parser.o lex.o v86bios.o v86.o io.o int.o pci.o console.o logging.o
+ gcc -o v86bios.vm86 command.o parser.o lex.o v86bios.o v86.o io.o \
+ int.o pci.o console.o logging.o -L/usr/lib/curses -lfl \
+ -lreadline -lc -lncurses /usr/lib/libc.a
+v86bios.x86emu: command.o parser.o lex.o v86bios.o x86emu.o io.o int.o pci.o console.o logging.o
+ gcc -Wl,-defsym -Wl,printk=lprintf -o v86bios.x86emu \
+ command.o parser.o lex.o v86bios.o x86emu.o io.o \
+ int.o pci.o console.o logging.o -L/usr/lib/curses -lfl \
+ -lreadline -lc -lncurses /usr/lib/libc.a -L../x86emu -lx86emud
+
+clean:
+ rm -f *.o vbios.x86emu vbios.vm86 cbios.x86emu cbios.vm86 parser.c \
+ lex.c parser.h v86bios.x86emu v86bios.vm86
+
diff --git a/board/MAI/bios_emulator/scitech/src/v86bios/mem.c b/board/MAI/bios_emulator/scitech/src/v86bios/mem.c
new file mode 100644
index 00000000000..50dc55fdf50
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/v86bios/mem.c
@@ -0,0 +1,126 @@
+/*
+ * Copyright 1999 Egbert Eich
+ *
+ * Permission to use, copy, modify, distribute, and sell this software and its
+ * documentation for any purpose is hereby granted without fee, provided that
+ * the above copyright notice appear in all copies and that both that
+ * copyright notice and this permission notice appear in supporting
+ * documentation, and that the name of the authors not be used in
+ * advertising or publicity pertaining to distribution of the software without
+ * specific, written prior permission. The authors makes no representations
+ * about the suitability of this software for any purpose. It is provided
+ * "as is" without express or implied warranty.
+ *
+ * THE AUTHORS DISCLAIMS ALL WARRANTIES WITH REGARD TO THIS SOFTWARE,
+ * INCLUDING ALL IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS, IN NO
+ * EVENT SHALL THE AUTHORS BE LIABLE FOR ANY SPECIAL, INDIRECT OR
+ * CONSEQUENTIAL DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF USE,
+ * DATA OR PROFITS, WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE OR OTHER
+ * TORTIOUS ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE OR
+ * PERFORMANCE OF THIS SOFTWARE.
+ */
+#include "debug.h"
+#include "v86bios.h"
+#include "x86emu.h"
+
+#ifdef __alpha__
+
+void* vram_map = 0;
+int sparse_shift = 5;
+
+#define mem_barrier() __asm__ __volatile__("mb" : : : "memory")
+
+#define vuip volatile unsigned int *
+
+CARD8
+mem_rb(CARD32 addr)
+{
+ unsigned long result, shift;
+#if 1
+ if (addr >= 0xA0000 && addr <= 0xBFFFF) {
+ addr -= 0xA0000;
+ shift = (addr & 0x3) * 8;
+ result = *(vuip) ((unsigned long)vram_map + (addr << sparse_shift));
+ result >>= shift;
+ return 0xffUL & result;
+ } else
+#endif
+ return rdb(addr);
+}
+
+CARD16
+mem_rw(CARD32 addr)
+{
+ unsigned long result, shift;
+#if 1
+ if (addr >= 0xA0000 && addr <= 0xBFFFF) {
+ addr -= 0xA0000;
+ shift = (addr & 0x2) * 8;
+ result = *(vuip)((unsigned long)vram_map+(addr<<sparse_shift)
+ +(1<<(sparse_shift-2)));
+ result >>= shift;
+ return 0xffffUL & result;
+ } else
+#endif
+ return rdw(addr);
+}
+
+CARD32
+mem_rl(CARD32 addr)
+{
+ unsigned long result;
+#if 1
+ if (addr >= 0xA0000 && addr <= 0xBFFFF) {
+ addr -= 0xA0000;
+ result = *(vuip)((unsigned long)vram_map+(addr<<sparse_shift)+(3<<(sparse_shift-2)));
+ return result;
+ } else
+#endif
+ return rdl(addr);
+}
+
+void
+mem_wb(CARD32 addr, CARD8 val)
+{
+ unsigned int b = val & 0xffU;
+#if 1
+ if (addr >= 0xA0000 && addr <= 0xBFFFF) {
+ addr -= 0xA0000;
+ *(vuip) ((unsigned long)vram_map + (addr << sparse_shift)) = b * 0x01010101;
+ mem_barrier();
+ } else
+#endif
+ wrb(addr,val);
+}
+
+void
+mem_ww(CARD32 addr, CARD16 val)
+{
+ unsigned int w = val & 0xffffU;
+#if 1
+ if (addr >= 0xA0000 && addr <= 0xBFFFF) {
+ addr -= 0xA0000;
+ *(vuip)((unsigned long)vram_map+(addr<<sparse_shift)
+ +(1<<(sparse_shift-2))) = w * 0x00010001;
+ mem_barrier();
+ } else
+#endif
+ wrw(addr,val);
+}
+
+void
+mem_wl(CARD32 addr, CARD32 val)
+{
+#if 1
+ if (addr >= 0xA0000 && addr <= 0xBFFFF) {
+ addr -= 0xA0000;
+ *(vuip)((unsigned long)vram_map+(addr<<sparse_shift)
+ +(3<<(sparse_shift-2))) = val;
+ mem_barrier();
+ } else
+#endif
+ wrl(addr,val);
+}
+#endif
+
+
diff --git a/board/MAI/bios_emulator/scitech/src/v86bios/parser.y b/board/MAI/bios_emulator/scitech/src/v86bios/parser.y
new file mode 100644
index 00000000000..21c4023dcdb
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/v86bios/parser.y
@@ -0,0 +1,498 @@
+%{
+#include <malloc.h>
+#include <string.h>
+#include "v86bios.h"
+#include "pci.h"
+
+#define YYSTYPE unsigned long
+
+#define MAX_VAR 0x20
+
+ CARD32 var[MAX_VAR];
+ CARD32 var_mem;
+
+
+i86biosRegs regs = { 00 };
+
+enum mem_type { BYTE, WORD, LONG, STRING };
+union mem_val {
+ CARD32 integer;
+ char *ptr;
+} rec;
+
+struct mem {
+ enum mem_type type;
+ union mem_val val;
+ struct mem *next;
+};
+
+
+struct device Device = {FALSE,NONE,{0}};
+
+extern void yyerror(char *s);
+extern int yylex( void );
+
+static void boot(void);
+static void dump_mem(CARD32 addr, int len);
+static void exec_int(int num);
+static void *add_to_list(enum mem_type type, union mem_val *rec, void *next);
+static void do_list(struct mem *list, memType addr);
+static char * normalize_string(char *ptr);
+%}
+
+%token TOK_NUM
+%token TOK_REG_AX
+%token TOK_REG_BX
+%token TOK_REG_CX
+%token TOK_REG_DX
+%token TOK_REG_DI
+%token TOK_REG_SI
+%token TOK_SEG_DS
+%token TOK_SEG_ES
+%token TOK_SEP
+%token TOK_VAR
+%token TOK_VAR_MEM
+%token TOK_COMMAND_BOOT
+%token TOK_COMMAND_EXEC
+%token TOK_SELECT
+%token TOK_STRING
+%token TOK_MODIFIER_BYTE
+%token TOK_MODIFIER_WORD
+%token TOK_MODIFIER_LONG
+%token TOK_MODIFIER_MEMSET
+%token TOK_COMMAND_MEMSET
+%token TOK_COMMAND_MEMDUMP
+%token TOK_COMMAND_QUIT
+%token TOK_ERROR
+%token TOK_END
+%token TOK_ISA
+%token TOK_PCI
+%token TOK_BYTE
+%token TOK_WORD
+%token TOK_LONG
+%token TOK_PRINT_PORT
+%token TOK_IOSTAT
+%token TOK_PRINT_IRQ
+%token TOK_PPCI
+%token TOK_PIP
+%token TOK_TRACE
+%token TOK_ON
+%token TOK_OFF
+%token TOK_VERBOSE
+%token TOK_LOG
+%token TOK_LOGOFF
+%token TOK_CLSTAT
+%token TOK_STDOUT
+%token TOK_HLT
+%token TOK_DEL
+%token TOK_IOPERM
+%token TOK_DUMP_PCI
+%token TOK_BOOT_BIOS
+%%
+input: | input line
+line: end | com_reg | com_var | com_select
+ | com_boot | com_memset | com_memdump | com_quit
+ | com_exec | hlp | config | verbose | logging | print | clstat
+ | com_hlt | ioperm | list_pci | boot_bios
+ | error end { printf("unknown command\n"); }
+;
+end: TOK_END
+;
+com_reg: reg_off val end { *(CARD16*)$1 = $2 & 0xffff; }
+ | reg_seg TOK_SEP reg_off val end {
+ *(CARD16*)$1 = ($4 & 0xf0000) >> 4;
+ *(CARD16*)$3 = ($4 & 0x0ffff);
+ }
+ | reg_off '?' end { printf("0x%x\n",*(CARD16*)$1);}
+ | reg_seg TOK_SEP reg_off '?' end
+ { printf("0x%x:0x%x\n",*(CARD16*)$1,
+ *(CARD16*)$3); }
+;
+register_read: reg_seg TOK_SEP reg_off { $$ = (((*(CARD16*)$1) << 4)
+ | ((*(CARD16*)$3) & 0xffff));
+ }
+ | reg_off { $$ = ((*(CARD16*)$1) & 0xffff); }
+;
+reg_off: TOK_REG_AX { $$ = (unsigned long)&(regs.ax); }
+ | TOK_REG_BX { $$ = (unsigned long)&(regs.bx); }
+ | TOK_REG_CX { $$ = (unsigned long)&(regs.cx); }
+ | TOK_REG_DX { $$ = (unsigned long)&(regs.dx); }
+ | TOK_REG_DI { $$ = (unsigned long)&(regs.di); }
+ | TOK_REG_SI { $$ = (unsigned long)&(regs.si); }
+;
+reg_seg: TOK_SEG_DS { $$ = (unsigned long)&(regs.ds); }
+ | TOK_SEG_ES { $$ = (unsigned long)&(regs.es); }
+;
+com_var: TOK_VAR_MEM '?' end { printf("var mem: 0x%x\n",var_mem); }
+ | TOK_VAR '?' end { if ($1 < MAX_VAR)
+ printf("var[%i]: 0x%x\n",(int)$1,var[$1]);
+ else
+ printf("var index %i out of range\n",(int)$1); }
+ | TOK_VAR_MEM val end { var_mem = $2; }
+ | TOK_VAR val end { if ($1 <= MAX_VAR)
+ var[$1] = $2;
+ else
+ printf("var index %i out of range\n",(int)$1); }
+ | TOK_VAR error end { printf("$i val\n"); }
+ | TOK_VAR_MEM error end { printf("$i val\n"); }
+;
+com_boot: TOK_COMMAND_BOOT end { boot(); }
+ TOK_COMMAND_BOOT error end { boot(); }
+;
+com_select: TOK_SELECT TOK_ISA end { Device.booted = FALSE;
+ Device.type = ISA;
+ CurrentPci = NULL; }
+ | TOK_SELECT TOK_PCI val TOK_SEP val TOK_SEP val end
+ { Device.booted = FALSE;
+ Device.type = PCI;
+ Device.loc.pci.bus = $3;
+ Device.loc.pci.dev = $5;
+ Device.loc.pci.func = $7; }
+ | TOK_SELECT '?' end
+ { switch (Device.type) {
+ case ISA:
+ printf("isa\n");
+ break;
+ case PCI:
+ printf("pci: %x:%x:%x\n",Device.loc.pci.bus,
+ Device.loc.pci.dev,
+ Device.loc.pci.func);
+ break;
+ default:
+ printf("no device selected\n");
+ break;
+ }
+ }
+ | TOK_SELECT error end { printf("select ? | isa "
+ "| pci:bus:dev:func\n"); }
+;
+com_quit: TOK_COMMAND_QUIT end { return 0; }
+ | TOK_COMMAND_QUIT error end { logoff(); return 0; }
+;
+com_exec: TOK_COMMAND_EXEC end { exec_int(0x10); }
+ | TOK_COMMAND_EXEC val end { exec_int($2); }
+ | TOK_COMMAND_EXEC error end { exec_int(0x10); }
+;
+com_memdump: TOK_COMMAND_MEMDUMP val val end { dump_mem($2,$3); }
+ | TOK_COMMAND_MEMDUMP error end { printf("memdump start len\n"); }
+
+
+;
+com_memset: TOK_COMMAND_MEMSET val list end { do_list((struct mem*)$3,$2);}
+ | TOK_COMMAND_MEMSET error end { printf("setmem addr [byte val] "
+ "[word val] [long val] "
+ "[\"string\"]\n"); }
+;
+list: { $$ = 0; }
+ | TOK_BYTE val list { rec.integer = $2;
+ $$ = (unsigned long)add_to_list(BYTE,&rec,(void*)$3); }
+ | TOK_WORD val list { rec.integer = $2;
+ $$ = (unsigned long) add_to_list(WORD,&rec,(void*)$3); }
+ | TOK_LONG val list { rec.integer = $2;
+ $$ = (unsigned long) add_to_list(LONG,&rec,(void*)$3); }
+ | TOK_STRING list { rec.ptr = (void*)$1;
+ $$ = (unsigned long) add_to_list(STRING,&rec,(void*)$2); }
+;
+val: TOK_VAR { if ($1 > MAX_VAR) {
+ printf("variable index out of range\n");
+ $$=0;
+ } else
+ $$ = var[$1]; }
+ | TOK_NUM { $$ = $1; }
+ | register_read
+;
+bool: TOK_ON { $$ = 1; }
+ | TOK_OFF { $$ = 0; }
+;
+config: TOK_PRINT_PORT bool end { Config.PrintPort = $2; }
+ | TOK_PRINT_PORT '?' end { printf("print port %s\n",
+ Config.PrintPort?"on":"off"); }
+ | TOK_PRINT_PORT error end { printf("pport on | off | ?\n") }
+ | TOK_PRINT_IRQ bool end { Config.PrintIrq = $2; }
+ | TOK_PRINT_IRQ '?' end { printf("print irq %s\n",
+ Config.PrintIrq?"on":"off"); }
+ | TOK_PRINT_IRQ error end { printf("pirq on | off | ?\n") }
+ | TOK_PPCI bool end { Config.PrintPci = $2; }
+ | TOK_PPCI '?' end { printf("print PCI %s\n",
+ Config.PrintPci?"on":"off"); }
+ | TOK_PPCI error end { printf("ppci on | off | ?\n") }
+ | TOK_PIP bool end { Config.PrintIp = $2; }
+ | TOK_PIP '?' end { printf("printip %s\n",
+ Config.PrintIp?"on":"off"); }
+ | TOK_PIP error end { printf("pip on | off | ?\n") }
+ | TOK_IOSTAT bool end { Config.IoStatistics = $2; }
+ | TOK_IOSTAT '?' end { printf("io statistics %s\n",
+ Config.IoStatistics?"on":"off"); }
+ | TOK_IOSTAT error end { printf("iostat on | off | ?\n") }
+ | TOK_TRACE bool end { Config.Trace = $2; }
+ | TOK_TRACE '?' end { printf("trace %s\n",
+ Config.Trace ?"on":"off"); }
+ | TOK_TRACE error end { printf("trace on | off | ?\n") }
+;
+verbose: TOK_VERBOSE val end { Config.Verbose = $2; }
+ | TOK_VERBOSE '?' end { printf("verbose: %i\n",
+ Config.Verbose); }
+ | TOK_VERBOSE error end { printf("verbose val | ?\n"); }
+;
+logging: TOK_LOG TOK_STRING end { logon(normalize_string((char*)$2)); }
+ | TOK_LOG '?' end { if (logging) printf("logfile: %s\n",
+ logfile);
+ else printf("no logging\n?"); }
+ | TOK_LOG TOK_OFF end { logoff(); }
+ | TOK_LOG error end { printf("log \"<filename>\" | ? |"
+ " off\n"); }
+;
+clstat: TOK_CLSTAT end { clear_stat(); }
+ | TOK_CLSTAT error end { printf("clstat\n"); }
+;
+print: TOK_STDOUT bool end { nostdout = !$2; }
+ | TOK_STDOUT '?' end { printf("print %s\n",nostdout ?
+ "no":"yes"); }
+ | TOK_STDOUT error end { printf("print on | off\n"); }
+;
+com_hlt: TOK_HLT val end { add_hlt($2); }
+ | TOK_HLT TOK_DEL val end { del_hlt($3); }
+ | TOK_HLT TOK_DEL end { del_hlt(21); }
+ | TOK_HLT '?' end { list_hlt(); }
+ | TOK_HLT error end { printf(
+ "hlt val | del [val] | ?\n"); }
+;
+ioperm: TOK_IOPERM val val val end { int i,max;
+ if ($2 >= 0) {
+ max = $2 + $3 - 1;
+ if (max > IOPERM_BITS)
+ max = IOPERM_BITS;
+ for (i = $2;i <= max; i++)
+ ioperm_list[i]
+ = $4>0 ? 1 : 0;
+ }
+ }
+ | TOK_IOPERM '?' end { int i,start;
+ for (i=0; i <= IOPERM_BITS; i++) {
+ if (ioperm_list[i]) {
+ start = i;
+ for (; i <= IOPERM_BITS; i++)
+ if (!ioperm_list[i]) {
+ printf("ioperm on in "
+ "0x%x+0x%x\n", start,i-start);
+ break;
+ }
+ }
+ }
+ }
+ | TOK_IOPERM error end { printf("ioperm start len val\n"); }
+;
+list_pci: TOK_DUMP_PCI end { list_pci(); }
+ | TOK_DUMP_PCI error end { list_pci(); }
+;
+boot_bios: TOK_BOOT_BIOS '?' end { if (!BootBios) printf("No Boot BIOS\n");
+ else printf("BootBIOS from: %i:%i:%i\n",
+ BootBios->bus, BootBios->dev,
+ BootBios->func); }
+ | TOK_BOOT_BIOS error end { printf ("bootbios bus:dev:num\n"); }
+;
+hlp: '?' { printf("Command list:\n");
+ printf(" select isa | pci bus:dev:func\n");
+ printf(" boot\n");
+ printf(" seg:reg val | reg val \n");
+ printf(" $x val | $mem val\n");
+ printf(" setmem addr list; addr := val\n");
+ printf(" dumpmem addr len; addr,len := val\n");
+ printf(" do [val]\n");
+ printf(" quit\n");
+ printf(" ?\n");
+ printf(" seg := ds | es;"
+ " reg := ax | bx | cx | dx | si \n");
+ printf(" val := var | <hex-number> | seg:reg | seg\n");
+ printf(" var := $x | $mem; x := 0..20\n");
+ printf(" list := byte val | word val | long val "
+ "| \"string\"\n");
+ printf(" pport on | off | ?\n");
+ printf(" ppci on | off | ?\n");
+ printf(" pirq on | off | ?\n");
+ printf(" pip on | off | ?\n");
+ printf(" trace on | off | ?\n");
+ printf(" iostat on | off | ?\n");
+ printf(" verbose val\n");
+ printf(" log \"<filename>\" | off | ?\n");
+ printf(" print on | off\n");
+ printf(" hlt val | del [val] | ?\n");
+ printf(" clstat\n");
+ printf(" lpci\n");
+ printf ("bootbios ?\n");
+}
+;
+
+%%
+
+static void
+dump_mem(CARD32 addr, int len)
+{
+ dprint(addr,len);
+}
+
+static void
+exec_int(int num)
+{
+ if (num == 0x10) { /* video interrupt */
+ if (Device.type == NONE) {
+ CurrentPci = PciList;
+ while (CurrentPci) {
+ if (CurrentPci->active)
+ break;
+ CurrentPci = CurrentPci->next;
+ }
+ if (!CurrentPci)
+ Device.type = ISA;
+ else {
+ Device.type = PCI;
+ Device.loc.pci.dev = CurrentPci->dev;
+ Device.loc.pci.bus = CurrentPci->bus;
+ Device.loc.pci.func = CurrentPci->func;
+ }
+ }
+ if (Device.type != ISA) {
+ if (!Device.booted) {
+ if (!CurrentPci || (Device.type == PCI
+ && (!CurrentPci->active
+ && (Device.loc.pci.dev != CurrentPci->dev
+ || Device.loc.pci.bus != CurrentPci->bus
+ || Device.loc.pci.func != CurrentPci->func)))) {
+ printf("boot the device fist\n");
+ return;
+ }
+ }
+ } else
+ CurrentPci = NULL;
+ } else {
+ Device.booted = FALSE; /* we need this for sanity! */
+ }
+
+ runINT(num,®s);
+}
+
+static void
+boot(void)
+{
+ if (Device.type == NONE) {
+ printf("select a device fist\n");
+ return;
+ }
+
+ call_boot(&Device);
+}
+
+static void *
+add_to_list(enum mem_type type, union mem_val *rec, void *next)
+{
+ struct mem *mem_rec = (struct mem *) malloc(sizeof(mem_rec));
+
+ mem_rec->type = type;
+ mem_rec->next = next;
+
+ switch (type) {
+ case BYTE:
+ case WORD:
+ case LONG:
+ mem_rec->val.integer = rec->integer;
+ break;
+ case STRING:
+ mem_rec->val.ptr = normalize_string(rec->ptr);
+ break;
+ }
+ return mem_rec;
+}
+
+static int
+validRange(int addr,int len)
+{
+ int end = addr + len;
+
+ if (addr < 0x1000 || end > 0xc0000)
+ return 0;
+ return 1;
+}
+
+static void
+do_list(struct mem *list, memType addr)
+{
+ struct mem *prev;
+ int len;
+
+ while (list) {
+ switch (list->type) {
+ case BYTE:
+ if (!validRange(addr,1)) goto error;
+ *(CARD8*)addr = list->val.integer;
+ addr =+ 1;
+ break;
+ case WORD:
+ if (!validRange(addr,2)) goto error;
+ *(CARD16*)addr = list->val.integer;
+ addr =+ 2;
+ break;
+ case LONG:
+ if (!validRange(addr,4)) goto error;
+ *(CARD32*)addr = list->val.integer;
+ addr =+ 4;
+ break;
+ case STRING:
+ len = strlen((char*)list->val.ptr);
+ if (!validRange(addr,len)) goto error;
+ memcpy((CARD8*)addr,(void*)list->val.ptr,len);
+ addr =+ len;
+ free(list->val.ptr);
+ break;
+ }
+ prev = list;
+ list = list->next;
+ free(prev);
+ continue;
+ error:
+ printf("address out of range\n");
+ while (list) {
+ prev = list;
+ list = list->next;
+ free(prev);
+ }
+ break;
+ }
+}
+
+static char *
+normalize_string(char *ptr)
+{
+ int i = 0, j = 0, c = 0, esc= 0;
+ int size;
+ char *mem_ptr;
+
+ size = strlen(ptr);
+ mem_ptr = malloc(size);
+ while (1) {
+ switch (*(ptr + i)) {
+ case '\\':
+ if (esc) {
+ *(mem_ptr + j++) = *(ptr + i);
+ esc = 0;
+ } else
+ esc = 1;
+ break;
+ case '\"':
+ if (esc) {
+ *(mem_ptr + j++) = *(ptr + i);
+ esc = 0;
+ } else
+ c++;
+ break;
+ default:
+ *(mem_ptr + j++) = *(ptr + i);
+ break;
+ }
+ if (c > 1) {
+ *(mem_ptr + j) = '\0';
+ break;
+ }
+ i++;
+ }
+ return mem_ptr;
+}
diff --git a/board/MAI/bios_emulator/scitech/src/v86bios/pci.c b/board/MAI/bios_emulator/scitech/src/v86bios/pci.c
new file mode 100644
index 00000000000..e68c61d5ef4
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/v86bios/pci.c
@@ -0,0 +1,903 @@
+/*
+ * Copyright 1999 Egbert Eich
+ *
+ * Permission to use, copy, modify, distribute, and sell this software and its
+ * documentation for any purpose is hereby granted without fee, provided that
+ * the above copyright notice appear in all copies and that both that
+ * copyright notice and this permission notice appear in supporting
+ * documentation, and that the name of the authors not be used in
+ * advertising or publicity pertaining to distribution of the software without
+ * specific, written prior permission. The authors makes no representations
+ * about the suitability of this software for any purpose. It is provided
+ * "as is" without express or implied warranty.
+ *
+ * THE AUTHORS DISCLAIMS ALL WARRANTIES WITH REGARD TO THIS SOFTWARE,
+ * INCLUDING ALL IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS, IN NO
+ * EVENT SHALL THE AUTHORS BE LIABLE FOR ANY SPECIAL, INDIRECT OR
+ * CONSEQUENTIAL DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF USE,
+ * DATA OR PROFITS, WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE OR OTHER
+ * TORTIOUS ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE OR
+ * PERFORMANCE OF THIS SOFTWARE.
+ */
+#include "debug.h"
+#include <fcntl.h>
+#include <unistd.h>
+#include <malloc.h>
+#include <stdio.h>
+#include <sys/mman.h>
+#include <sys/types.h>
+#include <sys/stat.h>
+#include <string.h>
+#if defined (__alpha__) || defined (__ia64__)
+#include <sys/io.h>
+#endif
+#include "AsmMacros.h"
+
+#include "pci.h"
+
+/*
+ * I'm rather simple mindend - therefore I do a poor man's
+ * pci scan without all the fancy stuff that is done in
+ * scanpci. However that's all we need.
+ */
+
+PciStructPtr PciStruct = NULL;
+PciBusPtr PciBuses = NULL;
+PciStructPtr CurrentPci = NULL;
+PciStructPtr PciList = NULL;
+PciStructPtr BootBios = NULL;
+int pciMaxBus = 0;
+
+static CARD32 PciCfg1Addr;
+
+static void readConfigSpaceCfg1(CARD32 bus, CARD32 dev, CARD32 func,
+ CARD32 *reg);
+static int checkSlotCfg1(CARD32 bus, CARD32 dev, CARD32 func);
+static int checkSlotCfg2(CARD32 bus, int dev);
+static void readConfigSpaceCfg2(CARD32 bus, int dev, CARD32 *reg);
+static CARD8 interpretConfigSpace(CARD32 *reg, int busidx,
+ CARD8 dev, CARD8 func);
+static CARD32 findBIOSMap(PciStructPtr pciP, CARD32 *biosSize);
+static void restoreMem(PciStructPtr pciP);
+
+
+#ifdef __alpha__
+#define PCI_BUS_FROM_TAG(tag) (((tag) & 0x00ff0000) >> 16)
+#define PCI_DFN_FROM_TAG(tag) (((tag) & 0x0000ff00) >> 8)
+
+#include <asm/unistd.h>
+
+CARD32
+axpPciCfgRead(CARD32 tag)
+{
+ int bus, dfn;
+ CARD32 val = 0xffffffff;
+
+ bus = PCI_BUS_FROM_TAG(tag);
+ dfn = PCI_DFN_FROM_TAG(tag);
+
+ syscall(__NR_pciconfig_read, bus, dfn, tag & 0xff, 4, &val);
+ return(val);
+}
+
+void
+axpPciCfgWrite(CARD32 tag, CARD32 val)
+{
+ int bus, dfn;
+
+ bus = PCI_BUS_FROM_TAG(tag);
+ dfn = PCI_DFN_FROM_TAG(tag);
+
+ syscall(__NR_pciconfig_write, bus, dfn, tag & 0xff, 4, &val);
+}
+
+static CARD32 (*readPci)(CARD32 reg) = axpPciCfgRead;
+static void (*writePci)(CARD32 reg, CARD32 val) = axpPciCfgWrite;
+#else
+static CARD32 readPciCfg1(CARD32 reg);
+static void writePciCfg1(CARD32 reg, CARD32 val);
+static CARD32 readPciCfg2(CARD32 reg);
+static void writePciCfg2(CARD32 reg, CARD32 val);
+
+static CARD32 (*readPci)(CARD32 reg) = readPciCfg1;
+static void (*writePci)(CARD32 reg, CARD32 val) = writePciCfg1;
+#endif
+
+#if defined(__alpha__) || defined(__sparc__)
+#define PCI_EN 0x00000000
+#else
+#define PCI_EN 0x80000000
+#endif
+
+
+static int numbus;
+static int hostbridges = 1;
+static unsigned long pciMinMemReg = ~0;
+
+
+
+void
+scan_pci(void)
+{
+ unsigned short configtype;
+
+ CARD32 reg[64];
+ int busidx;
+ CARD8 cardnum;
+ CARD8 func;
+ int idx;
+
+ int i;
+ PciStructPtr pci1;
+ PciBusPtr pci_b1,pci_b2;
+
+#if defined(__alpha__) || defined(__powerpc__) || defined(__sparc__) || defined(__ia64__)
+ configtype = 1;
+#else
+ CARD8 tmp1, tmp2;
+ CARD32 tmp32_1, tmp32_2;
+ outb(PCI_MODE2_ENABLE_REG, 0x00);
+ outb(PCI_MODE2_FORWARD_REG, 0x00);
+ tmp1 = inb(PCI_MODE2_ENABLE_REG);
+ tmp2 = inb(PCI_MODE2_FORWARD_REG);
+ if ((tmp1 == 0x00) && (tmp2 == 0x00)) {
+ configtype = 2;
+ readPci = readPciCfg2;
+ writePci = writePciCfg2;
+ P_printf("PCI says configuration type 2\n");
+ } else {
+ tmp32_1 = inl(PCI_MODE1_ADDRESS_REG);
+ outl(PCI_MODE1_ADDRESS_REG, PCI_EN);
+ tmp32_2 = inl(PCI_MODE1_ADDRESS_REG);
+ outl(PCI_MODE1_ADDRESS_REG, tmp32_1);
+ if (tmp32_2 == PCI_EN) {
+ configtype = 1;
+ P_printf("PCI says configuration type 1\n");
+ } else {
+ P_printf("No PCI !\n");
+ return;
+ }
+ }
+#endif
+
+ if (configtype == 1) {
+ P_printf("PCI probing configuration type 1\n");
+ busidx = 0;
+ numbus = 1;
+ idx = 0;
+ do {
+ P_printf("\nProbing for devices on PCI bus %d:\n", busidx);
+ for (cardnum = 0; cardnum < MAX_DEV_PER_VENDOR_CFG1; cardnum++) {
+ func = 0;
+ do {
+ /* loop over the different functions, if present */
+ if (!checkSlotCfg1(busidx,cardnum,func))
+ break;
+ readConfigSpaceCfg1(busidx,cardnum,func,reg);
+
+ func = interpretConfigSpace(reg,busidx,
+ cardnum,func);
+
+ if (idx++ > MAX_PCI_DEVICES)
+ continue;
+ } while (func < 8);
+ }
+ } while (++busidx < PCI_MAXBUS);
+#if defined(__alpha__) || defined(__powerpc__) || defined(__sparc__) || defined(__ia64__)
+ /* don't use outl() ;-) */
+#else
+ outl(PCI_MODE1_ADDRESS_REG, 0);
+#endif
+ } else {
+ int slot;
+
+ P_printf("PCI probing configuration type 2\n");
+ busidx = 0;
+ numbus = 1;
+ idx = 0;
+ do {
+ for (slot=0xc0; slot<0xd0; i++) {
+ if (!checkSlotCfg2(busidx,slot))
+ break;
+ readConfigSpaceCfg2(busidx,slot,reg);
+
+ interpretConfigSpace(reg,busidx,
+ slot,0);
+ if (idx++ > MAX_PCI_DEVICES)
+ continue;
+ }
+ } while (++busidx < PCI_MAXBUS);
+ }
+
+
+ pciMaxBus = numbus - 1;
+ P_printf("Number of buses in system: %i\n",pciMaxBus + 1);
+ P_printf("Min PCI mem address: 0x%lx\n",pciMinMemReg);
+
+ /* link buses */
+ pci_b1 = PciBuses;
+ while (pci_b1) {
+ pci_b2 = PciBuses;
+ pci_b1->pBus = NULL;
+ while (pci_b2) {
+ if (pci_b1->primary == pci_b2->secondary)
+ pci_b1->pBus = pci_b2;
+ pci_b2 = pci_b2->next;
+ }
+ pci_b1 = pci_b1->next;
+ }
+ pci1 = PciStruct;
+ while (pci1) {
+ pci_b2 = PciBuses;
+ pci1->pBus = NULL;
+ while (pci_b2) {
+ if (pci1->bus == pci_b2->secondary)
+ pci1->pBus = pci_b2;
+ pci_b2 = pci_b2->next;
+ }
+ pci1 = pci1->next;
+ }
+ if (RESORT) {
+ PciStructPtr tmp = PciStruct, tmp1;
+ PciStruct = NULL;
+ while (tmp) {
+ tmp1 = tmp->next;
+ tmp->next = PciStruct;
+ PciStruct = tmp;
+ tmp = tmp1;
+ }
+ }
+ PciList = CurrentPci = PciStruct;
+}
+
+#ifndef __alpha__
+static CARD32
+readPciCfg1(CARD32 reg)
+{
+ CARD32 val;
+
+ outl(PCI_MODE1_ADDRESS_REG, reg);
+ val = inl(PCI_MODE1_DATA_REG);
+ outl(PCI_MODE1_ADDRESS_REG, 0);
+ P_printf("reading: 0x%x from 0x%x\n",val,reg);
+ return val;
+}
+
+static void
+writePciCfg1(CARD32 reg, CARD32 val)
+{
+ P_printf("writing: 0x%x to 0x%x\n",val,reg);
+ outl(PCI_MODE1_ADDRESS_REG, reg);
+ outl(PCI_MODE1_DATA_REG,val);
+ outl(PCI_MODE1_ADDRESS_REG, 0);
+}
+
+static CARD32
+readPciCfg2(CARD32 reg)
+{
+ CARD32 val;
+ CARD8 bus = (reg >> 16) & 0xff;
+ CARD8 dev = (reg >> 11) & 0x1f;
+ CARD8 num = reg & 0xff;
+
+ outb(PCI_MODE2_ENABLE_REG, 0xF1);
+ outb(PCI_MODE2_FORWARD_REG, bus);
+ val = inl((dev << 8) + num);
+ outb(PCI_MODE2_ENABLE_REG, 0x00);
+ P_printf("reading: 0x%x from 0x%x\n",val,reg);
+ return val;
+}
+
+static void
+writePciCfg2(CARD32 reg, CARD32 val)
+{
+ CARD8 bus = (reg >> 16) & 0xff;
+ CARD8 dev = (reg >> 11) & 0x1f;
+ CARD8 num = reg & 0xff;
+
+ P_printf("writing: 0x%x to 0x%x\n",val,reg);
+ outb(PCI_MODE2_ENABLE_REG, 0xF1);
+ outb(PCI_MODE2_FORWARD_REG, bus);
+ outl((dev << 8) + num,val);
+ outb(PCI_MODE2_ENABLE_REG, 0x00);
+}
+#endif
+
+void
+pciVideoDisable(void)
+{
+ /* disable VGA routing on bridges */
+ PciBusPtr pbp = PciBuses;
+ PciStructPtr pcp = PciStruct;
+
+ while (pbp) {
+ writePci(pbp->Slot.l | 0x3c, pbp->bctl & ~(CARD32)(8<<16));
+ pbp = pbp->next;
+ }
+ /* disable display devices */
+ while (pcp) {
+ writePci(pcp->Slot.l | 0x04, pcp->cmd_st & ~(CARD32)3);
+ writePci(pcp->Slot.l | 0x30, pcp->RomBase & ~(CARD32)1);
+ pcp = pcp->next;
+ }
+}
+
+void
+pciVideoRestore(void)
+{
+ /* disable VGA routing on bridges */
+ PciBusPtr pbp = PciBuses;
+ PciStructPtr pcp = PciStruct;
+
+ while (pbp) {
+ writePci(pbp->Slot.l | 0x3c, pbp->bctl);
+ pbp = pbp->next;
+ }
+ /* disable display devices */
+ while (pcp) {
+ writePci(pcp->Slot.l | 0x04, pcp->cmd_st);
+ writePci(pcp->Slot.l | 0x30, pcp->RomBase);
+ pcp = pcp->next;
+ }
+}
+
+void
+EnableCurrent()
+{
+ PciBusPtr pbp;
+ PciStructPtr pcp = CurrentPci;
+
+ pciVideoDisable();
+
+ pbp = pcp->pBus;
+ while (pbp) { /* enable bridges */
+ writePci(pbp->Slot.l | 0x3c, pbp->bctl | (CARD32)(8<<16));
+ pbp = pbp->pBus;
+ }
+ writePci(pcp->Slot.l | 0x04, pcp->cmd_st | (CARD32)3);
+ writePci(pcp->Slot.l | 0x30, pcp->RomBase | (CARD32)1);
+}
+
+CARD8
+PciRead8(int offset, CARD32 Slot)
+{
+ int shift = offset & 0x3;
+ offset = offset & 0xFC;
+ return ((readPci(Slot | offset) >> (shift << 3)) & 0xff);
+}
+
+CARD16
+PciRead16(int offset, CARD32 Slot)
+{
+ int shift = offset & 0x2;
+ offset = offset & 0xFC;
+ return ((readPci(Slot | offset) >> (shift << 3)) & 0xffff);
+}
+
+CARD32
+PciRead32(int offset, CARD32 Slot)
+{
+ offset = offset & 0xFC;
+ return (readPci(Slot | offset));
+}
+
+void
+PciWrite8(int offset, CARD8 byte, CARD32 Slot)
+{
+ CARD32 val;
+ int shift = offset & 0x3;
+ offset = offset & 0xFC;
+ val = readPci(Slot | offset);
+ val &= ~(CARD32)(0xff << (shift << 3));
+ val |= byte << (shift << 3);
+ writePci(Slot | offset, val);
+}
+
+void
+PciWrite16(int offset, CARD16 word, CARD32 Slot)
+{
+ CARD32 val;
+ int shift = offset & 0x2;
+ offset = offset & 0xFC;
+ val = readPci(Slot | offset);
+ val &= ~(CARD32)(0xffff << (shift << 3));
+ val |= word << (shift << 3);
+ writePci(Slot | offset, val);
+}
+
+void
+PciWrite32(int offset, CARD32 lg, CARD32 Slot)
+{
+ offset = offset & 0xFC;
+ writePci(Slot | offset, lg);
+}
+
+int
+mapPciRom(PciStructPtr pciP)
+{
+ unsigned long RomBase = 0;
+ int mem_fd;
+ unsigned char *mem, *ptr;
+ unsigned char *scratch = NULL;
+ int length = 0;
+ CARD32 biosSize = 0x1000000;
+ CARD32 enablePci;
+
+ if (!pciP)
+ pciP = CurrentPci;
+
+ if (FIX_ROM) {
+ RomBase = findBIOSMap(pciP, &biosSize);
+ if (!RomBase) {
+ fprintf(stderr,"Cannot remap BIOS of %i:%i:%i "
+ "- trying preset address\n",pciP->bus,pciP->dev,
+ pciP->func);
+ RomBase = pciP->RomBase & ~(CARD32)0xFF;
+ }
+ } else {
+ RomBase = pciP->RomBase & ~(CARD32)0xFF;
+ if (~RomBase + 1 < biosSize || !RomBase)
+ RomBase = findBIOSMap(pciP, &biosSize);
+ }
+
+ P_printf("RomBase: 0x%lx\n",RomBase);
+
+ if ((mem_fd = open(MEM_FILE,O_RDONLY))<0) {
+ perror("opening memory");
+ restoreMem(pciP);
+ return (0);
+ }
+
+ PciWrite32(0x30,RomBase | 1,pciP->Slot.l);
+
+#ifdef __alpha__
+ mem = ptr = (unsigned char *)mmap(0, biosSize, PROT_READ,
+ MAP_SHARED, mem_fd, RomBase | _bus_base());
+#else
+ mem = ptr = (unsigned char *)mmap(0, biosSize, PROT_READ,
+ MAP_SHARED, mem_fd, RomBase);
+#endif
+ if (pciP != CurrentPci) {
+ enablePci = PciRead32(0x4,pciP->Slot.l);
+ PciWrite32(0x4,enablePci | 0x2,pciP->Slot.l);
+ }
+
+#ifdef PRINT_PCI
+ dprint((unsigned long)ptr,0x30);
+#endif
+ while ( *ptr == 0x55 && *(ptr+1) == 0xAA) {
+ unsigned short data_off = *(ptr+0x18) | (*(ptr+0x19)<< 8);
+ unsigned char *data = ptr + data_off;
+ unsigned char type;
+ int i;
+
+ if (*data!='P' || *(data+1)!='C' || *(data+2)!='I' || *(data+3)!='R') {
+ break;
+ }
+ type = *(data + 0x14);
+ P_printf("data segment in BIOS: 0x%x, type: 0x%x ",data_off,type);
+
+ if (type != 0) { /* not PC-AT image: find next one */
+ unsigned int image_length;
+ unsigned char indicator = *(data + 0x15);
+ if (indicator & 0x80) /* last image */
+ break;
+ image_length = (*(data + 0x10)
+ | (*(data + 0x11) << 8)) << 9;
+ P_printf("data image length: 0x%x, ind: 0x%x\n",
+ image_length,indicator);
+ ptr = ptr + image_length;
+ continue;
+ }
+ /* OK, we have a PC Image */
+ length = (*(ptr + 2) << 9);
+ P_printf("BIOS length: 0x%x\n",length);
+ scratch = (unsigned char *)malloc(length);
+ /* don't use memcpy() here: Reading from bus! */
+ for (i=0;i<length;i++)
+ *(scratch + i)=*(ptr + i);
+ break;
+ }
+
+ if (pciP != CurrentPci)
+ PciWrite32(0x4,enablePci,pciP->Slot.l);
+
+ /* unmap/close/disable PCI bios mem */
+ munmap(mem, biosSize);
+ close(mem_fd);
+ /* disable and restore mapping */
+ writePci(pciP->Slot.l | 0x30, pciP->RomBase & ~(CARD32)1);
+
+ if (scratch && length) {
+ memcpy((unsigned char *)V_BIOS, scratch, length);
+ free(scratch);
+ }
+
+ restoreMem(pciP);
+ return length;
+}
+
+CARD32
+findPci(CARD16 slotBX)
+{
+ CARD32 slot = slotBX << 8;
+
+ if (slot == (CurrentPci->Slot.l & ~PCI_EN))
+ return (CurrentPci->Slot.l | PCI_EN);
+ else {
+#if !SHOW_ALL_DEV
+ PciBusPtr pBus = CurrentPci->pBus;
+ while (pBus) {
+ // fprintf(stderr,"slot: 0x%x bridge: 0x%x\n",slot, pBus->Slot.l);
+ if (slot == (pBus->Slot.l & ~PCI_EN))
+ return pBus->Slot.l | PCI_EN;
+ pBus = pBus->next;
+ }
+#else
+ PciStructPtr pPci = PciStruct;
+ while (pPci) {
+ //fprintf(stderr,"slot: 0x%x bridge: 0x%x\n",slot, pPci->Slot.l);
+ if (slot == (pPci->Slot.l & ~PCI_EN))
+ return pPci->Slot.l | PCI_EN;
+ pPci = pPci->next;
+ }
+#endif
+ }
+ return 0;
+}
+
+CARD16
+pciSlotBX(PciStructPtr pPci)
+{
+ return (CARD16)((pPci->Slot.l >> 8) & 0xFFFF);
+}
+
+PciStructPtr
+findPciDevice(CARD16 vendorID, CARD16 deviceID, char n)
+{
+ PciStructPtr pPci = CurrentPci;
+ n++;
+
+ while (pPci) {
+ if ((pPci->VendorID == vendorID) && (pPci->DeviceID == deviceID)) {
+ if (!(--n)) break;
+ }
+ pPci = pPci->next;
+ }
+ return pPci;
+}
+
+PciStructPtr
+findPciClass(CARD8 intf, CARD8 subClass, CARD16 class, char n)
+{
+ PciStructPtr pPci = CurrentPci;
+ n++;
+
+ while (pPci) {
+ if ((pPci->Interface == intf) && (pPci->SubClass == subClass)
+ && (pPci->BaseClass == class)) {
+ if (!(--n)) break;
+ }
+ pPci = pPci->next;
+ }
+ return pPci;
+}
+
+static void
+readConfigSpaceCfg1(CARD32 bus, CARD32 dev, CARD32 func, CARD32 *reg)
+{
+ CARD32 config_cmd = PCI_EN | (bus<<16) |
+ (dev<<11) | (func<<8);
+ int i;
+
+ for (i = 0; i<64;i+=4) {
+#ifdef __alpha__
+ reg[i] = axpPciCfgRead(config_cmd | i);
+#else
+ outl(PCI_MODE1_ADDRESS_REG, config_cmd | i);
+ reg[i] = inl(PCI_MODE1_DATA_REG);
+#endif
+
+#ifdef V86BIOS_DEBUG
+ P_printf("0x%lx\n",reg[i]);
+#endif
+ }
+}
+
+static int
+checkSlotCfg1(CARD32 bus, CARD32 dev, CARD32 func)
+{
+ CARD32 config_cmd = PCI_EN | (bus<<16) |
+ (dev<<11) | (func<<8);
+ CARD32 reg;
+#ifdef __alpha__
+ reg = axpPciCfgRead(config_cmd);
+#else
+ outl(PCI_MODE1_ADDRESS_REG, config_cmd);
+ reg = inl(PCI_MODE1_DATA_REG);
+#endif
+ if (reg != 0xFFFFFFFF)
+ return 1;
+ else
+ return 0;
+}
+
+static int
+checkSlotCfg2(CARD32 bus, int dev)
+{
+ CARD32 val;
+
+ outb(PCI_MODE2_ENABLE_REG, 0xF1);
+ outb(PCI_MODE2_FORWARD_REG, bus);
+ val = inl(dev << 8);
+ outb(PCI_MODE2_FORWARD_REG, 0x00);
+ outb(PCI_MODE2_ENABLE_REG, 0x00);
+ if (val == 0xFFFFFFFF)
+ return 0;
+ if (val == 0xF0F0F0F0)
+ return 0;
+ return 1;
+}
+
+static void
+readConfigSpaceCfg2(CARD32 bus, int dev, CARD32 *reg)
+{
+ int i;
+
+ outb(PCI_MODE2_ENABLE_REG, 0xF1);
+ outb(PCI_MODE2_FORWARD_REG, bus);
+ for (i = 0; i<64;i+=4) {
+ reg[i] = inl((dev << 8) + i);
+#ifdef V86BIOS_DEBUG
+ P_printf("0x%lx\n",reg[i]);
+#endif
+ }
+ outb(PCI_MODE2_ENABLE_REG, 0x00);
+}
+
+static CARD8
+interpretConfigSpace(CARD32 *reg, int busidx, CARD8 dev, CARD8 func)
+{
+ CARD32 config_cmd;
+ CARD16 vendor, device;
+ CARD8 baseclass, subclass;
+ CARD8 primary, secondary;
+ CARD8 header, interface;
+ int i;
+
+ config_cmd = PCI_EN | busidx<<16 |
+ (dev<<11) | (func<<8);
+
+ for (i = 0x10; i < 0x28; i+=4) {
+ if (IS_MEM32(reg[i]))
+ if ((reg[i] & 0xFFFFFFF0) < pciMinMemReg)
+ pciMinMemReg = (reg[i] & 0xFFFFFFF0);
+#ifdef __alpha__
+ if (IS_MEM64(reg[i])) {
+ unsigned long addr = reg[i] |
+ (unsigned long)(reg[i+4]) << 32;
+ if ((addr & ~0xfL) < pciMinMemReg)
+ pciMinMemReg = (addr & ~0xfL);
+ i+=4;
+ }
+#endif
+ }
+ vendor = reg[0] & 0xFFFF;
+ device = reg[0] >> 16;
+ P_printf("bus: %i card: %i func %i reg0: 0x%x ", busidx,dev,func,reg[0]);
+ baseclass = reg[8] >> 24;
+ subclass = (reg[8] >> 16) & 0xFF;
+ interface = (reg[8] >> 8) & 0xFF;
+
+ header = (reg[0x0c] >> 16) & 0xff;
+ P_printf("bc 0x%x, sub 0x%x, if 0x%x, hdr 0x%x\n",
+ baseclass,subclass,interface,header);
+ if (BRIDGE_CLASS(baseclass)) {
+ if (BRIDGE_PCI_CLASS(subclass)) {
+ PciBusPtr pbp = malloc(sizeof(PciBusRec));
+ P_printf("Pci-Pci Bridge found; ");
+ primary = reg[0x18] & 0xFF;
+ secondary = (reg[0x18] >> 8) & 0xFF;
+ P_printf("primary: 0x%x secondary: 0x%x\n",
+ primary,secondary);
+ pbp->bctl = reg[0x3c];
+ pbp->primary = primary;
+ pbp->secondary = secondary;
+ pbp->Slot.l = config_cmd;
+ pbp->next = PciBuses;
+ PciBuses = pbp;
+ numbus++;
+ } else if (BRIDGE_HOST_CLASS(subclass)
+ && (hostbridges++ > 1)) {
+ numbus++;
+ }
+ } else if (VIDEO_CLASS(baseclass,subclass)) {
+ PciStructPtr pcp = malloc(sizeof(PciStructRec));
+ P_printf("Display adapter found\n");
+ pcp->RomBase = reg[0x30];
+ pcp->cmd_st = reg[4];
+ pcp->active = (reg[4] & 0x03) == 3 ? 1 : 0;
+ pcp->VendorID = vendor;
+ pcp->DeviceID = device;
+ pcp->Interface = interface;
+ pcp->BaseClass = baseclass;
+ pcp->SubClass = subclass;
+ pcp->Slot.l = config_cmd;
+ pcp->bus = busidx;
+ pcp->dev = dev;
+ pcp->func = func;
+ pcp->next = PciStruct;
+ PciStruct = pcp;
+ }
+ if ((func == 0)
+ && ((header & PCI_MULTIFUNC_DEV) == 0))
+ func = 8;
+ else
+ func++;
+ return func;
+}
+
+static CARD32 remapMEM_val;
+static int remapMEM_num;
+
+static int /* map it on some other video device */
+remapMem(PciStructPtr pciP, int num, CARD32 size)
+{
+ PciStructPtr pciPtr = PciStruct;
+ int i;
+ CARD32 org;
+ CARD32 val;
+ CARD32 size_n;
+
+ org = PciRead32(num + 0x10,pciP->Slot.l);
+
+ while (pciPtr) {
+ for (i = 0; i < 20; i=i+4) {
+
+ val = PciRead32(i + 0x10,pciPtr->Slot.l);
+ /* don't map it on itself */
+ if ((org & 0xfffffff0) == (val & 0xfffffff0))
+ continue;
+ if (val && !(val & 1))
+ PciWrite32(i + 0x10,0xffffffff,pciPtr->Slot.l);
+ else
+ continue;
+ size_n = PciRead32(i + 0x10,pciPtr->Slot.l);
+ PciWrite32(i + 0x10,val,pciPtr->Slot.l);
+ size_n = ~(CARD32)(size_n & 0xfffffff0) + 1;
+
+ if (size_n >= size) {
+ PciWrite32(num + 0x10,val,pciP->Slot.l);
+ return 1;
+ }
+ }
+ pciPtr = pciPtr->next;
+ }
+ /* last resort: try to go below lowest PCI mem address */
+ val = ((pciMinMemReg & ~(CARD32)(size - 1)) - size);
+ if (val > 0x7fffffff) {
+ PciWrite32(num + 0x10,val, pciP->Slot.l);
+ return 1;
+ }
+
+ return 0;
+}
+
+static void
+restoreMem(PciStructPtr pciP)
+{
+ if (remapMEM_val == 0) return;
+ PciWrite32(remapMEM_num + 0x10,remapMEM_val,pciP->Slot.l);
+ return;
+}
+
+static CARD32
+findBIOSMap(PciStructPtr pciP, CARD32 *biosSize)
+{
+ PciStructPtr pciPtr = PciStruct;
+ int i;
+ CARD32 val;
+ CARD32 size;
+
+ PciWrite32(0x30,0xffffffff,pciP->Slot.l);
+ *biosSize = PciRead32(0x30,pciP->Slot.l);
+ P_printf("bios size: 0x%x\n",*biosSize);
+ PciWrite32(0x30,pciP->RomBase,pciP->Slot.l);
+ *biosSize = ~(*biosSize & 0xFFFFFF00) + 1;
+ P_printf("bios size masked: 0x%x\n",*biosSize);
+ if (*biosSize > (1024 * 1024 * 16)) {
+ *biosSize = 1024 * 1024 * 16;
+ P_printf("fixing broken BIOS size: 0x%x\n",*biosSize);
+ }
+ while (pciPtr) {
+ if (pciPtr->bus != pciP->bus) {
+ pciPtr = pciPtr->next;
+ continue;
+ }
+ for (i = 0; i < 20; i=i+4) {
+
+ val = PciRead32(i + 0x10,pciPtr->Slot.l);
+ if (!(val & 1))
+
+ PciWrite32(i + 0x10,0xffffffff,pciPtr->Slot.l);
+ else
+ continue;
+ size = PciRead32(i + 0x10,pciPtr->Slot.l);
+ PciWrite32(i + 0x10,val,pciPtr->Slot.l);
+ size = ~(CARD32)(size & 0xFFFFFFF0) + 1;
+#ifdef V86_BIOS_DEBUG
+ P_printf("size: 0x%x\n",size);
+#endif
+ if (size >= *biosSize) {
+ if (pciP == pciPtr) { /* if same device remap ram*/
+ if (!(remapMem(pciP,i,size)))
+ continue;
+ remapMEM_val = val;
+ remapMEM_num = i;
+ } else {
+ remapMEM_val = 0;
+ }
+ return val & 0xFFFFFF00;
+ }
+ }
+ pciPtr = pciPtr->next;
+ }
+ remapMEM_val = 0;
+ /* very last resort */
+ if (pciP->bus == 0 && (pciMinMemReg > *biosSize))
+ return (pciMinMemReg - size) & ~(size - 1);
+
+ return 0;
+}
+
+int
+cfg1out(CARD16 addr, CARD32 val)
+{
+ if (addr == 0xCF8) {
+ PciCfg1Addr = val;
+ return 1;
+ } else if (addr == 0xCFC) {
+ writePci(PciCfg1Addr, val);
+ return 1;
+ }
+ return 0;
+}
+
+int
+cfg1in(CARD16 addr, CARD32 *val)
+{
+ if (addr == 0xCF8) {
+ *val = PciCfg1Addr;
+ return 1;
+ } else if (addr == 0xCFC) {
+ *val = readPci(PciCfg1Addr);
+ return 1;
+ }
+ return 0;
+}
+
+void
+list_pci(void)
+{
+ PciStructPtr pci = PciList;
+
+ while (pci) {
+ printf("[0x%x:0x%x:0x%x] vendor: 0x%4.4x dev: 0x%4.4x class: 0x%4.4x"
+ " subclass: 0x%4.4x\n",pci->bus,pci->dev,pci->func,
+ pci->VendorID,pci->DeviceID,pci->BaseClass,pci->SubClass);
+ pci = pci->next;
+ }
+}
+
+PciStructPtr
+findPciByIDs(int bus, int dev, int func)
+{
+ PciStructPtr pciP = PciList;
+
+ while (pciP) {
+ if (pciP->bus == bus && pciP->dev == dev && pciP->func == func)
+ return pciP;
+ pciP = pciP->next;
+ }
+ return NULL;
+}
diff --git a/board/MAI/bios_emulator/scitech/src/v86bios/pci.h b/board/MAI/bios_emulator/scitech/src/v86bios/pci.h
new file mode 100644
index 00000000000..0ab7363df20
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/v86bios/pci.h
@@ -0,0 +1,127 @@
+/*
+ * Copyright 1999 Egbert Eich
+ *
+ * Permission to use, copy, modify, distribute, and sell this software and its
+ * documentation for any purpose is hereby granted without fee, provided that
+ * the above copyright notice appear in all copies and that both that
+ * copyright notice and this permission notice appear in supporting
+ * documentation, and that the name of the authors not be used in
+ * advertising or publicity pertaining to distribution of the software without
+ * specific, written prior permission. The authors makes no representations
+ * about the suitability of this software for any purpose. It is provided
+ * "as is" without express or implied warranty.
+ *
+ * THE AUTHORS DISCLAIMS ALL WARRANTIES WITH REGARD TO THIS SOFTWARE,
+ * INCLUDING ALL IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS, IN NO
+ * EVENT SHALL THE AUTHORS BE LIABLE FOR ANY SPECIAL, INDIRECT OR
+ * CONSEQUENTIAL DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF USE,
+ * DATA OR PROFITS, WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE OR OTHER
+ * TORTIOUS ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE OR
+ * PERFORMANCE OF THIS SOFTWARE.
+ */
+#include "v86bios.h"
+
+#ifndef V86_PCI_H
+#define V86_PCI_H
+
+typedef union {
+ struct {
+ unsigned int zero:2;
+ unsigned int reg:6;
+ unsigned int func:3;
+ unsigned int dev:5;
+ unsigned int bus:8;
+ unsigned int reserved:7;
+ unsigned int enable:1;
+ } pci;
+ CARD32 l;
+} PciSlot;
+
+typedef struct pciBusRec {
+ CARD8 primary;
+ CARD8 secondary;
+ CARD32 bctl;
+ PciSlot Slot;
+ struct pciBusRec *next;
+ struct pciBusRec *pBus;
+} PciBusRec, *PciBusPtr;
+
+typedef struct pciStructRec {
+ CARD16 VendorID;
+ CARD16 DeviceID;
+ CARD8 Interface;
+ CARD8 BaseClass;
+ CARD8 SubClass;
+ CARD32 RomBase;
+ CARD32 bus;
+ CARD8 dev;
+ CARD8 func;
+ CARD32 cmd_st;
+ int active;
+ PciSlot Slot;
+ struct pciStructRec *next;
+ PciBusPtr pBus;
+} PciStructRec , *PciStructPtr;
+
+
+extern PciStructPtr CurrentPci;
+extern PciStructPtr PciList;
+extern PciStructPtr BootBios;
+extern int pciMaxBus;
+
+extern CARD32 findPci(CARD16 slotBX);
+extern CARD16 pciSlotBX(PciStructPtr);
+PciStructPtr findPciDevice(CARD16 vendorID, CARD16 deviceID, char n);
+PciStructPtr findPciClass(CARD8 intf, CARD8 subClass, CARD16 class, char n);
+
+extern CARD8 PciRead8(int offset, CARD32 slot);
+extern CARD16 PciRead16(int offset, CARD32 slot);
+extern CARD32 PciRead32(int offset, CARD32 slot);
+
+extern void PciWrite8(int offset,CARD8 byte, CARD32 slot);
+extern void PciWrite16(int offset,CARD16 word, CARD32 slot);
+extern void PciWrite32(int offset,CARD32 lg, CARD32 slot);
+
+extern void scan_pci(void);
+extern void pciVideoDisable(void);
+extern void pciVideoRestore(void);
+extern void EnableCurrent(void);
+extern int mapPciRom(PciStructPtr pciP);
+extern int cfg1out(CARD16 addr, CARD32 val);
+extern int cfg1in(CARD16 addr, CARD32 *val);
+extern void list_pci(void);
+extern PciStructPtr findPciByIDs(int bus, int dev, int func);
+
+#define PCI_MODE2_ENABLE_REG 0xCF8
+#define PCI_MODE2_FORWARD_REG 0xCFA
+#define PCI_MODE1_ADDRESS_REG 0xCF8
+#define PCI_MODE1_DATA_REG 0xCFC
+#if defined(__alpha__) || defined(__sparc__)
+#define PCI_EN 0x00000000
+#else
+#define PCI_EN 0x80000000
+#endif
+#define MAX_DEV_PER_VENDOR_CFG1 32
+#define BRIDGE_CLASS(x) (x == 0x06)
+#define BRIDGE_PCI_CLASS(x) (x == 0x04)
+#define BRIDGE_HOST_CLASS(x) (x == 0x00)
+#define PCI_CLASS_PREHISTORIC 0x00
+#define PCI_SUBCLASS_PREHISTORIC_VGA 0x01
+#define PCI_CLASS_DISPLAY 0x03
+#define PCI_SUBCLASS_DISPLAY_VGA 0x00
+#define PCI_SUBCLASS_DISPLAY_XGA 0x01
+#define PCI_SUBCLASS_DISPLAY_MISC 0x80
+#define VIDEO_CLASS(b,s) \
+ (((b) == PCI_CLASS_PREHISTORIC && (s) == PCI_SUBCLASS_PREHISTORIC_VGA) || \
+ ((b) == PCI_CLASS_DISPLAY && (s) == PCI_SUBCLASS_DISPLAY_VGA) ||\
+ ((b) == PCI_CLASS_DISPLAY && (s) == PCI_SUBCLASS_DISPLAY_XGA) ||\
+ ((b) == PCI_CLASS_DISPLAY && (s) == PCI_SUBCLASS_DISPLAY_MISC))
+#define PCI_MULTIFUNC_DEV 0x80
+#define MAX_PCI_DEVICES 64
+#define PCI_MAXBUS 16
+#define PCI_IS_MEM 0x00000001
+#define MAX_PCI_ROM_SIZE (1024 * 1024 * 16)
+
+#define IS_MEM32(x) ((x & 0x7) == 0 && x != 0)
+#define IS_MEM64(x) ((x & 0x7) == 0x4)
+#endif
diff --git a/board/MAI/bios_emulator/scitech/src/v86bios/v86.c b/board/MAI/bios_emulator/scitech/src/v86bios/v86.c
new file mode 100644
index 00000000000..3170a9cb557
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/v86bios/v86.c
@@ -0,0 +1,562 @@
+/*
+ * Copyright 1999 Egbert Eich
+ *
+ * Permission to use, copy, modify, distribute, and sell this software and its
+ * documentation for any purpose is hereby granted without fee, provided that
+ * the above copyright notice appear in all copies and that both that
+ * copyright notice and this permission notice appear in supporting
+ * documentation, and that the name of the authors not be used in
+ * advertising or publicity pertaining to distribution of the software without
+ * specific, written prior permission. The authors makes no representations
+ * about the suitability of this software for any purpose. It is provided
+ * "as is" without express or implied warranty.
+ *
+ * THE AUTHORS DISCLAIMS ALL WARRANTIES WITH REGARD TO THIS SOFTWARE,
+ * INCLUDING ALL IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS, IN NO
+ * EVENT SHALL THE AUTHORS BE LIABLE FOR ANY SPECIAL, INDIRECT OR
+ * CONSEQUENTIAL DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF USE,
+ * DATA OR PROFITS, WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE OR OTHER
+ * TORTIOUS ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE OR
+ * PERFORMANCE OF THIS SOFTWARE.
+ */
+
+#include "debug.h"
+#include <sys/vm86.h>
+#include <unistd.h>
+#include <errno.h>
+#include <asm/unistd.h>
+#include <stdio.h>
+#include <string.h>
+#include <signal.h>
+#include <setjmp.h>
+#include "v86bios.h"
+#include "AsmMacros.h"
+
+struct vm86_struct vm86s;
+
+static int vm86_GP_fault(void);
+static int vm86_do_int(int num);
+static void dump_code(void);
+static void dump_registers(void);
+static void stack_trace(void);
+static int vm86_rep(struct vm86_struct *ptr);
+
+#define CPU_REG(x) (vm86s.regs.##x)
+#define CPU_REG_LW(reg) (*((CARD16 *)&CPU_REG(reg)))
+#define CPU_REG_HW(reg) (*((CARD16 *)&CPU_REG(reg) + 1))
+#define CPU_REG_LB(reg) (*(CARD8 *)&CPU_REG(e##reg))
+#define SEG_ADR(type, seg, reg) type((CPU_REG_LW(seg) << 4) \
+ + CPU_REG_LW(e##reg))
+#define DF (1 << 10)
+
+struct pio P;
+
+
+void
+setup_io(void)
+{
+ if (!Config.PrintPort && !Config.IoStatistics) {
+ P.inb = (CARD8(*)(CARD16))inb;
+ P.inw = (CARD16(*)(CARD16))inw;
+ P.inl = (CARD32(*)(CARD16))inl;
+ P.outb = (void(*)(CARD16,CARD8))outb;
+ P.outw = (void(*)(CARD16,CARD16))outw;
+ P.outl = (void(*)(CARD16,CARD32))outl;
+ } else {
+ P.inb = p_inb;
+ P.inw = p_inw;
+ P.inl = p_inl;
+ P.outb = p_outb;
+ P.outw = p_outw;
+ P.outl = p_outl;
+ }
+}
+
+
+static void
+setup_vm86(unsigned long bios_start, i86biosRegsPtr regs)
+{
+ CARD32 eip;
+ CARD16 cs;
+
+ vm86s.flags = VM86_SCREEN_BITMAP;
+ vm86s.flags = 0;
+ vm86s.screen_bitmap = 0;
+ vm86s.cpu_type = CPU_586;
+ memset(&vm86s.int_revectored, 0xff,sizeof(vm86s.int_revectored)) ;
+ memset(&vm86s.int21_revectored, 0xff,sizeof(vm86s.int21_revectored)) ;
+
+ eip = bios_start & 0xFFFF;
+ cs = (bios_start & 0xFF0000) >> 4;
+
+ CPU_REG(eax) = regs->ax;
+ CPU_REG(ebx) = regs->bx;
+ CPU_REG(ecx) = regs->cx;
+ CPU_REG(edx) = regs->dx;
+ CPU_REG(esi) = 0;
+ CPU_REG(edi) = regs->di;
+ CPU_REG(ebp) = 0;
+ CPU_REG(eip) = eip;
+ CPU_REG(cs) = cs;
+ CPU_REG(esp) = 0x100;
+ CPU_REG(ss) = 0x30; /* This is the standard pc bios stack */
+ CPU_REG(es) = regs->es;
+ CPU_REG(ds) = 0x40; /* standard pc ds */
+ CPU_REG(fs) = 0;
+ CPU_REG(gs) = 0;
+ CPU_REG(eflags) |= (VIF_MASK | VIP_MASK);
+}
+
+void
+collect_bios_regs(i86biosRegsPtr regs)
+{
+ regs->ax = CPU_REG(eax);
+ regs->bx = CPU_REG(ebx);
+ regs->cx = CPU_REG(ecx);
+ regs->dx = CPU_REG(edx);
+ regs->es = CPU_REG(es);
+ regs->ds = CPU_REG(ds);
+ regs->di = CPU_REG(edi);
+ regs->si = CPU_REG(esi);
+}
+
+static int
+do_vm86(void)
+{
+ int retval;
+
+#ifdef V86BIOS_DEBUG
+ dump_registers();
+#endif
+// retval = SYS_vm86old(&vm86s);
+// retval = syscall(SYS_vm86old,&vm86s);
+
+ retval = vm86_rep(&vm86s);
+
+ switch (VM86_TYPE(retval)) {
+ case VM86_UNKNOWN:
+ if (!vm86_GP_fault()) return 0;
+ break;
+ case VM86_STI:
+ fprintf(stderr,"vm86_sti :-((\n");
+ stack_trace();
+ dump_code();
+ return 0;
+ case VM86_INTx:
+ if (!vm86_do_int(VM86_ARG(retval))) {
+ fprintf(stderr,"\nUnknown vm86_int: %X\n\n",VM86_ARG(retval));
+ dump_registers();
+ return 0;
+ }
+ /* I'm not sure yet what to do if we can handle ints */
+ break;
+ case VM86_SIGNAL:
+ fprintf(stderr,"received signal\n");
+ return 0;
+ default:
+ fprintf(stderr,"unknown type(0x%x)=0x%x\n",
+ VM86_ARG(retval),VM86_TYPE(retval));
+ dump_registers();
+ dump_code();
+ stack_trace();
+ return 0;
+ }
+
+ return 1;
+}
+
+static jmp_buf x86_esc;
+static void
+vmexit(int unused)
+{
+ longjmp(x86_esc,1);
+}
+
+void
+do_x86(unsigned long bios_start, i86biosRegsPtr regs)
+{
+ static void (*org_handler)(int);
+
+ setup_vm86(bios_start, regs);
+ if (setjmp(x86_esc) == 0) {
+ org_handler = signal(2,vmexit);
+ while(do_vm86()) {};
+ signal(2,org_handler);
+ collect_bios_regs(regs);
+ } else {
+ signal(2,org_handler);
+ printf("interrupted at 0x%x\n",((CARD16)CPU_REG(cs)) << 4
+ | (CARD16)CPU_REG(eip));
+ }
+}
+
+/* get the linear address */
+#define LIN_PREF_SI ((pref_seg << 4) + CPU_REG_LW(esi))
+
+#define LWECX (prefix66 ^ prefix67 ? CPU_REG(ecx) : CPU_REG_LW(ecx))
+
+static int
+vm86_GP_fault(void)
+{
+ unsigned char *csp, *lina;
+ CARD32 org_eip;
+ int pref_seg;
+ int done,is_rep,prefix66,prefix67;
+
+
+ csp = lina = SEG_ADR((unsigned char *), cs, ip);
+#ifdef V86BIOS_DEBUG
+ printf("exception: \n");
+ dump_code();
+#endif
+
+ is_rep = 0;
+ prefix66 = prefix67 = 0;
+ pref_seg = -1;
+
+ /* eat up prefixes */
+ done = 0;
+ do {
+ switch (*(csp++)) {
+ case 0x66: /* operand prefix */ prefix66=1; break;
+ case 0x67: /* address prefix */ prefix67=1; break;
+ case 0x2e: /* CS */ pref_seg=CPU_REG(cs); break;
+ case 0x3e: /* DS */ pref_seg=CPU_REG(ds); break;
+ case 0x26: /* ES */ pref_seg=CPU_REG(es); break;
+ case 0x36: /* SS */ pref_seg=CPU_REG(ss); break;
+ case 0x65: /* GS */ pref_seg=CPU_REG(gs); break;
+ case 0x64: /* FS */ pref_seg=CPU_REG(fs); break;
+ case 0xf2: /* repnz */
+ case 0xf3: /* rep */ is_rep=1; break;
+ default: done=1;
+ }
+ } while (!done);
+ csp--; /* oops one too many */
+ org_eip = CPU_REG(eip);
+ CPU_REG_LW(eip) += (csp - lina);
+
+ switch (*csp) {
+
+ case 0x6c: /* insb */
+ /* NOTE: ES can't be overwritten; prefixes 66,67 should use esi,edi,ecx
+ * but is anyone using extended regs in real mode? */
+ /* WARNING: no test for DI wrapping! */
+ CPU_REG_LW(edi) += port_rep_inb(CPU_REG_LW(edx),
+ SEG_ADR((CARD8 *),es,di),
+ CPU_REG_LW(eflags)&DF,
+ (is_rep? LWECX:1));
+ if (is_rep) LWECX = 0;
+ CPU_REG_LW(eip)++;
+ break;
+
+ case 0x6d: /* (rep) insw / insd */
+ /* NOTE: ES can't be overwritten */
+ /* WARNING: no test for _DI wrapping! */
+ if (prefix66) {
+ CPU_REG_LW(edi) += port_rep_inl(CPU_REG_LW(edx),
+ SEG_ADR((CARD32 *),es,di),
+ CPU_REG_LW(eflags)&DF,
+ (is_rep? LWECX:1));
+ }
+ else {
+ CPU_REG_LW(edi) += port_rep_inw(CPU_REG_LW(edx),
+ SEG_ADR((CARD16 *),es,di),
+ CPU_REG_LW(eflags)&DF,
+ (is_rep? LWECX:1));
+ }
+ if (is_rep) LWECX = 0;
+ CPU_REG_LW(eip)++;
+ break;
+
+ case 0x6e: /* (rep) outsb */
+ if (pref_seg < 0) pref_seg = CPU_REG_LW(ds);
+ /* WARNING: no test for _SI wrapping! */
+ CPU_REG_LW(esi) += port_rep_outb(CPU_REG_LW(edx),(CARD8*)LIN_PREF_SI,
+ CPU_REG_LW(eflags)&DF,
+ (is_rep? LWECX:1));
+ if (is_rep) LWECX = 0;
+ CPU_REG_LW(eip)++;
+ break;
+
+ case 0x6f: /* (rep) outsw / outsd */
+ if (pref_seg < 0) pref_seg = CPU_REG_LW(ds);
+ /* WARNING: no test for _SI wrapping! */
+ if (prefix66) {
+ CPU_REG_LW(esi) += port_rep_outl(CPU_REG_LW(edx),
+ (CARD32 *)LIN_PREF_SI,
+ CPU_REG_LW(eflags)&DF,
+ (is_rep? LWECX:1));
+ }
+ else {
+ CPU_REG_LW(esi) += port_rep_outw(CPU_REG_LW(edx),
+ (CARD16 *)LIN_PREF_SI,
+ CPU_REG_LW(eflags)&DF,
+ (is_rep? LWECX:1));
+ }
+ if (is_rep) LWECX = 0;
+ CPU_REG_LW(eip)++;
+ break;
+
+ case 0xe5: /* inw xx, inl xx */
+ if (prefix66) CPU_REG(eax) = P.inl((int) csp[1]);
+ else CPU_REG_LW(eax) = P.inw((int) csp[1]);
+ CPU_REG_LW(eip) += 2;
+ break;
+ case 0xe4: /* inb xx */
+ CPU_REG_LW(eax) &= ~(CARD32)0xff;
+ CPU_REG_LB(ax) |= P.inb((int) csp[1]);
+ CPU_REG_LW(eip) += 2;
+ break;
+ case 0xed: /* inw dx, inl dx */
+ if (prefix66) CPU_REG(eax) = P.inl(CPU_REG_LW(edx));
+ else CPU_REG_LW(eax) = P.inw(CPU_REG_LW(edx));
+ CPU_REG_LW(eip) += 1;
+ break;
+ case 0xec: /* inb dx */
+ CPU_REG_LW(eax) &= ~(CARD32)0xff;
+ CPU_REG_LB(ax) |= P.inb(CPU_REG_LW(edx));
+ CPU_REG_LW(eip) += 1;
+ break;
+
+ case 0xe7: /* outw xx */
+ if (prefix66) P.outl((int)csp[1], CPU_REG(eax));
+ else P.outw((int)csp[1], CPU_REG_LW(eax));
+ CPU_REG_LW(eip) += 2;
+ break;
+ case 0xe6: /* outb xx */
+ P.outb((int) csp[1], CPU_REG_LB(ax));
+ CPU_REG_LW(eip) += 2;
+ break;
+ case 0xef: /* outw dx */
+ if (prefix66) P.outl(CPU_REG_LW(edx), CPU_REG(eax));
+ else P.outw(CPU_REG_LW(edx), CPU_REG_LW(eax));
+ CPU_REG_LW(eip) += 1;
+ break;
+ case 0xee: /* outb dx */
+ P.outb(CPU_REG_LW(edx), CPU_REG_LB(ax));
+ CPU_REG_LW(eip) += 1;
+ break;
+
+ case 0xf4:
+#ifdef V86BIOS_DEBUG
+ printf("hlt at %p\n", lina);
+#endif
+ return 0;
+
+ case 0x0f:
+ fprintf(stderr,"CPU 0x0f Trap at eip=0x%lx\n",CPU_REG(eip));
+ goto op0ferr;
+ break;
+
+ case 0xf0: /* lock */
+ default:
+ fprintf(stderr,"unknown reason for exception\n");
+ dump_registers();
+ stack_trace();
+ op0ferr:
+ dump_code();
+ fprintf(stderr,"cannot continue\n");
+ return 0;
+ } /* end of switch() */
+ return 1;
+}
+
+static int
+vm86_do_int(int num)
+{
+ int val;
+ struct regs86 regs;
+
+ i_printf("int 0x%x received: ax:0x%lx",num,CPU_REG(eax));
+ if (Config.PrintIp)
+ i_printf(" at: 0x%x\n",getIP());
+ else
+ i_printf("\n");
+
+ /* try to run bios interrupt */
+
+ /* if not installed fall back */
+#define COPY(x) regs.##x = CPU_REG(x)
+#define COPY_R(x) CPU_REG(x) = regs.##x
+
+ COPY(eax);
+ COPY(ebx);
+ COPY(ecx);
+ COPY(edx);
+ COPY(esi);
+ COPY(edi);
+ COPY(ebp);
+ COPY(eip);
+ COPY(esp);
+ COPY(cs);
+ COPY(ss);
+ COPY(ds);
+ COPY(es);
+ COPY(fs);
+ COPY(gs);
+ COPY(eflags);
+
+ if (!(val = int_handler(num,®s)))
+ if (!(val = run_bios_int(num,®s)))
+ return val;
+
+ COPY_R(eax);
+ COPY_R(ebx);
+ COPY_R(ecx);
+ COPY_R(edx);
+ COPY_R(esi);
+ COPY_R(edi);
+ COPY_R(ebp);
+ COPY_R(eip);
+ COPY_R(esp);
+ COPY_R(cs);
+ COPY_R(ss);
+ COPY_R(ds);
+ COPY_R(es);
+ COPY_R(fs);
+ COPY_R(gs);
+ COPY_R(eflags);
+
+ return val;
+#undef COPY
+#undef COPY_R
+}
+
+static void
+dump_code(void)
+{
+ int i;
+ unsigned char *lina = SEG_ADR((unsigned char *), cs, ip);
+
+ fprintf(stderr,"code at 0x%8.8x: ",(CARD32)lina);
+ for (i=0; i<0x10; i++)
+ fprintf(stderr,"%2.2x ",*(lina + i));
+ fprintf(stderr,"\n ");
+ for (; i<0x20; i++)
+ fprintf(stderr,"%2.2x ",*(lina + i));
+ fprintf(stderr,"\n");
+}
+
+#define PRINT(x) fprintf(stderr,#x":%4.4x ",CPU_REG_LW(x))
+#define PRINT_FLAGS(x) fprintf(stderr,#x":%8.8x ",CPU_REG_LW(x))
+static void
+dump_registers(void)
+{
+ PRINT(eip);
+ PRINT(eax);
+ PRINT(ebx);
+ PRINT(ecx);
+ PRINT(edx);
+ PRINT(esi);
+ PRINT(edi);
+ PRINT(ebp);
+ fprintf(stderr,"\n");
+ PRINT(esp);
+ PRINT(cs);
+ PRINT(ss);
+ PRINT(es);
+ PRINT(ds);
+ PRINT(fs);
+ PRINT(gs);
+ PRINT_FLAGS(eflags);
+ fprintf(stderr,"\n");
+}
+
+static void
+stack_trace(void)
+{
+ int i;
+ unsigned char *stack = SEG_ADR((unsigned char *), ss, sp);
+
+ fprintf(stderr,"stack at 0x%8.8lx:\n",(unsigned long)stack);
+ for (i=0; i < 0x10; i++)
+ fprintf(stderr,"%2.2x ",*(stack + i));
+ fprintf(stderr,"\n");
+
+}
+
+static int
+vm86_rep(struct vm86_struct *ptr)
+{
+
+ int __res;
+
+ __asm__ __volatile__("int $0x80\n"
+ :"=a" (__res):"a" ((int)113),
+ "b" ((struct vm86_struct *)ptr));
+
+ if ((__res) < 0) {
+ errno = -__res;
+ __res=-1;
+ }
+ else errno = 0;
+ return __res;
+}
+
+#define pushw(base, ptr, val) \
+__asm__ __volatile__( \
+ "decw %w0\n\t" \
+ "movb %h2,(%1,%0)\n\t" \
+ "decw %w0\n\t" \
+ "movb %b2,(%1,%0)" \
+ : "=r" (ptr) \
+ : "r" (base), "q" (val), "0" (ptr))
+
+int
+run_bios_int(int num, struct regs86 *regs)
+{
+ CARD16 *ssp;
+ CARD32 sp;
+ CARD32 eflags;
+
+#ifdef V86BIOS_DEBUG
+ static int firsttime = 1;
+#endif
+ /* check if bios vector is initialized */
+ if (((CARD16*)0)[(num<<1)+1] == 0x0000) { /* SYS_BIOS_SEG ?*/
+#ifdef V86BIOS_DEBUG
+ i_printf("card BIOS not loaded\n");
+#endif
+ return 0;
+ }
+
+#ifdef V86BIOS_DEBUG
+ if (firsttime) {
+ dprint(0,0x3D0);
+ firsttime = 0;
+ }
+#endif
+
+ i_printf("calling card BIOS at: ");
+ ssp = (CARD16*)(CPU_REG(ss)<<4);
+ sp = (CARD32) CPU_REG_LW(esp);
+
+ eflags = regs->eflags;
+ eflags = ((eflags & VIF_MASK) != 0)
+ ? (eflags | IF_MASK) : (eflags & ~(CARD32) IF_MASK);
+ pushw(ssp, sp, eflags);
+ pushw(ssp, sp, regs->cs);
+ pushw(ssp, sp, (CARD16)regs->eip);
+ regs->esp -= 6;
+ regs->cs = ((CARD16 *) 0)[(num << 1) + 1];
+ regs->eip = (regs->eip & 0xFFFF0000) | ((CARD16 *) 0)[num << 1];
+ i_printf("0x%x:%lx\n",regs->cs,regs->eip);
+#ifdef V86BIOS_DEBUG
+ dump_code();
+#endif
+ regs->eflags = regs->eflags
+ & ~(VIF_MASK | TF_MASK | IF_MASK | NT_MASK);
+ return 1;
+}
+
+CARD32
+getIntVect(int num)
+{
+ return ((CARD32*)0)[num];
+}
+
+CARD32
+getIP(void)
+{
+ return (CPU_REG(cs) << 4) + CPU_REG(eip);
+}
diff --git a/board/MAI/bios_emulator/scitech/src/v86bios/v86bios.c b/board/MAI/bios_emulator/scitech/src/v86bios/v86bios.c
new file mode 100644
index 00000000000..7a3fb36655e
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/v86bios/v86bios.c
@@ -0,0 +1,933 @@
+/*
+ * Copyright 1999 Egbert Eich
+ *
+ * Permission to use, copy, modify, distribute, and sell this software and its
+ * documentation for any purpose is hereby granted without fee, provided that
+ * the above copyright notice appear in all copies and that both that
+ * copyright notice and this permission notice appear in supporting
+ * documentation, and that the name of the authors not be used in
+ * advertising or publicity pertaining to distribution of the software without
+ * specific, written prior permission. The authors makes no representations
+ * about the suitability of this software for any purpose. It is provided
+ * "as is" without express or implied warranty.
+ *
+ * THE AUTHORS DISCLAIMS ALL WARRANTIES WITH REGARD TO THIS SOFTWARE,
+ * INCLUDING ALL IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS, IN NO
+ * EVENT SHALL THE AUTHORS BE LIABLE FOR ANY SPECIAL, INDIRECT OR
+ * CONSEQUENTIAL DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF USE,
+ * DATA OR PROFITS, WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE OR OTHER
+ * TORTIOUS ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE OR
+ * PERFORMANCE OF THIS SOFTWARE.
+ */
+#define DELETE
+#include <unistd.h>
+#include <fcntl.h>
+#include <stdio.h>
+#include <sys/mman.h>
+#include <sys/types.h>
+#include <string.h>
+#include <stdlib.h>
+#include <signal.h>
+#include <sys/stat.h>
+#include <readline/readline.h>
+#include <readline/history.h>
+#if defined(__alpha__) || defined (__ia64__)
+#include <sys/io.h>
+#elif defined(HAVE_SYS_PERM)
+#include <sys/perm.h>
+#endif
+#include "debug.h"
+#include "v86bios.h"
+#include "pci.h"
+#include "AsmMacros.h"
+
+#define SIZE 0x100000
+#define VRAM_START 0xA0000
+#define VRAM_SIZE 0x1FFFF
+#define V_BIOS_SIZE 0x1FFFF
+#define BIOS_START 0x7C00 /* default BIOS entry */
+#define BIOS_MEM 0x600
+
+//CARD8 code[] = { 0xb8 , 0xf0 , 0xf0, 0xf4 };
+#define VB_X(x) (V_BIOS >> x) & 0xFF
+CARD8 code[] = { 6, 0x9a, 0x03, 0x00, 0x00, VB_X(12), 0xf4 };
+//CARD8 code[] = { 0x9a, 0x03, 0x00, 0x00, VB_X(12), 0xb8, 0x03, 0x00,
+//0xcd, 0x10, 0xf4 };
+//CARD8 code[] = { 0xb8 , 0xf0 , 0xf0 ,0xf4 };
+
+int ioperm_list[IOPERM_BITS] = {0,};
+
+static void sig_handler(int);
+static int map(void);
+static void unmap(void);
+static void bootBIOS(CARD16 ax);
+static int map_vram(void);
+static void unmap_vram(void);
+static int copy_vbios(memType v_base);
+static int copy_sys_bios(void);
+static void save_bios_to_file(void);
+static int setup_system_bios(void);
+static CARD32 setup_int_vect(void);
+#ifdef __ia32__
+static CARD32 setup_primary_int_vect(void);
+#endif
+static int chksum(CARD8 *start);
+static void setup_bios_regs(i86biosRegsPtr regs, CARD32 ax);
+static void print_regs(i86biosRegsPtr regs);
+static void print_usage(void);
+static void set_hlt(Bool set);
+static void set_ioperm(void);
+
+extern void yyparse();
+
+void loadCodeToMem(unsigned char *ptr, CARD8 *code);
+void dprint(unsigned long start, unsigned long size);
+
+static int vram_mapped = 0;
+static char* bios_var = NULL;
+static CARD8 save_msr;
+static CARD8 save_pos102;
+static CARD8 save_vse;
+static CARD8 save_46e8;
+static haltpoints hltp[20] = { {0, 0}, };
+
+console Console = {-1,-1};
+struct config Config;
+
+int main(int argc,char **argv)
+{
+ int c;
+
+ Config.PrintPort = PRINT_PORT;
+ Config.IoStatistics = IO_STATISTICS;
+ Config.PrintIrq = PRINT_IRQ;
+ Config.PrintPci = PRINT_PCI;
+ Config.ShowAllDev = SHOW_ALL_DEV;
+ Config.PrintIp = PRINT_IP;
+ Config.SaveBios = SAVE_BIOS;
+ Config.Trace = TRACE;
+ Config.ConfigActiveOnly = CONFIG_ACTIVE_ONLY; /* boot */
+ Config.ConfigActiveDevice = CONFIG_ACTIVE_DEVICE; /* boot */
+ Config.MapSysBios = MAP_SYS_BIOS;
+ Config.Resort = RESORT; /* boot */
+ Config.FixRom = FIX_ROM;
+ Config.NoConsole = NO_CONSOLE;
+ Config.BootOnly = FALSE;
+ Config.Verbose = VERBOSE;
+
+ opterr = 0;
+ while ((c = getopt(argc,argv,"psicaPStAdbrfnv:?")) != EOF) {
+ switch(c) {
+ case 'p':
+ Config.PrintPort = TRUE;
+ break;
+ case 's':
+ Config.IoStatistics = TRUE;
+ break;
+ case 'i':
+ Config.PrintIrq = TRUE;
+ break;
+ case 'c':
+ Config.PrintPci = TRUE;
+ break;
+ case 'a':
+ Config.ShowAllDev = TRUE;
+ break;
+ case 'P':
+ Config.PrintIp = TRUE;
+ break;
+ case 'S':
+ Config.SaveBios = TRUE;
+ break;
+ case 't':
+ Config.Trace = TRUE;
+ break;
+ case 'A':
+ Config.ConfigActiveOnly = TRUE;
+ break;
+ case 'd':
+ Config.ConfigActiveDevice = TRUE;
+ break;
+ case 'b':
+ Config.MapSysBios = TRUE;
+ break;
+ case 'r':
+ Config.Resort = TRUE;
+ break;
+ case 'f':
+ Config.FixRom = TRUE;
+ break;
+ case 'n':
+ Config.NoConsole = TRUE;
+ break;
+ case 'v':
+ Config.Verbose = strtol(optarg,NULL,0);
+ break;
+ case '?':
+ print_usage();
+ break;
+ default:
+ break;
+ }
+ }
+
+
+ if (!map())
+ exit(1);
+
+ if (!setup_system_bios())
+ exit(1);
+
+ iopl(3);
+
+ scan_pci();
+
+ save_msr = inb(0x3CC);
+ save_vse = inb(0x3C3);
+ save_46e8 = inb(0x46e8);
+ save_pos102 = inb(0x102);
+
+ if (Config.BootOnly) {
+
+ if (!CurrentPci && !Config.ConfigActiveDevice
+ && !Config.ConfigActiveOnly) {
+ iopl(0);
+ unmap();
+ exit (1);
+ }
+ call_boot(NULL);
+ } else {
+ using_history();
+ yyparse();
+ }
+
+ unmap();
+
+ pciVideoRestore();
+
+ outb(0x102, save_pos102);
+ outb(0x46e8, save_46e8);
+ outb(0x3C3, save_vse);
+ outb(0x3C2, save_msr);
+
+ iopl(0);
+
+ close_console(Console);
+
+ exit(0);
+}
+
+
+void
+call_boot(struct device *dev)
+{
+ int Active_is_Pci = 0;
+ CARD32 vbios_base;
+
+ CurrentPci = PciList;
+ Console = open_console();
+
+ set_ioperm();
+
+
+ signal(2,sig_handler);
+ signal(11,sig_handler);
+
+ /* disable primary card */
+ pciVideoRestore(); /* reset PCI state to see primary card */
+ outb(0x3C2,~(CARD8)0x03 & save_msr);
+ outb(0x3C3,~(CARD8)0x01 & save_vse);
+ outb(0x46e8, ~(CARD8)0x08 & save_46e8);
+ outb(0x102, ~(CARD8)0x01 & save_pos102);
+
+ pciVideoDisable();
+
+ while (CurrentPci) {
+ CARD16 ax;
+
+ if (CurrentPci->active) {
+ Active_is_Pci = 1;
+ if (!Config.ConfigActiveDevice && !dev) {
+ CurrentPci = CurrentPci->next;
+ continue;
+ }
+ } else if (Config.ConfigActiveOnly && !dev) {
+ CurrentPci = CurrentPci->next;
+ continue;
+ }
+ if (dev && ((dev->type != PCI)
+ || (dev->type == PCI
+ && (dev->loc.pci.dev != CurrentPci->dev
+ || dev->loc.pci.bus != CurrentPci->bus
+ || dev->loc.pci.func != CurrentPci->func)))) {
+ CurrentPci = CurrentPci->next;
+ continue;
+ }
+
+ EnableCurrent();
+
+ if (CurrentPci->active) {
+ outb(0x102, save_pos102);
+ outb(0x46e8, save_46e8);
+ outb(0x3C3, save_vse);
+ outb(0x3C2, save_msr);
+ }
+
+ /* clear interrupt vectors */
+#ifdef __ia32__
+ vbios_base = CurrentPci->active ? setup_primary_int_vect()
+ : setup_int_vect();
+#else
+ vbios_base = setup_int_vect();
+#endif
+ ax = ((CARD16)(CurrentPci->bus) << 8)
+ | (CurrentPci->dev << 3) | (CurrentPci->func & 0x7);
+ if (Config.Verbose > 1) P_printf("ax: 0x%x\n",ax);
+
+ BootBios = findPciByIDs(CurrentPci->bus,CurrentPci->dev,
+ CurrentPci->func);
+ if (!((mapPciRom(BootBios) && chksum((CARD8*)V_BIOS))
+ || (CurrentPci->active && copy_vbios(vbios_base)))) {
+ CurrentPci = CurrentPci->next;
+ continue;
+ }
+ if (!map_vram()) {
+ CurrentPci = CurrentPci->next;
+ continue;
+ }
+ if (Config.SaveBios) save_bios_to_file();
+ printf("initializing PCI bus: %i dev: %i func: %i\n",CurrentPci->bus,
+ CurrentPci->dev,CurrentPci->func);
+ bootBIOS(ax);
+ unmap_vram();
+
+ if (CurrentPci->active)
+ close_console(Console);
+
+ if (dev) return;
+
+ CurrentPci = CurrentPci->next;
+ }
+
+ /* We have an ISA device - configure if requested */
+ if (!Active_is_Pci /* no isa card in system! */
+ && ((!dev && (Config.ConfigActiveDevice || Config.ConfigActiveOnly))
+ || (dev && dev->type == ISA))) {
+
+ pciVideoDisable();
+
+ if (!dev || dev->type == ISA) {
+ outb(0x102, save_pos102);
+ outb(0x46e8, save_46e8);
+ outb(0x3C3, save_vse);
+ outb(0x3C2, save_msr);
+
+#ifdef __ia32__
+ vbios_base = setup_primary_int_vect();
+#else
+ vbios_base = setup_int_vect();
+#endif
+ if (copy_vbios(vbios_base)) {
+
+ if (Config.SaveBios) save_bios_to_file();
+ if (map_vram()) {
+ printf("initializing ISA bus\n");
+ bootBIOS(0);
+ }
+ }
+
+ unmap_vram();
+ sleep(1);
+ close_console(Console);
+ }
+ }
+
+
+}
+
+int
+map(void)
+{
+ void* mem;
+ mem = mmap(0, (size_t)SIZE,
+ PROT_EXEC | PROT_READ | PROT_WRITE,
+ MAP_FIXED | MAP_PRIVATE | MAP_ANON,
+ -1, 0 );
+ if (mem != 0) {
+ perror("anonymous map");
+ return (0);
+ }
+ memset(mem,0,SIZE);
+
+ return (1);
+}
+
+static void
+unmap(void)
+{
+ munmap(0,SIZE);
+}
+
+static void
+bootBIOS(CARD16 ax)
+{
+ i86biosRegs bRegs;
+#ifdef V86BIOS_DEBUG
+ printf("starting BIOS\n");
+#endif
+ setup_io();
+ setup_bios_regs(&bRegs, ax);
+ loadCodeToMem((unsigned char *) BIOS_START, code);
+ do_x86(BIOS_START,&bRegs);
+#ifdef V86BIOS_DEBUG
+ printf("done\n");
+#endif
+}
+
+static int
+map_vram(void)
+{
+ int mem_fd;
+
+#ifdef __ia64__
+ if ((mem_fd = open(MEM_FILE,O_RDWR | O_SYNC))<0)
+#else
+ if ((mem_fd = open(MEM_FILE,O_RDWR))<0)
+#endif
+ {
+ perror("opening memory");
+ return 0;
+ }
+
+#ifdef __alpha__
+ if (!_bus_base()) sparse_shift = 7; /* Uh, oh, JENSEN... */
+ if (!_bus_base_sparse()) sparse_shift = 0;
+ if ((vram_map = mmap(0,(size_t) (VRAM_SIZE << sparse_shift),
+ PROT_READ | PROT_WRITE,
+ MAP_SHARED,
+ mem_fd, (VRAM_START << sparse_shift)
+ | _bus_base_sparse())) == (void *) -1)
+#else
+ if (mmap((void *) VRAM_START, (size_t) VRAM_SIZE,
+ PROT_EXEC | PROT_READ | PROT_WRITE, MAP_SHARED | MAP_FIXED,
+ mem_fd, VRAM_START) == (void *) -1)
+#endif
+ {
+ perror("mmap error in map_hardware_ram (1)");
+ close(mem_fd);
+ return (0);
+ }
+ vram_mapped = 1;
+ close(mem_fd);
+ return (1);
+}
+
+static void
+unmap_vram(void)
+{
+ if (!vram_mapped) return;
+
+ munmap((void*)VRAM_START,VRAM_SIZE);
+ vram_mapped = 0;
+}
+
+static int
+copy_vbios(memType v_base)
+{
+ int mem_fd;
+ unsigned char *tmp;
+ int size;
+
+ if ((mem_fd = open(MEM_FILE,O_RDONLY))<0) {
+ perror("opening memory");
+ return (0);
+ }
+
+ if (lseek(mem_fd,(off_t) v_base, SEEK_SET) != (off_t) v_base) {
+ fprintf(stderr,"Cannot lseek\n");
+ goto Error;
+ }
+ tmp = (unsigned char *)malloc(3);
+ if (read(mem_fd, (char *)tmp, (size_t) 3) != (size_t) 3) {
+ fprintf(stderr,"Cannot read\n");
+ goto Error;
+ }
+ if (lseek(mem_fd,(off_t) v_base,SEEK_SET) != (off_t) v_base)
+ goto Error;
+
+ if (*tmp != 0x55 || *(tmp+1) != 0xAA ) {
+ fprintf(stderr,"No bios found at: 0x%lx\n",v_base);
+ goto Error;
+ }
+#ifdef DEBUG
+ dprint((unsigned long)tmp,0x100);
+#endif
+ size = *(tmp+2) * 512;
+
+ if (read(mem_fd, (char *)v_base, (size_t) size) != (size_t) size) {
+ fprintf(stderr,"Cannot read\n");
+ goto Error;
+ }
+ free(tmp);
+ close(mem_fd);
+ if (!chksum((CARD8*)v_base))
+ return (0);
+
+ return (1);
+
+Error:
+ perror("v_bios");
+ close(mem_fd);
+ return (0);
+}
+
+static int
+copy_sys_bios(void)
+{
+#define SYS_BIOS 0xF0000
+ int mem_fd;
+
+ if ((mem_fd = open(MEM_FILE,O_RDONLY))<0) {
+ perror("opening memory");
+ return (0);
+ }
+
+ if (lseek(mem_fd,(off_t) SYS_BIOS,SEEK_SET) != (off_t) SYS_BIOS)
+ goto Error;
+ if (read(mem_fd, (char *)SYS_BIOS, (size_t) 0xFFFF) != (size_t) 0xFFFF)
+ goto Error;
+
+ close(mem_fd);
+ return (1);
+
+Error:
+ perror("sys_bios");
+ close(mem_fd);
+ return (0);
+}
+
+void
+loadCodeToMem(unsigned char *ptr, CARD8 code[])
+{
+ int i;
+ CARD8 val;
+ int size = code[0];
+
+ for ( i=1;i<=size;i++) {
+ val = code[i];
+ *ptr++ = val;
+ }
+ return;
+}
+
+void
+dprint(unsigned long start, unsigned long size)
+{
+ int i,j;
+ char *c = (char *)start;
+
+ for (j = 0; j < (size >> 4); j++) {
+ char *d = c;
+ printf("\n0x%lx: ",(unsigned long)c);
+ for (i = 0; i<16; i++)
+ printf("%2.2x ",(unsigned char) (*(c++)));
+ c = d;
+ for (i = 0; i<16; i++) {
+ printf("%c",((((CARD8)(*c)) > 32) && (((CARD8)(*c)) < 128)) ?
+ (unsigned char) (*(c)): '.');
+ c++;
+ }
+ }
+ printf("\n");
+}
+
+static void
+save_bios_to_file(void)
+{
+ static int num = 0;
+ int size, count;
+ char file_name[256];
+ int fd;
+
+ sprintf(file_name,"bios_%i.fil",num);
+ if ((fd = open(file_name,O_WRONLY | O_CREAT | O_TRUNC,00644)) == -1)
+ return;
+ size = (*(unsigned char*)(V_BIOS + 2)) * 512;
+#ifdef V86BIOS_DEBUG
+ dprint(V_BIOS,20);
+#endif
+ if ((count = write(fd,(void *)(V_BIOS),size)) != size)
+ fprintf(stderr,"only saved %i of %i bytes\n",size,count);
+ num++;
+}
+
+static void
+sig_handler(int unused)
+{
+ fflush(stdout);
+ fflush(stderr);
+
+ /* put system back in a save state */
+ unmap_vram();
+ pciVideoRestore();
+ outb(0x102, save_pos102);
+ outb(0x46e8, save_46e8);
+ outb(0x3C3, save_vse);
+ outb(0x3C2, save_msr);
+
+ close_console(Console);
+ iopl(0);
+ unmap();
+
+ exit(1);
+}
+
+/*
+ * For initialization we just pass ax to the BIOS.
+ * PCI BIOSes need this. All other register are set 0.
+ */
+static void setup_bios_regs(i86biosRegsPtr regs, CARD32 ax)
+{
+ regs->ax = ax;
+ regs->bx = 0;
+ regs->cx = 0;
+ regs->dx = 0;
+ regs->es = 0;
+ regs->ds = 0x40; /* standard pc ds */
+ regs->si = 0;
+ regs->di = 0;
+}
+
+/*
+ * here we are really paranoid about faking a "real"
+ * BIOS. Most of this information was pulled from
+ * dosem.
+ */
+
+#ifdef __ia32__
+static CARD32
+setup_primary_int_vect(void)
+{
+ int mem_fd;
+ CARD32 vbase;
+ void *map;
+
+ if ((mem_fd = open(MEM_FILE,O_RDWR))<0)
+ {
+ perror("opening memory");
+ return (0);
+ }
+
+ if ((map = mmap((void *) 0, (size_t) 0x2000,
+ PROT_EXEC | PROT_READ | PROT_WRITE, MAP_SHARED,
+ mem_fd, 0)) == (void *)-1) {
+ perror("mmap error in map_hardware_ram (2)");
+ close(mem_fd);
+ return (0);
+ }
+
+ close(mem_fd);
+ memcpy(0,map,BIOS_MEM);
+ munmap(map,0x2000);
+ /*
+ * create a backup copy of the bios variables to write back the
+ * modified values
+ */
+ if (!bios_var)
+ bios_var = (char *)malloc(BIOS_MEM);
+ memcpy(bios_var,0,BIOS_MEM);
+
+ vbase = (*((CARD16*)(0x10 << 2) + 1)) << 4;
+ if (Config.Verbose > 0) printf("vbase: 0x%x\n",vbase);
+ return vbase;
+}
+#endif
+
+static CARD32
+setup_int_vect(void)
+{
+ const CARD16 cs = 0x0;
+ const CARD16 ip = 0x0;
+ int i;
+
+ /* let the int vects point to the SYS_BIOS seg */
+ for (i=0; i<0x80; i++) {
+ ((CARD16*)0)[i<<1] = ip;
+ ((CARD16*)0)[(i<<1)+1] = cs;
+ }
+ /* video interrupts default location */
+ ((CARD16*)0)[(0x42<<1)+1] = 0xf000;
+ ((CARD16*)0)[0x42<<1] = 0xf065;
+ ((CARD16*)0)[(0x10<<1)+1] = 0xf000;
+ ((CARD16*)0)[0x10<<1] = 0xf065;
+ /* video param table default location (int 1d) */
+ ((CARD16*)0)[(0x1d<<1)+1] = 0xf000;
+ ((CARD16*)0)[0x1d<<1] = 0xf0A4;
+ /* font tables default location (int 1F) */
+ ((CARD16*)0)[(0x1f<<1)+1] = 0xf000;
+ ((CARD16*)0)[0x1f<<1] = 0xfa6e;
+
+ /* int 11 default location */
+ ((CARD16*)0)[(0x11<<1)+1] = 0xf000;
+ ((CARD16*)0)[0x11<<1] = 0xf84d;
+ /* int 12 default location */
+ ((CARD16*)0)[(0x12<<1)+1] = 0xf000;
+ ((CARD16*)0)[0x12<<1] = 0xf841;
+ /* int 15 default location */
+ ((CARD16*)0)[(0x15<<1)+1] = 0xf000;
+ ((CARD16*)0)[0x15<<1] = 0xf859;
+ /* int 1A default location */
+ ((CARD16*)0)[(0x1a<<1)+1] = 0xf000;
+ ((CARD16*)0)[0x1a<<1] = 0xff6e;
+ /* int 05 default location */
+ ((CARD16*)0)[(0x05<<1)+1] = 0xf000;
+ ((CARD16*)0)[0x05<<1] = 0xff54;
+ /* int 08 default location */
+ ((CARD16*)0)[(0x8<<1)+1] = 0xf000;
+ ((CARD16*)0)[0x8<<1] = 0xfea5;
+ /* int 13 default location (fdd) */
+ ((CARD16*)0)[(0x13<<1)+1] = 0xf000;
+ ((CARD16*)0)[0x13<<1] = 0xec59;
+ /* int 0E default location */
+ ((CARD16*)0)[(0xe<<1)+1] = 0xf000;
+ ((CARD16*)0)[0xe<<1] = 0xef57;
+ /* int 17 default location */
+ ((CARD16*)0)[(0x17<<1)+1] = 0xf000;
+ ((CARD16*)0)[0x17<<1] = 0xefd2;
+ /* fdd table default location (int 1e) */
+ ((CARD16*)0)[(0x1e<<1)+1] = 0xf000;
+ ((CARD16*)0)[0x1e<<1] = 0xefc7;
+ return V_BIOS;
+}
+
+static int
+setup_system_bios(void)
+{
+ char *date = "06/01/99";
+ char *eisa_ident = "PCI/ISA";
+
+ if (Config.MapSysBios) {
+
+ if (!copy_sys_bios()) return 0;
+ return 1;
+
+ } else {
+
+// memset((void *)0xF0000,0xf4,0xfff7);
+
+ /*
+ * we trap the "industry standard entry points" to the BIOS
+ * and all other locations by filling them with "hlt"
+ * TODO: implement hlt-handler for these
+ */
+ memset((void *)0xF0000,0xf4,0x10000);
+
+ /*
+ * TODO: we should copy the fdd table (0xfec59-0xfec5b)
+ * the video parameter table (0xf0ac-0xf0fb)
+ * and the font tables (0xfa6e-0xfe6d)
+ * from the original bios here
+ */
+
+ /* set bios date */
+ strcpy((char *)0xFFFF5,date);
+ /* set up eisa ident string */
+ strcpy((char *)0xFFFD9,eisa_ident);
+ /* write system model id for IBM-AT */
+ ((char *)0)[0xFFFFE] = 0xfc;
+
+ return 1;
+ }
+
+}
+
+static void
+update_bios_vars(void)
+{
+ int mem_fd;
+ void *map;
+ memType i;
+
+#ifdef __ia64__
+ if ((mem_fd = open(MEM_FILE,O_RDWR | O_SYNC))<0)
+#else
+ if ((mem_fd = open(MEM_FILE,O_RDWR))<0)
+#endif
+ {
+ perror("opening memory");
+ return;
+ }
+
+ if ((map = mmap((void *) 0, (size_t) 0x2000,
+ PROT_EXEC | PROT_READ | PROT_WRITE, MAP_SHARED,
+ mem_fd, 0)) == (void *)-1) {
+ perror("mmap error in map_hardware_ram (3)");
+ close(mem_fd);
+ return;
+ }
+
+ for (i = 0; i < BIOS_MEM; i++) {
+ if (bios_var[i] != *(CARD8*)i)
+ *((CARD8*)map + i) = *(CARD8*)i;
+ }
+
+ munmap(map,0x2000);
+ close(mem_fd);
+}
+
+static int
+chksum(CARD8 *start)
+{
+ CARD16 size;
+ CARD8 val = 0;
+ int i;
+
+ size = *(start+2) * 512;
+ for (i = 0; i<size; i++)
+ val += *(start + i);
+
+ if (!val)
+ return 1;
+
+ fprintf(stderr,"BIOS cksum wrong!\n");
+ return 0;
+}
+
+void
+runINT(int num, i86biosRegsPtr Regs)
+{
+ Bool isVideo = FALSE;
+ CARD8 code_int[] = { 3, 0xcd, 0x00, 0xf4 };
+
+ code_int[2] = (CARD8) num;
+
+ if (num == 0x10)
+ isVideo = TRUE;
+
+ if (!setup_system_bios())
+ return;
+
+ if ((isVideo && (!CurrentPci || CurrentPci->active)) || !isVideo) {
+ CARD32 vbios_base;
+
+#ifdef __ia32__
+ if (!(vbios_base = setup_primary_int_vect()))
+#else
+ if (!(vbios_base = setup_int_vect()))
+#endif
+ return;
+ if (!copy_vbios(vbios_base))
+ return;
+ }
+
+ if (!map_vram())
+ return;
+
+#ifdef V86BIOS_DEBUG
+ printf("starting BIOS\n");
+#endif
+ loadCodeToMem((unsigned char *) BIOS_START, code_int);
+ setup_io();
+ print_regs(Regs);
+ set_ioperm();
+ set_hlt(TRUE);
+ do_x86(BIOS_START,Regs);
+ set_hlt(FALSE);
+ print_regs(Regs);
+
+#ifdef V86BIOS_DEBUG
+ printf("done\n");
+#endif
+
+ if ((isVideo && (!CurrentPci || CurrentPci->active)) || !isVideo)
+ update_bios_vars();
+}
+
+static void
+print_regs(i86biosRegsPtr regs)
+{
+ printf("ax=%x bx=%x cx=%x dx=%x ds=%x es=%x di=%x si=%x\n",
+ (CARD16)regs->ax,(CARD16)regs->bx,(CARD16)regs->cx,(CARD16)regs->dx,
+ (CARD16)regs->ds,(CARD16)regs->es,(CARD16)regs->di,
+ (CARD16)regs->si);
+}
+
+static void
+print_usage(void)
+{
+}
+
+void
+add_hlt(unsigned long val)
+{
+ int i;
+
+ if (val < BIOS_MEM || (val > VRAM_START && val < (VRAM_START + VRAM_SIZE))
+ || val >= SIZE) {
+ printf("address out of range\n");
+ return;
+ }
+
+ for (i=0; i<20; i++) {
+ if (hltp[i].address == 0) {
+ hltp[i].address = (void*)val;
+ break;
+ }
+ }
+ if (i == 20) printf("no more hltpoints available\n");
+}
+
+void
+del_hlt(int val)
+{
+ if (val == 21) { /* delete all */
+ int i;
+ printf("clearing all hltpoints\n");
+ for (i=0; i <20; i++)
+ hltp[i].address = NULL;
+ } else if (val >= 0 && val <20)
+ hltp[val].address = NULL;
+ else printf("hltpoint %i out of range: valid range 0-19\n",val);
+}
+
+void
+list_hlt()
+{
+ int i;
+ for (i=0; i<20; i++)
+ if (hltp[i].address)
+ printf("hltpoint[%i]: 0x%lx\n",i,(unsigned long)hltp[i].address);
+}
+
+static void
+set_hlt(Bool set)
+{
+ int i;
+ for (i=0; i<20; i++)
+ if (hltp[i].address) {
+ if (set) {
+ hltp[i].orgval = *(CARD8*)hltp[i].address;
+ *(CARD8*)hltp[i].address = 0xf4;
+ } else
+ *(CARD8*)hltp[i].address = hltp[i].orgval;
+ }
+}
+
+static void
+set_ioperm(void)
+{
+ int i, start;
+
+ ioperm(0,IOPERM_BITS,0);
+
+ for (i = 0; i < IOPERM_BITS;i++)
+ if (ioperm_list[i]) {
+ start = i;
+ for (;i < IOPERM_BITS; i++) {
+ if (!ioperm_list[i]) {
+ ioperm(start,i - start, 1);
+ break;
+ }
+ }
+ }
+}
diff --git a/board/MAI/bios_emulator/scitech/src/v86bios/v86bios.h b/board/MAI/bios_emulator/scitech/src/v86bios/v86bios.h
new file mode 100644
index 00000000000..06d0f9ff52c
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/v86bios/v86bios.h
@@ -0,0 +1,215 @@
+/*
+ * Copyright 1999 Egbert Eich
+ *
+ * Permission to use, copy, modify, distribute, and sell this software and its
+ * documentation for any purpose is hereby granted without fee, provided that
+ * the above copyright notice appear in all copies and that both that
+ * copyright notice and this permission notice appear in supporting
+ * documentation, and that the name of the authors not be used in
+ * advertising or publicity pertaining to distribution of the software without
+ * specific, written prior permission. The authors makes no representations
+ * about the suitability of this software for any purpose. It is provided
+ * "as is" without express or implied warranty.
+ *
+ * THE AUTHORS DISCLAIMS ALL WARRANTIES WITH REGARD TO THIS SOFTWARE,
+ * INCLUDING ALL IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS, IN NO
+ * EVENT SHALL THE AUTHORS BE LIABLE FOR ANY SPECIAL, INDIRECT OR
+ * CONSEQUENTIAL DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF USE,
+ * DATA OR PROFITS, WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE OR OTHER
+ * TORTIOUS ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE OR
+ * PERFORMANCE OF THIS SOFTWARE.
+ */
+#ifndef V86_BIOS_H
+#define V86_BIOS_H
+
+#if defined (__i386__) || defined (__i486__) || defined (__i586__) || defined (__i686__) || defined (__k6__)
+# ifndef __ia32__
+# define __ia32__
+# endif
+#endif
+
+#include <stdio.h>
+
+#define p_printf(f,a...) do {if (Config.PrintPort) lprintf(f,##a);} \
+ while(0)
+#define i_printf(f,a...) do {if (Config.PrintIrq) lprintf(f,##a);} \
+ while(0)
+#define P_printf(f,a...) do {if (Config.PrintPci) lprintf(f,##a);} \
+ while(0)
+
+typedef unsigned char CARD8;
+typedef unsigned short CARD16;
+typedef unsigned int CARD32;
+#if defined (__alpha__) || defined (__ia64__)
+typedef unsigned long memType;
+#else
+typedef unsigned int memType;
+#endif
+
+typedef int Bool;
+
+#define FALSE 0
+#define TRUE 1
+
+struct config {
+ Bool PrintPort;
+ Bool IoStatistics;
+ Bool PrintIrq;
+ Bool PrintPci;
+ Bool ShowAllDev;
+ Bool PrintIp;
+ Bool SaveBios;
+ Bool Trace;
+ Bool ConfigActiveOnly;
+ Bool ConfigActiveDevice;
+ Bool MapSysBios;
+ Bool Resort;
+ Bool FixRom;
+ Bool NoConsole;
+ Bool BootOnly;
+ int Verbose;
+};
+
+struct pio {
+ CARD8 (*inb)(CARD16);
+ CARD16 (*inw)(CARD16);
+ CARD32 (*inl)(CARD16);
+ void (*outb)(CARD16,CARD8);
+ void (*outw)(CARD16,CARD16);
+ void (*outl)(CARD16,CARD32);
+};
+
+struct regs86 {
+ long ebx;
+ long ecx;
+ long edx;
+ long esi;
+ long edi;
+ long ebp;
+ long eax;
+ long eip;
+ long esp;
+ unsigned short cs;
+ unsigned short ss;
+ unsigned short es;
+ unsigned short ds;
+ unsigned short fs;
+ unsigned short gs;
+ long eflags;
+};
+
+typedef struct {
+ CARD32 ax;
+ CARD32 bx;
+ CARD32 cx;
+ CARD32 dx;
+ CARD32 cs;
+ CARD32 es;
+ CARD32 ds;
+ CARD32 si;
+ CARD32 di;
+} i86biosRegs, *i86biosRegsPtr;
+
+typedef struct {
+ int fd;
+ int vt;
+} console;
+
+typedef struct {
+ void* address;
+ CARD8 orgval;
+} haltpoints;
+
+enum dev_type { NONE, ISA, PCI };
+struct device {
+ Bool booted;
+ enum dev_type type;
+ union {
+ int none;
+ struct pci {
+ int bus;
+ int dev;
+ int func;
+ } pci;
+ } loc;
+};
+
+extern struct device Device;
+
+#ifdef __alpha__
+unsigned long _bus_base(void);
+extern void* vram_map;
+extern int sparse_shift;
+#endif
+
+extern struct pio P;
+extern struct config Config;
+#define IOPERM_BITS 1024
+extern int ioperm_list[IOPERM_BITS];
+
+extern void setup_io(void);
+extern void do_x86(unsigned long bios_start,i86biosRegsPtr regs);
+extern int run_bios_int(int num, struct regs86 *regs);
+extern CARD32 getIntVect(int num);
+CARD32 getIP(void);
+
+extern void call_boot(struct device *dev);
+extern void runINT(int num,i86biosRegsPtr Regs);
+extern void add_hlt(unsigned long addr);
+extern void del_hlt(int addr);
+extern void list_hlt();
+
+extern int port_rep_inb(CARD16 port, CARD8 *base, int d_f, CARD32 count);
+extern int port_rep_inw(CARD16 port, CARD16 *base, int d_f, CARD32 count);
+extern int port_rep_inl(CARD16 port, CARD32 *base, int d_f, CARD32 count);
+extern int port_rep_outb(CARD16 port, CARD8 *base, int d_f, CARD32 count);
+extern int port_rep_outw(CARD16 port, CARD16 *base, int d_f, CARD32 count);
+extern int port_rep_outl(CARD16 port, CARD32 *base, int d_f, CARD32 count);
+extern CARD8 p_inb(CARD16 port);
+extern CARD16 p_inw(CARD16 port);
+extern CARD32 p_inl(CARD16 port);
+extern void p_outb(CARD16 port, CARD8 val);
+extern void p_outw(CARD16 port, CARD16 val);
+extern void p_outl(CARD16 port, CARD32 val);
+#ifdef __alpha__
+extern CARD8 a_inb(CARD16 port);
+extern CARD16 a_inw(CARD16 port);
+extern void a_outb(CARD16 port, CARD8 val);
+extern void a_outw(CARD16 port, CARD16 val);
+#endif
+#ifdef __alpha__
+CARD8 mem_rb(CARD32 addr);
+CARD16 mem_rw(CARD32 addr);
+CARD32 mem_rl(CARD32 addr);
+void mem_wb(CARD32 addr, CARD8 val);
+void mem_ww(CARD32 addr, CARD16 val);
+void mem_wl(CARD32 addr, CARD32 val);
+#endif
+extern void io_statistics(void);
+extern void clear_stat(void);
+extern int int_handler(int num, struct regs86 *regs);
+
+extern console open_console(void);
+extern void close_console(console);
+
+extern void dprint(unsigned long start, unsigned long size);
+
+extern Bool logging;
+extern Bool nostdout;
+extern char* logfile;
+extern void logon(void* ptr);
+extern void logoff();
+extern void lprintf(const char *f, ...);
+
+#define MEM_FILE "/dev/mem"
+#define DEFAULT_V_BIOS 0xc0000
+#ifndef V_BIOS
+#define V_BIOS DEFAULT_V_BIOS
+#endif
+
+#ifdef __alpha__
+#define NEED_PCI_IO
+#endif
+
+#endif
+
diff --git a/board/MAI/bios_emulator/scitech/src/v86bios/working_cards b/board/MAI/bios_emulator/scitech/src/v86bios/working_cards
new file mode 100644
index 00000000000..7753f2495d4
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/v86bios/working_cards
@@ -0,0 +1,7 @@
+David Monro: Trident TGUI 9440
+ Virge/VX (Diamond Stealth 3D 3400)
+ Riva TNT (Diamond Viper V550) no vbios?
+Jarno Paananen <jpaana@s2.org>: Guillemot Maxigamer Xentor 32
+ (NVIDIA TNT2 Ultra)
+ Creative Graphics Blaster Exxtreme
+ (Permedia 2)
diff --git a/board/MAI/bios_emulator/scitech/src/v86bios/x86emu.c b/board/MAI/bios_emulator/scitech/src/v86bios/x86emu.c
new file mode 100644
index 00000000000..2cc72df995c
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/v86bios/x86emu.c
@@ -0,0 +1,316 @@
+/*
+ * Copyright 1999 Egbert Eich
+ *
+ * Permission to use, copy, modify, distribute, and sell this software and its
+ * documentation for any purpose is hereby granted without fee, provided that
+ * the above copyright notice appear in all copies and that both that
+ * copyright notice and this permission notice appear in supporting
+ * documentation, and that the name of the authors not be used in
+ * advertising or publicity pertaining to distribution of the software without
+ * specific, written prior permission. The authors makes no representations
+ * about the suitability of this software for any purpose. It is provided
+ * "as is" without express or implied warranty.
+ *
+ * THE AUTHORS DISCLAIMS ALL WARRANTIES WITH REGARD TO THIS SOFTWARE,
+ * INCLUDING ALL IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS, IN NO
+ * EVENT SHALL THE AUTHORS BE LIABLE FOR ANY SPECIAL, INDIRECT OR
+ * CONSEQUENTIAL DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF USE,
+ * DATA OR PROFITS, WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE OR OTHER
+ * TORTIOUS ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE OR
+ * PERFORMANCE OF THIS SOFTWARE.
+ */
+#include "debug.h"
+
+#define IF_MASK 0x00000200
+#define VIF_MASK 0x00080000 /* virtual interrupt flag */
+#define VIP_MASK 0x00100000 /* virtual interrupt pending */
+
+#include </usr/include/unistd.h>
+#include <errno.h>
+#include <asm/unistd.h>
+//#include <syscall-list.h>
+#include <stdio.h>
+#include <stdlib.h>
+#include <string.h>
+#include <stdarg.h>
+#ifdef __alpha__
+#include <sys/io.h>
+#endif
+#include <signal.h>
+#include <setjmp.h>
+#include "AsmMacros.h"
+#include "v86bios.h"
+# define DEBUG
+#include "x86emu.h"
+#undef DEBUG
+
+#define M _X86EMU_env
+#define CPU_REG(reg) M.x86.R_##reg
+
+struct pio P;
+
+void
+setup_io(void)
+{
+ if (!Config.PrintPort && !Config.IoStatistics) {
+
+#if defined (__i386__)
+ P.inb = (u8(*)(u16))inb;
+ P.inw = (u16(*)(u16))inw;
+ P.outb = (void(*)(u16,u8))outb;
+ P.outw = (void(*)(u16,u16))outw;
+#else
+ P.inb = p_inb;
+ P.inw = p_inw;
+ P.outb = p_outb;
+ P.outw = p_outw;
+#endif
+#if defined (__i386__) && ! defined(NEED_PCI_IO)
+ P.inl = (u32(*)(u16))inl;
+ P.outl = (void(*)(u16,u32))outl;
+#else
+ P.inl = p_inl;
+ P.outl = p_outl;
+#endif
+ } else {
+ P.inb = p_inb;
+ P.inw = p_inw;
+ P.inl = p_inl;
+ P.outb = p_outb;
+ P.outw = p_outw;
+ P.outl = p_outl;
+ }
+}
+
+void
+x86emu_do_int(int num)
+{
+ struct regs86 regs;
+
+ i_printf("int 0x%x received: ax:0x%x",num,CPU_REG(AX));
+ if (Config.PrintIp)
+ i_printf(" at: 0x%x\n",getIP());
+ else
+ i_printf("\n");
+
+ /* try to run bios interrupt */
+
+ /* if not installed fall back */
+#define COPY(x,y) regs.y = M.x86.x
+#define COPY_R(x,y) M.x86.x = regs.y
+
+ COPY(R_EAX,eax);
+ COPY(R_EBX,ebx);
+ COPY(R_ECX,ecx);
+ COPY(R_EDX,edx);
+ COPY(R_ESI,esi);
+ COPY(R_EDI,edi);
+ COPY(R_EBP,ebp);
+ COPY(R_EIP,eip);
+ COPY(R_ESP,esp);
+ COPY(R_CS,cs);
+ COPY(R_SS,ss);
+ COPY(R_DS,ds);
+ COPY(R_ES,es);
+ COPY(R_FS,fs);
+ COPY(R_GS,gs);
+ COPY(R_EFLG,eflags);
+
+ if (!(int_handler(num,®s))) {
+ if (!run_bios_int(num,®s))
+ goto unknown_int;
+ else
+ return;
+ }
+
+ COPY_R(R_EAX,eax);
+ COPY_R(R_EBX,ebx);
+ COPY_R(R_ECX,ecx);
+ COPY_R(R_EDX,edx);
+ COPY_R(R_ESI,esi);
+ COPY_R(R_EDI,edi);
+ COPY_R(R_EBP,ebp);
+ COPY_R(R_EIP,eip);
+ COPY_R(R_ESP,esp);
+ COPY_R(R_CS,cs);
+ COPY_R(R_SS,ss);
+ COPY_R(R_DS,ds);
+ COPY_R(R_ES,es);
+ COPY_R(R_FS,fs);
+ COPY_R(R_GS,gs);
+ COPY_R(R_EFLG,eflags);
+ return;
+
+ unknown_int:
+ fprintf(stderr,"\nUnknown vm86_int: %X\n\n",num);
+ X86EMU_halt_sys();
+ return;
+
+#undef COPY
+#undef COPY_R
+}
+
+void
+setup_x86emu(unsigned long bios_start, i86biosRegsPtr regs)
+{
+ int i;
+ CARD32 eip;
+ CARD16 cs;
+ X86EMU_intrFuncs intFuncs[256];
+
+ X86EMU_pioFuncs pioFuncs = {
+ (u8(*)(u16))P.inb,
+ (u16(*)(u16))P.inw,
+ (u32(*)(u16))P.inl,
+ (void(*)(u16,u8))P.outb,
+ (void(*)(u16,u16))P.outw,
+ (void(*)(u16,u32))P.outl
+ };
+#ifdef __alpha__
+ X86EMU_memFuncs memFuncs = {
+ (u8(*)(u32))mem_rb,
+ (u16(*)(u32))mem_rw,
+ (u32(*)(u32))mem_rl,
+ (void(*)(u32,u8))mem_wb,
+ (void(*)(u32,u16))mem_ww,
+ (void(*)(u32,u32))mem_wl
+ };
+#endif
+ M.mem_base = 0;
+ M.mem_size = 1024*1024 + 1024;
+ // M.x86.debug = DEBUG_DISASSEMBLE_F | DEBUG_TRACE_F | DEBUG_DECODE_F;
+ // M.x86.debug |= DEBUG_DECODE_F | DEBUG_TRACE_F;
+/*
+ * For single step tracing compile x86emu with option -DDEBUG
+ */
+ M.x86.debug = 0;
+ if (Config.PrintIp)
+ M.x86.debug = DEBUG_SAVE_CS_IP;
+
+ if (Config.Trace)
+ X86EMU_trace_on();
+
+ X86EMU_setupPioFuncs(&pioFuncs);
+#ifdef __alpha__
+ X86EMU_setupMemFuncs(&memFuncs);
+#endif
+ for (i=0;i<256;i++)
+ intFuncs[i] = x86emu_do_int;
+ X86EMU_setupIntrFuncs(intFuncs);
+
+ eip = bios_start & 0xFFFF;
+ cs = (bios_start & 0xFF0000) >> 4;
+
+ CPU_REG(EAX) = regs->ax;
+ CPU_REG(EBX) = regs->bx;
+ CPU_REG(ECX) = regs->cx;
+ CPU_REG(EDX) = regs->dx;
+ CPU_REG(ESI) = regs->si;
+ CPU_REG(EDI) = regs->di;
+ CPU_REG(EBP) = 0;
+ CPU_REG(EIP) = eip;
+ CPU_REG(CS) = cs;
+ CPU_REG(SP) = 0x100;
+ CPU_REG(SS) = 0x30; /* This is the standard pc bios stack */
+ CPU_REG(ES) = regs->es;
+ CPU_REG(DS) = regs->ds;
+ CPU_REG(FS) = 0;
+ CPU_REG(GS) = 0;
+ CPU_REG(EFLG) |= (VIF_MASK | VIP_MASK | IF_MASK | 0x2);
+}
+
+void
+collect_bios_regs(i86biosRegsPtr regs)
+{
+ regs->ax = CPU_REG(EAX);
+ regs->bx = CPU_REG(EBX);
+ regs->cx = CPU_REG(ECX);
+ regs->dx = CPU_REG(EDX);
+ regs->es = CPU_REG(ES);
+ regs->ds = CPU_REG(DS);
+ regs->di = CPU_REG(EDI);
+ regs->si = CPU_REG(ESI);
+}
+
+static void
+do_x86emu(void)
+{
+ X86EMU_exec();
+}
+
+static jmp_buf x86_esc;
+static void
+vmexit(int unused)
+{
+ longjmp(x86_esc,1);
+}
+
+void
+do_x86(unsigned long bios_start, i86biosRegsPtr regs)
+{
+ static void (*org_handler)(int);
+
+ setup_x86emu(bios_start,regs);
+ if (setjmp(x86_esc) == 0) {
+ org_handler = signal(2,vmexit);
+ do_x86emu();
+ signal(2,org_handler);
+ collect_bios_regs(regs);
+ } else {
+ signal(2,org_handler);
+ printf("interrupted at 0x%x\n",((CARD16)CPU_REG(CS)) << 4
+ | (CARD16)CPU_REG(EIP));
+ }
+}
+
+int
+run_bios_int(int num, struct regs86 *regs)
+{
+#ifdef V86BIOS_DEBUG
+ static int firsttime = 1;
+#endif
+ /* check if bios vector is initialized */
+ if (((CARD16*)0)[(num<<1)+1] == 0x0000) { /* SYS_BIOS_SEG ?*/
+#ifdef V86BIOS_DEBUG
+ i_printf("card BIOS not loaded\n");
+#endif
+ return 0;
+ }
+
+#ifdef V86BIOS_DEBUG
+ if (firsttime) {
+ dprint(0,0x3D0);
+ firsttime = 0;
+ }
+#endif
+
+ i_printf("calling card BIOS at: ");
+ i_printf("0x%x:%x\n",((CARD16 *) 0)[(num << 1) + 1],
+ (CARD32)((CARD16 *) 0)[num << 1]);
+ X86EMU_prepareForInt(num);
+
+ return 1;
+}
+
+CARD32
+getIntVect(int num)
+{
+ return ((CARD32*)0)[num];
+}
+#if 0
+void
+printk(const char *fmt, ...)
+{
+ va_list argptr;
+ va_start(argptr, fmt);
+ vfprintf(stdout, fmt, argptr);
+ fflush(stdout);
+ va_end(argptr);
+}
+#endif
+
+CARD32
+getIP(void)
+{
+ return (M.x86.saved_cs << 4) + M.x86.saved_ip;
+}
diff --git a/board/MAI/bios_emulator/scitech/src/x86emu/LICENSE b/board/MAI/bios_emulator/scitech/src/x86emu/LICENSE
new file mode 100644
index 00000000000..a3ede4a87d5
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/x86emu/LICENSE
@@ -0,0 +1,17 @@
+ License information
+ -------------------
+
+The x86emu library is under a BSD style license, comaptible
+with the XFree86 and X licenses used by XFree86. The
+original x86emu libraries were under the GNU General Public
+License. Due to license incompatibilities between the GPL
+and the XFree86 license, the original authors of the code
+decided to allow a license change. If you have submitted
+code to the original x86emu project, and you don't agree
+with the license change, please contact us and let you
+know. Your code will be removed to comply with your wishes.
+
+If you have any questions about this, please send email to
+x86emu@linuxlabs.com or KendallB@scitechsoft.com for
+clarification.
+
diff --git a/board/MAI/bios_emulator/scitech/src/x86emu/debug.c b/board/MAI/bios_emulator/scitech/src/x86emu/debug.c
new file mode 100644
index 00000000000..050008c9306
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/x86emu/debug.c
@@ -0,0 +1,443 @@
+/****************************************************************************
+*
+* Realmode X86 Emulator Library
+*
+* Copyright (C) 1996-1999 SciTech Software, Inc.
+* Copyright (C) David Mosberger-Tang
+* Copyright (C) 1999 Egbert Eich
+*
+* ========================================================================
+*
+* Permission to use, copy, modify, distribute, and sell this software and
+* its documentation for any purpose is hereby granted without fee,
+* provided that the above copyright notice appear in all copies and that
+* both that copyright notice and this permission notice appear in
+* supporting documentation, and that the name of the authors not be used
+* in advertising or publicity pertaining to distribution of the software
+* without specific, written prior permission. The authors makes no
+* representations about the suitability of this software for any purpose.
+* It is provided "as is" without express or implied warranty.
+*
+* THE AUTHORS DISCLAIMS ALL WARRANTIES WITH REGARD TO THIS SOFTWARE,
+* INCLUDING ALL IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS, IN NO
+* EVENT SHALL THE AUTHORS BE LIABLE FOR ANY SPECIAL, INDIRECT OR
+* CONSEQUENTIAL DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF
+* USE, DATA OR PROFITS, WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE OR
+* OTHER TORTIOUS ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE OR
+* PERFORMANCE OF THIS SOFTWARE.
+*
+* ========================================================================
+*
+* Language: ANSI C
+* Environment: Any
+* Developer: Kendall Bennett
+*
+* Description: This file contains the code to handle debugging of the
+* emulator.
+*
+****************************************************************************/
+
+#include "x86emu/x86emui.h"
+#include <stdarg.h>
+#include <stdlib.h>
+
+/*----------------------------- Implementation ----------------------------*/
+
+#ifdef DEBUG
+
+static void print_encoded_bytes (u16 s, u16 o);
+static void print_decoded_instruction (void);
+static int parse_line (char *s, int *ps, int *n);
+
+/* should look something like debug's output. */
+void X86EMU_trace_regs (void)
+{
+ if (DEBUG_TRACE()) {
+ x86emu_dump_regs();
+ }
+ if (DEBUG_DECODE() && ! DEBUG_DECODE_NOPRINT()) {
+ printk("%04x:%04x ",M.x86.saved_cs, M.x86.saved_ip);
+ print_encoded_bytes( M.x86.saved_cs, M.x86.saved_ip);
+ print_decoded_instruction();
+ }
+}
+
+void X86EMU_trace_xregs (void)
+{
+ if (DEBUG_TRACE()) {
+ x86emu_dump_xregs();
+ }
+}
+
+void x86emu_just_disassemble (void)
+{
+ /*
+ * This routine called if the flag DEBUG_DISASSEMBLE is set kind
+ * of a hack!
+ */
+ printk("%04x:%04x ",M.x86.saved_cs, M.x86.saved_ip);
+ print_encoded_bytes( M.x86.saved_cs, M.x86.saved_ip);
+ print_decoded_instruction();
+}
+
+static void disassemble_forward (u16 seg, u16 off, int n)
+{
+ X86EMU_sysEnv tregs;
+ int i;
+ u8 op1;
+ /*
+ * hack, hack, hack. What we do is use the exact machinery set up
+ * for execution, except that now there is an additional state
+ * flag associated with the "execution", and we are using a copy
+ * of the register struct. All the major opcodes, once fully
+ * decoded, have the following two steps: TRACE_REGS(r,m);
+ * SINGLE_STEP(r,m); which disappear if DEBUG is not defined to
+ * the preprocessor. The TRACE_REGS macro expands to:
+ *
+ * if (debug&DEBUG_DISASSEMBLE)
+ * {just_disassemble(); goto EndOfInstruction;}
+ * if (debug&DEBUG_TRACE) trace_regs(r,m);
+ *
+ * ...... and at the last line of the routine.
+ *
+ * EndOfInstruction: end_instr();
+ *
+ * Up to the point where TRACE_REG is expanded, NO modifications
+ * are done to any register EXCEPT the IP register, for fetch and
+ * decoding purposes.
+ *
+ * This was done for an entirely different reason, but makes a
+ * nice way to get the system to help debug codes.
+ */
+ tregs = M;
+ tregs.x86.R_IP = off;
+ tregs.x86.R_CS = seg;
+
+ /* reset the decoding buffers */
+ tregs.x86.enc_str_pos = 0;
+ tregs.x86.enc_pos = 0;
+
+ /* turn on the "disassemble only, no execute" flag */
+ tregs.x86.debug |= DEBUG_DISASSEMBLE_F;
+
+ /* DUMP NEXT n instructions to screen in straight_line fashion */
+ /*
+ * This looks like the regular instruction fetch stream, except
+ * that when this occurs, each fetched opcode, upon seeing the
+ * DEBUG_DISASSEMBLE flag set, exits immediately after decoding
+ * the instruction. XXX --- CHECK THAT MEM IS NOT AFFECTED!!!
+ * Note the use of a copy of the register structure...
+ */
+ for (i=0; i<n; i++) {
+ op1 = (*sys_rdb)(((u32)M.x86.R_CS<<4) + (M.x86.R_IP++));
+ (x86emu_optab[op1])(op1);
+ }
+ /* end major hack mode. */
+}
+
+void x86emu_check_ip_access (void)
+{
+ /* NULL as of now */
+}
+
+void x86emu_check_sp_access (void)
+{
+}
+
+void x86emu_check_mem_access (u32 dummy)
+{
+ /* check bounds, etc */
+}
+
+void x86emu_check_data_access (uint dummy1, uint dummy2)
+{
+ /* check bounds, etc */
+}
+
+void x86emu_inc_decoded_inst_len (int x)
+{
+ M.x86.enc_pos += x;
+}
+
+void x86emu_decode_printf (char *x)
+{
+ sprintf(M.x86.decoded_buf+M.x86.enc_str_pos,"%s",x);
+ M.x86.enc_str_pos += strlen(x);
+}
+
+void x86emu_decode_printf2 (char *x, int y)
+{
+ char temp[100];
+ sprintf(temp,x,y);
+ sprintf(M.x86.decoded_buf+M.x86.enc_str_pos,"%s",temp);
+ M.x86.enc_str_pos += strlen(temp);
+}
+
+void x86emu_end_instr (void)
+{
+ M.x86.enc_str_pos = 0;
+ M.x86.enc_pos = 0;
+}
+
+static void print_encoded_bytes (u16 s, u16 o)
+{
+ int i;
+ char buf1[64];
+ for (i=0; i< M.x86.enc_pos; i++) {
+ sprintf(buf1+2*i,"%02x", fetch_data_byte_abs(s,o+i));
+ }
+ printk("%-20s",buf1);
+}
+
+static void print_decoded_instruction (void)
+{
+ printk("%s", M.x86.decoded_buf);
+}
+
+void x86emu_print_int_vect (u16 iv)
+{
+ u16 seg,off;
+
+ if (iv > 256) return;
+ seg = fetch_data_word_abs(0,iv*4);
+ off = fetch_data_word_abs(0,iv*4+2);
+ printk("%04x:%04x ", seg, off);
+}
+
+void X86EMU_dump_memory (u16 seg, u16 off, u32 amt)
+{
+ u32 start = off & 0xfffffff0;
+ u32 end = (off+16) & 0xfffffff0;
+ u32 i;
+ u32 current;
+
+ current = start;
+ while (end <= off + amt) {
+ printk("%04x:%04x ", seg, start);
+ for (i=start; i< off; i++)
+ printk(" ");
+ for ( ; i< end; i++)
+ printk("%02x ", fetch_data_byte_abs(seg,i));
+ printk("\n");
+ start = end;
+ end = start + 16;
+ }
+}
+
+void x86emu_single_step (void)
+{
+ char s[1024];
+ int ps[10];
+ int ntok;
+ int cmd;
+ int done;
+ int segment;
+ int offset;
+ static int breakpoint;
+ static int noDecode = 1;
+
+ char *p;
+
+ if (DEBUG_BREAK()) {
+ if (M.x86.saved_ip != breakpoint) {
+ return;
+ } else {
+ M.x86.debug &= ~DEBUG_DECODE_NOPRINT_F;
+ M.x86.debug |= DEBUG_TRACE_F;
+ M.x86.debug &= ~DEBUG_BREAK_F;
+ print_decoded_instruction ();
+ X86EMU_trace_regs();
+ }
+ }
+
+ done=0;
+ offset = M.x86.saved_ip;
+ while (!done) {
+ printk("-");
+ //p = fgets(s, 1023, stdin);
+ cons_gets(s);
+ cmd = parse_line(s, ps, &ntok);
+ switch(cmd) {
+ case 'u':
+ disassemble_forward(M.x86.saved_cs,(u16)offset,10);
+ break;
+ case 'd':
+ if (ntok == 2) {
+ segment = M.x86.saved_cs;
+ offset = ps[1];
+ X86EMU_dump_memory(segment,(u16)offset,16);
+ offset += 16;
+ } else if (ntok == 3) {
+ segment = ps[1];
+ offset = ps[2];
+ X86EMU_dump_memory(segment,(u16)offset,16);
+ offset += 16;
+ } else {
+ segment = M.x86.saved_cs;
+ X86EMU_dump_memory(segment,(u16)offset,16);
+ offset += 16;
+ }
+ break;
+ case 'c':
+ M.x86.debug ^= DEBUG_TRACECALL_F;
+ break;
+ case 's':
+ M.x86.debug ^= DEBUG_SVC_F | DEBUG_SYS_F | DEBUG_SYSINT_F;
+ break;
+ case 'r':
+ X86EMU_trace_regs();
+ break;
+ case 'x':
+ X86EMU_trace_xregs();
+ break;
+ case 'g':
+ if (ntok == 2) {
+ breakpoint = ps[1];
+ printk("breakpoint set to 0x%X\n", breakpoint);
+ if (noDecode) {
+ M.x86.debug |= DEBUG_DECODE_NOPRINT_F;
+ } else {
+ M.x86.debug &= ~DEBUG_DECODE_NOPRINT_F;
+ }
+ M.x86.debug &= ~DEBUG_TRACE_F;
+ M.x86.debug |= DEBUG_BREAK_F;
+ done = 1;
+ }
+ break;
+ case 'q':
+ M.x86.debug |= DEBUG_EXIT;
+ return;
+ case 'P':
+ noDecode = (noDecode)?0:1;
+ printk("Toggled decoding to %s\n",(noDecode)?"FALSE":"TRUE");
+ break;
+ case 't':
+ case 0:
+ done = 1;
+ break;
+ }
+ }
+}
+
+int X86EMU_trace_on(void)
+{
+ return M.x86.debug |= DEBUG_STEP_F | DEBUG_DECODE_F | DEBUG_TRACE_F;
+}
+
+int X86EMU_trace_off(void)
+{
+ return M.x86.debug &= ~(DEBUG_STEP_F | DEBUG_DECODE_F | DEBUG_TRACE_F);
+}
+
+static int parse_line (char *s, int *ps, int *n)
+{
+ int cmd;
+
+ *n = 0;
+ while(*s == ' ' || *s == '\t') s++;
+ ps[*n] = *s;
+ switch (*s) {
+ case '\n':
+ *n += 1;
+ return 0;
+ default:
+ cmd = *s;
+ *n += 1;
+ }
+
+ while (1) {
+ while (*s != ' ' && *s != '\t' && *s != '\n') s++;
+
+ if (*s == '\n')
+ return cmd;
+
+ while(*s == ' ' || *s == '\t') s++;
+
+ ps[*n]=atoi(s);
+ //sscanf(s,"%x",&ps[*n]);
+ *n += 1;
+ }
+}
+
+#endif /* DEBUG */
+
+void x86emu_dump_stack(void)
+{
+ int i;
+ printk("Stack: ");
+ for (i = 0; i<16; i++)
+ {
+ u8 x = fetch_data_byte_abs(M.x86.R_SS, M.x86.R_SP + i);
+ printk("%02x ", (int)x);
+ }
+ printk("\n");
+}
+
+void x86emu_dump_regs (void)
+{
+ printk("\tAX=%04x ", M.x86.R_AX );
+ printk("BX=%04x ", M.x86.R_BX );
+ printk("CX=%04x ", M.x86.R_CX );
+ printk("DX=%04x ", M.x86.R_DX );
+ printk("SP=%04x ", M.x86.R_SP );
+ printk("BP=%04x ", M.x86.R_BP );
+ printk("SI=%04x ", M.x86.R_SI );
+ printk("DI=%04x\n", M.x86.R_DI );
+ printk("\tDS=%04x ", M.x86.R_DS );
+ printk("ES=%04x ", M.x86.R_ES );
+ printk("SS=%04x ", M.x86.R_SS );
+ printk("CS=%04x ", M.x86.R_CS );
+ printk("IP=%04x ", M.x86.R_IP );
+ if (ACCESS_FLAG(F_OF)) printk("OV "); /* CHECKED... */
+ else printk("NV ");
+ if (ACCESS_FLAG(F_DF)) printk("DN ");
+ else printk("UP ");
+ if (ACCESS_FLAG(F_IF)) printk("EI ");
+ else printk("DI ");
+ if (ACCESS_FLAG(F_SF)) printk("NG ");
+ else printk("PL ");
+ if (ACCESS_FLAG(F_ZF)) printk("ZR ");
+ else printk("NZ ");
+ if (ACCESS_FLAG(F_AF)) printk("AC ");
+ else printk("NA ");
+ if (ACCESS_FLAG(F_PF)) printk("PE ");
+ else printk("PO ");
+ if (ACCESS_FLAG(F_CF)) printk("CY ");
+ else printk("NC ");
+ printk("\n");
+ //x86emu_dump_stack();
+}
+
+void x86emu_dump_xregs (void)
+{
+ printk("\tEAX=%08x ", M.x86.R_EAX );
+ printk("EBX=%08x ", M.x86.R_EBX );
+ printk("ECX=%08x ", M.x86.R_ECX );
+ printk("EDX=%08x \n", M.x86.R_EDX );
+ printk("\tESP=%08x ", M.x86.R_ESP );
+ printk("EBP=%08x ", M.x86.R_EBP );
+ printk("ESI=%08x ", M.x86.R_ESI );
+ printk("EDI=%08x\n", M.x86.R_EDI );
+ printk("\tDS=%04x ", M.x86.R_DS );
+ printk("ES=%04x ", M.x86.R_ES );
+ printk("SS=%04x ", M.x86.R_SS );
+ printk("CS=%04x ", M.x86.R_CS );
+ printk("EIP=%08x\n\t", M.x86.R_EIP );
+ if (ACCESS_FLAG(F_OF)) printk("OV "); /* CHECKED... */
+ else printk("NV ");
+ if (ACCESS_FLAG(F_DF)) printk("DN ");
+ else printk("UP ");
+ if (ACCESS_FLAG(F_IF)) printk("EI ");
+ else printk("DI ");
+ if (ACCESS_FLAG(F_SF)) printk("NG ");
+ else printk("PL ");
+ if (ACCESS_FLAG(F_ZF)) printk("ZR ");
+ else printk("NZ ");
+ if (ACCESS_FLAG(F_AF)) printk("AC ");
+ else printk("NA ");
+ if (ACCESS_FLAG(F_PF)) printk("PE ");
+ else printk("PO ");
+ if (ACCESS_FLAG(F_CF)) printk("CY ");
+ else printk("NC ");
+ printk("\n");
+}
diff --git a/board/MAI/bios_emulator/scitech/src/x86emu/decode.c b/board/MAI/bios_emulator/scitech/src/x86emu/decode.c
new file mode 100644
index 00000000000..bb204e60014
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/x86emu/decode.c
@@ -0,0 +1,970 @@
+/****************************************************************************
+*
+* Realmode X86 Emulator Library
+*
+* Copyright (C) 1996-1999 SciTech Software, Inc.
+* Copyright (C) David Mosberger-Tang
+* Copyright (C) 1999 Egbert Eich
+*
+* ========================================================================
+*
+* Permission to use, copy, modify, distribute, and sell this software and
+* its documentation for any purpose is hereby granted without fee,
+* provided that the above copyright notice appear in all copies and that
+* both that copyright notice and this permission notice appear in
+* supporting documentation, and that the name of the authors not be used
+* in advertising or publicity pertaining to distribution of the software
+* without specific, written prior permission. The authors makes no
+* representations about the suitability of this software for any purpose.
+* It is provided "as is" without express or implied warranty.
+*
+* THE AUTHORS DISCLAIMS ALL WARRANTIES WITH REGARD TO THIS SOFTWARE,
+* INCLUDING ALL IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS, IN NO
+* EVENT SHALL THE AUTHORS BE LIABLE FOR ANY SPECIAL, INDIRECT OR
+* CONSEQUENTIAL DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF
+* USE, DATA OR PROFITS, WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE OR
+* OTHER TORTIOUS ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE OR
+* PERFORMANCE OF THIS SOFTWARE.
+*
+* ========================================================================
+*
+* Language: ANSI C
+* Environment: Any
+* Developer: Kendall Bennett
+*
+* Description: This file includes subroutines which are related to
+* instruction decoding and accessess of immediate data via IP. etc.
+*
+****************************************************************************/
+
+#include "x86emu/x86emui.h"
+
+/*----------------------------- Implementation ----------------------------*/
+
+/****************************************************************************
+REMARKS:
+Handles any pending asychronous interrupts.
+****************************************************************************/
+static void x86emu_intr_handle(void)
+{
+ u8 intno;
+
+ if (M.x86.intr & INTR_SYNCH) {
+ intno = M.x86.intno;
+ if (_X86EMU_intrTab[intno]) {
+ (*_X86EMU_intrTab[intno])(intno);
+ } else {
+ push_word((u16)M.x86.R_FLG);
+ CLEAR_FLAG(F_IF);
+ CLEAR_FLAG(F_TF);
+ push_word(M.x86.R_CS);
+ M.x86.R_CS = mem_access_word(intno * 4 + 2);
+ push_word(M.x86.R_IP);
+ M.x86.R_IP = mem_access_word(intno * 4);
+ M.x86.intr = 0;
+ }
+ }
+}
+
+/****************************************************************************
+PARAMETERS:
+intrnum - Interrupt number to raise
+
+REMARKS:
+Raise the specified interrupt to be handled before the execution of the
+next instruction.
+****************************************************************************/
+void x86emu_intr_raise(
+ u8 intrnum)
+{
+ M.x86.intno = intrnum;
+ M.x86.intr |= INTR_SYNCH;
+}
+
+/****************************************************************************
+REMARKS:
+Main execution loop for the emulator. We return from here when the system
+halts, which is normally caused by a stack fault when we return from the
+original real mode call.
+****************************************************************************/
+void X86EMU_exec(void)
+{
+ u8 op1;
+
+ M.x86.intr = 0;
+ DB(x86emu_end_instr();)
+
+ for (;;) {
+ DB(if (CHECK_IP_FETCH()) x86emu_check_ip_access();)
+ /* If debugging, save the IP and CS values. */
+ SAVE_IP_CS(M.x86.R_CS, M.x86.R_IP);
+ INC_DECODED_INST_LEN(1);
+ if (M.x86.intr) {
+ if (M.x86.intr & INTR_HALTED) {
+ DB( printk("halted\n"); X86EMU_trace_regs();)
+ return;
+ }
+ if (((M.x86.intr & INTR_SYNCH) && (M.x86.intno == 0 || M.x86.intno == 2)) ||
+ !ACCESS_FLAG(F_IF)) {
+ x86emu_intr_handle();
+ }
+ }
+ op1 = (*sys_rdb)(((u32)M.x86.R_CS << 4) + (M.x86.R_IP++));
+ (*x86emu_optab[op1])(op1);
+ if (M.x86.debug & DEBUG_EXIT) {
+ M.x86.debug &= ~DEBUG_EXIT;
+ return;
+ }
+ }
+}
+
+/****************************************************************************
+REMARKS:
+Halts the system by setting the halted system flag.
+****************************************************************************/
+void X86EMU_halt_sys(void)
+{
+ M.x86.intr |= INTR_HALTED;
+}
+
+/****************************************************************************
+PARAMETERS:
+mod - Mod value from decoded byte
+regh - Reg h value from decoded byte
+regl - Reg l value from decoded byte
+
+REMARKS:
+Raise the specified interrupt to be handled before the execution of the
+next instruction.
+
+NOTE: Do not inline this function, as (*sys_rdb) is already inline!
+****************************************************************************/
+void fetch_decode_modrm(
+ int *mod,
+ int *regh,
+ int *regl)
+{
+ int fetched;
+
+DB( if (CHECK_IP_FETCH())
+ x86emu_check_ip_access();)
+ fetched = (*sys_rdb)(((u32)M.x86.R_CS << 4) + (M.x86.R_IP++));
+ INC_DECODED_INST_LEN(1);
+ *mod = (fetched >> 6) & 0x03;
+ *regh = (fetched >> 3) & 0x07;
+ *regl = (fetched >> 0) & 0x07;
+}
+
+/****************************************************************************
+RETURNS:
+Immediate byte value read from instruction queue
+
+REMARKS:
+This function returns the immediate byte from the instruction queue, and
+moves the instruction pointer to the next value.
+
+NOTE: Do not inline this function, as (*sys_rdb) is already inline!
+****************************************************************************/
+u8 fetch_byte_imm(void)
+{
+ u8 fetched;
+
+DB( if (CHECK_IP_FETCH())
+ x86emu_check_ip_access();)
+ fetched = (*sys_rdb)(((u32)M.x86.R_CS << 4) + (M.x86.R_IP++));
+ INC_DECODED_INST_LEN(1);
+ return fetched;
+}
+
+/****************************************************************************
+RETURNS:
+Immediate word value read from instruction queue
+
+REMARKS:
+This function returns the immediate byte from the instruction queue, and
+moves the instruction pointer to the next value.
+
+NOTE: Do not inline this function, as (*sys_rdw) is already inline!
+****************************************************************************/
+u16 fetch_word_imm(void)
+{
+ u16 fetched;
+
+DB( if (CHECK_IP_FETCH())
+ x86emu_check_ip_access();)
+ fetched = (*sys_rdw)(((u32)M.x86.R_CS << 4) + (M.x86.R_IP));
+ M.x86.R_IP += 2;
+ INC_DECODED_INST_LEN(2);
+ return fetched;
+}
+
+/****************************************************************************
+RETURNS:
+Immediate lone value read from instruction queue
+
+REMARKS:
+This function returns the immediate byte from the instruction queue, and
+moves the instruction pointer to the next value.
+
+NOTE: Do not inline this function, as (*sys_rdw) is already inline!
+****************************************************************************/
+u32 fetch_long_imm(void)
+{
+ u32 fetched;
+
+DB( if (CHECK_IP_FETCH())
+ x86emu_check_ip_access();)
+ fetched = (*sys_rdl)(((u32)M.x86.R_CS << 4) + (M.x86.R_IP));
+ M.x86.R_IP += 4;
+ INC_DECODED_INST_LEN(4);
+ return fetched;
+}
+
+/****************************************************************************
+RETURNS:
+Value of the default data segment
+
+REMARKS:
+Inline function that returns the default data segment for the current
+instruction.
+
+On the x86 processor, the default segment is not always DS if there is
+no segment override. Address modes such as -3[BP] or 10[BP+SI] all refer to
+addresses relative to SS (ie: on the stack). So, at the minimum, all
+decodings of addressing modes would have to set/clear a bit describing
+whether the access is relative to DS or SS. That is the function of the
+cpu-state-varible M.x86.mode. There are several potential states:
+
+ repe prefix seen (handled elsewhere)
+ repne prefix seen (ditto)
+
+ cs segment override
+ ds segment override
+ es segment override
+ fs segment override
+ gs segment override
+ ss segment override
+
+ ds/ss select (in absense of override)
+
+Each of the above 7 items are handled with a bit in the mode field.
+****************************************************************************/
+_INLINE u32 get_data_segment(void)
+{
+#define GET_SEGMENT(segment)
+ switch (M.x86.mode & SYSMODE_SEGMASK) {
+ case 0: /* default case: use ds register */
+ case SYSMODE_SEGOVR_DS:
+ case SYSMODE_SEGOVR_DS | SYSMODE_SEG_DS_SS:
+ return M.x86.R_DS;
+ case SYSMODE_SEG_DS_SS: /* non-overridden, use ss register */
+ return M.x86.R_SS;
+ case SYSMODE_SEGOVR_CS:
+ case SYSMODE_SEGOVR_CS | SYSMODE_SEG_DS_SS:
+ return M.x86.R_CS;
+ case SYSMODE_SEGOVR_ES:
+ case SYSMODE_SEGOVR_ES | SYSMODE_SEG_DS_SS:
+ return M.x86.R_ES;
+ case SYSMODE_SEGOVR_FS:
+ case SYSMODE_SEGOVR_FS | SYSMODE_SEG_DS_SS:
+ return M.x86.R_FS;
+ case SYSMODE_SEGOVR_GS:
+ case SYSMODE_SEGOVR_GS | SYSMODE_SEG_DS_SS:
+ return M.x86.R_GS;
+ case SYSMODE_SEGOVR_SS:
+ case SYSMODE_SEGOVR_SS | SYSMODE_SEG_DS_SS:
+ return M.x86.R_SS;
+ default:
+#ifdef DEBUG
+ printk("error: should not happen: multiple overrides.\n");
+#endif
+ HALT_SYS();
+ return 0;
+ }
+}
+
+/****************************************************************************
+PARAMETERS:
+offset - Offset to load data from
+
+RETURNS:
+Byte value read from the absolute memory location.
+
+NOTE: Do not inline this function as (*sys_rdX) is already inline!
+****************************************************************************/
+u8 fetch_data_byte(
+ uint offset)
+{
+#ifdef DEBUG
+ if (CHECK_DATA_ACCESS())
+ x86emu_check_data_access((u16)get_data_segment(), offset);
+#endif
+ return (*sys_rdb)((get_data_segment() << 4) + offset);
+}
+
+/****************************************************************************
+PARAMETERS:
+offset - Offset to load data from
+
+RETURNS:
+Word value read from the absolute memory location.
+
+NOTE: Do not inline this function as (*sys_rdX) is already inline!
+****************************************************************************/
+u16 fetch_data_word(
+ uint offset)
+{
+#ifdef DEBUG
+ if (CHECK_DATA_ACCESS())
+ x86emu_check_data_access((u16)get_data_segment(), offset);
+#endif
+ return (*sys_rdw)((get_data_segment() << 4) + offset);
+}
+
+/****************************************************************************
+PARAMETERS:
+offset - Offset to load data from
+
+RETURNS:
+Long value read from the absolute memory location.
+
+NOTE: Do not inline this function as (*sys_rdX) is already inline!
+****************************************************************************/
+u32 fetch_data_long(
+ uint offset)
+{
+#ifdef DEBUG
+ if (CHECK_DATA_ACCESS())
+ x86emu_check_data_access((u16)get_data_segment(), offset);
+#endif
+ return (*sys_rdl)((get_data_segment() << 4) + offset);
+}
+
+/****************************************************************************
+PARAMETERS:
+segment - Segment to load data from
+offset - Offset to load data from
+
+RETURNS:
+Byte value read from the absolute memory location.
+
+NOTE: Do not inline this function as (*sys_rdX) is already inline!
+****************************************************************************/
+u8 fetch_data_byte_abs(
+ uint segment,
+ uint offset)
+{
+#ifdef DEBUG
+ if (CHECK_DATA_ACCESS())
+ x86emu_check_data_access(segment, offset);
+#endif
+ return (*sys_rdb)(((u32)segment << 4) + offset);
+}
+
+/****************************************************************************
+PARAMETERS:
+segment - Segment to load data from
+offset - Offset to load data from
+
+RETURNS:
+Word value read from the absolute memory location.
+
+NOTE: Do not inline this function as (*sys_rdX) is already inline!
+****************************************************************************/
+u16 fetch_data_word_abs(
+ uint segment,
+ uint offset)
+{
+#ifdef DEBUG
+ if (CHECK_DATA_ACCESS())
+ x86emu_check_data_access(segment, offset);
+#endif
+ return (*sys_rdw)(((u32)segment << 4) + offset);
+}
+
+/****************************************************************************
+PARAMETERS:
+segment - Segment to load data from
+offset - Offset to load data from
+
+RETURNS:
+Long value read from the absolute memory location.
+
+NOTE: Do not inline this function as (*sys_rdX) is already inline!
+****************************************************************************/
+u32 fetch_data_long_abs(
+ uint segment,
+ uint offset)
+{
+#ifdef DEBUG
+ if (CHECK_DATA_ACCESS())
+ x86emu_check_data_access(segment, offset);
+#endif
+ return (*sys_rdl)(((u32)segment << 4) + offset);
+}
+
+/****************************************************************************
+PARAMETERS:
+offset - Offset to store data at
+val - Value to store
+
+REMARKS:
+Writes a word value to an segmented memory location. The segment used is
+the current 'default' segment, which may have been overridden.
+
+NOTE: Do not inline this function as (*sys_wrX) is already inline!
+****************************************************************************/
+void store_data_byte(
+ uint offset,
+ u8 val)
+{
+#ifdef DEBUG
+ if (CHECK_DATA_ACCESS())
+ x86emu_check_data_access((u16)get_data_segment(), offset);
+#endif
+ (*sys_wrb)((get_data_segment() << 4) + offset, val);
+}
+
+/****************************************************************************
+PARAMETERS:
+offset - Offset to store data at
+val - Value to store
+
+REMARKS:
+Writes a word value to an segmented memory location. The segment used is
+the current 'default' segment, which may have been overridden.
+
+NOTE: Do not inline this function as (*sys_wrX) is already inline!
+****************************************************************************/
+void store_data_word(
+ uint offset,
+ u16 val)
+{
+#ifdef DEBUG
+ if (CHECK_DATA_ACCESS())
+ x86emu_check_data_access((u16)get_data_segment(), offset);
+#endif
+ (*sys_wrw)((get_data_segment() << 4) + offset, val);
+}
+
+/****************************************************************************
+PARAMETERS:
+offset - Offset to store data at
+val - Value to store
+
+REMARKS:
+Writes a long value to an segmented memory location. The segment used is
+the current 'default' segment, which may have been overridden.
+
+NOTE: Do not inline this function as (*sys_wrX) is already inline!
+****************************************************************************/
+void store_data_long(
+ uint offset,
+ u32 val)
+{
+#ifdef DEBUG
+ if (CHECK_DATA_ACCESS())
+ x86emu_check_data_access((u16)get_data_segment(), offset);
+#endif
+ (*sys_wrl)((get_data_segment() << 4) + offset, val);
+}
+
+/****************************************************************************
+PARAMETERS:
+segment - Segment to store data at
+offset - Offset to store data at
+val - Value to store
+
+REMARKS:
+Writes a byte value to an absolute memory location.
+
+NOTE: Do not inline this function as (*sys_wrX) is already inline!
+****************************************************************************/
+void store_data_byte_abs(
+ uint segment,
+ uint offset,
+ u8 val)
+{
+#ifdef DEBUG
+ if (CHECK_DATA_ACCESS())
+ x86emu_check_data_access(segment, offset);
+#endif
+ (*sys_wrb)(((u32)segment << 4) + offset, val);
+}
+
+/****************************************************************************
+PARAMETERS:
+segment - Segment to store data at
+offset - Offset to store data at
+val - Value to store
+
+REMARKS:
+Writes a word value to an absolute memory location.
+
+NOTE: Do not inline this function as (*sys_wrX) is already inline!
+****************************************************************************/
+void store_data_word_abs(
+ uint segment,
+ uint offset,
+ u16 val)
+{
+#ifdef DEBUG
+ if (CHECK_DATA_ACCESS())
+ x86emu_check_data_access(segment, offset);
+#endif
+ (*sys_wrw)(((u32)segment << 4) + offset, val);
+}
+
+/****************************************************************************
+PARAMETERS:
+segment - Segment to store data at
+offset - Offset to store data at
+val - Value to store
+
+REMARKS:
+Writes a long value to an absolute memory location.
+
+NOTE: Do not inline this function as (*sys_wrX) is already inline!
+****************************************************************************/
+void store_data_long_abs(
+ uint segment,
+ uint offset,
+ u32 val)
+{
+#ifdef DEBUG
+ if (CHECK_DATA_ACCESS())
+ x86emu_check_data_access(segment, offset);
+#endif
+ (*sys_wrl)(((u32)segment << 4) + offset, val);
+}
+
+/****************************************************************************
+PARAMETERS:
+reg - Register to decode
+
+RETURNS:
+Pointer to the appropriate register
+
+REMARKS:
+Return a pointer to the register given by the R/RM field of the
+modrm byte, for byte operands. Also enables the decoding of instructions.
+****************************************************************************/
+u8* decode_rm_byte_register(
+ int reg)
+{
+ switch (reg) {
+ case 0:
+ DECODE_PRINTF("AL");
+ return &M.x86.R_AL;
+ case 1:
+ DECODE_PRINTF("CL");
+ return &M.x86.R_CL;
+ case 2:
+ DECODE_PRINTF("DL");
+ return &M.x86.R_DL;
+ case 3:
+ DECODE_PRINTF("BL");
+ return &M.x86.R_BL;
+ case 4:
+ DECODE_PRINTF("AH");
+ return &M.x86.R_AH;
+ case 5:
+ DECODE_PRINTF("CH");
+ return &M.x86.R_CH;
+ case 6:
+ DECODE_PRINTF("DH");
+ return &M.x86.R_DH;
+ case 7:
+ DECODE_PRINTF("BH");
+ return &M.x86.R_BH;
+ }
+ HALT_SYS();
+ return NULL; /* NOT REACHED OR REACHED ON ERROR */
+}
+
+/****************************************************************************
+PARAMETERS:
+reg - Register to decode
+
+RETURNS:
+Pointer to the appropriate register
+
+REMARKS:
+Return a pointer to the register given by the R/RM field of the
+modrm byte, for word operands. Also enables the decoding of instructions.
+****************************************************************************/
+u16* decode_rm_word_register(
+ int reg)
+{
+ switch (reg) {
+ case 0:
+ DECODE_PRINTF("AX");
+ return &M.x86.R_AX;
+ case 1:
+ DECODE_PRINTF("CX");
+ return &M.x86.R_CX;
+ case 2:
+ DECODE_PRINTF("DX");
+ return &M.x86.R_DX;
+ case 3:
+ DECODE_PRINTF("BX");
+ return &M.x86.R_BX;
+ case 4:
+ DECODE_PRINTF("SP");
+ return &M.x86.R_SP;
+ case 5:
+ DECODE_PRINTF("BP");
+ return &M.x86.R_BP;
+ case 6:
+ DECODE_PRINTF("SI");
+ return &M.x86.R_SI;
+ case 7:
+ DECODE_PRINTF("DI");
+ return &M.x86.R_DI;
+ }
+ HALT_SYS();
+ return NULL; /* NOTREACHED OR REACHED ON ERROR */
+}
+
+/****************************************************************************
+PARAMETERS:
+reg - Register to decode
+
+RETURNS:
+Pointer to the appropriate register
+
+REMARKS:
+Return a pointer to the register given by the R/RM field of the
+modrm byte, for dword operands. Also enables the decoding of instructions.
+****************************************************************************/
+u32* decode_rm_long_register(
+ int reg)
+{
+ switch (reg) {
+ case 0:
+ DECODE_PRINTF("EAX");
+ return &M.x86.R_EAX;
+ case 1:
+ DECODE_PRINTF("ECX");
+ return &M.x86.R_ECX;
+ case 2:
+ DECODE_PRINTF("EDX");
+ return &M.x86.R_EDX;
+ case 3:
+ DECODE_PRINTF("EBX");
+ return &M.x86.R_EBX;
+ case 4:
+ DECODE_PRINTF("ESP");
+ return &M.x86.R_ESP;
+ case 5:
+ DECODE_PRINTF("EBP");
+ return &M.x86.R_EBP;
+ case 6:
+ DECODE_PRINTF("ESI");
+ return &M.x86.R_ESI;
+ case 7:
+ DECODE_PRINTF("EDI");
+ return &M.x86.R_EDI;
+ }
+ HALT_SYS();
+ return NULL; /* NOTREACHED OR REACHED ON ERROR */
+}
+
+/****************************************************************************
+PARAMETERS:
+reg - Register to decode
+
+RETURNS:
+Pointer to the appropriate register
+
+REMARKS:
+Return a pointer to the register given by the R/RM field of the
+modrm byte, for word operands, modified from above for the weirdo
+special case of segreg operands. Also enables the decoding of instructions.
+****************************************************************************/
+u16* decode_rm_seg_register(
+ int reg)
+{
+ switch (reg) {
+ case 0:
+ DECODE_PRINTF("ES");
+ return &M.x86.R_ES;
+ case 1:
+ DECODE_PRINTF("CS");
+ return &M.x86.R_CS;
+ case 2:
+ DECODE_PRINTF("SS");
+ return &M.x86.R_SS;
+ case 3:
+ DECODE_PRINTF("DS");
+ return &M.x86.R_DS;
+ case 4:
+ case 5:
+ case 6:
+ case 7:
+ DECODE_PRINTF("ILLEGAL SEGREG");
+ break;
+ }
+ HALT_SYS();
+ return NULL; /* NOT REACHED OR REACHED ON ERROR */
+}
+
+/****************************************************************************
+PARAMETERS:
+rm - RM value to decode
+
+RETURNS:
+Offset in memory for the address decoding
+
+REMARKS:
+Return the offset given by mod=00 addressing. Also enables the
+decoding of instructions.
+
+NOTE: The code which specifies the corresponding segment (ds vs ss)
+ below in the case of [BP+..]. The assumption here is that at the
+ point that this subroutine is called, the bit corresponding to
+ SYSMODE_SEG_DS_SS will be zero. After every instruction
+ except the segment override instructions, this bit (as well
+ as any bits indicating segment overrides) will be clear. So
+ if a SS access is needed, set this bit. Otherwise, DS access
+ occurs (unless any of the segment override bits are set).
+****************************************************************************/
+unsigned decode_rm00_address(
+ int rm)
+{
+ unsigned offset;
+
+ if (M.x86.mode & SYSMODE_PREFIX_ADDR)
+ {
+ switch (rm) {
+ case 0:
+ DECODE_PRINTF("[EAX]");
+ return M.x86.R_EAX;
+ case 1:
+ DECODE_PRINTF("[ECX]");
+ return M.x86.R_ECX;
+ case 2:
+ DECODE_PRINTF("[EDX]");
+// M.x86.mode |= SYSMODE_SEG_DS_SS;
+ return M.x86.R_EDX;
+ case 3:
+ DECODE_PRINTF("[EBX]");
+// M.x86.mode |= SYSMODE_SEG_DS_SS;
+ return M.x86.R_EBX;
+ case 4:
+ printk("Unsupported SIB encoding\n");
+ HALT_SYS();
+ return 0;
+ case 5:
+ offset = fetch_long_imm();
+ DECODE_PRINTF2("[%08x]", offset);
+ return offset;
+ case 6:
+ DECODE_PRINTF("[ESI]");
+ return M.x86.R_ESI;
+ case 7:
+ DECODE_PRINTF("[EDI]");
+ return M.x86.R_EDI;
+ }
+ }
+ else
+ {
+ switch (rm) {
+ case 0:
+ DECODE_PRINTF("[BX+SI]");
+ return M.x86.R_BX + M.x86.R_SI;
+ case 1:
+ DECODE_PRINTF("[BX+DI]");
+ return M.x86.R_BX + M.x86.R_DI;
+ case 2:
+ DECODE_PRINTF("[BP+SI]");
+ M.x86.mode |= SYSMODE_SEG_DS_SS;
+ return M.x86.R_BP + M.x86.R_SI;
+ case 3:
+ DECODE_PRINTF("[BP+DI]");
+ M.x86.mode |= SYSMODE_SEG_DS_SS;
+ return M.x86.R_BP + M.x86.R_DI;
+ case 4:
+ DECODE_PRINTF("[SI]");
+ return M.x86.R_SI;
+ case 5:
+ DECODE_PRINTF("[DI]");
+ return M.x86.R_DI;
+ case 6:
+ offset = fetch_word_imm();
+ DECODE_PRINTF2("[%04x]", offset);
+ return offset;
+ case 7:
+ DECODE_PRINTF("[BX]");
+ return M.x86.R_BX;
+ }
+ }
+ HALT_SYS();
+ return 0;
+}
+
+/****************************************************************************
+PARAMETERS:
+rm - RM value to decode
+
+RETURNS:
+Offset in memory for the address decoding
+
+REMARKS:
+Return the offset given by mod=01 addressing. Also enables the
+decoding of instructions.
+****************************************************************************/
+unsigned decode_rm01_address(
+ int rm)
+{
+ int displacement = (s8)fetch_byte_imm();
+ if (M.x86.mode & SYSMODE_PREFIX_ADDR)
+ {
+ switch (rm)
+ {
+ case 0:
+ DECODE_PRINTF2("%d[EAX}", displacement);
+ return M.x86.R_EAX + displacement;
+ case 1:
+ DECODE_PRINTF2("%d[ECX]", displacement);
+ return M.x86.R_ECX + displacement;
+ case 2:
+ DECODE_PRINTF2("%d[EDX]", displacement);
+ return M.x86.R_EDX + displacement;
+ case 3:
+ DECODE_PRINTF2("%d[EBX]", displacement);
+ return M.x86.R_EBX + displacement;
+ case 4:
+ printk("Unsupported SIB addressing mode\n");
+ HALT_SYS();
+ return 0;
+ case 5:
+ DECODE_PRINTF2("%d[EBP]", displacement);
+ return M.x86.R_EBP + displacement;
+ case 6:
+ DECODE_PRINTF2("%d[ESI]", displacement);
+ return M.x86.R_ESI + displacement;
+ case 7:
+ DECODE_PRINTF2("%d[EDI]", displacement);
+ return M.x86.R_EDI + displacement;
+ }
+ }
+ else
+ {
+ switch (rm) {
+ case 0:
+ DECODE_PRINTF2("%d[BX+SI]", displacement);
+ return M.x86.R_BX + M.x86.R_SI + displacement;
+ case 1:
+ DECODE_PRINTF2("%d[BX+DI]", displacement);
+ return M.x86.R_BX + M.x86.R_DI + displacement;
+ case 2:
+ DECODE_PRINTF2("%d[BP+SI]", displacement);
+ M.x86.mode |= SYSMODE_SEG_DS_SS;
+ return M.x86.R_BP + M.x86.R_SI + displacement;
+ case 3:
+ DECODE_PRINTF2("%d[BP+DI]", displacement);
+ M.x86.mode |= SYSMODE_SEG_DS_SS;
+ return M.x86.R_BP + M.x86.R_DI + displacement;
+ case 4:
+ DECODE_PRINTF2("%d[SI]", displacement);
+ return M.x86.R_SI + displacement;
+ case 5:
+ DECODE_PRINTF2("%d[DI]", displacement);
+ return M.x86.R_DI + displacement;
+ case 6:
+ DECODE_PRINTF2("%d[BP]", displacement);
+ M.x86.mode |= SYSMODE_SEG_DS_SS;
+ return M.x86.R_BP + displacement;
+ case 7:
+ DECODE_PRINTF2("%d[BX]", displacement);
+ return M.x86.R_BX + displacement;
+ }
+ HALT_SYS();
+ }
+ return 0; /* SHOULD NOT HAPPEN */
+}
+
+/****************************************************************************
+PARAMETERS:
+rm - RM value to decode
+
+RETURNS:
+Offset in memory for the address decoding
+
+REMARKS:
+Return the offset given by mod=10 addressing. Also enables the
+decoding of instructions.
+****************************************************************************/
+unsigned decode_rm10_address(
+ int rm)
+{
+ if (M.x86.mode & SYSMODE_PREFIX_ADDR)
+ {
+ int displacement = (s32)fetch_long_imm();
+ switch (rm)
+ {
+ case 0:
+ DECODE_PRINTF2("%d[EAX}", displacement);
+ return M.x86.R_EAX + displacement;
+ case 1:
+ DECODE_PRINTF2("%d[ECX]", displacement);
+ return M.x86.R_ECX + displacement;
+ case 2:
+ DECODE_PRINTF2("%d[EDX]", displacement);
+ return M.x86.R_EDX + displacement;
+ case 3:
+ DECODE_PRINTF2("%d[EBX]", displacement);
+ return M.x86.R_EBX + displacement;
+ case 4:
+ printk("Unsupported SIB addressing mode\n");
+ HALT_SYS();
+ return 0;
+ case 5:
+ DECODE_PRINTF2("%d[EBP]", displacement);
+ return M.x86.R_EBP + displacement;
+ case 6:
+ DECODE_PRINTF2("%d[ESI]", displacement);
+ return M.x86.R_ESI + displacement;
+ case 7:
+ DECODE_PRINTF2("%d[EDI]", displacement);
+ return M.x86.R_EDI + displacement;
+ }
+ }
+ else
+ {
+ int displacement = (s16)fetch_word_imm();
+ switch (rm) {
+ case 0:
+ DECODE_PRINTF2("%d[BX+SI]", displacement);
+ return (M.x86.R_BX + M.x86.R_SI + displacement) & 0xffff;
+ case 1:
+ DECODE_PRINTF2("%d[BX+DI]", displacement);
+ return (M.x86.R_BX + M.x86.R_DI + displacement) & 0xffff;
+ case 2:
+ DECODE_PRINTF2("%d[BP+SI]", displacement);
+ M.x86.mode |= SYSMODE_SEG_DS_SS;
+ return (M.x86.R_BP + M.x86.R_SI + displacement) & 0xffff;
+ case 3:
+ DECODE_PRINTF2("%d[BP+DI]", displacement);
+ M.x86.mode |= SYSMODE_SEG_DS_SS;
+ return (M.x86.R_BP + M.x86.R_DI + displacement) & 0xffff;
+ case 4:
+ DECODE_PRINTF2("%d[SI]", displacement);
+ return (M.x86.R_SI + displacement) & 0xffff;
+ case 5:
+ DECODE_PRINTF2("%d[DI]", displacement);
+ return (M.x86.R_DI + displacement) & 0xffff;
+ case 6:
+ DECODE_PRINTF2("%d[BP]", displacement);
+ M.x86.mode |= SYSMODE_SEG_DS_SS;
+ return (M.x86.R_BP + displacement) & 0xffff;
+ case 7:
+ DECODE_PRINTF2("%d[BX]", displacement);
+ return (M.x86.R_BX + displacement) & 0xffff;
+ }
+ }
+ HALT_SYS();
+ return 0;
+ /*NOTREACHED */
+}
diff --git a/board/MAI/bios_emulator/scitech/src/x86emu/fpu.c b/board/MAI/bios_emulator/scitech/src/x86emu/fpu.c
new file mode 100644
index 00000000000..08aea422925
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/x86emu/fpu.c
@@ -0,0 +1,945 @@
+/****************************************************************************
+*
+* Realmode X86 Emulator Library
+*
+* Copyright (C) 1996-1999 SciTech Software, Inc.
+* Copyright (C) David Mosberger-Tang
+* Copyright (C) 1999 Egbert Eich
+*
+* ========================================================================
+*
+* Permission to use, copy, modify, distribute, and sell this software and
+* its documentation for any purpose is hereby granted without fee,
+* provided that the above copyright notice appear in all copies and that
+* both that copyright notice and this permission notice appear in
+* supporting documentation, and that the name of the authors not be used
+* in advertising or publicity pertaining to distribution of the software
+* without specific, written prior permission. The authors makes no
+* representations about the suitability of this software for any purpose.
+* It is provided "as is" without express or implied warranty.
+*
+* THE AUTHORS DISCLAIMS ALL WARRANTIES WITH REGARD TO THIS SOFTWARE,
+* INCLUDING ALL IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS, IN NO
+* EVENT SHALL THE AUTHORS BE LIABLE FOR ANY SPECIAL, INDIRECT OR
+* CONSEQUENTIAL DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF
+* USE, DATA OR PROFITS, WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE OR
+* OTHER TORTIOUS ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE OR
+* PERFORMANCE OF THIS SOFTWARE.
+*
+* ========================================================================
+*
+* Language: ANSI C
+* Environment: Any
+* Developer: Kendall Bennett
+*
+* Description: This file contains the code to implement the decoding and
+* emulation of the FPU instructions.
+*
+****************************************************************************/
+
+#include "x86emu/x86emui.h"
+
+/*----------------------------- Implementation ----------------------------*/
+
+/* opcode=0xd8 */
+void x86emuOp_esc_coprocess_d8(u8 X86EMU_UNUSED(op1))
+{
+ START_OF_INSTR();
+ DECODE_PRINTF("ESC D8\n");
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR_NO_TRACE();
+}
+
+#ifdef DEBUG
+
+static char *x86emu_fpu_op_d9_tab[] = {
+ "FLD\tDWORD PTR ", "ESC_D9\t", "FST\tDWORD PTR ", "FSTP\tDWORD PTR ",
+ "FLDENV\t", "FLDCW\t", "FSTENV\t", "FSTCW\t",
+
+ "FLD\tDWORD PTR ", "ESC_D9\t", "FST\tDWORD PTR ", "FSTP\tDWORD PTR ",
+ "FLDENV\t", "FLDCW\t", "FSTENV\t", "FSTCW\t",
+
+ "FLD\tDWORD PTR ", "ESC_D9\t", "FST\tDWORD PTR ", "FSTP\tDWORD PTR ",
+ "FLDENV\t", "FLDCW\t", "FSTENV\t", "FSTCW\t",
+};
+
+static char *x86emu_fpu_op_d9_tab1[] = {
+ "FLD\t", "FLD\t", "FLD\t", "FLD\t",
+ "FLD\t", "FLD\t", "FLD\t", "FLD\t",
+
+ "FXCH\t", "FXCH\t", "FXCH\t", "FXCH\t",
+ "FXCH\t", "FXCH\t", "FXCH\t", "FXCH\t",
+
+ "FNOP", "ESC_D9", "ESC_D9", "ESC_D9",
+ "ESC_D9", "ESC_D9", "ESC_D9", "ESC_D9",
+
+ "FSTP\t", "FSTP\t", "FSTP\t", "FSTP\t",
+ "FSTP\t", "FSTP\t", "FSTP\t", "FSTP\t",
+
+ "FCHS", "FABS", "ESC_D9", "ESC_D9",
+ "FTST", "FXAM", "ESC_D9", "ESC_D9",
+
+ "FLD1", "FLDL2T", "FLDL2E", "FLDPI",
+ "FLDLG2", "FLDLN2", "FLDZ", "ESC_D9",
+
+ "F2XM1", "FYL2X", "FPTAN", "FPATAN",
+ "FXTRACT", "ESC_D9", "FDECSTP", "FINCSTP",
+
+ "FPREM", "FYL2XP1", "FSQRT", "ESC_D9",
+ "FRNDINT", "FSCALE", "ESC_D9", "ESC_D9",
+};
+
+#endif /* DEBUG */
+
+/* opcode=0xd9 */
+void x86emuOp_esc_coprocess_d9(u8 X86EMU_UNUSED(op1))
+{
+ int mod, rl, rh;
+ uint destoffset;
+ u8 stkelem;
+
+ START_OF_INSTR();
+ FETCH_DECODE_MODRM(mod, rh, rl);
+#ifdef DEBUG
+ if (mod != 3) {
+ DECODE_PRINTINSTR32(x86emu_fpu_op_d9_tab, mod, rh, rl);
+ } else {
+ DECODE_PRINTF(x86emu_fpu_op_d9_tab1[(rh << 3) + rl]);
+ }
+#endif
+ switch (mod) {
+ case 0:
+ destoffset = decode_rm00_address(rl);
+ DECODE_PRINTF("\n");
+ break;
+ case 1:
+ destoffset = decode_rm01_address(rl);
+ DECODE_PRINTF("\n");
+ break;
+ case 2:
+ destoffset = decode_rm10_address(rl);
+ DECODE_PRINTF("\n");
+ break;
+ case 3: /* register to register */
+ stkelem = (u8)rl;
+ if (rh < 4) {
+ DECODE_PRINTF2("ST(%d)\n", stkelem);
+ } else {
+ DECODE_PRINTF("\n");
+ }
+ break;
+ }
+#ifdef X86EMU_FPU_PRESENT
+ /* execute */
+ switch (mod) {
+ case 3:
+ switch (rh) {
+ case 0:
+ x86emu_fpu_R_fld(X86EMU_FPU_STKTOP, stkelem);
+ break;
+ case 1:
+ x86emu_fpu_R_fxch(X86EMU_FPU_STKTOP, stkelem);
+ break;
+ case 2:
+ switch (rl) {
+ case 0:
+ x86emu_fpu_R_nop();
+ break;
+ default:
+ x86emu_fpu_illegal();
+ break;
+ }
+ case 3:
+ x86emu_fpu_R_fstp(X86EMU_FPU_STKTOP, stkelem);
+ break;
+ case 4:
+ switch (rl) {
+ case 0:
+ x86emu_fpu_R_fchs(X86EMU_FPU_STKTOP);
+ break;
+ case 1:
+ x86emu_fpu_R_fabs(X86EMU_FPU_STKTOP);
+ break;
+ case 4:
+ x86emu_fpu_R_ftst(X86EMU_FPU_STKTOP);
+ break;
+ case 5:
+ x86emu_fpu_R_fxam(X86EMU_FPU_STKTOP);
+ break;
+ default:
+ /* 2,3,6,7 */
+ x86emu_fpu_illegal();
+ break;
+ }
+ break;
+
+ case 5:
+ switch (rl) {
+ case 0:
+ x86emu_fpu_R_fld1(X86EMU_FPU_STKTOP);
+ break;
+ case 1:
+ x86emu_fpu_R_fldl2t(X86EMU_FPU_STKTOP);
+ break;
+ case 2:
+ x86emu_fpu_R_fldl2e(X86EMU_FPU_STKTOP);
+ break;
+ case 3:
+ x86emu_fpu_R_fldpi(X86EMU_FPU_STKTOP);
+ break;
+ case 4:
+ x86emu_fpu_R_fldlg2(X86EMU_FPU_STKTOP);
+ break;
+ case 5:
+ x86emu_fpu_R_fldln2(X86EMU_FPU_STKTOP);
+ break;
+ case 6:
+ x86emu_fpu_R_fldz(X86EMU_FPU_STKTOP);
+ break;
+ default:
+ /* 7 */
+ x86emu_fpu_illegal();
+ break;
+ }
+ break;
+
+ case 6:
+ switch (rl) {
+ case 0:
+ x86emu_fpu_R_f2xm1(X86EMU_FPU_STKTOP);
+ break;
+ case 1:
+ x86emu_fpu_R_fyl2x(X86EMU_FPU_STKTOP);
+ break;
+ case 2:
+ x86emu_fpu_R_fptan(X86EMU_FPU_STKTOP);
+ break;
+ case 3:
+ x86emu_fpu_R_fpatan(X86EMU_FPU_STKTOP);
+ break;
+ case 4:
+ x86emu_fpu_R_fxtract(X86EMU_FPU_STKTOP);
+ break;
+ case 5:
+ x86emu_fpu_illegal();
+ break;
+ case 6:
+ x86emu_fpu_R_decstp();
+ break;
+ case 7:
+ x86emu_fpu_R_incstp();
+ break;
+ }
+ break;
+
+ case 7:
+ switch (rl) {
+ case 0:
+ x86emu_fpu_R_fprem(X86EMU_FPU_STKTOP);
+ break;
+ case 1:
+ x86emu_fpu_R_fyl2xp1(X86EMU_FPU_STKTOP);
+ break;
+ case 2:
+ x86emu_fpu_R_fsqrt(X86EMU_FPU_STKTOP);
+ break;
+ case 3:
+ x86emu_fpu_illegal();
+ break;
+ case 4:
+ x86emu_fpu_R_frndint(X86EMU_FPU_STKTOP);
+ break;
+ case 5:
+ x86emu_fpu_R_fscale(X86EMU_FPU_STKTOP);
+ break;
+ case 6:
+ case 7:
+ default:
+ x86emu_fpu_illegal();
+ break;
+ }
+ break;
+
+ default:
+ switch (rh) {
+ case 0:
+ x86emu_fpu_M_fld(X86EMU_FPU_FLOAT, destoffset);
+ break;
+ case 1:
+ x86emu_fpu_illegal();
+ break;
+ case 2:
+ x86emu_fpu_M_fst(X86EMU_FPU_FLOAT, destoffset);
+ break;
+ case 3:
+ x86emu_fpu_M_fstp(X86EMU_FPU_FLOAT, destoffset);
+ break;
+ case 4:
+ x86emu_fpu_M_fldenv(X86EMU_FPU_WORD, destoffset);
+ break;
+ case 5:
+ x86emu_fpu_M_fldcw(X86EMU_FPU_WORD, destoffset);
+ break;
+ case 6:
+ x86emu_fpu_M_fstenv(X86EMU_FPU_WORD, destoffset);
+ break;
+ case 7:
+ x86emu_fpu_M_fstcw(X86EMU_FPU_WORD, destoffset);
+ break;
+ }
+ }
+ }
+#endif /* X86EMU_FPU_PRESENT */
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR_NO_TRACE();
+}
+
+#ifdef DEBUG
+
+char *x86emu_fpu_op_da_tab[] = {
+ "FIADD\tDWORD PTR ", "FIMUL\tDWORD PTR ", "FICOM\tDWORD PTR ",
+ "FICOMP\tDWORD PTR ",
+ "FISUB\tDWORD PTR ", "FISUBR\tDWORD PTR ", "FIDIV\tDWORD PTR ",
+ "FIDIVR\tDWORD PTR ",
+
+ "FIADD\tDWORD PTR ", "FIMUL\tDWORD PTR ", "FICOM\tDWORD PTR ",
+ "FICOMP\tDWORD PTR ",
+ "FISUB\tDWORD PTR ", "FISUBR\tDWORD PTR ", "FIDIV\tDWORD PTR ",
+ "FIDIVR\tDWORD PTR ",
+
+ "FIADD\tDWORD PTR ", "FIMUL\tDWORD PTR ", "FICOM\tDWORD PTR ",
+ "FICOMP\tDWORD PTR ",
+ "FISUB\tDWORD PTR ", "FISUBR\tDWORD PTR ", "FIDIV\tDWORD PTR ",
+ "FIDIVR\tDWORD PTR ",
+
+ "ESC_DA ", "ESC_DA ", "ESC_DA ", "ESC_DA ",
+ "ESC_DA ", "ESC_DA ", "ESC_DA ", "ESC_DA ",
+};
+
+#endif /* DEBUG */
+
+/* opcode=0xda */
+void x86emuOp_esc_coprocess_da(u8 X86EMU_UNUSED(op1))
+{
+ int mod, rl, rh;
+ uint destoffset;
+ u8 stkelem;
+
+ START_OF_INSTR();
+ FETCH_DECODE_MODRM(mod, rh, rl);
+ DECODE_PRINTINSTR32(x86emu_fpu_op_da_tab, mod, rh, rl);
+ switch (mod) {
+ case 0:
+ destoffset = decode_rm00_address(rl);
+ DECODE_PRINTF("\n");
+ break;
+ case 1:
+ destoffset = decode_rm01_address(rl);
+ DECODE_PRINTF("\n");
+ break;
+ case 2:
+ destoffset = decode_rm10_address(rl);
+ DECODE_PRINTF("\n");
+ break;
+ case 3: /* register to register */
+ stkelem = (u8)rl;
+ DECODE_PRINTF2("\tST(%d),ST\n", stkelem);
+ break;
+ }
+#ifdef X86EMU_FPU_PRESENT
+ switch (mod) {
+ case 3:
+ x86emu_fpu_illegal();
+ break;
+ default:
+ switch (rh) {
+ case 0:
+ x86emu_fpu_M_iadd(X86EMU_FPU_SHORT, destoffset);
+ break;
+ case 1:
+ x86emu_fpu_M_imul(X86EMU_FPU_SHORT, destoffset);
+ break;
+ case 2:
+ x86emu_fpu_M_icom(X86EMU_FPU_SHORT, destoffset);
+ break;
+ case 3:
+ x86emu_fpu_M_icomp(X86EMU_FPU_SHORT, destoffset);
+ break;
+ case 4:
+ x86emu_fpu_M_isub(X86EMU_FPU_SHORT, destoffset);
+ break;
+ case 5:
+ x86emu_fpu_M_isubr(X86EMU_FPU_SHORT, destoffset);
+ break;
+ case 6:
+ x86emu_fpu_M_idiv(X86EMU_FPU_SHORT, destoffset);
+ break;
+ case 7:
+ x86emu_fpu_M_idivr(X86EMU_FPU_SHORT, destoffset);
+ break;
+ }
+ }
+#endif
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR_NO_TRACE();
+}
+
+#ifdef DEBUG
+
+char *x86emu_fpu_op_db_tab[] = {
+ "FILD\tDWORD PTR ", "ESC_DB\t19", "FIST\tDWORD PTR ", "FISTP\tDWORD PTR ",
+ "ESC_DB\t1C", "FLD\tTBYTE PTR ", "ESC_DB\t1E", "FSTP\tTBYTE PTR ",
+
+ "FILD\tDWORD PTR ", "ESC_DB\t19", "FIST\tDWORD PTR ", "FISTP\tDWORD PTR ",
+ "ESC_DB\t1C", "FLD\tTBYTE PTR ", "ESC_DB\t1E", "FSTP\tTBYTE PTR ",
+
+ "FILD\tDWORD PTR ", "ESC_DB\t19", "FIST\tDWORD PTR ", "FISTP\tDWORD PTR ",
+ "ESC_DB\t1C", "FLD\tTBYTE PTR ", "ESC_DB\t1E", "FSTP\tTBYTE PTR ",
+};
+
+#endif /* DEBUG */
+
+/* opcode=0xdb */
+void x86emuOp_esc_coprocess_db(u8 X86EMU_UNUSED(op1))
+{
+ int mod, rl, rh;
+ uint destoffset;
+
+ START_OF_INSTR();
+ FETCH_DECODE_MODRM(mod, rh, rl);
+#ifdef DEBUG
+ if (mod != 3) {
+ DECODE_PRINTINSTR32(x86emu_fpu_op_db_tab, mod, rh, rl);
+ } else if (rh == 4) { /* === 11 10 0 nnn */
+ switch (rl) {
+ case 0:
+ DECODE_PRINTF("FENI\n");
+ break;
+ case 1:
+ DECODE_PRINTF("FDISI\n");
+ break;
+ case 2:
+ DECODE_PRINTF("FCLEX\n");
+ break;
+ case 3:
+ DECODE_PRINTF("FINIT\n");
+ break;
+ }
+ } else {
+ DECODE_PRINTF2("ESC_DB %0x\n", (mod << 6) + (rh << 3) + (rl));
+ }
+#endif /* DEBUG */
+ switch (mod) {
+ case 0:
+ destoffset = decode_rm00_address(rl);
+ break;
+ case 1:
+ destoffset = decode_rm01_address(rl);
+ break;
+ case 2:
+ destoffset = decode_rm10_address(rl);
+ break;
+ case 3: /* register to register */
+ break;
+ }
+#ifdef X86EMU_FPU_PRESENT
+ /* execute */
+ switch (mod) {
+ case 3:
+ switch (rh) {
+ case 4:
+ switch (rl) {
+ case 0:
+ x86emu_fpu_R_feni();
+ break;
+ case 1:
+ x86emu_fpu_R_fdisi();
+ break;
+ case 2:
+ x86emu_fpu_R_fclex();
+ break;
+ case 3:
+ x86emu_fpu_R_finit();
+ break;
+ default:
+ x86emu_fpu_illegal();
+ break;
+ }
+ break;
+ default:
+ x86emu_fpu_illegal();
+ break;
+ }
+ break;
+ default:
+ switch (rh) {
+ case 0:
+ x86emu_fpu_M_fild(X86EMU_FPU_SHORT, destoffset);
+ break;
+ case 1:
+ x86emu_fpu_illegal();
+ break;
+ case 2:
+ x86emu_fpu_M_fist(X86EMU_FPU_SHORT, destoffset);
+ break;
+ case 3:
+ x86emu_fpu_M_fistp(X86EMU_FPU_SHORT, destoffset);
+ break;
+ case 4:
+ x86emu_fpu_illegal();
+ break;
+ case 5:
+ x86emu_fpu_M_fld(X86EMU_FPU_LDBL, destoffset);
+ break;
+ case 6:
+ x86emu_fpu_illegal();
+ break;
+ case 7:
+ x86emu_fpu_M_fstp(X86EMU_FPU_LDBL, destoffset);
+ break;
+ }
+ }
+#endif
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR_NO_TRACE();
+}
+
+#ifdef DEBUG
+char *x86emu_fpu_op_dc_tab[] = {
+ "FADD\tQWORD PTR ", "FMUL\tQWORD PTR ", "FCOM\tQWORD PTR ",
+ "FCOMP\tQWORD PTR ",
+ "FSUB\tQWORD PTR ", "FSUBR\tQWORD PTR ", "FDIV\tQWORD PTR ",
+ "FDIVR\tQWORD PTR ",
+
+ "FADD\tQWORD PTR ", "FMUL\tQWORD PTR ", "FCOM\tQWORD PTR ",
+ "FCOMP\tQWORD PTR ",
+ "FSUB\tQWORD PTR ", "FSUBR\tQWORD PTR ", "FDIV\tQWORD PTR ",
+ "FDIVR\tQWORD PTR ",
+
+ "FADD\tQWORD PTR ", "FMUL\tQWORD PTR ", "FCOM\tQWORD PTR ",
+ "FCOMP\tQWORD PTR ",
+ "FSUB\tQWORD PTR ", "FSUBR\tQWORD PTR ", "FDIV\tQWORD PTR ",
+ "FDIVR\tQWORD PTR ",
+
+ "FADD\t", "FMUL\t", "FCOM\t", "FCOMP\t",
+ "FSUBR\t", "FSUB\t", "FDIVR\t", "FDIV\t",
+};
+#endif /* DEBUG */
+
+/* opcode=0xdc */
+void x86emuOp_esc_coprocess_dc(u8 X86EMU_UNUSED(op1))
+{
+ int mod, rl, rh;
+ uint destoffset;
+ u8 stkelem;
+
+ START_OF_INSTR();
+ FETCH_DECODE_MODRM(mod, rh, rl);
+ DECODE_PRINTINSTR32(x86emu_fpu_op_dc_tab, mod, rh, rl);
+ switch (mod) {
+ case 0:
+ destoffset = decode_rm00_address(rl);
+ DECODE_PRINTF("\n");
+ break;
+ case 1:
+ destoffset = decode_rm01_address(rl);
+ DECODE_PRINTF("\n");
+ break;
+ case 2:
+ destoffset = decode_rm10_address(rl);
+ DECODE_PRINTF("\n");
+ break;
+ case 3: /* register to register */
+ stkelem = (u8)rl;
+ DECODE_PRINTF2("\tST(%d),ST\n", stkelem);
+ break;
+ }
+#ifdef X86EMU_FPU_PRESENT
+ /* execute */
+ switch (mod) {
+ case 3:
+ switch (rh) {
+ case 0:
+ x86emu_fpu_R_fadd(stkelem, X86EMU_FPU_STKTOP);
+ break;
+ case 1:
+ x86emu_fpu_R_fmul(stkelem, X86EMU_FPU_STKTOP);
+ break;
+ case 2:
+ x86emu_fpu_R_fcom(stkelem, X86EMU_FPU_STKTOP);
+ break;
+ case 3:
+ x86emu_fpu_R_fcomp(stkelem, X86EMU_FPU_STKTOP);
+ break;
+ case 4:
+ x86emu_fpu_R_fsubr(stkelem, X86EMU_FPU_STKTOP);
+ break;
+ case 5:
+ x86emu_fpu_R_fsub(stkelem, X86EMU_FPU_STKTOP);
+ break;
+ case 6:
+ x86emu_fpu_R_fdivr(stkelem, X86EMU_FPU_STKTOP);
+ break;
+ case 7:
+ x86emu_fpu_R_fdiv(stkelem, X86EMU_FPU_STKTOP);
+ break;
+ }
+ break;
+ default:
+ switch (rh) {
+ case 0:
+ x86emu_fpu_M_fadd(X86EMU_FPU_DOUBLE, destoffset);
+ break;
+ case 1:
+ x86emu_fpu_M_fmul(X86EMU_FPU_DOUBLE, destoffset);
+ break;
+ case 2:
+ x86emu_fpu_M_fcom(X86EMU_FPU_DOUBLE, destoffset);
+ break;
+ case 3:
+ x86emu_fpu_M_fcomp(X86EMU_FPU_DOUBLE, destoffset);
+ break;
+ case 4:
+ x86emu_fpu_M_fsub(X86EMU_FPU_DOUBLE, destoffset);
+ break;
+ case 5:
+ x86emu_fpu_M_fsubr(X86EMU_FPU_DOUBLE, destoffset);
+ break;
+ case 6:
+ x86emu_fpu_M_fdiv(X86EMU_FPU_DOUBLE, destoffset);
+ break;
+ case 7:
+ x86emu_fpu_M_fdivr(X86EMU_FPU_DOUBLE, destoffset);
+ break;
+ }
+ }
+#endif
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR_NO_TRACE();
+}
+
+#ifdef DEBUG
+
+static char *x86emu_fpu_op_dd_tab[] = {
+ "FLD\tQWORD PTR ", "ESC_DD\t29,", "FST\tQWORD PTR ", "FSTP\tQWORD PTR ",
+ "FRSTOR\t", "ESC_DD\t2D,", "FSAVE\t", "FSTSW\t",
+
+ "FLD\tQWORD PTR ", "ESC_DD\t29,", "FST\tQWORD PTR ", "FSTP\tQWORD PTR ",
+ "FRSTOR\t", "ESC_DD\t2D,", "FSAVE\t", "FSTSW\t",
+
+ "FLD\tQWORD PTR ", "ESC_DD\t29,", "FST\tQWORD PTR ", "FSTP\tQWORD PTR ",
+ "FRSTOR\t", "ESC_DD\t2D,", "FSAVE\t", "FSTSW\t",
+
+ "FFREE\t", "FXCH\t", "FST\t", "FSTP\t",
+ "ESC_DD\t2C,", "ESC_DD\t2D,", "ESC_DD\t2E,", "ESC_DD\t2F,",
+};
+
+#endif /* DEBUG */
+
+/* opcode=0xdd */
+void x86emuOp_esc_coprocess_dd(u8 X86EMU_UNUSED(op1))
+{
+ int mod, rl, rh;
+ uint destoffset;
+ u8 stkelem;
+
+ START_OF_INSTR();
+ FETCH_DECODE_MODRM(mod, rh, rl);
+ DECODE_PRINTINSTR32(x86emu_fpu_op_dd_tab, mod, rh, rl);
+ switch (mod) {
+ case 0:
+ destoffset = decode_rm00_address(rl);
+ DECODE_PRINTF("\n");
+ break;
+ case 1:
+ destoffset = decode_rm01_address(rl);
+ DECODE_PRINTF("\n");
+ break;
+ case 2:
+ destoffset = decode_rm10_address(rl);
+ DECODE_PRINTF("\n");
+ break;
+ case 3: /* register to register */
+ stkelem = (u8)rl;
+ DECODE_PRINTF2("\tST(%d),ST\n", stkelem);
+ break;
+ }
+#ifdef X86EMU_FPU_PRESENT
+ switch (mod) {
+ case 3:
+ switch (rh) {
+ case 0:
+ x86emu_fpu_R_ffree(stkelem);
+ break;
+ case 1:
+ x86emu_fpu_R_fxch(stkelem);
+ break;
+ case 2:
+ x86emu_fpu_R_fst(stkelem); /* register version */
+ break;
+ case 3:
+ x86emu_fpu_R_fstp(stkelem); /* register version */
+ break;
+ default:
+ x86emu_fpu_illegal();
+ break;
+ }
+ break;
+ default:
+ switch (rh) {
+ case 0:
+ x86emu_fpu_M_fld(X86EMU_FPU_DOUBLE, destoffset);
+ break;
+ case 1:
+ x86emu_fpu_illegal();
+ break;
+ case 2:
+ x86emu_fpu_M_fst(X86EMU_FPU_DOUBLE, destoffset);
+ break;
+ case 3:
+ x86emu_fpu_M_fstp(X86EMU_FPU_DOUBLE, destoffset);
+ break;
+ case 4:
+ x86emu_fpu_M_frstor(X86EMU_FPU_WORD, destoffset);
+ break;
+ case 5:
+ x86emu_fpu_illegal();
+ break;
+ case 6:
+ x86emu_fpu_M_fsave(X86EMU_FPU_WORD, destoffset);
+ break;
+ case 7:
+ x86emu_fpu_M_fstsw(X86EMU_FPU_WORD, destoffset);
+ break;
+ }
+ }
+#endif
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR_NO_TRACE();
+}
+
+#ifdef DEBUG
+
+static char *x86emu_fpu_op_de_tab[] =
+{
+ "FIADD\tWORD PTR ", "FIMUL\tWORD PTR ", "FICOM\tWORD PTR ",
+ "FICOMP\tWORD PTR ",
+ "FISUB\tWORD PTR ", "FISUBR\tWORD PTR ", "FIDIV\tWORD PTR ",
+ "FIDIVR\tWORD PTR ",
+
+ "FIADD\tWORD PTR ", "FIMUL\tWORD PTR ", "FICOM\tWORD PTR ",
+ "FICOMP\tWORD PTR ",
+ "FISUB\tWORD PTR ", "FISUBR\tWORD PTR ", "FIDIV\tWORD PTR ",
+ "FIDIVR\tWORD PTR ",
+
+ "FIADD\tWORD PTR ", "FIMUL\tWORD PTR ", "FICOM\tWORD PTR ",
+ "FICOMP\tWORD PTR ",
+ "FISUB\tWORD PTR ", "FISUBR\tWORD PTR ", "FIDIV\tWORD PTR ",
+ "FIDIVR\tWORD PTR ",
+
+ "FADDP\t", "FMULP\t", "FCOMP\t", "FCOMPP\t",
+ "FSUBRP\t", "FSUBP\t", "FDIVRP\t", "FDIVP\t",
+};
+
+#endif /* DEBUG */
+
+/* opcode=0xde */
+void x86emuOp_esc_coprocess_de(u8 X86EMU_UNUSED(op1))
+{
+ int mod, rl, rh;
+ uint destoffset;
+ u8 stkelem;
+
+ START_OF_INSTR();
+ FETCH_DECODE_MODRM(mod, rh, rl);
+ DECODE_PRINTINSTR32(x86emu_fpu_op_de_tab, mod, rh, rl);
+ switch (mod) {
+ case 0:
+ destoffset = decode_rm00_address(rl);
+ DECODE_PRINTF("\n");
+ break;
+ case 1:
+ destoffset = decode_rm01_address(rl);
+ DECODE_PRINTF("\n");
+ break;
+ case 2:
+ destoffset = decode_rm10_address(rl);
+ DECODE_PRINTF("\n");
+ break;
+ case 3: /* register to register */
+ stkelem = (u8)rl;
+ DECODE_PRINTF2("\tST(%d),ST\n", stkelem);
+ break;
+ }
+#ifdef X86EMU_FPU_PRESENT
+ switch (mod) {
+ case 3:
+ switch (rh) {
+ case 0:
+ x86emu_fpu_R_faddp(stkelem, X86EMU_FPU_STKTOP);
+ break;
+ case 1:
+ x86emu_fpu_R_fmulp(stkelem, X86EMU_FPU_STKTOP);
+ break;
+ case 2:
+ x86emu_fpu_R_fcomp(stkelem, X86EMU_FPU_STKTOP);
+ break;
+ case 3:
+ if (stkelem == 1)
+ x86emu_fpu_R_fcompp(stkelem, X86EMU_FPU_STKTOP);
+ else
+ x86emu_fpu_illegal();
+ break;
+ case 4:
+ x86emu_fpu_R_fsubrp(stkelem, X86EMU_FPU_STKTOP);
+ break;
+ case 5:
+ x86emu_fpu_R_fsubp(stkelem, X86EMU_FPU_STKTOP);
+ break;
+ case 6:
+ x86emu_fpu_R_fdivrp(stkelem, X86EMU_FPU_STKTOP);
+ break;
+ case 7:
+ x86emu_fpu_R_fdivp(stkelem, X86EMU_FPU_STKTOP);
+ break;
+ }
+ break;
+ default:
+ switch (rh) {
+ case 0:
+ x86emu_fpu_M_fiadd(X86EMU_FPU_WORD, destoffset);
+ break;
+ case 1:
+ x86emu_fpu_M_fimul(X86EMU_FPU_WORD, destoffset);
+ break;
+ case 2:
+ x86emu_fpu_M_ficom(X86EMU_FPU_WORD, destoffset);
+ break;
+ case 3:
+ x86emu_fpu_M_ficomp(X86EMU_FPU_WORD, destoffset);
+ break;
+ case 4:
+ x86emu_fpu_M_fisub(X86EMU_FPU_WORD, destoffset);
+ break;
+ case 5:
+ x86emu_fpu_M_fisubr(X86EMU_FPU_WORD, destoffset);
+ break;
+ case 6:
+ x86emu_fpu_M_fidiv(X86EMU_FPU_WORD, destoffset);
+ break;
+ case 7:
+ x86emu_fpu_M_fidivr(X86EMU_FPU_WORD, destoffset);
+ break;
+ }
+ }
+#endif
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR_NO_TRACE();
+}
+
+#ifdef DEBUG
+
+static char *x86emu_fpu_op_df_tab[] = {
+ /* mod == 00 */
+ "FILD\tWORD PTR ", "ESC_DF\t39\n", "FIST\tWORD PTR ", "FISTP\tWORD PTR ",
+ "FBLD\tTBYTE PTR ", "FILD\tQWORD PTR ", "FBSTP\tTBYTE PTR ",
+ "FISTP\tQWORD PTR ",
+
+ /* mod == 01 */
+ "FILD\tWORD PTR ", "ESC_DF\t39 ", "FIST\tWORD PTR ", "FISTP\tWORD PTR ",
+ "FBLD\tTBYTE PTR ", "FILD\tQWORD PTR ", "FBSTP\tTBYTE PTR ",
+ "FISTP\tQWORD PTR ",
+
+ /* mod == 10 */
+ "FILD\tWORD PTR ", "ESC_DF\t39 ", "FIST\tWORD PTR ", "FISTP\tWORD PTR ",
+ "FBLD\tTBYTE PTR ", "FILD\tQWORD PTR ", "FBSTP\tTBYTE PTR ",
+ "FISTP\tQWORD PTR ",
+
+ /* mod == 11 */
+ "FFREE\t", "FXCH\t", "FST\t", "FSTP\t",
+ "ESC_DF\t3C,", "ESC_DF\t3D,", "ESC_DF\t3E,", "ESC_DF\t3F,"
+};
+
+#endif /* DEBUG */
+
+/* opcode=0xdf */
+void x86emuOp_esc_coprocess_df(u8 X86EMU_UNUSED(op1))
+{
+ int mod, rl, rh;
+ uint destoffset;
+ u8 stkelem;
+
+ START_OF_INSTR();
+ FETCH_DECODE_MODRM(mod, rh, rl);
+ DECODE_PRINTINSTR32(x86emu_fpu_op_df_tab, mod, rh, rl);
+ switch (mod) {
+ case 0:
+ destoffset = decode_rm00_address(rl);
+ DECODE_PRINTF("\n");
+ break;
+ case 1:
+ destoffset = decode_rm01_address(rl);
+ DECODE_PRINTF("\n");
+ break;
+ case 2:
+ destoffset = decode_rm10_address(rl);
+ DECODE_PRINTF("\n");
+ break;
+ case 3: /* register to register */
+ stkelem = (u8)rl;
+ DECODE_PRINTF2("\tST(%d)\n", stkelem);
+ break;
+ }
+#ifdef X86EMU_FPU_PRESENT
+ switch (mod) {
+ case 3:
+ switch (rh) {
+ case 0:
+ x86emu_fpu_R_ffree(stkelem);
+ break;
+ case 1:
+ x86emu_fpu_R_fxch(stkelem);
+ break;
+ case 2:
+ x86emu_fpu_R_fst(stkelem); /* register version */
+ break;
+ case 3:
+ x86emu_fpu_R_fstp(stkelem); /* register version */
+ break;
+ default:
+ x86emu_fpu_illegal();
+ break;
+ }
+ break;
+ default:
+ switch (rh) {
+ case 0:
+ x86emu_fpu_M_fild(X86EMU_FPU_WORD, destoffset);
+ break;
+ case 1:
+ x86emu_fpu_illegal();
+ break;
+ case 2:
+ x86emu_fpu_M_fist(X86EMU_FPU_WORD, destoffset);
+ break;
+ case 3:
+ x86emu_fpu_M_fistp(X86EMU_FPU_WORD, destoffset);
+ break;
+ case 4:
+ x86emu_fpu_M_fbld(X86EMU_FPU_BSD, destoffset);
+ break;
+ case 5:
+ x86emu_fpu_M_fild(X86EMU_FPU_LONG, destoffset);
+ break;
+ case 6:
+ x86emu_fpu_M_fbstp(X86EMU_FPU_BSD, destoffset);
+ break;
+ case 7:
+ x86emu_fpu_M_fistp(X86EMU_FPU_LONG, destoffset);
+ break;
+ }
+ }
+#endif
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR_NO_TRACE();
+}
diff --git a/board/MAI/bios_emulator/scitech/src/x86emu/makefile b/board/MAI/bios_emulator/scitech/src/x86emu/makefile
new file mode 100644
index 00000000000..8ce2e9e848b
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/x86emu/makefile
@@ -0,0 +1,63 @@
+#############################################################################
+#
+# Realmode X86 Emulator Library
+#
+# Copyright (C) 1996-1999 SciTech Software, Inc.
+#
+# ========================================================================
+#
+# Permission to use, copy, modify, distribute, and sell this software and
+# its documentation for any purpose is hereby granted without fee,
+# provided that the above copyright notice appear in all copies and that
+# both that copyright notice and this permission notice appear in
+# supporting documentation, and that the name of the authors not be used
+# in advertising or publicity pertaining to distribution of the software
+# without specific, written prior permission. The authors makes no
+# representations about the suitability of this software for any purpose.
+# It is provided "as is" without express or implied warranty.
+#
+# THE AUTHORS DISCLAIMS ALL WARRANTIES WITH REGARD TO THIS SOFTWARE,
+# INCLUDING ALL IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS, IN NO
+# EVENT SHALL THE AUTHORS BE LIABLE FOR ANY SPECIAL, INDIRECT OR
+# CONSEQUENTIAL DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF
+# USE, DATA OR PROFITS, WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE OR
+# OTHER TORTIOUS ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE OR
+# PERFORMANCE OF THIS SOFTWARE.
+#
+# ========================================================================
+#
+# Descripton: Generic makefile for the x86emu library. Requires
+# the SciTech Software makefile definitions package to be
+# installed, which uses the DMAKE make program.
+#
+#############################################################################
+
+.IMPORT .IGNORE: DEBUG
+
+#----------------------------------------------------------------------------
+# Define the lists of object files
+#----------------------------------------------------------------------------
+
+OBJECTS = sys$O decode$O ops$O ops2$O prim_ops$O fpu$O debug$O
+CFLAGS += -DSCITECH
+.IF $(DEBUG)
+CFLAGS += -DDEBUG
+.ENDIF
+LIBCLEAN = *.dll *.lib *.a
+LIBFILE = $(LP)x86emu$L
+
+#----------------------------------------------------------------------------
+# Sample test programs
+#----------------------------------------------------------------------------
+
+all: $(LIBFILE)
+
+validate$E: validate$O $(LIBFILE)
+
+#----------------------------------------------------------------------------
+# Define the list of object files to create dependency information for
+#----------------------------------------------------------------------------
+
+DEPEND_OBJ = validate$O $(OBJECTS)
+
+.INCLUDE: "$(SCITECH)/makedefs/common.mk"
diff --git a/board/MAI/bios_emulator/scitech/src/x86emu/makefile.cross b/board/MAI/bios_emulator/scitech/src/x86emu/makefile.cross
new file mode 100644
index 00000000000..6edfd76e199
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/x86emu/makefile.cross
@@ -0,0 +1,79 @@
+#############################################################################
+#
+# Realmode X86 Emulator Library
+#
+# Copyright (C) 1996-1999 SciTech Software, Inc.
+#
+# ========================================================================
+#
+# Permission to use, copy, modify, distribute, and sell this software and
+# its documentation for any purpose is hereby granted without fee,
+# provided that the above copyright notice appear in all copies and that
+# both that copyright notice and this permission notice appear in
+# supporting documentation, and that the name of the authors not be used
+# in advertising or publicity pertaining to distribution of the software
+# without specific, written prior permission. The authors makes no
+# representations about the suitability of this software for any purpose.
+# It is provided "as is" without express or implied warranty.
+#
+# THE AUTHORS DISCLAIMS ALL WARRANTIES WITH REGARD TO THIS SOFTWARE,
+# INCLUDING ALL IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS, IN NO
+# EVENT SHALL THE AUTHORS BE LIABLE FOR ANY SPECIAL, INDIRECT OR
+# CONSEQUENTIAL DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF
+# USE, DATA OR PROFITS, WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE OR
+# OTHER TORTIOUS ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE OR
+# PERFORMANCE OF THIS SOFTWARE.
+#
+# ========================================================================
+#
+# Descripton: Linux specific makefile for the x86emu library.
+#
+#############################################################################
+
+TARGETLIB = libx86emu.a
+TARGETDEBUGLIB =libx86emud.a
+
+OBJS=\
+decode.o \
+fpu.o \
+ops.o \
+ops2.o \
+prim_ops.o \
+sys.o
+
+DEBUGOBJS=debug.d \
+ decode.d \
+ fpu.d \
+ ops.d \
+ ops2.d \
+ prim_ops.d \
+ sys.d
+
+.SUFFIXES: .d
+
+all: $(TARGETLIB) $(TARGETDEBUGLIB)
+
+$(TARGETLIB): $(OBJS)
+ ppc-elf32-ar rv $(TARGETLIB) $(OBJS)
+
+$(TARGETDEBUGLIB): $(DEBUGOBJS)
+ ppc-elf32-ar rv $(TARGETDEBUGLIB) $(DEBUGOBJS)
+
+INCS = -I. -Ix86emu -I../../include
+CFLAGS = -D__DRIVER__ -DFORCE_POST -D_CEXPORT= -DNO_LONG_LONG -Dprintk=printf -fsigned-char -fomit-frame-pointer -mrelocatable -ffixed-r14 -meabi -mrelocatable -ffixed-r14 -meabi
+CDEBUGFLAGS = -DDEBUG
+
+.c.o:
+ ppc-elf32-gcc -g -O2 -Wall -c $(CFLAGS) $(INCS) $*.c
+
+.c.d:
+ ppc-elf32-gcc -g -O2 -Wall -c -o$*.d $(CFLAGS) $(CDEBUGFLAGS) $(INCS) $*.c
+
+.cpp.o:
+ ppc-elf32-gcc -c $(CFLAGS) $(INCS) $*.cpp
+
+clean:
+ rm -f *.a *.o *.d
+
+validate: validate.o libx86emu.a
+ ppc-elf32-gcc -o validate validate.o -lx86emu -L.
diff --git a/board/MAI/bios_emulator/scitech/src/x86emu/makefile.linux b/board/MAI/bios_emulator/scitech/src/x86emu/makefile.linux
new file mode 100644
index 00000000000..f74b88d4c88
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/x86emu/makefile.linux
@@ -0,0 +1,81 @@
+#############################################################################
+#
+# Realmode X86 Emulator Library
+#
+# Copyright (C) 1996-1999 SciTech Software, Inc.
+#
+# ========================================================================
+#
+# Permission to use, copy, modify, distribute, and sell this software and
+# its documentation for any purpose is hereby granted without fee,
+# provided that the above copyright notice appear in all copies and that
+# both that copyright notice and this permission notice appear in
+# supporting documentation, and that the name of the authors not be used
+# in advertising or publicity pertaining to distribution of the software
+# without specific, written prior permission. The authors makes no
+# representations about the suitability of this software for any purpose.
+# It is provided "as is" without express or implied warranty.
+#
+# THE AUTHORS DISCLAIMS ALL WARRANTIES WITH REGARD TO THIS SOFTWARE,
+# INCLUDING ALL IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS, IN NO
+# EVENT SHALL THE AUTHORS BE LIABLE FOR ANY SPECIAL, INDIRECT OR
+# CONSEQUENTIAL DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF
+# USE, DATA OR PROFITS, WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE OR
+# OTHER TORTIOUS ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE OR
+# PERFORMANCE OF THIS SOFTWARE.
+#
+# ========================================================================
+#
+# Descripton: Linux specific makefile for the x86emu library.
+#
+#############################################################################
+
+TARGETLIB = libx86emu.a
+TARGETDEBUGLIB =libx86emud.a
+
+OBJS=\
+decode.o \
+fpu.o \
+ops.o \
+ops2.o \
+prim_ops.o \
+pregs.o \
+sys.o
+
+DEBUGOBJS=debug.d \
+ decode.d \
+ fpu.d \
+ ops.d \
+ ops2.d \
+ prim_ops.d \
+ pregs.d \
+ sys.d
+
+.SUFFIXES: .d
+
+all: $(TARGETLIB) $(TARGETDEBUGLIB)
+
+$(TARGETLIB): $(OBJS)
+ ar rv $(TARGETLIB) $(OBJS)
+
+$(TARGETDEBUGLIB): $(DEBUGOBJS)
+ ar rv $(TARGETDEBUGLIB) $(DEBUGOBJS)
+
+INCS = -I. -Ix86emu -I../../include
+CFLAGS = -D__DRIVER__ -DFORCE_POST -D_CEXPORT= -DNO_LONG_LONG
+CDEBUGFLAGS = -DDEBUG
+
+.c.o:
+ gcc -g -O -Wall -c $(CFLAGS) $(INCS) $*.c
+
+.c.d:
+ gcc -g -O -Wall -c -o$*.d $(CFLAGS) $(CDEBUGFLAGS) $(INCS) $*.c
+
+.cpp.o:
+ gcc -c $(CFLAGS) $(INCS) $*.cpp
+
+clean:
+ rm -f *.a *.o *.d
+
+validate: validate.o libx86emu.a
+ gcc -o validate validate.o -lx86emu -L.
diff --git a/board/MAI/bios_emulator/scitech/src/x86emu/ops.c b/board/MAI/bios_emulator/scitech/src/x86emu/ops.c
new file mode 100644
index 00000000000..0d797766b0a
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/x86emu/ops.c
@@ -0,0 +1,11701 @@
+/****************************************************************************
+*
+* Realmode X86 Emulator Library
+*
+* Copyright (C) 1996-1999 SciTech Software, Inc.
+* Copyright (C) David Mosberger-Tang
+* Copyright (C) 1999 Egbert Eich
+*
+* ========================================================================
+*
+* Permission to use, copy, modify, distribute, and sell this software and
+* its documentation for any purpose is hereby granted without fee,
+* provided that the above copyright notice appear in all copies and that
+* both that copyright notice and this permission notice appear in
+* supporting documentation, and that the name of the authors not be used
+* in advertising or publicity pertaining to distribution of the software
+* without specific, written prior permission. The authors makes no
+* representations about the suitability of this software for any purpose.
+* It is provided "as is" without express or implied warranty.
+*
+* THE AUTHORS DISCLAIMS ALL WARRANTIES WITH REGARD TO THIS SOFTWARE,
+* INCLUDING ALL IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS, IN NO
+* EVENT SHALL THE AUTHORS BE LIABLE FOR ANY SPECIAL, INDIRECT OR
+* CONSEQUENTIAL DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF
+* USE, DATA OR PROFITS, WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE OR
+* OTHER TORTIOUS ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE OR
+* PERFORMANCE OF THIS SOFTWARE.
+*
+* ========================================================================
+*
+* Language: ANSI C
+* Environment: Any
+* Developer: Kendall Bennett
+*
+* Description: This file includes subroutines to implement the decoding
+* and emulation of all the x86 processor instructions.
+*
+* There are approximately 250 subroutines in here, which correspond
+* to the 256 byte-"opcodes" found on the 8086. The table which
+* dispatches this is found in the files optab.[ch].
+*
+* Each opcode proc has a comment preceeding it which gives it's table
+* address. Several opcodes are missing (undefined) in the table.
+*
+* Each proc includes information for decoding (DECODE_PRINTF and
+* DECODE_PRINTF2), debugging (TRACE_REGS, SINGLE_STEP), and misc
+* functions (START_OF_INSTR, END_OF_INSTR).
+*
+* Many of the procedures are *VERY* similar in coding. This has
+* allowed for a very large amount of code to be generated in a fairly
+* short amount of time (i.e. cut, paste, and modify). The result is
+* that much of the code below could have been folded into subroutines
+* for a large reduction in size of this file. The downside would be
+* that there would be a penalty in execution speed. The file could
+* also have been *MUCH* larger by inlining certain functions which
+* were called. This could have resulted even faster execution. The
+* prime directive I used to decide whether to inline the code or to
+* modularize it, was basically: 1) no unnecessary subroutine calls,
+* 2) no routines more than about 200 lines in size, and 3) modularize
+* any code that I might not get right the first time. The fetch_*
+* subroutines fall into the latter category. The The decode_* fall
+* into the second category. The coding of the "switch(mod){ .... }"
+* in many of the subroutines below falls into the first category.
+* Especially, the coding of {add,and,or,sub,...}_{byte,word}
+* subroutines are an especially glaring case of the third guideline.
+* Since so much of the code is cloned from other modules (compare
+* opcode #00 to opcode #01), making the basic operations subroutine
+* calls is especially important; otherwise mistakes in coding an
+* "add" would represent a nightmare in maintenance.
+*
+****************************************************************************/
+
+#include "x86emu/x86emui.h"
+
+/*----------------------------- Implementation ----------------------------*/
+
+/****************************************************************************
+PARAMETERS:
+op1 - Instruction op code
+
+REMARKS:
+Handles illegal opcodes.
+****************************************************************************/
+void x86emuOp_illegal_op(
+ u8 op1)
+{
+ START_OF_INSTR();
+ DECODE_PRINTF("ILLEGAL X86 OPCODE\n");
+ TRACE_REGS();
+ printk("%04x:%04x: %02X ILLEGAL X86 OPCODE!\n",
+ M.x86.R_CS, M.x86.R_IP-1,op1);
+ HALT_SYS();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0x00
+****************************************************************************/
+void x86emuOp_add_byte_RM_R(u8 X86EMU_UNUSED(op1))
+{
+ int mod, rl, rh;
+ uint destoffset;
+ u8 *destreg, *srcreg;
+ u8 destval;
+
+ START_OF_INSTR();
+ DECODE_PRINTF("ADD\t");
+ FETCH_DECODE_MODRM(mod, rh, rl);
+ switch (mod) {
+ case 0:
+ destoffset = decode_rm00_address(rl);
+ DECODE_PRINTF(",");
+ destval = fetch_data_byte(destoffset);
+ srcreg = DECODE_RM_BYTE_REGISTER(rh);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ destval = add_byte(destval, *srcreg);
+ store_data_byte(destoffset, destval);
+ break;
+ case 1:
+ destoffset = decode_rm01_address(rl);
+ DECODE_PRINTF(",");
+ destval = fetch_data_byte(destoffset);
+ srcreg = DECODE_RM_BYTE_REGISTER(rh);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ destval = add_byte(destval, *srcreg);
+ store_data_byte(destoffset, destval);
+ break;
+ case 2:
+ destoffset = decode_rm10_address(rl);
+ DECODE_PRINTF(",");
+ destval = fetch_data_byte(destoffset);
+ srcreg = DECODE_RM_BYTE_REGISTER(rh);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ destval = add_byte(destval, *srcreg);
+ store_data_byte(destoffset, destval);
+ break;
+ case 3: /* register to register */
+ destreg = DECODE_RM_BYTE_REGISTER(rl);
+ DECODE_PRINTF(",");
+ srcreg = DECODE_RM_BYTE_REGISTER(rh);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ *destreg = add_byte(*destreg, *srcreg);
+ break;
+ }
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0x01
+****************************************************************************/
+void x86emuOp_add_word_RM_R(u8 X86EMU_UNUSED(op1))
+{
+ int mod, rl, rh;
+ uint destoffset;
+
+ START_OF_INSTR();
+ DECODE_PRINTF("ADD\t");
+ FETCH_DECODE_MODRM(mod, rh, rl);
+ switch (mod) {
+ case 0:
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 destval;
+ u32 *srcreg;
+
+ destoffset = decode_rm00_address(rl);
+ DECODE_PRINTF(",");
+ destval = fetch_data_long(destoffset);
+ srcreg = DECODE_RM_LONG_REGISTER(rh);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ destval = add_long(destval, *srcreg);
+ store_data_long(destoffset, destval);
+ } else {
+ u16 destval;
+ u16 *srcreg;
+
+ destoffset = decode_rm00_address(rl);
+ DECODE_PRINTF(",");
+ destval = fetch_data_word(destoffset);
+ srcreg = DECODE_RM_WORD_REGISTER(rh);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ destval = add_word(destval, *srcreg);
+ store_data_word(destoffset, destval);
+ }
+ break;
+ case 1:
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 destval;
+ u32 *srcreg;
+
+ destoffset = decode_rm01_address(rl);
+ DECODE_PRINTF(",");
+ destval = fetch_data_long(destoffset);
+ srcreg = DECODE_RM_LONG_REGISTER(rh);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ destval = add_long(destval, *srcreg);
+ store_data_long(destoffset, destval);
+ } else {
+ u16 destval;
+ u16 *srcreg;
+
+ destoffset = decode_rm01_address(rl);
+ DECODE_PRINTF(",");
+ destval = fetch_data_word(destoffset);
+ srcreg = DECODE_RM_WORD_REGISTER(rh);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ destval = add_word(destval, *srcreg);
+ store_data_word(destoffset, destval);
+ }
+ break;
+ case 2:
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 destval;
+ u32 *srcreg;
+
+ destoffset = decode_rm10_address(rl);
+ DECODE_PRINTF(",");
+ destval = fetch_data_long(destoffset);
+ srcreg = DECODE_RM_LONG_REGISTER(rh);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ destval = add_long(destval, *srcreg);
+ store_data_long(destoffset, destval);
+ } else {
+ u16 destval;
+ u16 *srcreg;
+
+ destoffset = decode_rm10_address(rl);
+ DECODE_PRINTF(",");
+ destval = fetch_data_word(destoffset);
+ srcreg = DECODE_RM_WORD_REGISTER(rh);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ destval = add_word(destval, *srcreg);
+ store_data_word(destoffset, destval);
+ }
+ break;
+ case 3: /* register to register */
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 *destreg,*srcreg;
+
+ destreg = DECODE_RM_LONG_REGISTER(rl);
+ DECODE_PRINTF(",");
+ srcreg = DECODE_RM_LONG_REGISTER(rh);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ *destreg = add_long(*destreg, *srcreg);
+ } else {
+ u16 *destreg,*srcreg;
+
+ destreg = DECODE_RM_WORD_REGISTER(rl);
+ DECODE_PRINTF(",");
+ srcreg = DECODE_RM_WORD_REGISTER(rh);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ *destreg = add_word(*destreg, *srcreg);
+ }
+ break;
+ }
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0x02
+****************************************************************************/
+void x86emuOp_add_byte_R_RM(u8 X86EMU_UNUSED(op1))
+{
+ int mod, rl, rh;
+ u8 *destreg, *srcreg;
+ uint srcoffset;
+ u8 srcval;
+
+ START_OF_INSTR();
+ DECODE_PRINTF("ADD\t");
+ FETCH_DECODE_MODRM(mod, rh, rl);
+ switch (mod) {
+ case 0:
+ destreg = DECODE_RM_BYTE_REGISTER(rh);
+ DECODE_PRINTF(",");
+ srcoffset = decode_rm00_address(rl);
+ srcval = fetch_data_byte(srcoffset);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ *destreg = add_byte(*destreg, srcval);
+ break;
+ case 1:
+ destreg = DECODE_RM_BYTE_REGISTER(rh);
+ DECODE_PRINTF(",");
+ srcoffset = decode_rm01_address(rl);
+ srcval = fetch_data_byte(srcoffset);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ *destreg = add_byte(*destreg, srcval);
+ break;
+ case 2:
+ destreg = DECODE_RM_BYTE_REGISTER(rh);
+ DECODE_PRINTF(",");
+ srcoffset = decode_rm10_address(rl);
+ srcval = fetch_data_byte(srcoffset);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ *destreg = add_byte(*destreg, srcval);
+ break;
+ case 3: /* register to register */
+ destreg = DECODE_RM_BYTE_REGISTER(rh);
+ DECODE_PRINTF(",");
+ srcreg = DECODE_RM_BYTE_REGISTER(rl);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ *destreg = add_byte(*destreg, *srcreg);
+ break;
+ }
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0x03
+****************************************************************************/
+void x86emuOp_add_word_R_RM(u8 X86EMU_UNUSED(op1))
+{
+ int mod, rl, rh;
+ uint srcoffset;
+
+ START_OF_INSTR();
+ DECODE_PRINTF("ADD\t");
+ FETCH_DECODE_MODRM(mod, rh, rl);
+ switch (mod) {
+ case 0:
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 *destreg;
+ u32 srcval;
+
+ destreg = DECODE_RM_LONG_REGISTER(rh);
+ DECODE_PRINTF(",");
+ srcoffset = decode_rm00_address(rl);
+ srcval = fetch_data_long(srcoffset);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ *destreg = add_long(*destreg, srcval);
+ } else {
+ u16 *destreg;
+ u16 srcval;
+
+ destreg = DECODE_RM_WORD_REGISTER(rh);
+ DECODE_PRINTF(",");
+ srcoffset = decode_rm00_address(rl);
+ srcval = fetch_data_word(srcoffset);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ *destreg = add_word(*destreg, srcval);
+ }
+ break;
+ case 1:
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 *destreg;
+ u32 srcval;
+
+ destreg = DECODE_RM_LONG_REGISTER(rh);
+ DECODE_PRINTF(",");
+ srcoffset = decode_rm01_address(rl);
+ srcval = fetch_data_long(srcoffset);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ *destreg = add_long(*destreg, srcval);
+ } else {
+ u16 *destreg;
+ u16 srcval;
+
+ destreg = DECODE_RM_WORD_REGISTER(rh);
+ DECODE_PRINTF(",");
+ srcoffset = decode_rm01_address(rl);
+ srcval = fetch_data_word(srcoffset);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ *destreg = add_word(*destreg, srcval);
+ }
+ break;
+ case 2:
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 *destreg;
+ u32 srcval;
+
+ destreg = DECODE_RM_LONG_REGISTER(rh);
+ DECODE_PRINTF(",");
+ srcoffset = decode_rm10_address(rl);
+ srcval = fetch_data_long(srcoffset);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ *destreg = add_long(*destreg, srcval);
+ } else {
+ u16 *destreg;
+ u16 srcval;
+
+ destreg = DECODE_RM_WORD_REGISTER(rh);
+ DECODE_PRINTF(",");
+ srcoffset = decode_rm10_address(rl);
+ srcval = fetch_data_word(srcoffset);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ *destreg = add_word(*destreg, srcval);
+ }
+ break;
+ case 3: /* register to register */
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 *destreg,*srcreg;
+
+ destreg = DECODE_RM_LONG_REGISTER(rh);
+ DECODE_PRINTF(",");
+ srcreg = DECODE_RM_LONG_REGISTER(rl);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ *destreg = add_long(*destreg, *srcreg);
+ } else {
+ u16 *destreg,*srcreg;
+
+ destreg = DECODE_RM_WORD_REGISTER(rh);
+ DECODE_PRINTF(",");
+ srcreg = DECODE_RM_WORD_REGISTER(rl);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ *destreg = add_word(*destreg, *srcreg);
+ }
+ break;
+ }
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0x04
+****************************************************************************/
+void x86emuOp_add_byte_AL_IMM(u8 X86EMU_UNUSED(op1))
+{
+ u8 srcval;
+
+ START_OF_INSTR();
+ DECODE_PRINTF("ADD\tAL,");
+ srcval = fetch_byte_imm();
+ DECODE_PRINTF2("%x\n", srcval);
+ TRACE_AND_STEP();
+ M.x86.R_AL = add_byte(M.x86.R_AL, srcval);
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0x05
+****************************************************************************/
+void x86emuOp_add_word_AX_IMM(u8 X86EMU_UNUSED(op1))
+{
+ u32 srcval;
+
+ START_OF_INSTR();
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ DECODE_PRINTF("ADD\tEAX,");
+ srcval = fetch_long_imm();
+ } else {
+ DECODE_PRINTF("ADD\tAX,");
+ srcval = fetch_word_imm();
+ }
+ DECODE_PRINTF2("%x\n", srcval);
+ TRACE_AND_STEP();
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ M.x86.R_EAX = add_long(M.x86.R_EAX, srcval);
+ } else {
+ M.x86.R_AX = add_word(M.x86.R_AX, (u16)srcval);
+ }
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0x06
+****************************************************************************/
+void x86emuOp_push_ES(u8 X86EMU_UNUSED(op1))
+{
+ START_OF_INSTR();
+ DECODE_PRINTF("PUSH\tES\n");
+ TRACE_AND_STEP();
+ push_word(M.x86.R_ES);
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0x07
+****************************************************************************/
+void x86emuOp_pop_ES(u8 X86EMU_UNUSED(op1))
+{
+ START_OF_INSTR();
+ DECODE_PRINTF("POP\tES\n");
+ TRACE_AND_STEP();
+ M.x86.R_ES = pop_word();
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0x08
+****************************************************************************/
+void x86emuOp_or_byte_RM_R(u8 X86EMU_UNUSED(op1))
+{
+ int mod, rl, rh;
+ u8 *destreg, *srcreg;
+ uint destoffset;
+ u8 destval;
+
+ START_OF_INSTR();
+ DECODE_PRINTF("OR\t");
+ FETCH_DECODE_MODRM(mod, rh, rl);
+ switch (mod) {
+ case 0:
+ destoffset = decode_rm00_address(rl);
+ DECODE_PRINTF(",");
+ destval = fetch_data_byte(destoffset);
+ srcreg = DECODE_RM_BYTE_REGISTER(rh);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ destval = or_byte(destval, *srcreg);
+ store_data_byte(destoffset, destval);
+ break;
+ case 1:
+ destoffset = decode_rm01_address(rl);
+ DECODE_PRINTF(",");
+ destval = fetch_data_byte(destoffset);
+ srcreg = DECODE_RM_BYTE_REGISTER(rh);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ destval = or_byte(destval, *srcreg);
+ store_data_byte(destoffset, destval);
+ break;
+ case 2:
+ destoffset = decode_rm10_address(rl);
+ DECODE_PRINTF(",");
+ destval = fetch_data_byte(destoffset);
+ srcreg = DECODE_RM_BYTE_REGISTER(rh);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ destval = or_byte(destval, *srcreg);
+ store_data_byte(destoffset, destval);
+ break;
+ case 3: /* register to register */
+ destreg = DECODE_RM_BYTE_REGISTER(rl);
+ DECODE_PRINTF(",");
+ srcreg = DECODE_RM_BYTE_REGISTER(rh);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ *destreg = or_byte(*destreg, *srcreg);
+ break;
+ }
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0x09
+****************************************************************************/
+void x86emuOp_or_word_RM_R(u8 X86EMU_UNUSED(op1))
+{
+ int mod, rl, rh;
+ uint destoffset;
+
+ START_OF_INSTR();
+ DECODE_PRINTF("OR\t");
+ FETCH_DECODE_MODRM(mod, rh, rl);
+ switch (mod) {
+ case 0:
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 destval;
+ u32 *srcreg;
+
+ destoffset = decode_rm00_address(rl);
+ DECODE_PRINTF(",");
+ destval = fetch_data_long(destoffset);
+ srcreg = DECODE_RM_LONG_REGISTER(rh);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ destval = or_long(destval, *srcreg);
+ store_data_long(destoffset, destval);
+ } else {
+ u16 destval;
+ u16 *srcreg;
+
+ destoffset = decode_rm00_address(rl);
+ DECODE_PRINTF(",");
+ destval = fetch_data_word(destoffset);
+ srcreg = DECODE_RM_WORD_REGISTER(rh);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ destval = or_word(destval, *srcreg);
+ store_data_word(destoffset, destval);
+ }
+ break;
+ case 1:
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 destval;
+ u32 *srcreg;
+
+ destoffset = decode_rm01_address(rl);
+ DECODE_PRINTF(",");
+ destval = fetch_data_long(destoffset);
+ srcreg = DECODE_RM_LONG_REGISTER(rh);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ destval = or_long(destval, *srcreg);
+ store_data_long(destoffset, destval);
+ } else {
+ u16 destval;
+ u16 *srcreg;
+
+ destoffset = decode_rm01_address(rl);
+ DECODE_PRINTF(",");
+ destval = fetch_data_word(destoffset);
+ srcreg = DECODE_RM_WORD_REGISTER(rh);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ destval = or_word(destval, *srcreg);
+ store_data_word(destoffset, destval);
+ }
+ break;
+ case 2:
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 destval;
+ u32 *srcreg;
+
+ destoffset = decode_rm10_address(rl);
+ DECODE_PRINTF(",");
+ destval = fetch_data_long(destoffset);
+ srcreg = DECODE_RM_LONG_REGISTER(rh);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ destval = or_long(destval, *srcreg);
+ store_data_long(destoffset, destval);
+ } else {
+ u16 destval;
+ u16 *srcreg;
+
+ destoffset = decode_rm10_address(rl);
+ DECODE_PRINTF(",");
+ destval = fetch_data_word(destoffset);
+ srcreg = DECODE_RM_WORD_REGISTER(rh);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ destval = or_word(destval, *srcreg);
+ store_data_word(destoffset, destval);
+ }
+ break;
+ case 3: /* register to register */
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 *destreg,*srcreg;
+
+ destreg = DECODE_RM_LONG_REGISTER(rl);
+ DECODE_PRINTF(",");
+ srcreg = DECODE_RM_LONG_REGISTER(rh);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ *destreg = or_long(*destreg, *srcreg);
+ } else {
+ u16 *destreg,*srcreg;
+
+ destreg = DECODE_RM_WORD_REGISTER(rl);
+ DECODE_PRINTF(",");
+ srcreg = DECODE_RM_WORD_REGISTER(rh);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ *destreg = or_word(*destreg, *srcreg);
+ }
+ break;
+ }
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0x0a
+****************************************************************************/
+void x86emuOp_or_byte_R_RM(u8 X86EMU_UNUSED(op1))
+{
+ int mod, rl, rh;
+ u8 *destreg, *srcreg;
+ uint srcoffset;
+ u8 srcval;
+
+ START_OF_INSTR();
+ DECODE_PRINTF("OR\t");
+ FETCH_DECODE_MODRM(mod, rh, rl);
+ switch (mod) {
+ case 0:
+ destreg = DECODE_RM_BYTE_REGISTER(rh);
+ DECODE_PRINTF(",");
+ srcoffset = decode_rm00_address(rl);
+ srcval = fetch_data_byte(srcoffset);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ *destreg = or_byte(*destreg, srcval);
+ break;
+ case 1:
+ destreg = DECODE_RM_BYTE_REGISTER(rh);
+ DECODE_PRINTF(",");
+ srcoffset = decode_rm01_address(rl);
+ srcval = fetch_data_byte(srcoffset);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ *destreg = or_byte(*destreg, srcval);
+ break;
+ case 2:
+ destreg = DECODE_RM_BYTE_REGISTER(rh);
+ DECODE_PRINTF(",");
+ srcoffset = decode_rm10_address(rl);
+ srcval = fetch_data_byte(srcoffset);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ *destreg = or_byte(*destreg, srcval);
+ break;
+ case 3: /* register to register */
+ destreg = DECODE_RM_BYTE_REGISTER(rh);
+ DECODE_PRINTF(",");
+ srcreg = DECODE_RM_BYTE_REGISTER(rl);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ *destreg = or_byte(*destreg, *srcreg);
+ break;
+ }
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0x0b
+****************************************************************************/
+void x86emuOp_or_word_R_RM(u8 X86EMU_UNUSED(op1))
+{
+ int mod, rl, rh;
+ uint srcoffset;
+
+ START_OF_INSTR();
+ DECODE_PRINTF("OR\t");
+ FETCH_DECODE_MODRM(mod, rh, rl);
+ switch (mod) {
+ case 0:
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 *destreg;
+ u32 srcval;
+
+ destreg = DECODE_RM_LONG_REGISTER(rh);
+ DECODE_PRINTF(",");
+ srcoffset = decode_rm00_address(rl);
+ srcval = fetch_data_long(srcoffset);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ *destreg = or_long(*destreg, srcval);
+ } else {
+ u16 *destreg;
+ u16 srcval;
+
+ destreg = DECODE_RM_WORD_REGISTER(rh);
+ DECODE_PRINTF(",");
+ srcoffset = decode_rm00_address(rl);
+ srcval = fetch_data_word(srcoffset);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ *destreg = or_word(*destreg, srcval);
+ }
+ break;
+ case 1:
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 *destreg;
+ u32 srcval;
+
+ destreg = DECODE_RM_LONG_REGISTER(rh);
+ DECODE_PRINTF(",");
+ srcoffset = decode_rm01_address(rl);
+ srcval = fetch_data_long(srcoffset);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ *destreg = or_long(*destreg, srcval);
+ } else {
+ u16 *destreg;
+ u16 srcval;
+
+ destreg = DECODE_RM_WORD_REGISTER(rh);
+ DECODE_PRINTF(",");
+ srcoffset = decode_rm01_address(rl);
+ srcval = fetch_data_word(srcoffset);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ *destreg = or_word(*destreg, srcval);
+ }
+ break;
+ case 2:
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 *destreg;
+ u32 srcval;
+
+ destreg = DECODE_RM_LONG_REGISTER(rh);
+ DECODE_PRINTF(",");
+ srcoffset = decode_rm10_address(rl);
+ srcval = fetch_data_long(srcoffset);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ *destreg = or_long(*destreg, srcval);
+ } else {
+ u16 *destreg;
+ u16 srcval;
+
+ destreg = DECODE_RM_WORD_REGISTER(rh);
+ DECODE_PRINTF(",");
+ srcoffset = decode_rm10_address(rl);
+ srcval = fetch_data_word(srcoffset);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ *destreg = or_word(*destreg, srcval);
+ }
+ break;
+ case 3: /* register to register */
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 *destreg,*srcreg;
+
+ destreg = DECODE_RM_LONG_REGISTER(rh);
+ DECODE_PRINTF(",");
+ srcreg = DECODE_RM_LONG_REGISTER(rl);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ *destreg = or_long(*destreg, *srcreg);
+ } else {
+ u16 *destreg,*srcreg;
+
+ destreg = DECODE_RM_WORD_REGISTER(rh);
+ DECODE_PRINTF(",");
+ srcreg = DECODE_RM_WORD_REGISTER(rl);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ *destreg = or_word(*destreg, *srcreg);
+ }
+ break;
+ }
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0x0c
+****************************************************************************/
+void x86emuOp_or_byte_AL_IMM(u8 X86EMU_UNUSED(op1))
+{
+ u8 srcval;
+
+ START_OF_INSTR();
+ DECODE_PRINTF("OR\tAL,");
+ srcval = fetch_byte_imm();
+ DECODE_PRINTF2("%x\n", srcval);
+ TRACE_AND_STEP();
+ M.x86.R_AL = or_byte(M.x86.R_AL, srcval);
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0x0d
+****************************************************************************/
+void x86emuOp_or_word_AX_IMM(u8 X86EMU_UNUSED(op1))
+{
+ u32 srcval;
+
+ START_OF_INSTR();
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ DECODE_PRINTF("OR\tEAX,");
+ srcval = fetch_long_imm();
+ } else {
+ DECODE_PRINTF("OR\tAX,");
+ srcval = fetch_word_imm();
+ }
+ DECODE_PRINTF2("%x\n", srcval);
+ TRACE_AND_STEP();
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ M.x86.R_EAX = or_long(M.x86.R_EAX, srcval);
+ } else {
+ M.x86.R_AX = or_word(M.x86.R_AX, (u16)srcval);
+ }
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0x0e
+****************************************************************************/
+void x86emuOp_push_CS(u8 X86EMU_UNUSED(op1))
+{
+ START_OF_INSTR();
+ DECODE_PRINTF("PUSH\tCS\n");
+ TRACE_AND_STEP();
+ push_word(M.x86.R_CS);
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0x0f. Escape for two-byte opcode (286 or better)
+****************************************************************************/
+void x86emuOp_two_byte(u8 X86EMU_UNUSED(op1))
+{
+ u8 op2 = (*sys_rdb)(((u32)M.x86.R_CS << 4) + (M.x86.R_IP++));
+ INC_DECODED_INST_LEN(1);
+ (*x86emu_optab2[op2])(op2);
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0x10
+****************************************************************************/
+void x86emuOp_adc_byte_RM_R(u8 X86EMU_UNUSED(op1))
+{
+ int mod, rl, rh;
+ u8 *destreg, *srcreg;
+ uint destoffset;
+ u8 destval;
+
+ START_OF_INSTR();
+ DECODE_PRINTF("ADC\t");
+ FETCH_DECODE_MODRM(mod, rh, rl);
+ switch (mod) {
+ case 0:
+ destoffset = decode_rm00_address(rl);
+ DECODE_PRINTF(",");
+ destval = fetch_data_byte(destoffset);
+ srcreg = DECODE_RM_BYTE_REGISTER(rh);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ destval = adc_byte(destval, *srcreg);
+ store_data_byte(destoffset, destval);
+ break;
+ case 1:
+ destoffset = decode_rm01_address(rl);
+ DECODE_PRINTF(",");
+ destval = fetch_data_byte(destoffset);
+ srcreg = DECODE_RM_BYTE_REGISTER(rh);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ destval = adc_byte(destval, *srcreg);
+ store_data_byte(destoffset, destval);
+ break;
+ case 2:
+ destoffset = decode_rm10_address(rl);
+ DECODE_PRINTF(",");
+ destval = fetch_data_byte(destoffset);
+ srcreg = DECODE_RM_BYTE_REGISTER(rh);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ destval = adc_byte(destval, *srcreg);
+ store_data_byte(destoffset, destval);
+ break;
+ case 3: /* register to register */
+ destreg = DECODE_RM_BYTE_REGISTER(rl);
+ DECODE_PRINTF(",");
+ srcreg = DECODE_RM_BYTE_REGISTER(rh);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ *destreg = adc_byte(*destreg, *srcreg);
+ break;
+ }
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0x11
+****************************************************************************/
+void x86emuOp_adc_word_RM_R(u8 X86EMU_UNUSED(op1))
+{
+ int mod, rl, rh;
+ uint destoffset;
+
+ START_OF_INSTR();
+ DECODE_PRINTF("ADC\t");
+ FETCH_DECODE_MODRM(mod, rh, rl);
+ switch (mod) {
+ case 0:
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 destval;
+ u32 *srcreg;
+
+ destoffset = decode_rm00_address(rl);
+ DECODE_PRINTF(",");
+ destval = fetch_data_long(destoffset);
+ srcreg = DECODE_RM_LONG_REGISTER(rh);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ destval = adc_long(destval, *srcreg);
+ store_data_long(destoffset, destval);
+ } else {
+ u16 destval;
+ u16 *srcreg;
+
+ destoffset = decode_rm00_address(rl);
+ DECODE_PRINTF(",");
+ destval = fetch_data_word(destoffset);
+ srcreg = DECODE_RM_WORD_REGISTER(rh);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ destval = adc_word(destval, *srcreg);
+ store_data_word(destoffset, destval);
+ }
+ break;
+ case 1:
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 destval;
+ u32 *srcreg;
+
+ destoffset = decode_rm01_address(rl);
+ DECODE_PRINTF(",");
+ destval = fetch_data_long(destoffset);
+ srcreg = DECODE_RM_LONG_REGISTER(rh);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ destval = adc_long(destval, *srcreg);
+ store_data_long(destoffset, destval);
+ } else {
+ u16 destval;
+ u16 *srcreg;
+
+ destoffset = decode_rm01_address(rl);
+ DECODE_PRINTF(",");
+ destval = fetch_data_word(destoffset);
+ srcreg = DECODE_RM_WORD_REGISTER(rh);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ destval = adc_word(destval, *srcreg);
+ store_data_word(destoffset, destval);
+ }
+ break;
+ case 2:
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 destval;
+ u32 *srcreg;
+
+ destoffset = decode_rm10_address(rl);
+ DECODE_PRINTF(",");
+ destval = fetch_data_long(destoffset);
+ srcreg = DECODE_RM_LONG_REGISTER(rh);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ destval = adc_long(destval, *srcreg);
+ store_data_long(destoffset, destval);
+ } else {
+ u16 destval;
+ u16 *srcreg;
+
+ destoffset = decode_rm10_address(rl);
+ DECODE_PRINTF(",");
+ destval = fetch_data_word(destoffset);
+ srcreg = DECODE_RM_WORD_REGISTER(rh);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ destval = adc_word(destval, *srcreg);
+ store_data_word(destoffset, destval);
+ }
+ break;
+ case 3: /* register to register */
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 *destreg,*srcreg;
+
+ destreg = DECODE_RM_LONG_REGISTER(rl);
+ DECODE_PRINTF(",");
+ srcreg = DECODE_RM_LONG_REGISTER(rh);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ *destreg = adc_long(*destreg, *srcreg);
+ } else {
+ u16 *destreg,*srcreg;
+
+ destreg = DECODE_RM_WORD_REGISTER(rl);
+ DECODE_PRINTF(",");
+ srcreg = DECODE_RM_WORD_REGISTER(rh);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ *destreg = adc_word(*destreg, *srcreg);
+ }
+ break;
+ }
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0x12
+****************************************************************************/
+void x86emuOp_adc_byte_R_RM(u8 X86EMU_UNUSED(op1))
+{
+ int mod, rl, rh;
+ u8 *destreg, *srcreg;
+ uint srcoffset;
+ u8 srcval;
+
+ START_OF_INSTR();
+ DECODE_PRINTF("ADC\t");
+ FETCH_DECODE_MODRM(mod, rh, rl);
+ switch (mod) {
+ case 0:
+ destreg = DECODE_RM_BYTE_REGISTER(rh);
+ DECODE_PRINTF(",");
+ srcoffset = decode_rm00_address(rl);
+ srcval = fetch_data_byte(srcoffset);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ *destreg = adc_byte(*destreg, srcval);
+ break;
+ case 1:
+ destreg = DECODE_RM_BYTE_REGISTER(rh);
+ DECODE_PRINTF(",");
+ srcoffset = decode_rm01_address(rl);
+ srcval = fetch_data_byte(srcoffset);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ *destreg = adc_byte(*destreg, srcval);
+ break;
+ case 2:
+ destreg = DECODE_RM_BYTE_REGISTER(rh);
+ DECODE_PRINTF(",");
+ srcoffset = decode_rm10_address(rl);
+ srcval = fetch_data_byte(srcoffset);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ *destreg = adc_byte(*destreg, srcval);
+ break;
+ case 3: /* register to register */
+ destreg = DECODE_RM_BYTE_REGISTER(rh);
+ DECODE_PRINTF(",");
+ srcreg = DECODE_RM_BYTE_REGISTER(rl);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ *destreg = adc_byte(*destreg, *srcreg);
+ break;
+ }
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0x13
+****************************************************************************/
+void x86emuOp_adc_word_R_RM(u8 X86EMU_UNUSED(op1))
+{
+ int mod, rl, rh;
+ uint srcoffset;
+
+ START_OF_INSTR();
+ DECODE_PRINTF("ADC\t");
+ FETCH_DECODE_MODRM(mod, rh, rl);
+ switch (mod) {
+ case 0:
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 *destreg;
+ u32 srcval;
+
+ destreg = DECODE_RM_LONG_REGISTER(rh);
+ DECODE_PRINTF(",");
+ srcoffset = decode_rm00_address(rl);
+ srcval = fetch_data_long(srcoffset);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ *destreg = adc_long(*destreg, srcval);
+ } else {
+ u16 *destreg;
+ u16 srcval;
+
+ destreg = DECODE_RM_WORD_REGISTER(rh);
+ DECODE_PRINTF(",");
+ srcoffset = decode_rm00_address(rl);
+ srcval = fetch_data_word(srcoffset);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ *destreg = adc_word(*destreg, srcval);
+ }
+ break;
+ case 1:
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 *destreg;
+ u32 srcval;
+
+ destreg = DECODE_RM_LONG_REGISTER(rh);
+ DECODE_PRINTF(",");
+ srcoffset = decode_rm01_address(rl);
+ srcval = fetch_data_long(srcoffset);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ *destreg = adc_long(*destreg, srcval);
+ } else {
+ u16 *destreg;
+ u16 srcval;
+
+ destreg = DECODE_RM_WORD_REGISTER(rh);
+ DECODE_PRINTF(",");
+ srcoffset = decode_rm01_address(rl);
+ srcval = fetch_data_word(srcoffset);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ *destreg = adc_word(*destreg, srcval);
+ }
+ break;
+ case 2:
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 *destreg;
+ u32 srcval;
+
+ destreg = DECODE_RM_LONG_REGISTER(rh);
+ DECODE_PRINTF(",");
+ srcoffset = decode_rm10_address(rl);
+ srcval = fetch_data_long(srcoffset);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ *destreg = adc_long(*destreg, srcval);
+ } else {
+ u16 *destreg;
+ u16 srcval;
+
+ destreg = DECODE_RM_WORD_REGISTER(rh);
+ DECODE_PRINTF(",");
+ srcoffset = decode_rm10_address(rl);
+ srcval = fetch_data_word(srcoffset);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ *destreg = adc_word(*destreg, srcval);
+ }
+ break;
+ case 3: /* register to register */
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 *destreg,*srcreg;
+
+ destreg = DECODE_RM_LONG_REGISTER(rh);
+ DECODE_PRINTF(",");
+ srcreg = DECODE_RM_LONG_REGISTER(rl);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ *destreg = adc_long(*destreg, *srcreg);
+ } else {
+ u16 *destreg,*srcreg;
+
+ destreg = DECODE_RM_WORD_REGISTER(rh);
+ DECODE_PRINTF(",");
+ srcreg = DECODE_RM_WORD_REGISTER(rl);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ *destreg = adc_word(*destreg, *srcreg);
+ }
+ break;
+ }
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0x14
+****************************************************************************/
+void x86emuOp_adc_byte_AL_IMM(u8 X86EMU_UNUSED(op1))
+{
+ u8 srcval;
+
+ START_OF_INSTR();
+ DECODE_PRINTF("ADC\tAL,");
+ srcval = fetch_byte_imm();
+ DECODE_PRINTF2("%x\n", srcval);
+ TRACE_AND_STEP();
+ M.x86.R_AL = adc_byte(M.x86.R_AL, srcval);
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0x15
+****************************************************************************/
+void x86emuOp_adc_word_AX_IMM(u8 X86EMU_UNUSED(op1))
+{
+ u32 srcval;
+
+ START_OF_INSTR();
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ DECODE_PRINTF("ADC\tEAX,");
+ srcval = fetch_long_imm();
+ } else {
+ DECODE_PRINTF("ADC\tAX,");
+ srcval = fetch_word_imm();
+ }
+ DECODE_PRINTF2("%x\n", srcval);
+ TRACE_AND_STEP();
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ M.x86.R_EAX = adc_long(M.x86.R_EAX, srcval);
+ } else {
+ M.x86.R_AX = adc_word(M.x86.R_AX, (u16)srcval);
+ }
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0x16
+****************************************************************************/
+void x86emuOp_push_SS(u8 X86EMU_UNUSED(op1))
+{
+ START_OF_INSTR();
+ DECODE_PRINTF("PUSH\tSS\n");
+ TRACE_AND_STEP();
+ push_word(M.x86.R_SS);
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0x17
+****************************************************************************/
+void x86emuOp_pop_SS(u8 X86EMU_UNUSED(op1))
+{
+ START_OF_INSTR();
+ DECODE_PRINTF("POP\tSS\n");
+ TRACE_AND_STEP();
+ M.x86.R_SS = pop_word();
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0x18
+****************************************************************************/
+void x86emuOp_sbb_byte_RM_R(u8 X86EMU_UNUSED(op1))
+{
+ int mod, rl, rh;
+ u8 *destreg, *srcreg;
+ uint destoffset;
+ u8 destval;
+
+ START_OF_INSTR();
+ DECODE_PRINTF("SBB\t");
+ FETCH_DECODE_MODRM(mod, rh, rl);
+ switch (mod) {
+ case 0:
+ destoffset = decode_rm00_address(rl);
+ DECODE_PRINTF(",");
+ destval = fetch_data_byte(destoffset);
+ srcreg = DECODE_RM_BYTE_REGISTER(rh);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ destval = sbb_byte(destval, *srcreg);
+ store_data_byte(destoffset, destval);
+ break;
+ case 1:
+ destoffset = decode_rm01_address(rl);
+ DECODE_PRINTF(",");
+ destval = fetch_data_byte(destoffset);
+ srcreg = DECODE_RM_BYTE_REGISTER(rh);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ destval = sbb_byte(destval, *srcreg);
+ store_data_byte(destoffset, destval);
+ break;
+ case 2:
+ destoffset = decode_rm10_address(rl);
+ DECODE_PRINTF(",");
+ destval = fetch_data_byte(destoffset);
+ srcreg = DECODE_RM_BYTE_REGISTER(rh);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ destval = sbb_byte(destval, *srcreg);
+ store_data_byte(destoffset, destval);
+ break;
+ case 3: /* register to register */
+ destreg = DECODE_RM_BYTE_REGISTER(rl);
+ DECODE_PRINTF(",");
+ srcreg = DECODE_RM_BYTE_REGISTER(rh);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ *destreg = sbb_byte(*destreg, *srcreg);
+ break;
+ }
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0x19
+****************************************************************************/
+void x86emuOp_sbb_word_RM_R(u8 X86EMU_UNUSED(op1))
+{
+ int mod, rl, rh;
+ uint destoffset;
+
+ START_OF_INSTR();
+ DECODE_PRINTF("SBB\t");
+ FETCH_DECODE_MODRM(mod, rh, rl);
+ switch (mod) {
+ case 0:
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 destval;
+ u32 *srcreg;
+
+ destoffset = decode_rm00_address(rl);
+ DECODE_PRINTF(",");
+ destval = fetch_data_long(destoffset);
+ srcreg = DECODE_RM_LONG_REGISTER(rh);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ destval = sbb_long(destval, *srcreg);
+ store_data_long(destoffset, destval);
+ } else {
+ u16 destval;
+ u16 *srcreg;
+
+ destoffset = decode_rm00_address(rl);
+ DECODE_PRINTF(",");
+ destval = fetch_data_word(destoffset);
+ srcreg = DECODE_RM_WORD_REGISTER(rh);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ destval = sbb_word(destval, *srcreg);
+ store_data_word(destoffset, destval);
+ }
+ break;
+ case 1:
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 destval;
+ u32 *srcreg;
+
+ destoffset = decode_rm01_address(rl);
+ DECODE_PRINTF(",");
+ destval = fetch_data_long(destoffset);
+ srcreg = DECODE_RM_LONG_REGISTER(rh);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ destval = sbb_long(destval, *srcreg);
+ store_data_long(destoffset, destval);
+ } else {
+ u16 destval;
+ u16 *srcreg;
+
+ destoffset = decode_rm01_address(rl);
+ DECODE_PRINTF(",");
+ destval = fetch_data_word(destoffset);
+ srcreg = DECODE_RM_WORD_REGISTER(rh);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ destval = sbb_word(destval, *srcreg);
+ store_data_word(destoffset, destval);
+ }
+ break;
+ case 2:
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 destval;
+ u32 *srcreg;
+
+ destoffset = decode_rm10_address(rl);
+ DECODE_PRINTF(",");
+ destval = fetch_data_long(destoffset);
+ srcreg = DECODE_RM_LONG_REGISTER(rh);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ destval = sbb_long(destval, *srcreg);
+ store_data_long(destoffset, destval);
+ } else {
+ u16 destval;
+ u16 *srcreg;
+
+ destoffset = decode_rm10_address(rl);
+ DECODE_PRINTF(",");
+ destval = fetch_data_word(destoffset);
+ srcreg = DECODE_RM_WORD_REGISTER(rh);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ destval = sbb_word(destval, *srcreg);
+ store_data_word(destoffset, destval);
+ }
+ break;
+ case 3: /* register to register */
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 *destreg,*srcreg;
+
+ destreg = DECODE_RM_LONG_REGISTER(rl);
+ DECODE_PRINTF(",");
+ srcreg = DECODE_RM_LONG_REGISTER(rh);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ *destreg = sbb_long(*destreg, *srcreg);
+ } else {
+ u16 *destreg,*srcreg;
+
+ destreg = DECODE_RM_WORD_REGISTER(rl);
+ DECODE_PRINTF(",");
+ srcreg = DECODE_RM_WORD_REGISTER(rh);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ *destreg = sbb_word(*destreg, *srcreg);
+ }
+ break;
+ }
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0x1a
+****************************************************************************/
+void x86emuOp_sbb_byte_R_RM(u8 X86EMU_UNUSED(op1))
+{
+ int mod, rl, rh;
+ u8 *destreg, *srcreg;
+ uint srcoffset;
+ u8 srcval;
+
+ START_OF_INSTR();
+ DECODE_PRINTF("SBB\t");
+ FETCH_DECODE_MODRM(mod, rh, rl);
+ switch (mod) {
+ case 0:
+ destreg = DECODE_RM_BYTE_REGISTER(rh);
+ DECODE_PRINTF(",");
+ srcoffset = decode_rm00_address(rl);
+ srcval = fetch_data_byte(srcoffset);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ *destreg = sbb_byte(*destreg, srcval);
+ break;
+ case 1:
+ destreg = DECODE_RM_BYTE_REGISTER(rh);
+ DECODE_PRINTF(",");
+ srcoffset = decode_rm01_address(rl);
+ srcval = fetch_data_byte(srcoffset);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ *destreg = sbb_byte(*destreg, srcval);
+ break;
+ case 2:
+ destreg = DECODE_RM_BYTE_REGISTER(rh);
+ DECODE_PRINTF(",");
+ srcoffset = decode_rm10_address(rl);
+ srcval = fetch_data_byte(srcoffset);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ *destreg = sbb_byte(*destreg, srcval);
+ break;
+ case 3: /* register to register */
+ destreg = DECODE_RM_BYTE_REGISTER(rh);
+ DECODE_PRINTF(",");
+ srcreg = DECODE_RM_BYTE_REGISTER(rl);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ *destreg = sbb_byte(*destreg, *srcreg);
+ break;
+ }
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0x1b
+****************************************************************************/
+void x86emuOp_sbb_word_R_RM(u8 X86EMU_UNUSED(op1))
+{
+ int mod, rl, rh;
+ uint srcoffset;
+
+ START_OF_INSTR();
+ DECODE_PRINTF("SBB\t");
+ FETCH_DECODE_MODRM(mod, rh, rl);
+ switch (mod) {
+ case 0:
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 *destreg;
+ u32 srcval;
+
+ destreg = DECODE_RM_LONG_REGISTER(rh);
+ DECODE_PRINTF(",");
+ srcoffset = decode_rm00_address(rl);
+ srcval = fetch_data_long(srcoffset);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ *destreg = sbb_long(*destreg, srcval);
+ } else {
+ u16 *destreg;
+ u16 srcval;
+
+ destreg = DECODE_RM_WORD_REGISTER(rh);
+ DECODE_PRINTF(",");
+ srcoffset = decode_rm00_address(rl);
+ srcval = fetch_data_word(srcoffset);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ *destreg = sbb_word(*destreg, srcval);
+ }
+ break;
+ case 1:
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 *destreg;
+ u32 srcval;
+
+ destreg = DECODE_RM_LONG_REGISTER(rh);
+ DECODE_PRINTF(",");
+ srcoffset = decode_rm01_address(rl);
+ srcval = fetch_data_long(srcoffset);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ *destreg = sbb_long(*destreg, srcval);
+ } else {
+ u16 *destreg;
+ u16 srcval;
+
+ destreg = DECODE_RM_WORD_REGISTER(rh);
+ DECODE_PRINTF(",");
+ srcoffset = decode_rm01_address(rl);
+ srcval = fetch_data_word(srcoffset);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ *destreg = sbb_word(*destreg, srcval);
+ }
+ break;
+ case 2:
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 *destreg;
+ u32 srcval;
+
+ destreg = DECODE_RM_LONG_REGISTER(rh);
+ DECODE_PRINTF(",");
+ srcoffset = decode_rm10_address(rl);
+ srcval = fetch_data_long(srcoffset);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ *destreg = sbb_long(*destreg, srcval);
+ } else {
+ u16 *destreg;
+ u16 srcval;
+
+ destreg = DECODE_RM_WORD_REGISTER(rh);
+ DECODE_PRINTF(",");
+ srcoffset = decode_rm10_address(rl);
+ srcval = fetch_data_word(srcoffset);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ *destreg = sbb_word(*destreg, srcval);
+ }
+ break;
+ case 3: /* register to register */
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 *destreg,*srcreg;
+
+ destreg = DECODE_RM_LONG_REGISTER(rh);
+ DECODE_PRINTF(",");
+ srcreg = DECODE_RM_LONG_REGISTER(rl);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ *destreg = sbb_long(*destreg, *srcreg);
+ } else {
+ u16 *destreg,*srcreg;
+
+ destreg = DECODE_RM_WORD_REGISTER(rh);
+ DECODE_PRINTF(",");
+ srcreg = DECODE_RM_WORD_REGISTER(rl);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ *destreg = sbb_word(*destreg, *srcreg);
+ }
+ break;
+ }
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0x1c
+****************************************************************************/
+void x86emuOp_sbb_byte_AL_IMM(u8 X86EMU_UNUSED(op1))
+{
+ u8 srcval;
+
+ START_OF_INSTR();
+ DECODE_PRINTF("SBB\tAL,");
+ srcval = fetch_byte_imm();
+ DECODE_PRINTF2("%x\n", srcval);
+ TRACE_AND_STEP();
+ M.x86.R_AL = sbb_byte(M.x86.R_AL, srcval);
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0x1d
+****************************************************************************/
+void x86emuOp_sbb_word_AX_IMM(u8 X86EMU_UNUSED(op1))
+{
+ u32 srcval;
+
+ START_OF_INSTR();
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ DECODE_PRINTF("SBB\tEAX,");
+ srcval = fetch_long_imm();
+ } else {
+ DECODE_PRINTF("SBB\tAX,");
+ srcval = fetch_word_imm();
+ }
+ DECODE_PRINTF2("%x\n", srcval);
+ TRACE_AND_STEP();
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ M.x86.R_EAX = sbb_long(M.x86.R_EAX, srcval);
+ } else {
+ M.x86.R_AX = sbb_word(M.x86.R_AX, (u16)srcval);
+ }
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0x1e
+****************************************************************************/
+void x86emuOp_push_DS(u8 X86EMU_UNUSED(op1))
+{
+ START_OF_INSTR();
+ DECODE_PRINTF("PUSH\tDS\n");
+ TRACE_AND_STEP();
+ push_word(M.x86.R_DS);
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0x1f
+****************************************************************************/
+void x86emuOp_pop_DS(u8 X86EMU_UNUSED(op1))
+{
+ START_OF_INSTR();
+ DECODE_PRINTF("POP\tDS\n");
+ TRACE_AND_STEP();
+ M.x86.R_DS = pop_word();
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0x20
+****************************************************************************/
+void x86emuOp_and_byte_RM_R(u8 X86EMU_UNUSED(op1))
+{
+ int mod, rl, rh;
+ u8 *destreg, *srcreg;
+ uint destoffset;
+ u8 destval;
+
+ START_OF_INSTR();
+ DECODE_PRINTF("AND\t");
+ FETCH_DECODE_MODRM(mod, rh, rl);
+
+ switch (mod) {
+ case 0:
+ destoffset = decode_rm00_address(rl);
+ DECODE_PRINTF(",");
+ destval = fetch_data_byte(destoffset);
+ srcreg = DECODE_RM_BYTE_REGISTER(rh);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ destval = and_byte(destval, *srcreg);
+ store_data_byte(destoffset, destval);
+ break;
+
+ case 1:
+ destoffset = decode_rm01_address(rl);
+ DECODE_PRINTF(",");
+ destval = fetch_data_byte(destoffset);
+ srcreg = DECODE_RM_BYTE_REGISTER(rh);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ destval = and_byte(destval, *srcreg);
+ store_data_byte(destoffset, destval);
+ break;
+
+ case 2:
+ destoffset = decode_rm10_address(rl);
+ DECODE_PRINTF(",");
+ destval = fetch_data_byte(destoffset);
+ srcreg = DECODE_RM_BYTE_REGISTER(rh);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ destval = and_byte(destval, *srcreg);
+ store_data_byte(destoffset, destval);
+ break;
+
+ case 3: /* register to register */
+ destreg = DECODE_RM_BYTE_REGISTER(rl);
+ DECODE_PRINTF(",");
+ srcreg = DECODE_RM_BYTE_REGISTER(rh);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ *destreg = and_byte(*destreg, *srcreg);
+ break;
+ }
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0x21
+****************************************************************************/
+void x86emuOp_and_word_RM_R(u8 X86EMU_UNUSED(op1))
+{
+ int mod, rl, rh;
+ uint destoffset;
+
+ START_OF_INSTR();
+ DECODE_PRINTF("AND\t");
+ FETCH_DECODE_MODRM(mod, rh, rl);
+ switch (mod) {
+ case 0:
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 destval;
+ u32 *srcreg;
+
+ destoffset = decode_rm00_address(rl);
+ DECODE_PRINTF(",");
+ destval = fetch_data_long(destoffset);
+ srcreg = DECODE_RM_LONG_REGISTER(rh);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ destval = and_long(destval, *srcreg);
+ store_data_long(destoffset, destval);
+ } else {
+ u16 destval;
+ u16 *srcreg;
+
+ destoffset = decode_rm00_address(rl);
+ DECODE_PRINTF(",");
+ destval = fetch_data_word(destoffset);
+ srcreg = DECODE_RM_WORD_REGISTER(rh);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ destval = and_word(destval, *srcreg);
+ store_data_word(destoffset, destval);
+ }
+ break;
+ case 1:
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 destval;
+ u32 *srcreg;
+
+ destoffset = decode_rm01_address(rl);
+ DECODE_PRINTF(",");
+ destval = fetch_data_long(destoffset);
+ srcreg = DECODE_RM_LONG_REGISTER(rh);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ destval = and_long(destval, *srcreg);
+ store_data_long(destoffset, destval);
+ } else {
+ u16 destval;
+ u16 *srcreg;
+
+ destoffset = decode_rm01_address(rl);
+ DECODE_PRINTF(",");
+ destval = fetch_data_word(destoffset);
+ srcreg = DECODE_RM_WORD_REGISTER(rh);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ destval = and_word(destval, *srcreg);
+ store_data_word(destoffset, destval);
+ }
+ break;
+ case 2:
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 destval;
+ u32 *srcreg;
+
+ destoffset = decode_rm10_address(rl);
+ DECODE_PRINTF(",");
+ destval = fetch_data_long(destoffset);
+ srcreg = DECODE_RM_LONG_REGISTER(rh);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ destval = and_long(destval, *srcreg);
+ store_data_long(destoffset, destval);
+ } else {
+ u16 destval;
+ u16 *srcreg;
+
+ destoffset = decode_rm10_address(rl);
+ DECODE_PRINTF(",");
+ destval = fetch_data_word(destoffset);
+ srcreg = DECODE_RM_WORD_REGISTER(rh);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ destval = and_word(destval, *srcreg);
+ store_data_word(destoffset, destval);
+ }
+ break;
+ case 3: /* register to register */
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 *destreg,*srcreg;
+
+ destreg = DECODE_RM_LONG_REGISTER(rl);
+ DECODE_PRINTF(",");
+ srcreg = DECODE_RM_LONG_REGISTER(rh);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ *destreg = and_long(*destreg, *srcreg);
+ } else {
+ u16 *destreg,*srcreg;
+
+ destreg = DECODE_RM_WORD_REGISTER(rl);
+ DECODE_PRINTF(",");
+ srcreg = DECODE_RM_WORD_REGISTER(rh);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ *destreg = and_word(*destreg, *srcreg);
+ }
+ break;
+ }
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0x22
+****************************************************************************/
+void x86emuOp_and_byte_R_RM(u8 X86EMU_UNUSED(op1))
+{
+ int mod, rl, rh;
+ u8 *destreg, *srcreg;
+ uint srcoffset;
+ u8 srcval;
+
+ START_OF_INSTR();
+ DECODE_PRINTF("AND\t");
+ FETCH_DECODE_MODRM(mod, rh, rl);
+ switch (mod) {
+ case 0:
+ destreg = DECODE_RM_BYTE_REGISTER(rh);
+ DECODE_PRINTF(",");
+ srcoffset = decode_rm00_address(rl);
+ srcval = fetch_data_byte(srcoffset);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ *destreg = and_byte(*destreg, srcval);
+ break;
+ case 1:
+ destreg = DECODE_RM_BYTE_REGISTER(rh);
+ DECODE_PRINTF(",");
+ srcoffset = decode_rm01_address(rl);
+ srcval = fetch_data_byte(srcoffset);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ *destreg = and_byte(*destreg, srcval);
+ break;
+ case 2:
+ destreg = DECODE_RM_BYTE_REGISTER(rh);
+ DECODE_PRINTF(",");
+ srcoffset = decode_rm10_address(rl);
+ srcval = fetch_data_byte(srcoffset);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ *destreg = and_byte(*destreg, srcval);
+ break;
+ case 3: /* register to register */
+ destreg = DECODE_RM_BYTE_REGISTER(rh);
+ DECODE_PRINTF(",");
+ srcreg = DECODE_RM_BYTE_REGISTER(rl);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ *destreg = and_byte(*destreg, *srcreg);
+ break;
+ }
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0x23
+****************************************************************************/
+void x86emuOp_and_word_R_RM(u8 X86EMU_UNUSED(op1))
+{
+ int mod, rl, rh;
+ uint srcoffset;
+
+ START_OF_INSTR();
+ DECODE_PRINTF("AND\t");
+ FETCH_DECODE_MODRM(mod, rh, rl);
+ switch (mod) {
+ case 0:
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 *destreg;
+ u32 srcval;
+
+ destreg = DECODE_RM_LONG_REGISTER(rh);
+ DECODE_PRINTF(",");
+ srcoffset = decode_rm00_address(rl);
+ srcval = fetch_data_long(srcoffset);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ *destreg = and_long(*destreg, srcval);
+ } else {
+ u16 *destreg;
+ u16 srcval;
+
+ destreg = DECODE_RM_WORD_REGISTER(rh);
+ DECODE_PRINTF(",");
+ srcoffset = decode_rm00_address(rl);
+ srcval = fetch_data_word(srcoffset);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ *destreg = and_word(*destreg, srcval);
+ }
+ break;
+ case 1:
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 *destreg;
+ u32 srcval;
+
+ destreg = DECODE_RM_LONG_REGISTER(rh);
+ DECODE_PRINTF(",");
+ srcoffset = decode_rm01_address(rl);
+ srcval = fetch_data_long(srcoffset);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ *destreg = and_long(*destreg, srcval);
+ break;
+ } else {
+ u16 *destreg;
+ u16 srcval;
+
+ destreg = DECODE_RM_WORD_REGISTER(rh);
+ DECODE_PRINTF(",");
+ srcoffset = decode_rm01_address(rl);
+ srcval = fetch_data_word(srcoffset);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ *destreg = and_word(*destreg, srcval);
+ break;
+ }
+ case 2:
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 *destreg;
+ u32 srcval;
+
+ destreg = DECODE_RM_LONG_REGISTER(rh);
+ DECODE_PRINTF(",");
+ srcoffset = decode_rm10_address(rl);
+ srcval = fetch_data_long(srcoffset);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ *destreg = and_long(*destreg, srcval);
+ } else {
+ u16 *destreg;
+ u16 srcval;
+
+ destreg = DECODE_RM_WORD_REGISTER(rh);
+ DECODE_PRINTF(",");
+ srcoffset = decode_rm10_address(rl);
+ srcval = fetch_data_word(srcoffset);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ *destreg = and_word(*destreg, srcval);
+ }
+ break;
+ case 3: /* register to register */
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 *destreg,*srcreg;
+
+ destreg = DECODE_RM_LONG_REGISTER(rh);
+ DECODE_PRINTF(",");
+ srcreg = DECODE_RM_LONG_REGISTER(rl);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ *destreg = and_long(*destreg, *srcreg);
+ } else {
+ u16 *destreg,*srcreg;
+
+ destreg = DECODE_RM_WORD_REGISTER(rh);
+ DECODE_PRINTF(",");
+ srcreg = DECODE_RM_WORD_REGISTER(rl);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ *destreg = and_word(*destreg, *srcreg);
+ }
+ break;
+ }
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0x24
+****************************************************************************/
+void x86emuOp_and_byte_AL_IMM(u8 X86EMU_UNUSED(op1))
+{
+ u8 srcval;
+
+ START_OF_INSTR();
+ DECODE_PRINTF("AND\tAL,");
+ srcval = fetch_byte_imm();
+ DECODE_PRINTF2("%x\n", srcval);
+ TRACE_AND_STEP();
+ M.x86.R_AL = and_byte(M.x86.R_AL, srcval);
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0x25
+****************************************************************************/
+void x86emuOp_and_word_AX_IMM(u8 X86EMU_UNUSED(op1))
+{
+ u32 srcval;
+
+ START_OF_INSTR();
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ DECODE_PRINTF("AND\tEAX,");
+ srcval = fetch_long_imm();
+ } else {
+ DECODE_PRINTF("AND\tAX,");
+ srcval = fetch_word_imm();
+ }
+ DECODE_PRINTF2("%x\n", srcval);
+ TRACE_AND_STEP();
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ M.x86.R_EAX = and_long(M.x86.R_EAX, srcval);
+ } else {
+ M.x86.R_AX = and_word(M.x86.R_AX, (u16)srcval);
+ }
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0x26
+****************************************************************************/
+void x86emuOp_segovr_ES(u8 X86EMU_UNUSED(op1))
+{
+ START_OF_INSTR();
+ DECODE_PRINTF("ES:\n");
+ TRACE_AND_STEP();
+ M.x86.mode |= SYSMODE_SEGOVR_ES;
+ /*
+ * note the lack of DECODE_CLEAR_SEGOVR(r) since, here is one of 4
+ * opcode subroutines we do not want to do this.
+ */
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0x27
+****************************************************************************/
+void x86emuOp_daa(u8 X86EMU_UNUSED(op1))
+{
+ START_OF_INSTR();
+ DECODE_PRINTF("DAA\n");
+ TRACE_AND_STEP();
+ M.x86.R_AL = daa_byte(M.x86.R_AL);
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0x28
+****************************************************************************/
+void x86emuOp_sub_byte_RM_R(u8 X86EMU_UNUSED(op1))
+{
+ int mod, rl, rh;
+ u8 *destreg, *srcreg;
+ uint destoffset;
+ u8 destval;
+
+ START_OF_INSTR();
+ DECODE_PRINTF("SUB\t");
+ FETCH_DECODE_MODRM(mod, rh, rl);
+ switch (mod) {
+ case 0:
+ destoffset = decode_rm00_address(rl);
+ DECODE_PRINTF(",");
+ destval = fetch_data_byte(destoffset);
+ srcreg = DECODE_RM_BYTE_REGISTER(rh);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ destval = sub_byte(destval, *srcreg);
+ store_data_byte(destoffset, destval);
+ break;
+ case 1:
+ destoffset = decode_rm01_address(rl);
+ DECODE_PRINTF(",");
+ destval = fetch_data_byte(destoffset);
+ srcreg = DECODE_RM_BYTE_REGISTER(rh);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ destval = sub_byte(destval, *srcreg);
+ store_data_byte(destoffset, destval);
+ break;
+ case 2:
+ destoffset = decode_rm10_address(rl);
+ DECODE_PRINTF(",");
+ destval = fetch_data_byte(destoffset);
+ srcreg = DECODE_RM_BYTE_REGISTER(rh);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ destval = sub_byte(destval, *srcreg);
+ store_data_byte(destoffset, destval);
+ break;
+ case 3: /* register to register */
+ destreg = DECODE_RM_BYTE_REGISTER(rl);
+ DECODE_PRINTF(",");
+ srcreg = DECODE_RM_BYTE_REGISTER(rh);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ *destreg = sub_byte(*destreg, *srcreg);
+ break;
+ }
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0x29
+****************************************************************************/
+void x86emuOp_sub_word_RM_R(u8 X86EMU_UNUSED(op1))
+{
+ int mod, rl, rh;
+ uint destoffset;
+
+ START_OF_INSTR();
+ DECODE_PRINTF("SUB\t");
+ FETCH_DECODE_MODRM(mod, rh, rl);
+ switch (mod) {
+ case 0:
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 destval;
+ u32 *srcreg;
+
+ destoffset = decode_rm00_address(rl);
+ DECODE_PRINTF(",");
+ destval = fetch_data_long(destoffset);
+ srcreg = DECODE_RM_LONG_REGISTER(rh);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ destval = sub_long(destval, *srcreg);
+ store_data_long(destoffset, destval);
+ } else {
+ u16 destval;
+ u16 *srcreg;
+
+ destoffset = decode_rm00_address(rl);
+ DECODE_PRINTF(",");
+ destval = fetch_data_word(destoffset);
+ srcreg = DECODE_RM_WORD_REGISTER(rh);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ destval = sub_word(destval, *srcreg);
+ store_data_word(destoffset, destval);
+ }
+ break;
+ case 1:
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 destval;
+ u32 *srcreg;
+
+ destoffset = decode_rm01_address(rl);
+ DECODE_PRINTF(",");
+ destval = fetch_data_long(destoffset);
+ srcreg = DECODE_RM_LONG_REGISTER(rh);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ destval = sub_long(destval, *srcreg);
+ store_data_long(destoffset, destval);
+ } else {
+ u16 destval;
+ u16 *srcreg;
+
+ destoffset = decode_rm01_address(rl);
+ DECODE_PRINTF(",");
+ destval = fetch_data_word(destoffset);
+ srcreg = DECODE_RM_WORD_REGISTER(rh);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ destval = sub_word(destval, *srcreg);
+ store_data_word(destoffset, destval);
+ }
+ break;
+ case 2:
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 destval;
+ u32 *srcreg;
+
+ destoffset = decode_rm10_address(rl);
+ DECODE_PRINTF(",");
+ destval = fetch_data_long(destoffset);
+ srcreg = DECODE_RM_LONG_REGISTER(rh);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ destval = sub_long(destval, *srcreg);
+ store_data_long(destoffset, destval);
+ } else {
+ u16 destval;
+ u16 *srcreg;
+
+ destoffset = decode_rm10_address(rl);
+ DECODE_PRINTF(",");
+ destval = fetch_data_word(destoffset);
+ srcreg = DECODE_RM_WORD_REGISTER(rh);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ destval = sub_word(destval, *srcreg);
+ store_data_word(destoffset, destval);
+ }
+ break;
+ case 3: /* register to register */
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 *destreg,*srcreg;
+
+ destreg = DECODE_RM_LONG_REGISTER(rl);
+ DECODE_PRINTF(",");
+ srcreg = DECODE_RM_LONG_REGISTER(rh);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ *destreg = sub_long(*destreg, *srcreg);
+ } else {
+ u16 *destreg,*srcreg;
+
+ destreg = DECODE_RM_WORD_REGISTER(rl);
+ DECODE_PRINTF(",");
+ srcreg = DECODE_RM_WORD_REGISTER(rh);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ *destreg = sub_word(*destreg, *srcreg);
+ }
+ break;
+ }
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0x2a
+****************************************************************************/
+void x86emuOp_sub_byte_R_RM(u8 X86EMU_UNUSED(op1))
+{
+ int mod, rl, rh;
+ u8 *destreg, *srcreg;
+ uint srcoffset;
+ u8 srcval;
+
+ START_OF_INSTR();
+ DECODE_PRINTF("SUB\t");
+ FETCH_DECODE_MODRM(mod, rh, rl);
+ switch (mod) {
+ case 0:
+ destreg = DECODE_RM_BYTE_REGISTER(rh);
+ DECODE_PRINTF(",");
+ srcoffset = decode_rm00_address(rl);
+ srcval = fetch_data_byte(srcoffset);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ *destreg = sub_byte(*destreg, srcval);
+ break;
+ case 1:
+ destreg = DECODE_RM_BYTE_REGISTER(rh);
+ DECODE_PRINTF(",");
+ srcoffset = decode_rm01_address(rl);
+ srcval = fetch_data_byte(srcoffset);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ *destreg = sub_byte(*destreg, srcval);
+ break;
+ case 2:
+ destreg = DECODE_RM_BYTE_REGISTER(rh);
+ DECODE_PRINTF(",");
+ srcoffset = decode_rm10_address(rl);
+ srcval = fetch_data_byte(srcoffset);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ *destreg = sub_byte(*destreg, srcval);
+ break;
+ case 3: /* register to register */
+ destreg = DECODE_RM_BYTE_REGISTER(rh);
+ DECODE_PRINTF(",");
+ srcreg = DECODE_RM_BYTE_REGISTER(rl);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ *destreg = sub_byte(*destreg, *srcreg);
+ break;
+ }
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0x2b
+****************************************************************************/
+void x86emuOp_sub_word_R_RM(u8 X86EMU_UNUSED(op1))
+{
+ int mod, rl, rh;
+ uint srcoffset;
+
+ START_OF_INSTR();
+ DECODE_PRINTF("SUB\t");
+ FETCH_DECODE_MODRM(mod, rh, rl);
+ switch (mod) {
+ case 0:
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 *destreg;
+ u32 srcval;
+
+ destreg = DECODE_RM_LONG_REGISTER(rh);
+ DECODE_PRINTF(",");
+ srcoffset = decode_rm00_address(rl);
+ srcval = fetch_data_long(srcoffset);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ *destreg = sub_long(*destreg, srcval);
+ } else {
+ u16 *destreg;
+ u16 srcval;
+
+ destreg = DECODE_RM_WORD_REGISTER(rh);
+ DECODE_PRINTF(",");
+ srcoffset = decode_rm00_address(rl);
+ srcval = fetch_data_word(srcoffset);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ *destreg = sub_word(*destreg, srcval);
+ }
+ break;
+ case 1:
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 *destreg;
+ u32 srcval;
+
+ destreg = DECODE_RM_LONG_REGISTER(rh);
+ DECODE_PRINTF(",");
+ srcoffset = decode_rm01_address(rl);
+ srcval = fetch_data_long(srcoffset);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ *destreg = sub_long(*destreg, srcval);
+ } else {
+ u16 *destreg;
+ u16 srcval;
+
+ destreg = DECODE_RM_WORD_REGISTER(rh);
+ DECODE_PRINTF(",");
+ srcoffset = decode_rm01_address(rl);
+ srcval = fetch_data_word(srcoffset);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ *destreg = sub_word(*destreg, srcval);
+ }
+ break;
+ case 2:
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 *destreg;
+ u32 srcval;
+
+ destreg = DECODE_RM_LONG_REGISTER(rh);
+ DECODE_PRINTF(",");
+ srcoffset = decode_rm10_address(rl);
+ srcval = fetch_data_long(srcoffset);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ *destreg = sub_long(*destreg, srcval);
+ } else {
+ u16 *destreg;
+ u16 srcval;
+
+ destreg = DECODE_RM_WORD_REGISTER(rh);
+ DECODE_PRINTF(",");
+ srcoffset = decode_rm10_address(rl);
+ srcval = fetch_data_word(srcoffset);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ *destreg = sub_word(*destreg, srcval);
+ }
+ break;
+ case 3: /* register to register */
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 *destreg,*srcreg;
+
+ destreg = DECODE_RM_LONG_REGISTER(rh);
+ DECODE_PRINTF(",");
+ srcreg = DECODE_RM_LONG_REGISTER(rl);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ *destreg = sub_long(*destreg, *srcreg);
+ } else {
+ u16 *destreg,*srcreg;
+
+ destreg = DECODE_RM_WORD_REGISTER(rh);
+ DECODE_PRINTF(",");
+ srcreg = DECODE_RM_WORD_REGISTER(rl);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ *destreg = sub_word(*destreg, *srcreg);
+ }
+ break;
+ }
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0x2c
+****************************************************************************/
+void x86emuOp_sub_byte_AL_IMM(u8 X86EMU_UNUSED(op1))
+{
+ u8 srcval;
+
+ START_OF_INSTR();
+ DECODE_PRINTF("SUB\tAL,");
+ srcval = fetch_byte_imm();
+ DECODE_PRINTF2("%x\n", srcval);
+ TRACE_AND_STEP();
+ M.x86.R_AL = sub_byte(M.x86.R_AL, srcval);
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0x2d
+****************************************************************************/
+void x86emuOp_sub_word_AX_IMM(u8 X86EMU_UNUSED(op1))
+{
+ u32 srcval;
+
+ START_OF_INSTR();
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ DECODE_PRINTF("SUB\tEAX,");
+ srcval = fetch_long_imm();
+ } else {
+ DECODE_PRINTF("SUB\tAX,");
+ srcval = fetch_word_imm();
+ }
+ DECODE_PRINTF2("%x\n", srcval);
+ TRACE_AND_STEP();
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ M.x86.R_EAX = sub_long(M.x86.R_EAX, srcval);
+ } else {
+ M.x86.R_AX = sub_word(M.x86.R_AX, (u16)srcval);
+ }
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0x2e
+****************************************************************************/
+void x86emuOp_segovr_CS(u8 X86EMU_UNUSED(op1))
+{
+ START_OF_INSTR();
+ DECODE_PRINTF("CS:\n");
+ TRACE_AND_STEP();
+ M.x86.mode |= SYSMODE_SEGOVR_CS;
+ /* note no DECODE_CLEAR_SEGOVR here. */
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0x2f
+****************************************************************************/
+void x86emuOp_das(u8 X86EMU_UNUSED(op1))
+{
+ START_OF_INSTR();
+ DECODE_PRINTF("DAS\n");
+ TRACE_AND_STEP();
+ M.x86.R_AL = das_byte(M.x86.R_AL);
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0x30
+****************************************************************************/
+void x86emuOp_xor_byte_RM_R(u8 X86EMU_UNUSED(op1))
+{
+ int mod, rl, rh;
+ u8 *destreg, *srcreg;
+ uint destoffset;
+ u8 destval;
+
+ START_OF_INSTR();
+ DECODE_PRINTF("XOR\t");
+ FETCH_DECODE_MODRM(mod, rh, rl);
+ switch (mod) {
+ case 0:
+ destoffset = decode_rm00_address(rl);
+ DECODE_PRINTF(",");
+ destval = fetch_data_byte(destoffset);
+ srcreg = DECODE_RM_BYTE_REGISTER(rh);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ destval = xor_byte(destval, *srcreg);
+ store_data_byte(destoffset, destval);
+ break;
+ case 1:
+ destoffset = decode_rm01_address(rl);
+ DECODE_PRINTF(",");
+ destval = fetch_data_byte(destoffset);
+ srcreg = DECODE_RM_BYTE_REGISTER(rh);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ destval = xor_byte(destval, *srcreg);
+ store_data_byte(destoffset, destval);
+ break;
+ case 2:
+ destoffset = decode_rm10_address(rl);
+ DECODE_PRINTF(",");
+ destval = fetch_data_byte(destoffset);
+ srcreg = DECODE_RM_BYTE_REGISTER(rh);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ destval = xor_byte(destval, *srcreg);
+ store_data_byte(destoffset, destval);
+ break;
+ case 3: /* register to register */
+ destreg = DECODE_RM_BYTE_REGISTER(rl);
+ DECODE_PRINTF(",");
+ srcreg = DECODE_RM_BYTE_REGISTER(rh);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ *destreg = xor_byte(*destreg, *srcreg);
+ break;
+ }
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0x31
+****************************************************************************/
+void x86emuOp_xor_word_RM_R(u8 X86EMU_UNUSED(op1))
+{
+ int mod, rl, rh;
+ uint destoffset;
+
+ START_OF_INSTR();
+ DECODE_PRINTF("XOR\t");
+ FETCH_DECODE_MODRM(mod, rh, rl);
+ switch (mod) {
+ case 0:
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 destval;
+ u32 *srcreg;
+
+ destoffset = decode_rm00_address(rl);
+ DECODE_PRINTF(",");
+ destval = fetch_data_long(destoffset);
+ srcreg = DECODE_RM_LONG_REGISTER(rh);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ destval = xor_long(destval, *srcreg);
+ store_data_long(destoffset, destval);
+ } else {
+ u16 destval;
+ u16 *srcreg;
+
+ destoffset = decode_rm00_address(rl);
+ DECODE_PRINTF(",");
+ destval = fetch_data_word(destoffset);
+ srcreg = DECODE_RM_WORD_REGISTER(rh);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ destval = xor_word(destval, *srcreg);
+ store_data_word(destoffset, destval);
+ }
+ break;
+ case 1:
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 destval;
+ u32 *srcreg;
+
+ destoffset = decode_rm01_address(rl);
+ DECODE_PRINTF(",");
+ destval = fetch_data_long(destoffset);
+ srcreg = DECODE_RM_LONG_REGISTER(rh);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ destval = xor_long(destval, *srcreg);
+ store_data_long(destoffset, destval);
+ } else {
+ u16 destval;
+ u16 *srcreg;
+
+ destoffset = decode_rm01_address(rl);
+ DECODE_PRINTF(",");
+ destval = fetch_data_word(destoffset);
+ srcreg = DECODE_RM_WORD_REGISTER(rh);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ destval = xor_word(destval, *srcreg);
+ store_data_word(destoffset, destval);
+ }
+ break;
+ case 2:
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 destval;
+ u32 *srcreg;
+
+ destoffset = decode_rm10_address(rl);
+ DECODE_PRINTF(",");
+ destval = fetch_data_long(destoffset);
+ srcreg = DECODE_RM_LONG_REGISTER(rh);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ destval = xor_long(destval, *srcreg);
+ store_data_long(destoffset, destval);
+ } else {
+ u16 destval;
+ u16 *srcreg;
+
+ destoffset = decode_rm10_address(rl);
+ DECODE_PRINTF(",");
+ destval = fetch_data_word(destoffset);
+ srcreg = DECODE_RM_WORD_REGISTER(rh);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ destval = xor_word(destval, *srcreg);
+ store_data_word(destoffset, destval);
+ }
+ break;
+ case 3: /* register to register */
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 *destreg,*srcreg;
+
+ destreg = DECODE_RM_LONG_REGISTER(rl);
+ DECODE_PRINTF(",");
+ srcreg = DECODE_RM_LONG_REGISTER(rh);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ *destreg = xor_long(*destreg, *srcreg);
+ } else {
+ u16 *destreg,*srcreg;
+
+ destreg = DECODE_RM_WORD_REGISTER(rl);
+ DECODE_PRINTF(",");
+ srcreg = DECODE_RM_WORD_REGISTER(rh);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ *destreg = xor_word(*destreg, *srcreg);
+ }
+ break;
+ }
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0x32
+****************************************************************************/
+void x86emuOp_xor_byte_R_RM(u8 X86EMU_UNUSED(op1))
+{
+ int mod, rl, rh;
+ u8 *destreg, *srcreg;
+ uint srcoffset;
+ u8 srcval;
+
+ START_OF_INSTR();
+ DECODE_PRINTF("XOR\t");
+ FETCH_DECODE_MODRM(mod, rh, rl);
+ switch (mod) {
+ case 0:
+ destreg = DECODE_RM_BYTE_REGISTER(rh);
+ DECODE_PRINTF(",");
+ srcoffset = decode_rm00_address(rl);
+ srcval = fetch_data_byte(srcoffset);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ *destreg = xor_byte(*destreg, srcval);
+ break;
+ case 1:
+ destreg = DECODE_RM_BYTE_REGISTER(rh);
+ DECODE_PRINTF(",");
+ srcoffset = decode_rm01_address(rl);
+ srcval = fetch_data_byte(srcoffset);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ *destreg = xor_byte(*destreg, srcval);
+ break;
+ case 2:
+ destreg = DECODE_RM_BYTE_REGISTER(rh);
+ DECODE_PRINTF(",");
+ srcoffset = decode_rm10_address(rl);
+ srcval = fetch_data_byte(srcoffset);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ *destreg = xor_byte(*destreg, srcval);
+ break;
+ case 3: /* register to register */
+ destreg = DECODE_RM_BYTE_REGISTER(rh);
+ DECODE_PRINTF(",");
+ srcreg = DECODE_RM_BYTE_REGISTER(rl);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ *destreg = xor_byte(*destreg, *srcreg);
+ break;
+ }
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0x33
+****************************************************************************/
+void x86emuOp_xor_word_R_RM(u8 X86EMU_UNUSED(op1))
+{
+ int mod, rl, rh;
+ uint srcoffset;
+
+ START_OF_INSTR();
+ DECODE_PRINTF("XOR\t");
+ FETCH_DECODE_MODRM(mod, rh, rl);
+ switch (mod) {
+ case 0:
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 *destreg;
+ u32 srcval;
+
+ destreg = DECODE_RM_LONG_REGISTER(rh);
+ DECODE_PRINTF(",");
+ srcoffset = decode_rm00_address(rl);
+ srcval = fetch_data_long(srcoffset);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ *destreg = xor_long(*destreg, srcval);
+ } else {
+ u16 *destreg;
+ u16 srcval;
+
+ destreg = DECODE_RM_WORD_REGISTER(rh);
+ DECODE_PRINTF(",");
+ srcoffset = decode_rm00_address(rl);
+ srcval = fetch_data_word(srcoffset);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ *destreg = xor_word(*destreg, srcval);
+ }
+ break;
+ case 1:
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 *destreg;
+ u32 srcval;
+
+ destreg = DECODE_RM_LONG_REGISTER(rh);
+ DECODE_PRINTF(",");
+ srcoffset = decode_rm01_address(rl);
+ srcval = fetch_data_long(srcoffset);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ *destreg = xor_long(*destreg, srcval);
+ } else {
+ u16 *destreg;
+ u16 srcval;
+
+ destreg = DECODE_RM_WORD_REGISTER(rh);
+ DECODE_PRINTF(",");
+ srcoffset = decode_rm01_address(rl);
+ srcval = fetch_data_word(srcoffset);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ *destreg = xor_word(*destreg, srcval);
+ }
+ break;
+ case 2:
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 *destreg;
+ u32 srcval;
+
+ destreg = DECODE_RM_LONG_REGISTER(rh);
+ DECODE_PRINTF(",");
+ srcoffset = decode_rm10_address(rl);
+ srcval = fetch_data_long(srcoffset);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ *destreg = xor_long(*destreg, srcval);
+ } else {
+ u16 *destreg;
+ u16 srcval;
+
+ destreg = DECODE_RM_WORD_REGISTER(rh);
+ DECODE_PRINTF(",");
+ srcoffset = decode_rm10_address(rl);
+ srcval = fetch_data_word(srcoffset);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ *destreg = xor_word(*destreg, srcval);
+ }
+ break;
+ case 3: /* register to register */
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 *destreg,*srcreg;
+
+ destreg = DECODE_RM_LONG_REGISTER(rh);
+ DECODE_PRINTF(",");
+ srcreg = DECODE_RM_LONG_REGISTER(rl);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ *destreg = xor_long(*destreg, *srcreg);
+ } else {
+ u16 *destreg,*srcreg;
+
+ destreg = DECODE_RM_WORD_REGISTER(rh);
+ DECODE_PRINTF(",");
+ srcreg = DECODE_RM_WORD_REGISTER(rl);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ *destreg = xor_word(*destreg, *srcreg);
+ }
+ break;
+ }
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0x34
+****************************************************************************/
+void x86emuOp_xor_byte_AL_IMM(u8 X86EMU_UNUSED(op1))
+{
+ u8 srcval;
+
+ START_OF_INSTR();
+ DECODE_PRINTF("XOR\tAL,");
+ srcval = fetch_byte_imm();
+ DECODE_PRINTF2("%x\n", srcval);
+ TRACE_AND_STEP();
+ M.x86.R_AL = xor_byte(M.x86.R_AL, srcval);
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0x35
+****************************************************************************/
+void x86emuOp_xor_word_AX_IMM(u8 X86EMU_UNUSED(op1))
+{
+ u32 srcval;
+
+ START_OF_INSTR();
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ DECODE_PRINTF("XOR\tEAX,");
+ srcval = fetch_long_imm();
+ } else {
+ DECODE_PRINTF("XOR\tAX,");
+ srcval = fetch_word_imm();
+ }
+ DECODE_PRINTF2("%x\n", srcval);
+ TRACE_AND_STEP();
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ M.x86.R_EAX = xor_long(M.x86.R_EAX, srcval);
+ } else {
+ M.x86.R_AX = xor_word(M.x86.R_AX, (u16)srcval);
+ }
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0x36
+****************************************************************************/
+void x86emuOp_segovr_SS(u8 X86EMU_UNUSED(op1))
+{
+ START_OF_INSTR();
+ DECODE_PRINTF("SS:\n");
+ TRACE_AND_STEP();
+ M.x86.mode |= SYSMODE_SEGOVR_SS;
+ /* no DECODE_CLEAR_SEGOVR ! */
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0x37
+****************************************************************************/
+void x86emuOp_aaa(u8 X86EMU_UNUSED(op1))
+{
+ START_OF_INSTR();
+ DECODE_PRINTF("AAA\n");
+ TRACE_AND_STEP();
+ M.x86.R_AX = aaa_word(M.x86.R_AX);
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0x38
+****************************************************************************/
+void x86emuOp_cmp_byte_RM_R(u8 X86EMU_UNUSED(op1))
+{
+ int mod, rl, rh;
+ uint destoffset;
+ u8 *destreg, *srcreg;
+ u8 destval;
+
+ START_OF_INSTR();
+ DECODE_PRINTF("CMP\t");
+ FETCH_DECODE_MODRM(mod, rh, rl);
+ switch (mod) {
+ case 0:
+ destoffset = decode_rm00_address(rl);
+ DECODE_PRINTF(",");
+ destval = fetch_data_byte(destoffset);
+ srcreg = DECODE_RM_BYTE_REGISTER(rh);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ cmp_byte(destval, *srcreg);
+ break;
+ case 1:
+ destoffset = decode_rm01_address(rl);
+ DECODE_PRINTF(",");
+ destval = fetch_data_byte(destoffset);
+ srcreg = DECODE_RM_BYTE_REGISTER(rh);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ cmp_byte(destval, *srcreg);
+ break;
+ case 2:
+ destoffset = decode_rm10_address(rl);
+ DECODE_PRINTF(",");
+ destval = fetch_data_byte(destoffset);
+ srcreg = DECODE_RM_BYTE_REGISTER(rh);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ cmp_byte(destval, *srcreg);
+ break;
+ case 3: /* register to register */
+ destreg = DECODE_RM_BYTE_REGISTER(rl);
+ DECODE_PRINTF(",");
+ srcreg = DECODE_RM_BYTE_REGISTER(rh);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ cmp_byte(*destreg, *srcreg);
+ break;
+ }
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0x39
+****************************************************************************/
+void x86emuOp_cmp_word_RM_R(u8 X86EMU_UNUSED(op1))
+{
+ int mod, rl, rh;
+ uint destoffset;
+
+ START_OF_INSTR();
+ DECODE_PRINTF("CMP\t");
+ FETCH_DECODE_MODRM(mod, rh, rl);
+ switch (mod) {
+ case 0:
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 destval;
+ u32 *srcreg;
+
+ destoffset = decode_rm00_address(rl);
+ DECODE_PRINTF(",");
+ destval = fetch_data_long(destoffset);
+ srcreg = DECODE_RM_LONG_REGISTER(rh);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ cmp_long(destval, *srcreg);
+ } else {
+ u16 destval;
+ u16 *srcreg;
+
+ destoffset = decode_rm00_address(rl);
+ DECODE_PRINTF(",");
+ destval = fetch_data_word(destoffset);
+ srcreg = DECODE_RM_WORD_REGISTER(rh);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ cmp_word(destval, *srcreg);
+ }
+ break;
+ case 1:
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 destval;
+ u32 *srcreg;
+
+ destoffset = decode_rm01_address(rl);
+ DECODE_PRINTF(",");
+ destval = fetch_data_long(destoffset);
+ srcreg = DECODE_RM_LONG_REGISTER(rh);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ cmp_long(destval, *srcreg);
+ } else {
+ u16 destval;
+ u16 *srcreg;
+
+ destoffset = decode_rm01_address(rl);
+ DECODE_PRINTF(",");
+ destval = fetch_data_word(destoffset);
+ srcreg = DECODE_RM_WORD_REGISTER(rh);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ cmp_word(destval, *srcreg);
+ }
+ break;
+ case 2:
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 destval;
+ u32 *srcreg;
+
+ destoffset = decode_rm10_address(rl);
+ DECODE_PRINTF(",");
+ destval = fetch_data_long(destoffset);
+ srcreg = DECODE_RM_LONG_REGISTER(rh);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ cmp_long(destval, *srcreg);
+ } else {
+ u16 destval;
+ u16 *srcreg;
+
+ destoffset = decode_rm10_address(rl);
+ DECODE_PRINTF(",");
+ destval = fetch_data_word(destoffset);
+ srcreg = DECODE_RM_WORD_REGISTER(rh);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ cmp_word(destval, *srcreg);
+ }
+ break;
+ case 3: /* register to register */
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 *destreg,*srcreg;
+
+ destreg = DECODE_RM_LONG_REGISTER(rl);
+ DECODE_PRINTF(",");
+ srcreg = DECODE_RM_LONG_REGISTER(rh);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ cmp_long(*destreg, *srcreg);
+ } else {
+ u16 *destreg,*srcreg;
+
+ destreg = DECODE_RM_WORD_REGISTER(rl);
+ DECODE_PRINTF(",");
+ srcreg = DECODE_RM_WORD_REGISTER(rh);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ cmp_word(*destreg, *srcreg);
+ }
+ break;
+ }
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0x3a
+****************************************************************************/
+void x86emuOp_cmp_byte_R_RM(u8 X86EMU_UNUSED(op1))
+{
+ int mod, rl, rh;
+ u8 *destreg, *srcreg;
+ uint srcoffset;
+ u8 srcval;
+
+ START_OF_INSTR();
+ DECODE_PRINTF("CMP\t");
+ FETCH_DECODE_MODRM(mod, rh, rl);
+ switch (mod) {
+ case 0:
+ destreg = DECODE_RM_BYTE_REGISTER(rh);
+ DECODE_PRINTF(",");
+ srcoffset = decode_rm00_address(rl);
+ srcval = fetch_data_byte(srcoffset);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ cmp_byte(*destreg, srcval);
+ break;
+ case 1:
+ destreg = DECODE_RM_BYTE_REGISTER(rh);
+ DECODE_PRINTF(",");
+ srcoffset = decode_rm01_address(rl);
+ srcval = fetch_data_byte(srcoffset);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ cmp_byte(*destreg, srcval);
+ break;
+ case 2:
+ destreg = DECODE_RM_BYTE_REGISTER(rh);
+ DECODE_PRINTF(",");
+ srcoffset = decode_rm10_address(rl);
+ srcval = fetch_data_byte(srcoffset);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ cmp_byte(*destreg, srcval);
+ break;
+ case 3: /* register to register */
+ destreg = DECODE_RM_BYTE_REGISTER(rh);
+ DECODE_PRINTF(",");
+ srcreg = DECODE_RM_BYTE_REGISTER(rl);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ cmp_byte(*destreg, *srcreg);
+ break;
+ }
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0x3b
+****************************************************************************/
+void x86emuOp_cmp_word_R_RM(u8 X86EMU_UNUSED(op1))
+{
+ int mod, rl, rh;
+ uint srcoffset;
+
+ START_OF_INSTR();
+ DECODE_PRINTF("CMP\t");
+ FETCH_DECODE_MODRM(mod, rh, rl);
+ switch (mod) {
+ case 0:
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 *destreg;
+ u32 srcval;
+
+ destreg = DECODE_RM_LONG_REGISTER(rh);
+ DECODE_PRINTF(",");
+ srcoffset = decode_rm00_address(rl);
+ srcval = fetch_data_long(srcoffset);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ cmp_long(*destreg, srcval);
+ } else {
+ u16 *destreg;
+ u16 srcval;
+
+ destreg = DECODE_RM_WORD_REGISTER(rh);
+ DECODE_PRINTF(",");
+ srcoffset = decode_rm00_address(rl);
+ srcval = fetch_data_word(srcoffset);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ cmp_word(*destreg, srcval);
+ }
+ break;
+ case 1:
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 *destreg;
+ u32 srcval;
+
+ destreg = DECODE_RM_LONG_REGISTER(rh);
+ DECODE_PRINTF(",");
+ srcoffset = decode_rm01_address(rl);
+ srcval = fetch_data_long(srcoffset);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ cmp_long(*destreg, srcval);
+ } else {
+ u16 *destreg;
+ u16 srcval;
+
+ destreg = DECODE_RM_WORD_REGISTER(rh);
+ DECODE_PRINTF(",");
+ srcoffset = decode_rm01_address(rl);
+ srcval = fetch_data_word(srcoffset);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ cmp_word(*destreg, srcval);
+ }
+ break;
+ case 2:
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 *destreg;
+ u32 srcval;
+
+ destreg = DECODE_RM_LONG_REGISTER(rh);
+ DECODE_PRINTF(",");
+ srcoffset = decode_rm10_address(rl);
+ srcval = fetch_data_long(srcoffset);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ cmp_long(*destreg, srcval);
+ } else {
+ u16 *destreg;
+ u16 srcval;
+
+ destreg = DECODE_RM_WORD_REGISTER(rh);
+ DECODE_PRINTF(",");
+ srcoffset = decode_rm10_address(rl);
+ srcval = fetch_data_word(srcoffset);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ cmp_word(*destreg, srcval);
+ }
+ break;
+ case 3: /* register to register */
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 *destreg,*srcreg;
+
+ destreg = DECODE_RM_LONG_REGISTER(rh);
+ DECODE_PRINTF(",");
+ srcreg = DECODE_RM_LONG_REGISTER(rl);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ cmp_long(*destreg, *srcreg);
+ } else {
+ u16 *destreg,*srcreg;
+
+ destreg = DECODE_RM_WORD_REGISTER(rh);
+ DECODE_PRINTF(",");
+ srcreg = DECODE_RM_WORD_REGISTER(rl);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ cmp_word(*destreg, *srcreg);
+ }
+ break;
+ }
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0x3c
+****************************************************************************/
+void x86emuOp_cmp_byte_AL_IMM(u8 X86EMU_UNUSED(op1))
+{
+ u8 srcval;
+
+ START_OF_INSTR();
+ DECODE_PRINTF("CMP\tAL,");
+ srcval = fetch_byte_imm();
+ DECODE_PRINTF2("%x\n", srcval);
+ TRACE_AND_STEP();
+ cmp_byte(M.x86.R_AL, srcval);
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0x3d
+****************************************************************************/
+void x86emuOp_cmp_word_AX_IMM(u8 X86EMU_UNUSED(op1))
+{
+ u32 srcval;
+
+ START_OF_INSTR();
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ DECODE_PRINTF("CMP\tEAX,");
+ srcval = fetch_long_imm();
+ } else {
+ DECODE_PRINTF("CMP\tAX,");
+ srcval = fetch_word_imm();
+ }
+ DECODE_PRINTF2("%x\n", srcval);
+ TRACE_AND_STEP();
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ cmp_long(M.x86.R_EAX, srcval);
+ } else {
+ cmp_word(M.x86.R_AX, (u16)srcval);
+ }
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0x3e
+****************************************************************************/
+void x86emuOp_segovr_DS(u8 X86EMU_UNUSED(op1))
+{
+ START_OF_INSTR();
+ DECODE_PRINTF("DS:\n");
+ TRACE_AND_STEP();
+ M.x86.mode |= SYSMODE_SEGOVR_DS;
+ /* NO DECODE_CLEAR_SEGOVR! */
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0x3f
+****************************************************************************/
+void x86emuOp_aas(u8 X86EMU_UNUSED(op1))
+{
+ START_OF_INSTR();
+ DECODE_PRINTF("AAS\n");
+ TRACE_AND_STEP();
+ M.x86.R_AX = aas_word(M.x86.R_AX);
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0x40
+****************************************************************************/
+void x86emuOp_inc_AX(u8 X86EMU_UNUSED(op1))
+{
+ START_OF_INSTR();
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ DECODE_PRINTF("INC\tEAX\n");
+ } else {
+ DECODE_PRINTF("INC\tAX\n");
+ }
+ TRACE_AND_STEP();
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ M.x86.R_EAX = inc_long(M.x86.R_EAX);
+ } else {
+ M.x86.R_AX = inc_word(M.x86.R_AX);
+ }
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0x41
+****************************************************************************/
+void x86emuOp_inc_CX(u8 X86EMU_UNUSED(op1))
+{
+ START_OF_INSTR();
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ DECODE_PRINTF("INC\tECX\n");
+ } else {
+ DECODE_PRINTF("INC\tCX\n");
+ }
+ TRACE_AND_STEP();
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ M.x86.R_ECX = inc_long(M.x86.R_ECX);
+ } else {
+ M.x86.R_CX = inc_word(M.x86.R_CX);
+ }
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0x42
+****************************************************************************/
+void x86emuOp_inc_DX(u8 X86EMU_UNUSED(op1))
+{
+ START_OF_INSTR();
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ DECODE_PRINTF("INC\tEDX\n");
+ } else {
+ DECODE_PRINTF("INC\tDX\n");
+ }
+ TRACE_AND_STEP();
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ M.x86.R_EDX = inc_long(M.x86.R_EDX);
+ } else {
+ M.x86.R_DX = inc_word(M.x86.R_DX);
+ }
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0x43
+****************************************************************************/
+void x86emuOp_inc_BX(u8 X86EMU_UNUSED(op1))
+{
+ START_OF_INSTR();
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ DECODE_PRINTF("INC\tEBX\n");
+ } else {
+ DECODE_PRINTF("INC\tBX\n");
+ }
+ TRACE_AND_STEP();
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ M.x86.R_EBX = inc_long(M.x86.R_EBX);
+ } else {
+ M.x86.R_BX = inc_word(M.x86.R_BX);
+ }
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0x44
+****************************************************************************/
+void x86emuOp_inc_SP(u8 X86EMU_UNUSED(op1))
+{
+ START_OF_INSTR();
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ DECODE_PRINTF("INC\tESP\n");
+ } else {
+ DECODE_PRINTF("INC\tSP\n");
+ }
+ TRACE_AND_STEP();
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ M.x86.R_ESP = inc_long(M.x86.R_ESP);
+ } else {
+ M.x86.R_SP = inc_word(M.x86.R_SP);
+ }
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0x45
+****************************************************************************/
+void x86emuOp_inc_BP(u8 X86EMU_UNUSED(op1))
+{
+ START_OF_INSTR();
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ DECODE_PRINTF("INC\tEBP\n");
+ } else {
+ DECODE_PRINTF("INC\tBP\n");
+ }
+ TRACE_AND_STEP();
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ M.x86.R_EBP = inc_long(M.x86.R_EBP);
+ } else {
+ M.x86.R_BP = inc_word(M.x86.R_BP);
+ }
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0x46
+****************************************************************************/
+void x86emuOp_inc_SI(u8 X86EMU_UNUSED(op1))
+{
+ START_OF_INSTR();
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ DECODE_PRINTF("INC\tESI\n");
+ } else {
+ DECODE_PRINTF("INC\tSI\n");
+ }
+ TRACE_AND_STEP();
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ M.x86.R_ESI = inc_long(M.x86.R_ESI);
+ } else {
+ M.x86.R_SI = inc_word(M.x86.R_SI);
+ }
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0x47
+****************************************************************************/
+void x86emuOp_inc_DI(u8 X86EMU_UNUSED(op1))
+{
+ START_OF_INSTR();
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ DECODE_PRINTF("INC\tEDI\n");
+ } else {
+ DECODE_PRINTF("INC\tDI\n");
+ }
+ TRACE_AND_STEP();
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ M.x86.R_EDI = inc_long(M.x86.R_EDI);
+ } else {
+ M.x86.R_DI = inc_word(M.x86.R_DI);
+ }
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0x48
+****************************************************************************/
+void x86emuOp_dec_AX(u8 X86EMU_UNUSED(op1))
+{
+ START_OF_INSTR();
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ DECODE_PRINTF("DEC\tEAX\n");
+ } else {
+ DECODE_PRINTF("DEC\tAX\n");
+ }
+ TRACE_AND_STEP();
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ M.x86.R_EAX = dec_long(M.x86.R_EAX);
+ } else {
+ M.x86.R_AX = dec_word(M.x86.R_AX);
+ }
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0x49
+****************************************************************************/
+void x86emuOp_dec_CX(u8 X86EMU_UNUSED(op1))
+{
+ START_OF_INSTR();
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ DECODE_PRINTF("DEC\tECX\n");
+ } else {
+ DECODE_PRINTF("DEC\tCX\n");
+ }
+ TRACE_AND_STEP();
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ M.x86.R_ECX = dec_long(M.x86.R_ECX);
+ } else {
+ M.x86.R_CX = dec_word(M.x86.R_CX);
+ }
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0x4a
+****************************************************************************/
+void x86emuOp_dec_DX(u8 X86EMU_UNUSED(op1))
+{
+ START_OF_INSTR();
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ DECODE_PRINTF("DEC\tEDX\n");
+ } else {
+ DECODE_PRINTF("DEC\tDX\n");
+ }
+ TRACE_AND_STEP();
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ M.x86.R_EDX = dec_long(M.x86.R_EDX);
+ } else {
+ M.x86.R_DX = dec_word(M.x86.R_DX);
+ }
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0x4b
+****************************************************************************/
+void x86emuOp_dec_BX(u8 X86EMU_UNUSED(op1))
+{
+ START_OF_INSTR();
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ DECODE_PRINTF("DEC\tEBX\n");
+ } else {
+ DECODE_PRINTF("DEC\tBX\n");
+ }
+ TRACE_AND_STEP();
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ M.x86.R_EBX = dec_long(M.x86.R_EBX);
+ } else {
+ M.x86.R_BX = dec_word(M.x86.R_BX);
+ }
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0x4c
+****************************************************************************/
+void x86emuOp_dec_SP(u8 X86EMU_UNUSED(op1))
+{
+ START_OF_INSTR();
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ DECODE_PRINTF("DEC\tESP\n");
+ } else {
+ DECODE_PRINTF("DEC\tSP\n");
+ }
+ TRACE_AND_STEP();
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ M.x86.R_ESP = dec_long(M.x86.R_ESP);
+ } else {
+ M.x86.R_SP = dec_word(M.x86.R_SP);
+ }
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0x4d
+****************************************************************************/
+void x86emuOp_dec_BP(u8 X86EMU_UNUSED(op1))
+{
+ START_OF_INSTR();
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ DECODE_PRINTF("DEC\tEBP\n");
+ } else {
+ DECODE_PRINTF("DEC\tBP\n");
+ }
+ TRACE_AND_STEP();
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ M.x86.R_EBP = dec_long(M.x86.R_EBP);
+ } else {
+ M.x86.R_BP = dec_word(M.x86.R_BP);
+ }
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0x4e
+****************************************************************************/
+void x86emuOp_dec_SI(u8 X86EMU_UNUSED(op1))
+{
+ START_OF_INSTR();
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ DECODE_PRINTF("DEC\tESI\n");
+ } else {
+ DECODE_PRINTF("DEC\tSI\n");
+ }
+ TRACE_AND_STEP();
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ M.x86.R_ESI = dec_long(M.x86.R_ESI);
+ } else {
+ M.x86.R_SI = dec_word(M.x86.R_SI);
+ }
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0x4f
+****************************************************************************/
+void x86emuOp_dec_DI(u8 X86EMU_UNUSED(op1))
+{
+ START_OF_INSTR();
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ DECODE_PRINTF("DEC\tEDI\n");
+ } else {
+ DECODE_PRINTF("DEC\tDI\n");
+ }
+ TRACE_AND_STEP();
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ M.x86.R_EDI = dec_long(M.x86.R_EDI);
+ } else {
+ M.x86.R_DI = dec_word(M.x86.R_DI);
+ }
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0x50
+****************************************************************************/
+void x86emuOp_push_AX(u8 X86EMU_UNUSED(op1))
+{
+ START_OF_INSTR();
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ DECODE_PRINTF("PUSH\tEAX\n");
+ } else {
+ DECODE_PRINTF("PUSH\tAX\n");
+ }
+ TRACE_AND_STEP();
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ push_long(M.x86.R_EAX);
+ } else {
+ push_word(M.x86.R_AX);
+ }
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0x51
+****************************************************************************/
+void x86emuOp_push_CX(u8 X86EMU_UNUSED(op1))
+{
+ START_OF_INSTR();
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ DECODE_PRINTF("PUSH\tECX\n");
+ } else {
+ DECODE_PRINTF("PUSH\tCX\n");
+ }
+ TRACE_AND_STEP();
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ push_long(M.x86.R_ECX);
+ } else {
+ push_word(M.x86.R_CX);
+ }
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0x52
+****************************************************************************/
+void x86emuOp_push_DX(u8 X86EMU_UNUSED(op1))
+{
+ START_OF_INSTR();
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ DECODE_PRINTF("PUSH\tEDX\n");
+ } else {
+ DECODE_PRINTF("PUSH\tDX\n");
+ }
+ TRACE_AND_STEP();
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ push_long(M.x86.R_EDX);
+ } else {
+ push_word(M.x86.R_DX);
+ }
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0x53
+****************************************************************************/
+void x86emuOp_push_BX(u8 X86EMU_UNUSED(op1))
+{
+ START_OF_INSTR();
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ DECODE_PRINTF("PUSH\tEBX\n");
+ } else {
+ DECODE_PRINTF("PUSH\tBX\n");
+ }
+ TRACE_AND_STEP();
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ push_long(M.x86.R_EBX);
+ } else {
+ push_word(M.x86.R_BX);
+ }
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0x54
+****************************************************************************/
+void x86emuOp_push_SP(u8 X86EMU_UNUSED(op1))
+{
+ START_OF_INSTR();
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ DECODE_PRINTF("PUSH\tESP\n");
+ } else {
+ DECODE_PRINTF("PUSH\tSP\n");
+ }
+ TRACE_AND_STEP();
+ /* Always push (E)SP, since we are emulating an i386 and above
+ * processor. This is necessary as some BIOS'es use this to check
+ * what type of processor is in the system.
+ */
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ push_long(M.x86.R_ESP);
+ } else {
+ push_word((u16)(M.x86.R_SP));
+ }
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0x55
+****************************************************************************/
+void x86emuOp_push_BP(u8 X86EMU_UNUSED(op1))
+{
+ START_OF_INSTR();
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ DECODE_PRINTF("PUSH\tEBP\n");
+ } else {
+ DECODE_PRINTF("PUSH\tBP\n");
+ }
+ TRACE_AND_STEP();
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ push_long(M.x86.R_EBP);
+ } else {
+ push_word(M.x86.R_BP);
+ }
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0x56
+****************************************************************************/
+void x86emuOp_push_SI(u8 X86EMU_UNUSED(op1))
+{
+ START_OF_INSTR();
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ DECODE_PRINTF("PUSH\tESI\n");
+ } else {
+ DECODE_PRINTF("PUSH\tSI\n");
+ }
+ TRACE_AND_STEP();
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ push_long(M.x86.R_ESI);
+ } else {
+ push_word(M.x86.R_SI);
+ }
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0x57
+****************************************************************************/
+void x86emuOp_push_DI(u8 X86EMU_UNUSED(op1))
+{
+ START_OF_INSTR();
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ DECODE_PRINTF("PUSH\tEDI\n");
+ } else {
+ DECODE_PRINTF("PUSH\tDI\n");
+ }
+ TRACE_AND_STEP();
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ push_long(M.x86.R_EDI);
+ } else {
+ push_word(M.x86.R_DI);
+ }
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0x58
+****************************************************************************/
+void x86emuOp_pop_AX(u8 X86EMU_UNUSED(op1))
+{
+ START_OF_INSTR();
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ DECODE_PRINTF("POP\tEAX\n");
+ } else {
+ DECODE_PRINTF("POP\tAX\n");
+ }
+ TRACE_AND_STEP();
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ M.x86.R_EAX = pop_long();
+ } else {
+ M.x86.R_AX = pop_word();
+ }
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0x59
+****************************************************************************/
+void x86emuOp_pop_CX(u8 X86EMU_UNUSED(op1))
+{
+ START_OF_INSTR();
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ DECODE_PRINTF("POP\tECX\n");
+ } else {
+ DECODE_PRINTF("POP\tCX\n");
+ }
+ TRACE_AND_STEP();
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ M.x86.R_ECX = pop_long();
+ } else {
+ M.x86.R_CX = pop_word();
+ }
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0x5a
+****************************************************************************/
+void x86emuOp_pop_DX(u8 X86EMU_UNUSED(op1))
+{
+ START_OF_INSTR();
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ DECODE_PRINTF("POP\tEDX\n");
+ } else {
+ DECODE_PRINTF("POP\tDX\n");
+ }
+ TRACE_AND_STEP();
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ M.x86.R_EDX = pop_long();
+ } else {
+ M.x86.R_DX = pop_word();
+ }
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0x5b
+****************************************************************************/
+void x86emuOp_pop_BX(u8 X86EMU_UNUSED(op1))
+{
+ START_OF_INSTR();
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ DECODE_PRINTF("POP\tEBX\n");
+ } else {
+ DECODE_PRINTF("POP\tBX\n");
+ }
+ TRACE_AND_STEP();
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ M.x86.R_EBX = pop_long();
+ } else {
+ M.x86.R_BX = pop_word();
+ }
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0x5c
+****************************************************************************/
+void x86emuOp_pop_SP(u8 X86EMU_UNUSED(op1))
+{
+ START_OF_INSTR();
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ DECODE_PRINTF("POP\tESP\n");
+ } else {
+ DECODE_PRINTF("POP\tSP\n");
+ }
+ TRACE_AND_STEP();
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ M.x86.R_ESP = pop_long();
+ } else {
+ M.x86.R_SP = pop_word();
+ }
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0x5d
+****************************************************************************/
+void x86emuOp_pop_BP(u8 X86EMU_UNUSED(op1))
+{
+ START_OF_INSTR();
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ DECODE_PRINTF("POP\tEBP\n");
+ } else {
+ DECODE_PRINTF("POP\tBP\n");
+ }
+ TRACE_AND_STEP();
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ M.x86.R_EBP = pop_long();
+ } else {
+ M.x86.R_BP = pop_word();
+ }
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0x5e
+****************************************************************************/
+void x86emuOp_pop_SI(u8 X86EMU_UNUSED(op1))
+{
+ START_OF_INSTR();
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ DECODE_PRINTF("POP\tESI\n");
+ } else {
+ DECODE_PRINTF("POP\tSI\n");
+ }
+ TRACE_AND_STEP();
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ M.x86.R_ESI = pop_long();
+ } else {
+ M.x86.R_SI = pop_word();
+ }
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0x5f
+****************************************************************************/
+void x86emuOp_pop_DI(u8 X86EMU_UNUSED(op1))
+{
+ START_OF_INSTR();
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ DECODE_PRINTF("POP\tEDI\n");
+ } else {
+ DECODE_PRINTF("POP\tDI\n");
+ }
+ TRACE_AND_STEP();
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ M.x86.R_EDI = pop_long();
+ } else {
+ M.x86.R_DI = pop_word();
+ }
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0x60
+****************************************************************************/
+void x86emuOp_push_all(u8 X86EMU_UNUSED(op1))
+{
+ START_OF_INSTR();
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ DECODE_PRINTF("PUSHAD\n");
+ } else {
+ DECODE_PRINTF("PUSHA\n");
+ }
+ TRACE_AND_STEP();
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 old_sp = M.x86.R_ESP;
+
+ push_long(M.x86.R_EAX);
+ push_long(M.x86.R_ECX);
+ push_long(M.x86.R_EDX);
+ push_long(M.x86.R_EBX);
+ push_long(old_sp);
+ push_long(M.x86.R_EBP);
+ push_long(M.x86.R_ESI);
+ push_long(M.x86.R_EDI);
+ } else {
+ u16 old_sp = M.x86.R_SP;
+
+ push_word(M.x86.R_AX);
+ push_word(M.x86.R_CX);
+ push_word(M.x86.R_DX);
+ push_word(M.x86.R_BX);
+ push_word(old_sp);
+ push_word(M.x86.R_BP);
+ push_word(M.x86.R_SI);
+ push_word(M.x86.R_DI);
+ }
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0x61
+****************************************************************************/
+void x86emuOp_pop_all(u8 X86EMU_UNUSED(op1))
+{
+ START_OF_INSTR();
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ DECODE_PRINTF("POPAD\n");
+ } else {
+ DECODE_PRINTF("POPA\n");
+ }
+ TRACE_AND_STEP();
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ M.x86.R_EDI = pop_long();
+ M.x86.R_ESI = pop_long();
+ M.x86.R_EBP = pop_long();
+ M.x86.R_ESP += 4; /* skip ESP */
+ M.x86.R_EBX = pop_long();
+ M.x86.R_EDX = pop_long();
+ M.x86.R_ECX = pop_long();
+ M.x86.R_EAX = pop_long();
+ } else {
+ M.x86.R_DI = pop_word();
+ M.x86.R_SI = pop_word();
+ M.x86.R_BP = pop_word();
+ M.x86.R_SP += 2; /* skip SP */
+ M.x86.R_BX = pop_word();
+ M.x86.R_DX = pop_word();
+ M.x86.R_CX = pop_word();
+ M.x86.R_AX = pop_word();
+ }
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/*opcode 0x62 ILLEGAL OP, calls x86emuOp_illegal_op() */
+/*opcode 0x63 ILLEGAL OP, calls x86emuOp_illegal_op() */
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0x64
+****************************************************************************/
+void x86emuOp_segovr_FS(u8 X86EMU_UNUSED(op1))
+{
+ START_OF_INSTR();
+ DECODE_PRINTF("FS:\n");
+ TRACE_AND_STEP();
+ M.x86.mode |= SYSMODE_SEGOVR_FS;
+ /*
+ * note the lack of DECODE_CLEAR_SEGOVR(r) since, here is one of 4
+ * opcode subroutines we do not want to do this.
+ */
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0x65
+****************************************************************************/
+void x86emuOp_segovr_GS(u8 X86EMU_UNUSED(op1))
+{
+ START_OF_INSTR();
+ DECODE_PRINTF("GS:\n");
+ TRACE_AND_STEP();
+ M.x86.mode |= SYSMODE_SEGOVR_GS;
+ /*
+ * note the lack of DECODE_CLEAR_SEGOVR(r) since, here is one of 4
+ * opcode subroutines we do not want to do this.
+ */
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0x66 - prefix for 32-bit register
+****************************************************************************/
+void x86emuOp_prefix_data(u8 X86EMU_UNUSED(op1))
+{
+ START_OF_INSTR();
+ DECODE_PRINTF("DATA:\n");
+ TRACE_AND_STEP();
+ M.x86.mode |= SYSMODE_PREFIX_DATA;
+ /* note no DECODE_CLEAR_SEGOVR here. */
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0x67 - prefix for 32-bit address
+****************************************************************************/
+void x86emuOp_prefix_addr(u8 X86EMU_UNUSED(op1))
+{
+ START_OF_INSTR();
+ DECODE_PRINTF("ADDR:\n");
+ TRACE_AND_STEP();
+ M.x86.mode |= SYSMODE_PREFIX_ADDR;
+ /* note no DECODE_CLEAR_SEGOVR here. */
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0x68
+****************************************************************************/
+void x86emuOp_push_word_IMM(u8 X86EMU_UNUSED(op1))
+{
+ u32 imm;
+
+ START_OF_INSTR();
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ imm = fetch_long_imm();
+ } else {
+ imm = fetch_word_imm();
+ }
+ DECODE_PRINTF2("PUSH\t%x\n", imm);
+ TRACE_AND_STEP();
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ push_long(imm);
+ } else {
+ push_word((u16)imm);
+ }
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0x69
+****************************************************************************/
+void x86emuOp_imul_word_IMM(u8 X86EMU_UNUSED(op1))
+{
+ int mod, rl, rh;
+ uint srcoffset;
+
+ START_OF_INSTR();
+ DECODE_PRINTF("IMUL\t");
+ FETCH_DECODE_MODRM(mod, rh, rl);
+ switch (mod) {
+ case 0:
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 *destreg;
+ u32 srcval;
+ u32 res_lo,res_hi;
+ s32 imm;
+
+ destreg = DECODE_RM_LONG_REGISTER(rh);
+ DECODE_PRINTF(",");
+ srcoffset = decode_rm00_address(rl);
+ srcval = fetch_data_long(srcoffset);
+ imm = fetch_long_imm();
+ DECODE_PRINTF2(",%d\n", (s32)imm);
+ TRACE_AND_STEP();
+ imul_long_direct(&res_lo,&res_hi,(s32)srcval,(s32)imm);
+ if (res_hi != 0) {
+ SET_FLAG(F_CF);
+ SET_FLAG(F_OF);
+ } else {
+ CLEAR_FLAG(F_CF);
+ CLEAR_FLAG(F_OF);
+ }
+ *destreg = (u32)res_lo;
+ } else {
+ u16 *destreg;
+ u16 srcval;
+ u32 res;
+ s16 imm;
+
+ destreg = DECODE_RM_WORD_REGISTER(rh);
+ DECODE_PRINTF(",");
+ srcoffset = decode_rm00_address(rl);
+ srcval = fetch_data_word(srcoffset);
+ imm = fetch_word_imm();
+ DECODE_PRINTF2(",%d\n", (s32)imm);
+ TRACE_AND_STEP();
+ res = (s16)srcval * (s16)imm;
+ if (res > 0xFFFF) {
+ SET_FLAG(F_CF);
+ SET_FLAG(F_OF);
+ } else {
+ CLEAR_FLAG(F_CF);
+ CLEAR_FLAG(F_OF);
+ }
+ *destreg = (u16)res;
+ }
+ break;
+ case 1:
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 *destreg;
+ u32 srcval;
+ u32 res_lo,res_hi;
+ s32 imm;
+
+ destreg = DECODE_RM_LONG_REGISTER(rh);
+ DECODE_PRINTF(",");
+ srcoffset = decode_rm01_address(rl);
+ srcval = fetch_data_long(srcoffset);
+ imm = fetch_long_imm();
+ DECODE_PRINTF2(",%d\n", (s32)imm);
+ TRACE_AND_STEP();
+ imul_long_direct(&res_lo,&res_hi,(s32)srcval,(s32)imm);
+ if (res_hi != 0) {
+ SET_FLAG(F_CF);
+ SET_FLAG(F_OF);
+ } else {
+ CLEAR_FLAG(F_CF);
+ CLEAR_FLAG(F_OF);
+ }
+ *destreg = (u32)res_lo;
+ } else {
+ u16 *destreg;
+ u16 srcval;
+ u32 res;
+ s16 imm;
+
+ destreg = DECODE_RM_WORD_REGISTER(rh);
+ DECODE_PRINTF(",");
+ srcoffset = decode_rm01_address(rl);
+ srcval = fetch_data_word(srcoffset);
+ imm = fetch_word_imm();
+ DECODE_PRINTF2(",%d\n", (s32)imm);
+ TRACE_AND_STEP();
+ res = (s16)srcval * (s16)imm;
+ if (res > 0xFFFF) {
+ SET_FLAG(F_CF);
+ SET_FLAG(F_OF);
+ } else {
+ CLEAR_FLAG(F_CF);
+ CLEAR_FLAG(F_OF);
+ }
+ *destreg = (u16)res;
+ }
+ break;
+ case 2:
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 *destreg;
+ u32 srcval;
+ u32 res_lo,res_hi;
+ s32 imm;
+
+ destreg = DECODE_RM_LONG_REGISTER(rh);
+ DECODE_PRINTF(",");
+ srcoffset = decode_rm10_address(rl);
+ srcval = fetch_data_long(srcoffset);
+ imm = fetch_long_imm();
+ DECODE_PRINTF2(",%d\n", (s32)imm);
+ TRACE_AND_STEP();
+ imul_long_direct(&res_lo,&res_hi,(s32)srcval,(s32)imm);
+ if (res_hi != 0) {
+ SET_FLAG(F_CF);
+ SET_FLAG(F_OF);
+ } else {
+ CLEAR_FLAG(F_CF);
+ CLEAR_FLAG(F_OF);
+ }
+ *destreg = (u32)res_lo;
+ } else {
+ u16 *destreg;
+ u16 srcval;
+ u32 res;
+ s16 imm;
+
+ destreg = DECODE_RM_WORD_REGISTER(rh);
+ DECODE_PRINTF(",");
+ srcoffset = decode_rm10_address(rl);
+ srcval = fetch_data_word(srcoffset);
+ imm = fetch_word_imm();
+ DECODE_PRINTF2(",%d\n", (s32)imm);
+ TRACE_AND_STEP();
+ res = (s16)srcval * (s16)imm;
+ if (res > 0xFFFF) {
+ SET_FLAG(F_CF);
+ SET_FLAG(F_OF);
+ } else {
+ CLEAR_FLAG(F_CF);
+ CLEAR_FLAG(F_OF);
+ }
+ *destreg = (u16)res;
+ }
+ break;
+ case 3: /* register to register */
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 *destreg,*srcreg;
+ u32 res_lo,res_hi;
+ s32 imm;
+
+ destreg = DECODE_RM_LONG_REGISTER(rh);
+ DECODE_PRINTF(",");
+ srcreg = DECODE_RM_LONG_REGISTER(rl);
+ imm = fetch_long_imm();
+ DECODE_PRINTF2(",%d\n", (s32)imm);
+ TRACE_AND_STEP();
+ imul_long_direct(&res_lo,&res_hi,(s32)*srcreg,(s32)imm);
+ if (res_hi != 0) {
+ SET_FLAG(F_CF);
+ SET_FLAG(F_OF);
+ } else {
+ CLEAR_FLAG(F_CF);
+ CLEAR_FLAG(F_OF);
+ }
+ *destreg = (u32)res_lo;
+ } else {
+ u16 *destreg,*srcreg;
+ u32 res;
+ s16 imm;
+
+ destreg = DECODE_RM_WORD_REGISTER(rh);
+ DECODE_PRINTF(",");
+ srcreg = DECODE_RM_WORD_REGISTER(rl);
+ imm = fetch_word_imm();
+ DECODE_PRINTF2(",%d\n", (s32)imm);
+ res = (s16)*srcreg * (s16)imm;
+ if (res > 0xFFFF) {
+ SET_FLAG(F_CF);
+ SET_FLAG(F_OF);
+ } else {
+ CLEAR_FLAG(F_CF);
+ CLEAR_FLAG(F_OF);
+ }
+ *destreg = (u16)res;
+ }
+ break;
+ }
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0x6a
+****************************************************************************/
+void x86emuOp_push_byte_IMM(u8 X86EMU_UNUSED(op1))
+{
+ s16 imm;
+
+ START_OF_INSTR();
+ imm = (s8)fetch_byte_imm();
+ DECODE_PRINTF2("PUSH\t%d\n", imm);
+ TRACE_AND_STEP();
+ push_word(imm);
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0x6b
+****************************************************************************/
+void x86emuOp_imul_byte_IMM(u8 X86EMU_UNUSED(op1))
+{
+ int mod, rl, rh;
+ uint srcoffset;
+ s8 imm;
+
+ START_OF_INSTR();
+ DECODE_PRINTF("IMUL\t");
+ FETCH_DECODE_MODRM(mod, rh, rl);
+ switch (mod) {
+ case 0:
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 *destreg;
+ u32 srcval;
+ u32 res_lo,res_hi;
+
+ destreg = DECODE_RM_LONG_REGISTER(rh);
+ DECODE_PRINTF(",");
+ srcoffset = decode_rm00_address(rl);
+ srcval = fetch_data_long(srcoffset);
+ imm = fetch_byte_imm();
+ DECODE_PRINTF2(",%d\n", (s32)imm);
+ TRACE_AND_STEP();
+ imul_long_direct(&res_lo,&res_hi,(s32)srcval,(s32)imm);
+ if (res_hi != 0) {
+ SET_FLAG(F_CF);
+ SET_FLAG(F_OF);
+ } else {
+ CLEAR_FLAG(F_CF);
+ CLEAR_FLAG(F_OF);
+ }
+ *destreg = (u32)res_lo;
+ } else {
+ u16 *destreg;
+ u16 srcval;
+ u32 res;
+
+ destreg = DECODE_RM_WORD_REGISTER(rh);
+ DECODE_PRINTF(",");
+ srcoffset = decode_rm00_address(rl);
+ srcval = fetch_data_word(srcoffset);
+ imm = fetch_byte_imm();
+ DECODE_PRINTF2(",%d\n", (s32)imm);
+ TRACE_AND_STEP();
+ res = (s16)srcval * (s16)imm;
+ if (res > 0xFFFF) {
+ SET_FLAG(F_CF);
+ SET_FLAG(F_OF);
+ } else {
+ CLEAR_FLAG(F_CF);
+ CLEAR_FLAG(F_OF);
+ }
+ *destreg = (u16)res;
+ }
+ break;
+ case 1:
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 *destreg;
+ u32 srcval;
+ u32 res_lo,res_hi;
+
+ destreg = DECODE_RM_LONG_REGISTER(rh);
+ DECODE_PRINTF(",");
+ srcoffset = decode_rm01_address(rl);
+ srcval = fetch_data_long(srcoffset);
+ imm = fetch_byte_imm();
+ DECODE_PRINTF2(",%d\n", (s32)imm);
+ TRACE_AND_STEP();
+ imul_long_direct(&res_lo,&res_hi,(s32)srcval,(s32)imm);
+ if (res_hi != 0) {
+ SET_FLAG(F_CF);
+ SET_FLAG(F_OF);
+ } else {
+ CLEAR_FLAG(F_CF);
+ CLEAR_FLAG(F_OF);
+ }
+ *destreg = (u32)res_lo;
+ } else {
+ u16 *destreg;
+ u16 srcval;
+ u32 res;
+
+ destreg = DECODE_RM_WORD_REGISTER(rh);
+ DECODE_PRINTF(",");
+ srcoffset = decode_rm01_address(rl);
+ srcval = fetch_data_word(srcoffset);
+ imm = fetch_byte_imm();
+ DECODE_PRINTF2(",%d\n", (s32)imm);
+ TRACE_AND_STEP();
+ res = (s16)srcval * (s16)imm;
+ if (res > 0xFFFF) {
+ SET_FLAG(F_CF);
+ SET_FLAG(F_OF);
+ } else {
+ CLEAR_FLAG(F_CF);
+ CLEAR_FLAG(F_OF);
+ }
+ *destreg = (u16)res;
+ }
+ break;
+ case 2:
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 *destreg;
+ u32 srcval;
+ u32 res_lo,res_hi;
+
+ destreg = DECODE_RM_LONG_REGISTER(rh);
+ DECODE_PRINTF(",");
+ srcoffset = decode_rm10_address(rl);
+ srcval = fetch_data_long(srcoffset);
+ imm = fetch_byte_imm();
+ DECODE_PRINTF2(",%d\n", (s32)imm);
+ TRACE_AND_STEP();
+ imul_long_direct(&res_lo,&res_hi,(s32)srcval,(s32)imm);
+ if (res_hi != 0) {
+ SET_FLAG(F_CF);
+ SET_FLAG(F_OF);
+ } else {
+ CLEAR_FLAG(F_CF);
+ CLEAR_FLAG(F_OF);
+ }
+ *destreg = (u32)res_lo;
+ } else {
+ u16 *destreg;
+ u16 srcval;
+ u32 res;
+
+ destreg = DECODE_RM_WORD_REGISTER(rh);
+ DECODE_PRINTF(",");
+ srcoffset = decode_rm10_address(rl);
+ srcval = fetch_data_word(srcoffset);
+ imm = fetch_byte_imm();
+ DECODE_PRINTF2(",%d\n", (s32)imm);
+ TRACE_AND_STEP();
+ res = (s16)srcval * (s16)imm;
+ if (res > 0xFFFF) {
+ SET_FLAG(F_CF);
+ SET_FLAG(F_OF);
+ } else {
+ CLEAR_FLAG(F_CF);
+ CLEAR_FLAG(F_OF);
+ }
+ *destreg = (u16)res;
+ }
+ break;
+ case 3: /* register to register */
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 *destreg,*srcreg;
+ u32 res_lo,res_hi;
+
+ destreg = DECODE_RM_LONG_REGISTER(rh);
+ DECODE_PRINTF(",");
+ srcreg = DECODE_RM_LONG_REGISTER(rl);
+ imm = fetch_byte_imm();
+ DECODE_PRINTF2(",%d\n", (s32)imm);
+ TRACE_AND_STEP();
+ imul_long_direct(&res_lo,&res_hi,(s32)*srcreg,(s32)imm);
+ if (res_hi != 0) {
+ SET_FLAG(F_CF);
+ SET_FLAG(F_OF);
+ } else {
+ CLEAR_FLAG(F_CF);
+ CLEAR_FLAG(F_OF);
+ }
+ *destreg = (u32)res_lo;
+ } else {
+ u16 *destreg,*srcreg;
+ u32 res;
+
+ destreg = DECODE_RM_WORD_REGISTER(rh);
+ DECODE_PRINTF(",");
+ srcreg = DECODE_RM_WORD_REGISTER(rl);
+ imm = fetch_byte_imm();
+ DECODE_PRINTF2(",%d\n", (s32)imm);
+ res = (s16)*srcreg * (s16)imm;
+ if (res > 0xFFFF) {
+ SET_FLAG(F_CF);
+ SET_FLAG(F_OF);
+ } else {
+ CLEAR_FLAG(F_CF);
+ CLEAR_FLAG(F_OF);
+ }
+ *destreg = (u16)res;
+ }
+ break;
+ }
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0x6c
+****************************************************************************/
+void x86emuOp_ins_byte(u8 X86EMU_UNUSED(op1))
+{
+ START_OF_INSTR();
+ DECODE_PRINTF("INSB\n");
+ ins(1);
+ TRACE_AND_STEP();
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0x6d
+****************************************************************************/
+void x86emuOp_ins_word(u8 X86EMU_UNUSED(op1))
+{
+ START_OF_INSTR();
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ DECODE_PRINTF("INSD\n");
+ ins(4);
+ } else {
+ DECODE_PRINTF("INSW\n");
+ ins(2);
+ }
+ TRACE_AND_STEP();
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0x6e
+****************************************************************************/
+void x86emuOp_outs_byte(u8 X86EMU_UNUSED(op1))
+{
+ START_OF_INSTR();
+ DECODE_PRINTF("OUTSB\n");
+ outs(1);
+ TRACE_AND_STEP();
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0x6f
+****************************************************************************/
+void x86emuOp_outs_word(u8 X86EMU_UNUSED(op1))
+{
+ START_OF_INSTR();
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ DECODE_PRINTF("OUTSD\n");
+ outs(4);
+ } else {
+ DECODE_PRINTF("OUTSW\n");
+ outs(2);
+ }
+ TRACE_AND_STEP();
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0x70
+****************************************************************************/
+void x86emuOp_jump_near_O(u8 X86EMU_UNUSED(op1))
+{
+ s8 offset;
+ u16 target;
+
+ /* jump to byte offset if overflow flag is set */
+ START_OF_INSTR();
+ DECODE_PRINTF("JO\t");
+ offset = (s8)fetch_byte_imm();
+ target = (u16)(M.x86.R_IP + (s16)offset);
+ DECODE_PRINTF2("%x\n", target);
+ TRACE_AND_STEP();
+ if (ACCESS_FLAG(F_OF))
+ M.x86.R_IP = target;
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0x71
+****************************************************************************/
+void x86emuOp_jump_near_NO(u8 X86EMU_UNUSED(op1))
+{
+ s8 offset;
+ u16 target;
+
+ /* jump to byte offset if overflow is not set */
+ START_OF_INSTR();
+ DECODE_PRINTF("JNO\t");
+ offset = (s8)fetch_byte_imm();
+ target = (u16)(M.x86.R_IP + (s16)offset);
+ DECODE_PRINTF2("%x\n", target);
+ TRACE_AND_STEP();
+ if (!ACCESS_FLAG(F_OF))
+ M.x86.R_IP = target;
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0x72
+****************************************************************************/
+void x86emuOp_jump_near_B(u8 X86EMU_UNUSED(op1))
+{
+ s8 offset;
+ u16 target;
+
+ /* jump to byte offset if carry flag is set. */
+ START_OF_INSTR();
+ DECODE_PRINTF("JB\t");
+ offset = (s8)fetch_byte_imm();
+ target = (u16)(M.x86.R_IP + (s16)offset);
+ DECODE_PRINTF2("%x\n", target);
+ TRACE_AND_STEP();
+ if (ACCESS_FLAG(F_CF))
+ M.x86.R_IP = target;
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0x73
+****************************************************************************/
+void x86emuOp_jump_near_NB(u8 X86EMU_UNUSED(op1))
+{
+ s8 offset;
+ u16 target;
+
+ /* jump to byte offset if carry flag is clear. */
+ START_OF_INSTR();
+ DECODE_PRINTF("JNB\t");
+ offset = (s8)fetch_byte_imm();
+ target = (u16)(M.x86.R_IP + (s16)offset);
+ DECODE_PRINTF2("%x\n", target);
+ TRACE_AND_STEP();
+ if (!ACCESS_FLAG(F_CF))
+ M.x86.R_IP = target;
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0x74
+****************************************************************************/
+void x86emuOp_jump_near_Z(u8 X86EMU_UNUSED(op1))
+{
+ s8 offset;
+ u16 target;
+
+ /* jump to byte offset if zero flag is set. */
+ START_OF_INSTR();
+ DECODE_PRINTF("JZ\t");
+ offset = (s8)fetch_byte_imm();
+ target = (u16)(M.x86.R_IP + (s16)offset);
+ DECODE_PRINTF2("%x\n", target);
+ TRACE_AND_STEP();
+ if (ACCESS_FLAG(F_ZF))
+ M.x86.R_IP = target;
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0x75
+****************************************************************************/
+void x86emuOp_jump_near_NZ(u8 X86EMU_UNUSED(op1))
+{
+ s8 offset;
+ u16 target;
+
+ /* jump to byte offset if zero flag is clear. */
+ START_OF_INSTR();
+ DECODE_PRINTF("JNZ\t");
+ offset = (s8)fetch_byte_imm();
+ target = (u16)(M.x86.R_IP + (s16)offset);
+ DECODE_PRINTF2("%x\n", target);
+ TRACE_AND_STEP();
+ if (!ACCESS_FLAG(F_ZF))
+ M.x86.R_IP = target;
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0x76
+****************************************************************************/
+void x86emuOp_jump_near_BE(u8 X86EMU_UNUSED(op1))
+{
+ s8 offset;
+ u16 target;
+
+ /* jump to byte offset if carry flag is set or if the zero
+ flag is set. */
+ START_OF_INSTR();
+ DECODE_PRINTF("JBE\t");
+ offset = (s8)fetch_byte_imm();
+ target = (u16)(M.x86.R_IP + (s16)offset);
+ DECODE_PRINTF2("%x\n", target);
+ TRACE_AND_STEP();
+ if (ACCESS_FLAG(F_CF) || ACCESS_FLAG(F_ZF))
+ M.x86.R_IP = target;
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0x77
+****************************************************************************/
+void x86emuOp_jump_near_NBE(u8 X86EMU_UNUSED(op1))
+{
+ s8 offset;
+ u16 target;
+
+ /* jump to byte offset if carry flag is clear and if the zero
+ flag is clear */
+ START_OF_INSTR();
+ DECODE_PRINTF("JNBE\t");
+ offset = (s8)fetch_byte_imm();
+ target = (u16)(M.x86.R_IP + (s16)offset);
+ DECODE_PRINTF2("%x\n", target);
+ TRACE_AND_STEP();
+ if (!(ACCESS_FLAG(F_CF) || ACCESS_FLAG(F_ZF)))
+ M.x86.R_IP = target;
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0x78
+****************************************************************************/
+void x86emuOp_jump_near_S(u8 X86EMU_UNUSED(op1))
+{
+ s8 offset;
+ u16 target;
+
+ /* jump to byte offset if sign flag is set */
+ START_OF_INSTR();
+ DECODE_PRINTF("JS\t");
+ offset = (s8)fetch_byte_imm();
+ target = (u16)(M.x86.R_IP + (s16)offset);
+ DECODE_PRINTF2("%x\n", target);
+ TRACE_AND_STEP();
+ if (ACCESS_FLAG(F_SF))
+ M.x86.R_IP = target;
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0x79
+****************************************************************************/
+void x86emuOp_jump_near_NS(u8 X86EMU_UNUSED(op1))
+{
+ s8 offset;
+ u16 target;
+
+ /* jump to byte offset if sign flag is clear */
+ START_OF_INSTR();
+ DECODE_PRINTF("JNS\t");
+ offset = (s8)fetch_byte_imm();
+ target = (u16)(M.x86.R_IP + (s16)offset);
+ DECODE_PRINTF2("%x\n", target);
+ TRACE_AND_STEP();
+ if (!ACCESS_FLAG(F_SF))
+ M.x86.R_IP = target;
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0x7a
+****************************************************************************/
+void x86emuOp_jump_near_P(u8 X86EMU_UNUSED(op1))
+{
+ s8 offset;
+ u16 target;
+
+ /* jump to byte offset if parity flag is set (even parity) */
+ START_OF_INSTR();
+ DECODE_PRINTF("JP\t");
+ offset = (s8)fetch_byte_imm();
+ target = (u16)(M.x86.R_IP + (s16)offset);
+ DECODE_PRINTF2("%x\n", target);
+ TRACE_AND_STEP();
+ if (ACCESS_FLAG(F_PF))
+ M.x86.R_IP = target;
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0x7b
+****************************************************************************/
+void x86emuOp_jump_near_NP(u8 X86EMU_UNUSED(op1))
+{
+ s8 offset;
+ u16 target;
+
+ /* jump to byte offset if parity flag is clear (odd parity) */
+ START_OF_INSTR();
+ DECODE_PRINTF("JNP\t");
+ offset = (s8)fetch_byte_imm();
+ target = (u16)(M.x86.R_IP + (s16)offset);
+ DECODE_PRINTF2("%x\n", target);
+ TRACE_AND_STEP();
+ if (!ACCESS_FLAG(F_PF))
+ M.x86.R_IP = target;
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0x7c
+****************************************************************************/
+void x86emuOp_jump_near_L(u8 X86EMU_UNUSED(op1))
+{
+ s8 offset;
+ u16 target;
+ int sf, of;
+
+ /* jump to byte offset if sign flag not equal to overflow flag. */
+ START_OF_INSTR();
+ DECODE_PRINTF("JL\t");
+ offset = (s8)fetch_byte_imm();
+ target = (u16)(M.x86.R_IP + (s16)offset);
+ DECODE_PRINTF2("%x\n", target);
+ TRACE_AND_STEP();
+ sf = ACCESS_FLAG(F_SF) != 0;
+ of = ACCESS_FLAG(F_OF) != 0;
+ if (sf ^ of)
+ M.x86.R_IP = target;
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0x7d
+****************************************************************************/
+void x86emuOp_jump_near_NL(u8 X86EMU_UNUSED(op1))
+{
+ s8 offset;
+ u16 target;
+ int sf, of;
+
+ /* jump to byte offset if sign flag not equal to overflow flag. */
+ START_OF_INSTR();
+ DECODE_PRINTF("JNL\t");
+ offset = (s8)fetch_byte_imm();
+ target = (u16)(M.x86.R_IP + (s16)offset);
+ DECODE_PRINTF2("%x\n", target);
+ TRACE_AND_STEP();
+ sf = ACCESS_FLAG(F_SF) != 0;
+ of = ACCESS_FLAG(F_OF) != 0;
+ /* note: inverse of above, but using == instead of xor. */
+ if (sf == of)
+ M.x86.R_IP = target;
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0x7e
+****************************************************************************/
+void x86emuOp_jump_near_LE(u8 X86EMU_UNUSED(op1))
+{
+ s8 offset;
+ u16 target;
+ int sf, of;
+
+ /* jump to byte offset if sign flag not equal to overflow flag
+ or the zero flag is set */
+ START_OF_INSTR();
+ DECODE_PRINTF("JLE\t");
+ offset = (s8)fetch_byte_imm();
+ target = (u16)(M.x86.R_IP + (s16)offset);
+ DECODE_PRINTF2("%x\n", target);
+ TRACE_AND_STEP();
+ sf = ACCESS_FLAG(F_SF) != 0;
+ of = ACCESS_FLAG(F_OF) != 0;
+ if ((sf ^ of) || ACCESS_FLAG(F_ZF))
+ M.x86.R_IP = target;
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0x7f
+****************************************************************************/
+void x86emuOp_jump_near_NLE(u8 X86EMU_UNUSED(op1))
+{
+ s8 offset;
+ u16 target;
+ int sf, of;
+
+ /* jump to byte offset if sign flag equal to overflow flag.
+ and the zero flag is clear */
+ START_OF_INSTR();
+ DECODE_PRINTF("JNLE\t");
+ offset = (s8)fetch_byte_imm();
+ target = (u16)(M.x86.R_IP + (s16)offset);
+ DECODE_PRINTF2("%x\n", target);
+ TRACE_AND_STEP();
+ sf = ACCESS_FLAG(F_SF) != 0;
+ of = ACCESS_FLAG(F_OF) != 0;
+ if ((sf == of) && !ACCESS_FLAG(F_ZF))
+ M.x86.R_IP = target;
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+static u8 (*opc80_byte_operation[])(u8 d, u8 s) =
+{
+ add_byte, /* 00 */
+ or_byte, /* 01 */
+ adc_byte, /* 02 */
+ sbb_byte, /* 03 */
+ and_byte, /* 04 */
+ sub_byte, /* 05 */
+ xor_byte, /* 06 */
+ cmp_byte, /* 07 */
+};
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0x80
+****************************************************************************/
+void x86emuOp_opc80_byte_RM_IMM(u8 X86EMU_UNUSED(op1))
+{
+ int mod, rl, rh;
+ u8 *destreg;
+ uint destoffset;
+ u8 imm;
+ u8 destval;
+
+ /*
+ * Weirdo special case instruction format. Part of the opcode
+ * held below in "RH". Doubly nested case would result, except
+ * that the decoded instruction
+ */
+ START_OF_INSTR();
+ FETCH_DECODE_MODRM(mod, rh, rl);
+#ifdef DEBUG
+ if (DEBUG_DECODE()) {
+ /* XXX DECODE_PRINTF may be changed to something more
+ general, so that it is important to leave the strings
+ in the same format, even though the result is that the
+ above test is done twice. */
+
+ switch (rh) {
+ case 0:
+ DECODE_PRINTF("ADD\t");
+ break;
+ case 1:
+ DECODE_PRINTF("OR\t");
+ break;
+ case 2:
+ DECODE_PRINTF("ADC\t");
+ break;
+ case 3:
+ DECODE_PRINTF("SBB\t");
+ break;
+ case 4:
+ DECODE_PRINTF("AND\t");
+ break;
+ case 5:
+ DECODE_PRINTF("SUB\t");
+ break;
+ case 6:
+ DECODE_PRINTF("XOR\t");
+ break;
+ case 7:
+ DECODE_PRINTF("CMP\t");
+ break;
+ }
+ }
+#endif
+ /* know operation, decode the mod byte to find the addressing
+ mode. */
+ switch (mod) {
+ case 0:
+ DECODE_PRINTF("BYTE PTR ");
+ destoffset = decode_rm00_address(rl);
+ DECODE_PRINTF(",");
+ destval = fetch_data_byte(destoffset);
+ imm = fetch_byte_imm();
+ DECODE_PRINTF2("%x\n", imm);
+ TRACE_AND_STEP();
+ destval = (*opc80_byte_operation[rh]) (destval, imm);
+ if (rh != 7)
+ store_data_byte(destoffset, destval);
+ break;
+ case 1:
+ DECODE_PRINTF("BYTE PTR ");
+ destoffset = decode_rm01_address(rl);
+ DECODE_PRINTF(",");
+ destval = fetch_data_byte(destoffset);
+ imm = fetch_byte_imm();
+ DECODE_PRINTF2("%x\n", imm);
+ TRACE_AND_STEP();
+ destval = (*opc80_byte_operation[rh]) (destval, imm);
+ if (rh != 7)
+ store_data_byte(destoffset, destval);
+ break;
+ case 2:
+ DECODE_PRINTF("BYTE PTR ");
+ destoffset = decode_rm10_address(rl);
+ DECODE_PRINTF(",");
+ destval = fetch_data_byte(destoffset);
+ imm = fetch_byte_imm();
+ DECODE_PRINTF2("%x\n", imm);
+ TRACE_AND_STEP();
+ destval = (*opc80_byte_operation[rh]) (destval, imm);
+ if (rh != 7)
+ store_data_byte(destoffset, destval);
+ break;
+ case 3: /* register to register */
+ destreg = DECODE_RM_BYTE_REGISTER(rl);
+ DECODE_PRINTF(",");
+ imm = fetch_byte_imm();
+ DECODE_PRINTF2("%x\n", imm);
+ TRACE_AND_STEP();
+ destval = (*opc80_byte_operation[rh]) (*destreg, imm);
+ if (rh != 7)
+ *destreg = destval;
+ break;
+ }
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+static u16 (*opc81_word_operation[])(u16 d, u16 s) =
+{
+ add_word, /*00 */
+ or_word, /*01 */
+ adc_word, /*02 */
+ sbb_word, /*03 */
+ and_word, /*04 */
+ sub_word, /*05 */
+ xor_word, /*06 */
+ cmp_word, /*07 */
+};
+
+static u32 (*opc81_long_operation[])(u32 d, u32 s) =
+{
+ add_long, /*00 */
+ or_long, /*01 */
+ adc_long, /*02 */
+ sbb_long, /*03 */
+ and_long, /*04 */
+ sub_long, /*05 */
+ xor_long, /*06 */
+ cmp_long, /*07 */
+};
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0x81
+****************************************************************************/
+void x86emuOp_opc81_word_RM_IMM(u8 X86EMU_UNUSED(op1))
+{
+ int mod, rl, rh;
+ uint destoffset;
+
+ /*
+ * Weirdo special case instruction format. Part of the opcode
+ * held below in "RH". Doubly nested case would result, except
+ * that the decoded instruction
+ */
+ START_OF_INSTR();
+ FETCH_DECODE_MODRM(mod, rh, rl);
+#ifdef DEBUG
+ if (DEBUG_DECODE()) {
+ /* XXX DECODE_PRINTF may be changed to something more
+ general, so that it is important to leave the strings
+ in the same format, even though the result is that the
+ above test is done twice. */
+
+ switch (rh) {
+ case 0:
+ DECODE_PRINTF("ADD\t");
+ break;
+ case 1:
+ DECODE_PRINTF("OR\t");
+ break;
+ case 2:
+ DECODE_PRINTF("ADC\t");
+ break;
+ case 3:
+ DECODE_PRINTF("SBB\t");
+ break;
+ case 4:
+ DECODE_PRINTF("AND\t");
+ break;
+ case 5:
+ DECODE_PRINTF("SUB\t");
+ break;
+ case 6:
+ DECODE_PRINTF("XOR\t");
+ break;
+ case 7:
+ DECODE_PRINTF("CMP\t");
+ break;
+ }
+ }
+#endif
+ /*
+ * Know operation, decode the mod byte to find the addressing
+ * mode.
+ */
+ switch (mod) {
+ case 0:
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 destval,imm;
+
+ DECODE_PRINTF("DWORD PTR ");
+ destoffset = decode_rm00_address(rl);
+ DECODE_PRINTF(",");
+ destval = fetch_data_long(destoffset);
+ imm = fetch_long_imm();
+ DECODE_PRINTF2("%x\n", imm);
+ TRACE_AND_STEP();
+ destval = (*opc81_long_operation[rh]) (destval, imm);
+ if (rh != 7)
+ store_data_long(destoffset, destval);
+ } else {
+ u16 destval,imm;
+
+ DECODE_PRINTF("WORD PTR ");
+ destoffset = decode_rm00_address(rl);
+ DECODE_PRINTF(",");
+ destval = fetch_data_word(destoffset);
+ imm = fetch_word_imm();
+ DECODE_PRINTF2("%x\n", imm);
+ TRACE_AND_STEP();
+ destval = (*opc81_word_operation[rh]) (destval, imm);
+ if (rh != 7)
+ store_data_word(destoffset, destval);
+ }
+ break;
+ case 1:
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 destval,imm;
+
+ DECODE_PRINTF("DWORD PTR ");
+ destoffset = decode_rm01_address(rl);
+ DECODE_PRINTF(",");
+ destval = fetch_data_long(destoffset);
+ imm = fetch_long_imm();
+ DECODE_PRINTF2("%x\n", imm);
+ TRACE_AND_STEP();
+ destval = (*opc81_long_operation[rh]) (destval, imm);
+ if (rh != 7)
+ store_data_long(destoffset, destval);
+ } else {
+ u16 destval,imm;
+
+ DECODE_PRINTF("WORD PTR ");
+ destoffset = decode_rm01_address(rl);
+ DECODE_PRINTF(",");
+ destval = fetch_data_word(destoffset);
+ imm = fetch_word_imm();
+ DECODE_PRINTF2("%x\n", imm);
+ TRACE_AND_STEP();
+ destval = (*opc81_word_operation[rh]) (destval, imm);
+ if (rh != 7)
+ store_data_word(destoffset, destval);
+ }
+ break;
+ case 2:
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 destval,imm;
+
+ DECODE_PRINTF("DWORD PTR ");
+ destoffset = decode_rm10_address(rl);
+ DECODE_PRINTF(",");
+ destval = fetch_data_long(destoffset);
+ imm = fetch_long_imm();
+ DECODE_PRINTF2("%x\n", imm);
+ TRACE_AND_STEP();
+ destval = (*opc81_long_operation[rh]) (destval, imm);
+ if (rh != 7)
+ store_data_long(destoffset, destval);
+ } else {
+ u16 destval,imm;
+
+ DECODE_PRINTF("WORD PTR ");
+ destoffset = decode_rm10_address(rl);
+ DECODE_PRINTF(",");
+ destval = fetch_data_word(destoffset);
+ imm = fetch_word_imm();
+ DECODE_PRINTF2("%x\n", imm);
+ TRACE_AND_STEP();
+ destval = (*opc81_word_operation[rh]) (destval, imm);
+ if (rh != 7)
+ store_data_word(destoffset, destval);
+ }
+ break;
+ case 3: /* register to register */
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 *destreg;
+ u32 destval,imm;
+
+ destreg = DECODE_RM_LONG_REGISTER(rl);
+ DECODE_PRINTF(",");
+ imm = fetch_long_imm();
+ DECODE_PRINTF2("%x\n", imm);
+ TRACE_AND_STEP();
+ destval = (*opc81_long_operation[rh]) (*destreg, imm);
+ if (rh != 7)
+ *destreg = destval;
+ } else {
+ u16 *destreg;
+ u16 destval,imm;
+
+ destreg = DECODE_RM_WORD_REGISTER(rl);
+ DECODE_PRINTF(",");
+ imm = fetch_word_imm();
+ DECODE_PRINTF2("%x\n", imm);
+ TRACE_AND_STEP();
+ destval = (*opc81_word_operation[rh]) (*destreg, imm);
+ if (rh != 7)
+ *destreg = destval;
+ }
+ break;
+ }
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+static u8 (*opc82_byte_operation[])(u8 s, u8 d) =
+{
+ add_byte, /*00 */
+ or_byte, /*01 *//*YYY UNUSED ???? */
+ adc_byte, /*02 */
+ sbb_byte, /*03 */
+ and_byte, /*04 *//*YYY UNUSED ???? */
+ sub_byte, /*05 */
+ xor_byte, /*06 *//*YYY UNUSED ???? */
+ cmp_byte, /*07 */
+};
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0x82
+****************************************************************************/
+void x86emuOp_opc82_byte_RM_IMM(u8 X86EMU_UNUSED(op1))
+{
+ int mod, rl, rh;
+ u8 *destreg;
+ uint destoffset;
+ u8 imm;
+ u8 destval;
+
+ /*
+ * Weirdo special case instruction format. Part of the opcode
+ * held below in "RH". Doubly nested case would result, except
+ * that the decoded instruction Similar to opcode 81, except that
+ * the immediate byte is sign extended to a word length.
+ */
+ START_OF_INSTR();
+ FETCH_DECODE_MODRM(mod, rh, rl);
+#ifdef DEBUG
+ if (DEBUG_DECODE()) {
+ /* XXX DECODE_PRINTF may be changed to something more
+ general, so that it is important to leave the strings
+ in the same format, even though the result is that the
+ above test is done twice. */
+ switch (rh) {
+ case 0:
+ DECODE_PRINTF("ADD\t");
+ break;
+ case 1:
+ DECODE_PRINTF("OR\t");
+ break;
+ case 2:
+ DECODE_PRINTF("ADC\t");
+ break;
+ case 3:
+ DECODE_PRINTF("SBB\t");
+ break;
+ case 4:
+ DECODE_PRINTF("AND\t");
+ break;
+ case 5:
+ DECODE_PRINTF("SUB\t");
+ break;
+ case 6:
+ DECODE_PRINTF("XOR\t");
+ break;
+ case 7:
+ DECODE_PRINTF("CMP\t");
+ break;
+ }
+ }
+#endif
+ /* know operation, decode the mod byte to find the addressing
+ mode. */
+ switch (mod) {
+ case 0:
+ DECODE_PRINTF("BYTE PTR ");
+ destoffset = decode_rm00_address(rl);
+ destval = fetch_data_byte(destoffset);
+ imm = fetch_byte_imm();
+ DECODE_PRINTF2(",%x\n", imm);
+ TRACE_AND_STEP();
+ destval = (*opc82_byte_operation[rh]) (destval, imm);
+ if (rh != 7)
+ store_data_byte(destoffset, destval);
+ break;
+ case 1:
+ DECODE_PRINTF("BYTE PTR ");
+ destoffset = decode_rm01_address(rl);
+ destval = fetch_data_byte(destoffset);
+ imm = fetch_byte_imm();
+ DECODE_PRINTF2(",%x\n", imm);
+ TRACE_AND_STEP();
+ destval = (*opc82_byte_operation[rh]) (destval, imm);
+ if (rh != 7)
+ store_data_byte(destoffset, destval);
+ break;
+ case 2:
+ DECODE_PRINTF("BYTE PTR ");
+ destoffset = decode_rm10_address(rl);
+ destval = fetch_data_byte(destoffset);
+ imm = fetch_byte_imm();
+ DECODE_PRINTF2(",%x\n", imm);
+ TRACE_AND_STEP();
+ destval = (*opc82_byte_operation[rh]) (destval, imm);
+ if (rh != 7)
+ store_data_byte(destoffset, destval);
+ break;
+ case 3: /* register to register */
+ destreg = DECODE_RM_BYTE_REGISTER(rl);
+ imm = fetch_byte_imm();
+ DECODE_PRINTF2(",%x\n", imm);
+ TRACE_AND_STEP();
+ destval = (*opc82_byte_operation[rh]) (*destreg, imm);
+ if (rh != 7)
+ *destreg = destval;
+ break;
+ }
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+static u16 (*opc83_word_operation[])(u16 s, u16 d) =
+{
+ add_word, /*00 */
+ or_word, /*01 *//*YYY UNUSED ???? */
+ adc_word, /*02 */
+ sbb_word, /*03 */
+ and_word, /*04 *//*YYY UNUSED ???? */
+ sub_word, /*05 */
+ xor_word, /*06 *//*YYY UNUSED ???? */
+ cmp_word, /*07 */
+};
+
+static u32 (*opc83_long_operation[])(u32 s, u32 d) =
+{
+ add_long, /*00 */
+ or_long, /*01 *//*YYY UNUSED ???? */
+ adc_long, /*02 */
+ sbb_long, /*03 */
+ and_long, /*04 *//*YYY UNUSED ???? */
+ sub_long, /*05 */
+ xor_long, /*06 *//*YYY UNUSED ???? */
+ cmp_long, /*07 */
+};
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0x83
+****************************************************************************/
+void x86emuOp_opc83_word_RM_IMM(u8 X86EMU_UNUSED(op1))
+{
+ int mod, rl, rh;
+ uint destoffset;
+
+ /*
+ * Weirdo special case instruction format. Part of the opcode
+ * held below in "RH". Doubly nested case would result, except
+ * that the decoded instruction Similar to opcode 81, except that
+ * the immediate byte is sign extended to a word length.
+ */
+ START_OF_INSTR();
+ FETCH_DECODE_MODRM(mod, rh, rl);
+#ifdef DEBUG
+ if (DEBUG_DECODE()) {
+ /* XXX DECODE_PRINTF may be changed to something more
+ general, so that it is important to leave the strings
+ in the same format, even though the result is that the
+ above test is done twice. */
+ switch (rh) {
+ case 0:
+ DECODE_PRINTF("ADD\t");
+ break;
+ case 1:
+ DECODE_PRINTF("OR\t");
+ break;
+ case 2:
+ DECODE_PRINTF("ADC\t");
+ break;
+ case 3:
+ DECODE_PRINTF("SBB\t");
+ break;
+ case 4:
+ DECODE_PRINTF("AND\t");
+ break;
+ case 5:
+ DECODE_PRINTF("SUB\t");
+ break;
+ case 6:
+ DECODE_PRINTF("XOR\t");
+ break;
+ case 7:
+ DECODE_PRINTF("CMP\t");
+ break;
+ }
+ }
+#endif
+ /* know operation, decode the mod byte to find the addressing
+ mode. */
+ switch (mod) {
+ case 0:
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 destval,imm;
+
+ DECODE_PRINTF("DWORD PTR ");
+ destoffset = decode_rm00_address(rl);
+ destval = fetch_data_long(destoffset);
+ imm = (s8) fetch_byte_imm();
+ DECODE_PRINTF2(",%x\n", imm);
+ TRACE_AND_STEP();
+ destval = (*opc83_long_operation[rh]) (destval, imm);
+ if (rh != 7)
+ store_data_long(destoffset, destval);
+ } else {
+ u16 destval,imm;
+
+ DECODE_PRINTF("WORD PTR ");
+ destoffset = decode_rm00_address(rl);
+ destval = fetch_data_word(destoffset);
+ imm = (s8) fetch_byte_imm();
+ DECODE_PRINTF2(",%x\n", imm);
+ TRACE_AND_STEP();
+ destval = (*opc83_word_operation[rh]) (destval, imm);
+ if (rh != 7)
+ store_data_word(destoffset, destval);
+ }
+ break;
+ case 1:
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 destval,imm;
+
+ DECODE_PRINTF("DWORD PTR ");
+ destoffset = decode_rm01_address(rl);
+ destval = fetch_data_long(destoffset);
+ imm = (s8) fetch_byte_imm();
+ DECODE_PRINTF2(",%x\n", imm);
+ TRACE_AND_STEP();
+ destval = (*opc83_long_operation[rh]) (destval, imm);
+ if (rh != 7)
+ store_data_long(destoffset, destval);
+ } else {
+ u16 destval,imm;
+
+ DECODE_PRINTF("WORD PTR ");
+ destoffset = decode_rm01_address(rl);
+ destval = fetch_data_word(destoffset);
+ imm = (s8) fetch_byte_imm();
+ DECODE_PRINTF2(",%x\n", imm);
+ TRACE_AND_STEP();
+ destval = (*opc83_word_operation[rh]) (destval, imm);
+ if (rh != 7)
+ store_data_word(destoffset, destval);
+ }
+ break;
+ case 2:
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 destval,imm;
+
+ DECODE_PRINTF("DWORD PTR ");
+ destoffset = decode_rm10_address(rl);
+ destval = fetch_data_long(destoffset);
+ imm = (s8) fetch_byte_imm();
+ DECODE_PRINTF2(",%x\n", imm);
+ TRACE_AND_STEP();
+ destval = (*opc83_long_operation[rh]) (destval, imm);
+ if (rh != 7)
+ store_data_long(destoffset, destval);
+ } else {
+ u16 destval,imm;
+
+ DECODE_PRINTF("WORD PTR ");
+ destoffset = decode_rm10_address(rl);
+ destval = fetch_data_word(destoffset);
+ imm = (s8) fetch_byte_imm();
+ DECODE_PRINTF2(",%x\n", imm);
+ TRACE_AND_STEP();
+ destval = (*opc83_word_operation[rh]) (destval, imm);
+ if (rh != 7)
+ store_data_word(destoffset, destval);
+ }
+ break;
+ case 3: /* register to register */
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 *destreg;
+ u32 destval,imm;
+
+ destreg = DECODE_RM_LONG_REGISTER(rl);
+ imm = (s8) fetch_byte_imm();
+ DECODE_PRINTF2(",%x\n", imm);
+ TRACE_AND_STEP();
+ destval = (*opc83_long_operation[rh]) (*destreg, imm);
+ if (rh != 7)
+ *destreg = destval;
+ } else {
+ u16 *destreg;
+ u16 destval,imm;
+
+ destreg = DECODE_RM_WORD_REGISTER(rl);
+ imm = (s8) fetch_byte_imm();
+ DECODE_PRINTF2(",%x\n", imm);
+ TRACE_AND_STEP();
+ destval = (*opc83_word_operation[rh]) (*destreg, imm);
+ if (rh != 7)
+ *destreg = destval;
+ }
+ break;
+ }
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0x84
+****************************************************************************/
+void x86emuOp_test_byte_RM_R(u8 X86EMU_UNUSED(op1))
+{
+ int mod, rl, rh;
+ u8 *destreg, *srcreg;
+ uint destoffset;
+ u8 destval;
+
+ START_OF_INSTR();
+ DECODE_PRINTF("TEST\t");
+ FETCH_DECODE_MODRM(mod, rh, rl);
+ switch (mod) {
+ case 0:
+ destoffset = decode_rm00_address(rl);
+ DECODE_PRINTF(",");
+ destval = fetch_data_byte(destoffset);
+ srcreg = DECODE_RM_BYTE_REGISTER(rh);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ test_byte(destval, *srcreg);
+ break;
+ case 1:
+ destoffset = decode_rm01_address(rl);
+ DECODE_PRINTF(",");
+ destval = fetch_data_byte(destoffset);
+ srcreg = DECODE_RM_BYTE_REGISTER(rh);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ test_byte(destval, *srcreg);
+ break;
+ case 2:
+ destoffset = decode_rm10_address(rl);
+ DECODE_PRINTF(",");
+ destval = fetch_data_byte(destoffset);
+ srcreg = DECODE_RM_BYTE_REGISTER(rh);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ test_byte(destval, *srcreg);
+ break;
+ case 3: /* register to register */
+ destreg = DECODE_RM_BYTE_REGISTER(rl);
+ DECODE_PRINTF(",");
+ srcreg = DECODE_RM_BYTE_REGISTER(rh);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ test_byte(*destreg, *srcreg);
+ break;
+ }
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0x85
+****************************************************************************/
+void x86emuOp_test_word_RM_R(u8 X86EMU_UNUSED(op1))
+{
+ int mod, rl, rh;
+ uint destoffset;
+
+ START_OF_INSTR();
+ DECODE_PRINTF("TEST\t");
+ FETCH_DECODE_MODRM(mod, rh, rl);
+ switch (mod) {
+ case 0:
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 destval;
+ u32 *srcreg;
+
+ destoffset = decode_rm00_address(rl);
+ DECODE_PRINTF(",");
+ destval = fetch_data_long(destoffset);
+ srcreg = DECODE_RM_LONG_REGISTER(rh);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ test_long(destval, *srcreg);
+ } else {
+ u16 destval;
+ u16 *srcreg;
+
+ destoffset = decode_rm00_address(rl);
+ DECODE_PRINTF(",");
+ destval = fetch_data_word(destoffset);
+ srcreg = DECODE_RM_WORD_REGISTER(rh);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ test_word(destval, *srcreg);
+ }
+ break;
+ case 1:
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 destval;
+ u32 *srcreg;
+
+ destoffset = decode_rm01_address(rl);
+ DECODE_PRINTF(",");
+ destval = fetch_data_long(destoffset);
+ srcreg = DECODE_RM_LONG_REGISTER(rh);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ test_long(destval, *srcreg);
+ } else {
+ u16 destval;
+ u16 *srcreg;
+
+ destoffset = decode_rm01_address(rl);
+ DECODE_PRINTF(",");
+ destval = fetch_data_word(destoffset);
+ srcreg = DECODE_RM_WORD_REGISTER(rh);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ test_word(destval, *srcreg);
+ }
+ break;
+ case 2:
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 destval;
+ u32 *srcreg;
+
+ destoffset = decode_rm10_address(rl);
+ DECODE_PRINTF(",");
+ destval = fetch_data_long(destoffset);
+ srcreg = DECODE_RM_LONG_REGISTER(rh);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ test_long(destval, *srcreg);
+ } else {
+ u16 destval;
+ u16 *srcreg;
+
+ destoffset = decode_rm10_address(rl);
+ DECODE_PRINTF(",");
+ destval = fetch_data_word(destoffset);
+ srcreg = DECODE_RM_WORD_REGISTER(rh);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ test_word(destval, *srcreg);
+ }
+ break;
+ case 3: /* register to register */
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 *destreg,*srcreg;
+
+ destreg = DECODE_RM_LONG_REGISTER(rl);
+ DECODE_PRINTF(",");
+ srcreg = DECODE_RM_LONG_REGISTER(rh);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ test_long(*destreg, *srcreg);
+ } else {
+ u16 *destreg,*srcreg;
+
+ destreg = DECODE_RM_WORD_REGISTER(rl);
+ DECODE_PRINTF(",");
+ srcreg = DECODE_RM_WORD_REGISTER(rh);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ test_word(*destreg, *srcreg);
+ }
+ break;
+ }
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0x86
+****************************************************************************/
+void x86emuOp_xchg_byte_RM_R(u8 X86EMU_UNUSED(op1))
+{
+ int mod, rl, rh;
+ u8 *destreg, *srcreg;
+ uint destoffset;
+ u8 destval;
+ u8 tmp;
+
+ START_OF_INSTR();
+ DECODE_PRINTF("XCHG\t");
+ FETCH_DECODE_MODRM(mod, rh, rl);
+ switch (mod) {
+ case 0:
+ destoffset = decode_rm00_address(rl);
+ DECODE_PRINTF(",");
+ destval = fetch_data_byte(destoffset);
+ srcreg = DECODE_RM_BYTE_REGISTER(rh);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ tmp = *srcreg;
+ *srcreg = destval;
+ destval = tmp;
+ store_data_byte(destoffset, destval);
+ break;
+ case 1:
+ destoffset = decode_rm01_address(rl);
+ DECODE_PRINTF(",");
+ destval = fetch_data_byte(destoffset);
+ srcreg = DECODE_RM_BYTE_REGISTER(rh);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ tmp = *srcreg;
+ *srcreg = destval;
+ destval = tmp;
+ store_data_byte(destoffset, destval);
+ break;
+ case 2:
+ destoffset = decode_rm10_address(rl);
+ DECODE_PRINTF(",");
+ destval = fetch_data_byte(destoffset);
+ srcreg = DECODE_RM_BYTE_REGISTER(rh);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ tmp = *srcreg;
+ *srcreg = destval;
+ destval = tmp;
+ store_data_byte(destoffset, destval);
+ break;
+ case 3: /* register to register */
+ destreg = DECODE_RM_BYTE_REGISTER(rl);
+ DECODE_PRINTF(",");
+ srcreg = DECODE_RM_BYTE_REGISTER(rh);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ tmp = *srcreg;
+ *srcreg = *destreg;
+ *destreg = tmp;
+ break;
+ }
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0x87
+****************************************************************************/
+void x86emuOp_xchg_word_RM_R(u8 X86EMU_UNUSED(op1))
+{
+ int mod, rl, rh;
+ uint destoffset;
+
+ START_OF_INSTR();
+ DECODE_PRINTF("XCHG\t");
+ FETCH_DECODE_MODRM(mod, rh, rl);
+ switch (mod) {
+ case 0:
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 *srcreg;
+ u32 destval,tmp;
+
+ destoffset = decode_rm00_address(rl);
+ DECODE_PRINTF(",");
+ destval = fetch_data_long(destoffset);
+ srcreg = DECODE_RM_LONG_REGISTER(rh);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ tmp = *srcreg;
+ *srcreg = destval;
+ destval = tmp;
+ store_data_long(destoffset, destval);
+ } else {
+ u16 *srcreg;
+ u16 destval,tmp;
+
+ destoffset = decode_rm00_address(rl);
+ DECODE_PRINTF(",");
+ destval = fetch_data_word(destoffset);
+ srcreg = DECODE_RM_WORD_REGISTER(rh);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ tmp = *srcreg;
+ *srcreg = destval;
+ destval = tmp;
+ store_data_word(destoffset, destval);
+ }
+ break;
+ case 1:
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 *srcreg;
+ u32 destval,tmp;
+
+ destoffset = decode_rm01_address(rl);
+ DECODE_PRINTF(",");
+ destval = fetch_data_long(destoffset);
+ srcreg = DECODE_RM_LONG_REGISTER(rh);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ tmp = *srcreg;
+ *srcreg = destval;
+ destval = tmp;
+ store_data_long(destoffset, destval);
+ } else {
+ u16 *srcreg;
+ u16 destval,tmp;
+
+ destoffset = decode_rm01_address(rl);
+ DECODE_PRINTF(",");
+ destval = fetch_data_word(destoffset);
+ srcreg = DECODE_RM_WORD_REGISTER(rh);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ tmp = *srcreg;
+ *srcreg = destval;
+ destval = tmp;
+ store_data_word(destoffset, destval);
+ }
+ break;
+ case 2:
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 *srcreg;
+ u32 destval,tmp;
+
+ destoffset = decode_rm10_address(rl);
+ DECODE_PRINTF(",");
+ destval = fetch_data_long(destoffset);
+ srcreg = DECODE_RM_LONG_REGISTER(rh);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ tmp = *srcreg;
+ *srcreg = destval;
+ destval = tmp;
+ store_data_long(destoffset, destval);
+ } else {
+ u16 *srcreg;
+ u16 destval,tmp;
+
+ destoffset = decode_rm10_address(rl);
+ DECODE_PRINTF(",");
+ destval = fetch_data_word(destoffset);
+ srcreg = DECODE_RM_WORD_REGISTER(rh);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ tmp = *srcreg;
+ *srcreg = destval;
+ destval = tmp;
+ store_data_word(destoffset, destval);
+ }
+ break;
+ case 3: /* register to register */
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 *destreg,*srcreg;
+ u32 tmp;
+
+ destreg = DECODE_RM_LONG_REGISTER(rl);
+ DECODE_PRINTF(",");
+ srcreg = DECODE_RM_LONG_REGISTER(rh);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ tmp = *srcreg;
+ *srcreg = *destreg;
+ *destreg = tmp;
+ } else {
+ u16 *destreg,*srcreg;
+ u16 tmp;
+
+ destreg = DECODE_RM_WORD_REGISTER(rl);
+ DECODE_PRINTF(",");
+ srcreg = DECODE_RM_WORD_REGISTER(rh);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ tmp = *srcreg;
+ *srcreg = *destreg;
+ *destreg = tmp;
+ }
+ break;
+ }
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0x88
+****************************************************************************/
+void x86emuOp_mov_byte_RM_R(u8 X86EMU_UNUSED(op1))
+{
+ int mod, rl, rh;
+ u8 *destreg, *srcreg;
+ uint destoffset;
+
+ START_OF_INSTR();
+ DECODE_PRINTF("MOV\t");
+ FETCH_DECODE_MODRM(mod, rh, rl);
+ switch (mod) {
+ case 0:
+ destoffset = decode_rm00_address(rl);
+ DECODE_PRINTF(",");
+ srcreg = DECODE_RM_BYTE_REGISTER(rh);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ store_data_byte(destoffset, *srcreg);
+ break;
+ case 1:
+ destoffset = decode_rm01_address(rl);
+ DECODE_PRINTF(",");
+ srcreg = DECODE_RM_BYTE_REGISTER(rh);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ store_data_byte(destoffset, *srcreg);
+ break;
+ case 2:
+ destoffset = decode_rm10_address(rl);
+ DECODE_PRINTF(",");
+ srcreg = DECODE_RM_BYTE_REGISTER(rh);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ store_data_byte(destoffset, *srcreg);
+ break;
+ case 3: /* register to register */
+ destreg = DECODE_RM_BYTE_REGISTER(rl);
+ DECODE_PRINTF(",");
+ srcreg = DECODE_RM_BYTE_REGISTER(rh);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ *destreg = *srcreg;
+ break;
+ }
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0x89
+****************************************************************************/
+void x86emuOp_mov_word_RM_R(u8 X86EMU_UNUSED(op1))
+{
+ int mod, rl, rh;
+ uint destoffset;
+
+ START_OF_INSTR();
+ DECODE_PRINTF("MOV\t");
+ FETCH_DECODE_MODRM(mod, rh, rl);
+ switch (mod) {
+ case 0:
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 *srcreg;
+
+ destoffset = decode_rm00_address(rl);
+ DECODE_PRINTF(",");
+ srcreg = DECODE_RM_LONG_REGISTER(rh);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ store_data_long(destoffset, *srcreg);
+ } else {
+ u16 *srcreg;
+
+ destoffset = decode_rm00_address(rl);
+ DECODE_PRINTF(",");
+ srcreg = DECODE_RM_WORD_REGISTER(rh);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ store_data_word(destoffset, *srcreg);
+ }
+ break;
+ case 1:
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 *srcreg;
+
+ destoffset = decode_rm01_address(rl);
+ DECODE_PRINTF(",");
+ srcreg = DECODE_RM_LONG_REGISTER(rh);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ store_data_long(destoffset, *srcreg);
+ } else {
+ u16 *srcreg;
+
+ destoffset = decode_rm01_address(rl);
+ DECODE_PRINTF(",");
+ srcreg = DECODE_RM_WORD_REGISTER(rh);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ store_data_word(destoffset, *srcreg);
+ }
+ break;
+ case 2:
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 *srcreg;
+
+ destoffset = decode_rm10_address(rl);
+ DECODE_PRINTF(",");
+ srcreg = DECODE_RM_LONG_REGISTER(rh);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ store_data_long(destoffset, *srcreg);
+ } else {
+ u16 *srcreg;
+
+ destoffset = decode_rm10_address(rl);
+ DECODE_PRINTF(",");
+ srcreg = DECODE_RM_WORD_REGISTER(rh);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ store_data_word(destoffset, *srcreg);
+ }
+ break;
+ case 3: /* register to register */
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 *destreg,*srcreg;
+
+ destreg = DECODE_RM_LONG_REGISTER(rl);
+ DECODE_PRINTF(",");
+ srcreg = DECODE_RM_LONG_REGISTER(rh);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ *destreg = *srcreg;
+ } else {
+ u16 *destreg,*srcreg;
+
+ destreg = DECODE_RM_WORD_REGISTER(rl);
+ DECODE_PRINTF(",");
+ srcreg = DECODE_RM_WORD_REGISTER(rh);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ *destreg = *srcreg;
+ }
+ break;
+ }
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0x8a
+****************************************************************************/
+void x86emuOp_mov_byte_R_RM(u8 X86EMU_UNUSED(op1))
+{
+ int mod, rl, rh;
+ u8 *destreg, *srcreg;
+ uint srcoffset;
+ u8 srcval;
+
+ START_OF_INSTR();
+ DECODE_PRINTF("MOV\t");
+ FETCH_DECODE_MODRM(mod, rh, rl);
+ switch (mod) {
+ case 0:
+ destreg = DECODE_RM_BYTE_REGISTER(rh);
+ DECODE_PRINTF(",");
+ srcoffset = decode_rm00_address(rl);
+ srcval = fetch_data_byte(srcoffset);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ *destreg = srcval;
+ break;
+ case 1:
+ destreg = DECODE_RM_BYTE_REGISTER(rh);
+ DECODE_PRINTF(",");
+ srcoffset = decode_rm01_address(rl);
+ srcval = fetch_data_byte(srcoffset);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ *destreg = srcval;
+ break;
+ case 2:
+ destreg = DECODE_RM_BYTE_REGISTER(rh);
+ DECODE_PRINTF(",");
+ srcoffset = decode_rm10_address(rl);
+ srcval = fetch_data_byte(srcoffset);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ *destreg = srcval;
+ break;
+ case 3: /* register to register */
+ destreg = DECODE_RM_BYTE_REGISTER(rh);
+ DECODE_PRINTF(",");
+ srcreg = DECODE_RM_BYTE_REGISTER(rl);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ *destreg = *srcreg;
+ break;
+ }
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0x8b
+****************************************************************************/
+void x86emuOp_mov_word_R_RM(u8 X86EMU_UNUSED(op1))
+{
+ int mod, rl, rh;
+ uint srcoffset;
+
+ START_OF_INSTR();
+ DECODE_PRINTF("MOV\t");
+ FETCH_DECODE_MODRM(mod, rh, rl);
+ switch (mod) {
+ case 0:
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 *destreg;
+ u32 srcval;
+
+ destreg = DECODE_RM_LONG_REGISTER(rh);
+ DECODE_PRINTF(",");
+ srcoffset = decode_rm00_address(rl);
+ srcval = fetch_data_long(srcoffset);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ *destreg = srcval;
+ } else {
+ u16 *destreg;
+ u16 srcval;
+
+ destreg = DECODE_RM_WORD_REGISTER(rh);
+ DECODE_PRINTF(",");
+ srcoffset = decode_rm00_address(rl);
+ srcval = fetch_data_word(srcoffset);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ *destreg = srcval;
+ }
+ break;
+ case 1:
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 *destreg;
+ u32 srcval;
+
+ destreg = DECODE_RM_LONG_REGISTER(rh);
+ DECODE_PRINTF(",");
+ srcoffset = decode_rm01_address(rl);
+ srcval = fetch_data_long(srcoffset);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ *destreg = srcval;
+ } else {
+ u16 *destreg;
+ u16 srcval;
+
+ destreg = DECODE_RM_WORD_REGISTER(rh);
+ DECODE_PRINTF(",");
+ srcoffset = decode_rm01_address(rl);
+ srcval = fetch_data_word(srcoffset);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ *destreg = srcval;
+ }
+ break;
+ case 2:
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 *destreg;
+ u32 srcval;
+
+ destreg = DECODE_RM_LONG_REGISTER(rh);
+ DECODE_PRINTF(",");
+ srcoffset = decode_rm10_address(rl);
+ srcval = fetch_data_long(srcoffset);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ *destreg = srcval;
+ } else {
+ u16 *destreg;
+ u16 srcval;
+
+ destreg = DECODE_RM_WORD_REGISTER(rh);
+ DECODE_PRINTF(",");
+ srcoffset = decode_rm10_address(rl);
+ srcval = fetch_data_word(srcoffset);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ *destreg = srcval;
+ }
+ break;
+ case 3: /* register to register */
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 *destreg, *srcreg;
+
+ destreg = DECODE_RM_LONG_REGISTER(rh);
+ DECODE_PRINTF(",");
+ srcreg = DECODE_RM_LONG_REGISTER(rl);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ *destreg = *srcreg;
+ } else {
+ u16 *destreg, *srcreg;
+
+ destreg = DECODE_RM_WORD_REGISTER(rh);
+ DECODE_PRINTF(",");
+ srcreg = DECODE_RM_WORD_REGISTER(rl);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ *destreg = *srcreg;
+ }
+ break;
+ }
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0x8c
+****************************************************************************/
+void x86emuOp_mov_word_RM_SR(u8 X86EMU_UNUSED(op1))
+{
+ int mod, rl, rh;
+ u16 *destreg, *srcreg;
+ uint destoffset;
+ u16 destval;
+
+ START_OF_INSTR();
+ DECODE_PRINTF("MOV\t");
+ FETCH_DECODE_MODRM(mod, rh, rl);
+ switch (mod) {
+ case 0:
+ destoffset = decode_rm00_address(rl);
+ DECODE_PRINTF(",");
+ srcreg = decode_rm_seg_register(rh);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ destval = *srcreg;
+ store_data_word(destoffset, destval);
+ break;
+ case 1:
+ destoffset = decode_rm01_address(rl);
+ DECODE_PRINTF(",");
+ srcreg = decode_rm_seg_register(rh);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ destval = *srcreg;
+ store_data_word(destoffset, destval);
+ break;
+ case 2:
+ destoffset = decode_rm10_address(rl);
+ DECODE_PRINTF(",");
+ srcreg = decode_rm_seg_register(rh);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ destval = *srcreg;
+ store_data_word(destoffset, destval);
+ break;
+ case 3: /* register to register */
+ destreg = DECODE_RM_WORD_REGISTER(rl);
+ DECODE_PRINTF(",");
+ srcreg = decode_rm_seg_register(rh);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ *destreg = *srcreg;
+ break;
+ }
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0x8d
+****************************************************************************/
+void x86emuOp_lea_word_R_M(u8 X86EMU_UNUSED(op1))
+{
+ int mod, rl, rh;
+ u16 *srcreg;
+ uint destoffset;
+
+/*
+ * TODO: Need to handle address size prefix!
+ *
+ * lea eax,[eax+ebx*2] ??
+ */
+
+ START_OF_INSTR();
+ DECODE_PRINTF("LEA\t");
+ FETCH_DECODE_MODRM(mod, rh, rl);
+ switch (mod) {
+ case 0:
+ srcreg = DECODE_RM_WORD_REGISTER(rh);
+ DECODE_PRINTF(",");
+ destoffset = decode_rm00_address(rl);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ *srcreg = (u16)destoffset;
+ break;
+ case 1:
+ srcreg = DECODE_RM_WORD_REGISTER(rh);
+ DECODE_PRINTF(",");
+ destoffset = decode_rm01_address(rl);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ *srcreg = (u16)destoffset;
+ break;
+ case 2:
+ srcreg = DECODE_RM_WORD_REGISTER(rh);
+ DECODE_PRINTF(",");
+ destoffset = decode_rm10_address(rl);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ *srcreg = (u16)destoffset;
+ break;
+ case 3: /* register to register */
+ /* undefined. Do nothing. */
+ break;
+ }
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0x8e
+****************************************************************************/
+void x86emuOp_mov_word_SR_RM(u8 X86EMU_UNUSED(op1))
+{
+ int mod, rl, rh;
+ u16 *destreg, *srcreg;
+ uint srcoffset;
+ u16 srcval;
+
+ START_OF_INSTR();
+ DECODE_PRINTF("MOV\t");
+ FETCH_DECODE_MODRM(mod, rh, rl);
+ switch (mod) {
+ case 0:
+ destreg = decode_rm_seg_register(rh);
+ DECODE_PRINTF(",");
+ srcoffset = decode_rm00_address(rl);
+ srcval = fetch_data_word(srcoffset);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ *destreg = srcval;
+ break;
+ case 1:
+ destreg = decode_rm_seg_register(rh);
+ DECODE_PRINTF(",");
+ srcoffset = decode_rm01_address(rl);
+ srcval = fetch_data_word(srcoffset);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ *destreg = srcval;
+ break;
+ case 2:
+ destreg = decode_rm_seg_register(rh);
+ DECODE_PRINTF(",");
+ srcoffset = decode_rm10_address(rl);
+ srcval = fetch_data_word(srcoffset);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ *destreg = srcval;
+ break;
+ case 3: /* register to register */
+ destreg = decode_rm_seg_register(rh);
+ DECODE_PRINTF(",");
+ srcreg = DECODE_RM_WORD_REGISTER(rl);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ *destreg = *srcreg;
+ break;
+ }
+ /*
+ * Clean up, and reset all the R_xSP pointers to the correct
+ * locations. This is about 3x too much overhead (doing all the
+ * segreg ptrs when only one is needed, but this instruction
+ * *cannot* be that common, and this isn't too much work anyway.
+ */
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0x8f
+****************************************************************************/
+void x86emuOp_pop_RM(u8 X86EMU_UNUSED(op1))
+{
+ int mod, rl, rh;
+ uint destoffset;
+
+ START_OF_INSTR();
+ DECODE_PRINTF("POP\t");
+ FETCH_DECODE_MODRM(mod, rh, rl);
+ if (rh != 0) {
+ DECODE_PRINTF("ILLEGAL DECODE OF OPCODE 8F\n");
+ HALT_SYS();
+ }
+ switch (mod) {
+ case 0:
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 destval;
+
+ destoffset = decode_rm00_address(rl);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ destval = pop_long();
+ store_data_long(destoffset, destval);
+ } else {
+ u16 destval;
+
+ destoffset = decode_rm00_address(rl);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ destval = pop_word();
+ store_data_word(destoffset, destval);
+ }
+ break;
+ case 1:
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 destval;
+
+ destoffset = decode_rm01_address(rl);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ destval = pop_long();
+ store_data_long(destoffset, destval);
+ } else {
+ u16 destval;
+
+ destoffset = decode_rm01_address(rl);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ destval = pop_word();
+ store_data_word(destoffset, destval);
+ }
+ break;
+ case 2:
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 destval;
+
+ destoffset = decode_rm10_address(rl);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ destval = pop_long();
+ store_data_long(destoffset, destval);
+ } else {
+ u16 destval;
+
+ destoffset = decode_rm10_address(rl);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ destval = pop_word();
+ store_data_word(destoffset, destval);
+ }
+ break;
+ case 3: /* register to register */
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 *destreg;
+
+ destreg = DECODE_RM_LONG_REGISTER(rl);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ *destreg = pop_long();
+ } else {
+ u16 *destreg;
+
+ destreg = DECODE_RM_WORD_REGISTER(rl);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ *destreg = pop_word();
+ }
+ break;
+ }
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0x90
+****************************************************************************/
+void x86emuOp_nop(u8 X86EMU_UNUSED(op1))
+{
+ START_OF_INSTR();
+ DECODE_PRINTF("NOP\n");
+ TRACE_AND_STEP();
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0x91
+****************************************************************************/
+void x86emuOp_xchg_word_AX_CX(u8 X86EMU_UNUSED(op1))
+{
+ u32 tmp;
+
+ START_OF_INSTR();
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ DECODE_PRINTF("XCHG\tEAX,ECX\n");
+ } else {
+ DECODE_PRINTF("XCHG\tAX,CX\n");
+ }
+ TRACE_AND_STEP();
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ tmp = M.x86.R_EAX;
+ M.x86.R_EAX = M.x86.R_ECX;
+ M.x86.R_ECX = tmp;
+ } else {
+ tmp = M.x86.R_AX;
+ M.x86.R_AX = M.x86.R_CX;
+ M.x86.R_CX = (u16)tmp;
+ }
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0x92
+****************************************************************************/
+void x86emuOp_xchg_word_AX_DX(u8 X86EMU_UNUSED(op1))
+{
+ u32 tmp;
+
+ START_OF_INSTR();
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ DECODE_PRINTF("XCHG\tEAX,EDX\n");
+ } else {
+ DECODE_PRINTF("XCHG\tAX,DX\n");
+ }
+ TRACE_AND_STEP();
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ tmp = M.x86.R_EAX;
+ M.x86.R_EAX = M.x86.R_EDX;
+ M.x86.R_EDX = tmp;
+ } else {
+ tmp = M.x86.R_AX;
+ M.x86.R_AX = M.x86.R_DX;
+ M.x86.R_DX = (u16)tmp;
+ }
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0x93
+****************************************************************************/
+void x86emuOp_xchg_word_AX_BX(u8 X86EMU_UNUSED(op1))
+{
+ u32 tmp;
+
+ START_OF_INSTR();
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ DECODE_PRINTF("XCHG\tEAX,EBX\n");
+ } else {
+ DECODE_PRINTF("XCHG\tAX,BX\n");
+ }
+ TRACE_AND_STEP();
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ tmp = M.x86.R_EAX;
+ M.x86.R_EAX = M.x86.R_EBX;
+ M.x86.R_EBX = tmp;
+ } else {
+ tmp = M.x86.R_AX;
+ M.x86.R_AX = M.x86.R_BX;
+ M.x86.R_BX = (u16)tmp;
+ }
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0x94
+****************************************************************************/
+void x86emuOp_xchg_word_AX_SP(u8 X86EMU_UNUSED(op1))
+{
+ u32 tmp;
+
+ START_OF_INSTR();
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ DECODE_PRINTF("XCHG\tEAX,ESP\n");
+ } else {
+ DECODE_PRINTF("XCHG\tAX,SP\n");
+ }
+ TRACE_AND_STEP();
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ tmp = M.x86.R_EAX;
+ M.x86.R_EAX = M.x86.R_ESP;
+ M.x86.R_ESP = tmp;
+ } else {
+ tmp = M.x86.R_AX;
+ M.x86.R_AX = M.x86.R_SP;
+ M.x86.R_SP = (u16)tmp;
+ }
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0x95
+****************************************************************************/
+void x86emuOp_xchg_word_AX_BP(u8 X86EMU_UNUSED(op1))
+{
+ u32 tmp;
+
+ START_OF_INSTR();
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ DECODE_PRINTF("XCHG\tEAX,EBP\n");
+ } else {
+ DECODE_PRINTF("XCHG\tAX,BP\n");
+ }
+ TRACE_AND_STEP();
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ tmp = M.x86.R_EAX;
+ M.x86.R_EAX = M.x86.R_EBP;
+ M.x86.R_EBP = tmp;
+ } else {
+ tmp = M.x86.R_AX;
+ M.x86.R_AX = M.x86.R_BP;
+ M.x86.R_BP = (u16)tmp;
+ }
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0x96
+****************************************************************************/
+void x86emuOp_xchg_word_AX_SI(u8 X86EMU_UNUSED(op1))
+{
+ u32 tmp;
+
+ START_OF_INSTR();
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ DECODE_PRINTF("XCHG\tEAX,ESI\n");
+ } else {
+ DECODE_PRINTF("XCHG\tAX,SI\n");
+ }
+ TRACE_AND_STEP();
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ tmp = M.x86.R_EAX;
+ M.x86.R_EAX = M.x86.R_ESI;
+ M.x86.R_ESI = tmp;
+ } else {
+ tmp = M.x86.R_AX;
+ M.x86.R_AX = M.x86.R_SI;
+ M.x86.R_SI = (u16)tmp;
+ }
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0x97
+****************************************************************************/
+void x86emuOp_xchg_word_AX_DI(u8 X86EMU_UNUSED(op1))
+{
+ u32 tmp;
+
+ START_OF_INSTR();
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ DECODE_PRINTF("XCHG\tEAX,EDI\n");
+ } else {
+ DECODE_PRINTF("XCHG\tAX,DI\n");
+ }
+ TRACE_AND_STEP();
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ tmp = M.x86.R_EAX;
+ M.x86.R_EAX = M.x86.R_EDI;
+ M.x86.R_EDI = tmp;
+ } else {
+ tmp = M.x86.R_AX;
+ M.x86.R_AX = M.x86.R_DI;
+ M.x86.R_DI = (u16)tmp;
+ }
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0x98
+****************************************************************************/
+void x86emuOp_cbw(u8 X86EMU_UNUSED(op1))
+{
+ START_OF_INSTR();
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ DECODE_PRINTF("CWDE\n");
+ } else {
+ DECODE_PRINTF("CBW\n");
+ }
+ TRACE_AND_STEP();
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ if (M.x86.R_AX & 0x8000) {
+ M.x86.R_EAX |= 0xffff0000;
+ } else {
+ M.x86.R_EAX &= 0x0000ffff;
+ }
+ } else {
+ if (M.x86.R_AL & 0x80) {
+ M.x86.R_AH = 0xff;
+ } else {
+ M.x86.R_AH = 0x0;
+ }
+ }
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0x99
+****************************************************************************/
+void x86emuOp_cwd(u8 X86EMU_UNUSED(op1))
+{
+ START_OF_INSTR();
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ DECODE_PRINTF("CDQ\n");
+ } else {
+ DECODE_PRINTF("CWD\n");
+ }
+ DECODE_PRINTF("CWD\n");
+ TRACE_AND_STEP();
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ if (M.x86.R_EAX & 0x80000000) {
+ M.x86.R_EDX = 0xffffffff;
+ } else {
+ M.x86.R_EDX = 0x0;
+ }
+ } else {
+ if (M.x86.R_AX & 0x8000) {
+ M.x86.R_DX = 0xffff;
+ } else {
+ M.x86.R_DX = 0x0;
+ }
+ }
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0x9a
+****************************************************************************/
+void x86emuOp_call_far_IMM(u8 X86EMU_UNUSED(op1))
+{
+ u16 farseg, faroff;
+
+ START_OF_INSTR();
+ DECODE_PRINTF("CALL\t");
+ faroff = fetch_word_imm();
+ farseg = fetch_word_imm();
+ DECODE_PRINTF2("%04x:", farseg);
+ DECODE_PRINTF2("%04x\n", faroff);
+ CALL_TRACE(M.x86.saved_cs, M.x86.saved_ip, farseg, faroff, "FAR ");
+
+ /* XXX
+ *
+ * Hooked interrupt vectors calling into our "BIOS" will cause
+ * problems unless all intersegment stuff is checked for BIOS
+ * access. Check needed here. For moment, let it alone.
+ */
+ TRACE_AND_STEP();
+ push_word(M.x86.R_CS);
+ M.x86.R_CS = farseg;
+ push_word(M.x86.R_IP);
+ M.x86.R_IP = faroff;
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0x9b
+****************************************************************************/
+void x86emuOp_wait(u8 X86EMU_UNUSED(op1))
+{
+ START_OF_INSTR();
+ DECODE_PRINTF("WAIT");
+ TRACE_AND_STEP();
+ /* NADA. */
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0x9c
+****************************************************************************/
+void x86emuOp_pushf_word(u8 X86EMU_UNUSED(op1))
+{
+ u32 flags;
+
+ START_OF_INSTR();
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ DECODE_PRINTF("PUSHFD\n");
+ } else {
+ DECODE_PRINTF("PUSHF\n");
+ }
+ TRACE_AND_STEP();
+
+ /* clear out *all* bits not representing flags, and turn on real bits */
+ flags = (M.x86.R_EFLG & F_MSK) | F_ALWAYS_ON;
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ push_long(flags);
+ } else {
+ push_word((u16)flags);
+ }
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0x9d
+****************************************************************************/
+void x86emuOp_popf_word(u8 X86EMU_UNUSED(op1))
+{
+ START_OF_INSTR();
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ DECODE_PRINTF("POPFD\n");
+ } else {
+ DECODE_PRINTF("POPF\n");
+ }
+ TRACE_AND_STEP();
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ M.x86.R_EFLG = pop_long();
+ } else {
+ M.x86.R_FLG = pop_word();
+ }
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0x9e
+****************************************************************************/
+void x86emuOp_sahf(u8 X86EMU_UNUSED(op1))
+{
+ START_OF_INSTR();
+ DECODE_PRINTF("SAHF\n");
+ TRACE_AND_STEP();
+ /* clear the lower bits of the flag register */
+ M.x86.R_FLG &= 0xffffff00;
+ /* or in the AH register into the flags register */
+ M.x86.R_FLG |= M.x86.R_AH;
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0x9f
+****************************************************************************/
+void x86emuOp_lahf(u8 X86EMU_UNUSED(op1))
+{
+ START_OF_INSTR();
+ DECODE_PRINTF("LAHF\n");
+ TRACE_AND_STEP();
+ M.x86.R_AH = (u8)(M.x86.R_FLG & 0xff);
+ /*undocumented TC++ behavior??? Nope. It's documented, but
+ you have too look real hard to notice it. */
+ M.x86.R_AH |= 0x2;
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0xa0
+****************************************************************************/
+void x86emuOp_mov_AL_M_IMM(u8 X86EMU_UNUSED(op1))
+{
+ u16 offset;
+
+ START_OF_INSTR();
+ DECODE_PRINTF("MOV\tAL,");
+ offset = fetch_word_imm();
+ DECODE_PRINTF2("[%04x]\n", offset);
+ TRACE_AND_STEP();
+ M.x86.R_AL = fetch_data_byte(offset);
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0xa1
+****************************************************************************/
+void x86emuOp_mov_AX_M_IMM(u8 X86EMU_UNUSED(op1))
+{
+ u16 offset;
+
+ START_OF_INSTR();
+ offset = fetch_word_imm();
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ DECODE_PRINTF2("MOV\tEAX,[%04x]\n", offset);
+ } else {
+ DECODE_PRINTF2("MOV\tAX,[%04x]\n", offset);
+ }
+ TRACE_AND_STEP();
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ M.x86.R_EAX = fetch_data_long(offset);
+ } else {
+ M.x86.R_AX = fetch_data_word(offset);
+ }
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0xa2
+****************************************************************************/
+void x86emuOp_mov_M_AL_IMM(u8 X86EMU_UNUSED(op1))
+{
+ u16 offset;
+
+ START_OF_INSTR();
+ DECODE_PRINTF("MOV\t");
+ offset = fetch_word_imm();
+ DECODE_PRINTF2("[%04x],AL\n", offset);
+ TRACE_AND_STEP();
+ store_data_byte(offset, M.x86.R_AL);
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0xa3
+****************************************************************************/
+void x86emuOp_mov_M_AX_IMM(u8 X86EMU_UNUSED(op1))
+{
+ u16 offset;
+
+ START_OF_INSTR();
+ offset = fetch_word_imm();
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ DECODE_PRINTF2("MOV\t[%04x],EAX\n", offset);
+ } else {
+ DECODE_PRINTF2("MOV\t[%04x],AX\n", offset);
+ }
+ TRACE_AND_STEP();
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ store_data_long(offset, M.x86.R_EAX);
+ } else {
+ store_data_word(offset, M.x86.R_AX);
+ }
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0xa4
+****************************************************************************/
+void x86emuOp_movs_byte(u8 X86EMU_UNUSED(op1))
+{
+ u8 val;
+ u32 count;
+ int inc;
+
+ START_OF_INSTR();
+ DECODE_PRINTF("MOVS\tBYTE\n");
+ if (ACCESS_FLAG(F_DF)) /* down */
+ inc = -1;
+ else
+ inc = 1;
+ TRACE_AND_STEP();
+ count = 1;
+ if (M.x86.mode & (SYSMODE_PREFIX_REPE | SYSMODE_PREFIX_REPNE)) {
+ /* dont care whether REPE or REPNE */
+ /* move them until CX is ZERO. */
+ count = M.x86.R_CX;
+ M.x86.R_CX = 0;
+ M.x86.mode &= ~(SYSMODE_PREFIX_REPE | SYSMODE_PREFIX_REPNE);
+ }
+ while (count--) {
+ val = fetch_data_byte(M.x86.R_SI);
+ store_data_byte_abs(M.x86.R_ES, M.x86.R_DI, val);
+ M.x86.R_SI += inc;
+ M.x86.R_DI += inc;
+ }
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0xa5
+****************************************************************************/
+void x86emuOp_movs_word(u8 X86EMU_UNUSED(op1))
+{
+ u32 val;
+ int inc;
+ u32 count;
+
+ START_OF_INSTR();
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ DECODE_PRINTF("MOVS\tDWORD\n");
+ if (ACCESS_FLAG(F_DF)) /* down */
+ inc = -4;
+ else
+ inc = 4;
+ } else {
+ DECODE_PRINTF("MOVS\tWORD\n");
+ if (ACCESS_FLAG(F_DF)) /* down */
+ inc = -2;
+ else
+ inc = 2;
+ }
+ TRACE_AND_STEP();
+ count = 1;
+ if (M.x86.mode & (SYSMODE_PREFIX_REPE | SYSMODE_PREFIX_REPNE)) {
+ /* dont care whether REPE or REPNE */
+ /* move them until CX is ZERO. */
+ count = M.x86.R_CX;
+ M.x86.R_CX = 0;
+ M.x86.mode &= ~(SYSMODE_PREFIX_REPE | SYSMODE_PREFIX_REPNE);
+ }
+ while (count--) {
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ val = fetch_data_long(M.x86.R_SI);
+ store_data_long_abs(M.x86.R_ES, M.x86.R_DI, val);
+ } else {
+ val = fetch_data_word(M.x86.R_SI);
+ store_data_word_abs(M.x86.R_ES, M.x86.R_DI, (u16)val);
+ }
+ M.x86.R_SI += inc;
+ M.x86.R_DI += inc;
+ }
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0xa6
+****************************************************************************/
+void x86emuOp_cmps_byte(u8 X86EMU_UNUSED(op1))
+{
+ s8 val1, val2;
+ int inc;
+
+ START_OF_INSTR();
+ DECODE_PRINTF("CMPS\tBYTE\n");
+ TRACE_AND_STEP();
+ if (ACCESS_FLAG(F_DF)) /* down */
+ inc = -1;
+ else
+ inc = 1;
+
+ if (M.x86.mode & SYSMODE_PREFIX_REPE) {
+ /* REPE */
+ /* move them until CX is ZERO. */
+ while (M.x86.R_CX != 0) {
+ val1 = fetch_data_byte(M.x86.R_SI);
+ val2 = fetch_data_byte_abs(M.x86.R_ES, M.x86.R_DI);
+ cmp_byte(val1, val2);
+ M.x86.R_CX -= 1;
+ M.x86.R_SI += inc;
+ M.x86.R_DI += inc;
+ if (ACCESS_FLAG(F_ZF) == 0)
+ break;
+ }
+ M.x86.mode &= ~SYSMODE_PREFIX_REPE;
+ } else if (M.x86.mode & SYSMODE_PREFIX_REPNE) {
+ /* REPNE */
+ /* move them until CX is ZERO. */
+ while (M.x86.R_CX != 0) {
+ val1 = fetch_data_byte(M.x86.R_SI);
+ val2 = fetch_data_byte_abs(M.x86.R_ES, M.x86.R_DI);
+ cmp_byte(val1, val2);
+ M.x86.R_CX -= 1;
+ M.x86.R_SI += inc;
+ M.x86.R_DI += inc;
+ if (ACCESS_FLAG(F_ZF))
+ break; /* zero flag set means equal */
+ }
+ M.x86.mode &= ~SYSMODE_PREFIX_REPNE;
+ } else {
+ val1 = fetch_data_byte(M.x86.R_SI);
+ val2 = fetch_data_byte_abs(M.x86.R_ES, M.x86.R_DI);
+ cmp_byte(val1, val2);
+ M.x86.R_SI += inc;
+ M.x86.R_DI += inc;
+ }
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0xa7
+****************************************************************************/
+void x86emuOp_cmps_word(u8 X86EMU_UNUSED(op1))
+{
+ u32 val1,val2;
+ int inc;
+
+ START_OF_INSTR();
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ DECODE_PRINTF("CMPS\tDWORD\n");
+ if (ACCESS_FLAG(F_DF)) /* down */
+ inc = -4;
+ else
+ inc = 4;
+ } else {
+ DECODE_PRINTF("CMPS\tWORD\n");
+ if (ACCESS_FLAG(F_DF)) /* down */
+ inc = -2;
+ else
+ inc = 2;
+ }
+ TRACE_AND_STEP();
+ if (M.x86.mode & SYSMODE_PREFIX_REPE) {
+ /* REPE */
+ /* move them until CX is ZERO. */
+ while (M.x86.R_CX != 0) {
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ val1 = fetch_data_long(M.x86.R_SI);
+ val2 = fetch_data_long_abs(M.x86.R_ES, M.x86.R_DI);
+ cmp_long(val1, val2);
+ } else {
+ val1 = fetch_data_word(M.x86.R_SI);
+ val2 = fetch_data_word_abs(M.x86.R_ES, M.x86.R_DI);
+ cmp_word((u16)val1, (u16)val2);
+ }
+ M.x86.R_CX -= 1;
+ M.x86.R_SI += inc;
+ M.x86.R_DI += inc;
+ if (ACCESS_FLAG(F_ZF) == 0)
+ break;
+ }
+ M.x86.mode &= ~SYSMODE_PREFIX_REPE;
+ } else if (M.x86.mode & SYSMODE_PREFIX_REPNE) {
+ /* REPNE */
+ /* move them until CX is ZERO. */
+ while (M.x86.R_CX != 0) {
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ val1 = fetch_data_long(M.x86.R_SI);
+ val2 = fetch_data_long_abs(M.x86.R_ES, M.x86.R_DI);
+ cmp_long(val1, val2);
+ } else {
+ val1 = fetch_data_word(M.x86.R_SI);
+ val2 = fetch_data_word_abs(M.x86.R_ES, M.x86.R_DI);
+ cmp_word((u16)val1, (u16)val2);
+ }
+ M.x86.R_CX -= 1;
+ M.x86.R_SI += inc;
+ M.x86.R_DI += inc;
+ if (ACCESS_FLAG(F_ZF))
+ break; /* zero flag set means equal */
+ }
+ M.x86.mode &= ~SYSMODE_PREFIX_REPNE;
+ } else {
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ val1 = fetch_data_long(M.x86.R_SI);
+ val2 = fetch_data_long_abs(M.x86.R_ES, M.x86.R_DI);
+ cmp_long(val1, val2);
+ } else {
+ val1 = fetch_data_word(M.x86.R_SI);
+ val2 = fetch_data_word_abs(M.x86.R_ES, M.x86.R_DI);
+ cmp_word((u16)val1, (u16)val2);
+ }
+ M.x86.R_SI += inc;
+ M.x86.R_DI += inc;
+ }
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0xa8
+****************************************************************************/
+void x86emuOp_test_AL_IMM(u8 X86EMU_UNUSED(op1))
+{
+ int imm;
+
+ START_OF_INSTR();
+ DECODE_PRINTF("TEST\tAL,");
+ imm = fetch_byte_imm();
+ DECODE_PRINTF2("%04x\n", imm);
+ TRACE_AND_STEP();
+ test_byte(M.x86.R_AL, (u8)imm);
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0xa9
+****************************************************************************/
+void x86emuOp_test_AX_IMM(u8 X86EMU_UNUSED(op1))
+{
+ u32 srcval;
+
+ START_OF_INSTR();
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ DECODE_PRINTF("TEST\tEAX,");
+ srcval = fetch_long_imm();
+ } else {
+ DECODE_PRINTF("TEST\tAX,");
+ srcval = fetch_word_imm();
+ }
+ DECODE_PRINTF2("%x\n", srcval);
+ TRACE_AND_STEP();
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ test_long(M.x86.R_EAX, srcval);
+ } else {
+ test_word(M.x86.R_AX, (u16)srcval);
+ }
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0xaa
+****************************************************************************/
+void x86emuOp_stos_byte(u8 X86EMU_UNUSED(op1))
+{
+ int inc;
+
+ START_OF_INSTR();
+ DECODE_PRINTF("STOS\tBYTE\n");
+ if (ACCESS_FLAG(F_DF)) /* down */
+ inc = -1;
+ else
+ inc = 1;
+ TRACE_AND_STEP();
+ if (M.x86.mode & (SYSMODE_PREFIX_REPE | SYSMODE_PREFIX_REPNE)) {
+ /* dont care whether REPE or REPNE */
+ /* move them until CX is ZERO. */
+ while (M.x86.R_CX != 0) {
+ store_data_byte_abs(M.x86.R_ES, M.x86.R_DI, M.x86.R_AL);
+ M.x86.R_CX -= 1;
+ M.x86.R_DI += inc;
+ }
+ M.x86.mode &= ~(SYSMODE_PREFIX_REPE | SYSMODE_PREFIX_REPNE);
+ } else {
+ store_data_byte_abs(M.x86.R_ES, M.x86.R_DI, M.x86.R_AL);
+ M.x86.R_DI += inc;
+ }
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0xab
+****************************************************************************/
+void x86emuOp_stos_word(u8 X86EMU_UNUSED(op1))
+{
+ int inc;
+ u32 count;
+
+ START_OF_INSTR();
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ DECODE_PRINTF("STOS\tDWORD\n");
+ if (ACCESS_FLAG(F_DF)) /* down */
+ inc = -4;
+ else
+ inc = 4;
+ } else {
+ DECODE_PRINTF("STOS\tWORD\n");
+ if (ACCESS_FLAG(F_DF)) /* down */
+ inc = -2;
+ else
+ inc = 2;
+ }
+ TRACE_AND_STEP();
+ count = 1;
+ if (M.x86.mode & (SYSMODE_PREFIX_REPE | SYSMODE_PREFIX_REPNE)) {
+ /* dont care whether REPE or REPNE */
+ /* move them until CX is ZERO. */
+ count = M.x86.R_CX;
+ M.x86.R_CX = 0;
+ M.x86.mode &= ~(SYSMODE_PREFIX_REPE | SYSMODE_PREFIX_REPNE);
+ }
+ while (count--) {
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ store_data_long_abs(M.x86.R_ES, M.x86.R_DI, M.x86.R_EAX);
+ } else {
+ store_data_word_abs(M.x86.R_ES, M.x86.R_DI, M.x86.R_AX);
+ }
+ M.x86.R_DI += inc;
+ }
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0xac
+****************************************************************************/
+void x86emuOp_lods_byte(u8 X86EMU_UNUSED(op1))
+{
+ int inc;
+
+ START_OF_INSTR();
+ DECODE_PRINTF("LODS\tBYTE\n");
+ TRACE_AND_STEP();
+ if (ACCESS_FLAG(F_DF)) /* down */
+ inc = -1;
+ else
+ inc = 1;
+ if (M.x86.mode & (SYSMODE_PREFIX_REPE | SYSMODE_PREFIX_REPNE)) {
+ /* dont care whether REPE or REPNE */
+ /* move them until CX is ZERO. */
+ while (M.x86.R_CX != 0) {
+ M.x86.R_AL = fetch_data_byte(M.x86.R_SI);
+ M.x86.R_CX -= 1;
+ M.x86.R_SI += inc;
+ }
+ M.x86.mode &= ~(SYSMODE_PREFIX_REPE | SYSMODE_PREFIX_REPNE);
+ } else {
+ M.x86.R_AL = fetch_data_byte(M.x86.R_SI);
+ M.x86.R_SI += inc;
+ }
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0xad
+****************************************************************************/
+void x86emuOp_lods_word(u8 X86EMU_UNUSED(op1))
+{
+ int inc;
+ u32 count;
+
+ START_OF_INSTR();
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ DECODE_PRINTF("LODS\tDWORD\n");
+ if (ACCESS_FLAG(F_DF)) /* down */
+ inc = -4;
+ else
+ inc = 4;
+ } else {
+ DECODE_PRINTF("LODS\tWORD\n");
+ if (ACCESS_FLAG(F_DF)) /* down */
+ inc = -2;
+ else
+ inc = 2;
+ }
+ TRACE_AND_STEP();
+ count = 1;
+ if (M.x86.mode & (SYSMODE_PREFIX_REPE | SYSMODE_PREFIX_REPNE)) {
+ /* dont care whether REPE or REPNE */
+ /* move them until CX is ZERO. */
+ count = M.x86.R_CX;
+ M.x86.R_CX = 0;
+ M.x86.mode &= ~(SYSMODE_PREFIX_REPE | SYSMODE_PREFIX_REPNE);
+ }
+ while (count--) {
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ M.x86.R_EAX = fetch_data_long(M.x86.R_SI);
+ } else {
+ M.x86.R_AX = fetch_data_word(M.x86.R_SI);
+ }
+ M.x86.R_SI += inc;
+ }
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0xae
+****************************************************************************/
+void x86emuOp_scas_byte(u8 X86EMU_UNUSED(op1))
+{
+ s8 val2;
+ int inc;
+
+ START_OF_INSTR();
+ DECODE_PRINTF("SCAS\tBYTE\n");
+ TRACE_AND_STEP();
+ if (ACCESS_FLAG(F_DF)) /* down */
+ inc = -1;
+ else
+ inc = 1;
+ if (M.x86.mode & SYSMODE_PREFIX_REPE) {
+ /* REPE */
+ /* move them until CX is ZERO. */
+ while (M.x86.R_CX != 0) {
+ val2 = fetch_data_byte_abs(M.x86.R_ES, M.x86.R_DI);
+ cmp_byte(M.x86.R_AL, val2);
+ M.x86.R_CX -= 1;
+ M.x86.R_DI += inc;
+ if (ACCESS_FLAG(F_ZF) == 0)
+ break;
+ }
+ M.x86.mode &= ~SYSMODE_PREFIX_REPE;
+ } else if (M.x86.mode & SYSMODE_PREFIX_REPNE) {
+ /* REPNE */
+ /* move them until CX is ZERO. */
+ while (M.x86.R_CX != 0) {
+ val2 = fetch_data_byte_abs(M.x86.R_ES, M.x86.R_DI);
+ cmp_byte(M.x86.R_AL, val2);
+ M.x86.R_CX -= 1;
+ M.x86.R_DI += inc;
+ if (ACCESS_FLAG(F_ZF))
+ break; /* zero flag set means equal */
+ }
+ M.x86.mode &= ~SYSMODE_PREFIX_REPNE;
+ } else {
+ val2 = fetch_data_byte_abs(M.x86.R_ES, M.x86.R_DI);
+ cmp_byte(M.x86.R_AL, val2);
+ M.x86.R_DI += inc;
+ }
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0xaf
+****************************************************************************/
+void x86emuOp_scas_word(u8 X86EMU_UNUSED(op1))
+{
+ int inc;
+ u32 val;
+
+ START_OF_INSTR();
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ DECODE_PRINTF("SCAS\tDWORD\n");
+ if (ACCESS_FLAG(F_DF)) /* down */
+ inc = -4;
+ else
+ inc = 4;
+ } else {
+ DECODE_PRINTF("SCAS\tWORD\n");
+ if (ACCESS_FLAG(F_DF)) /* down */
+ inc = -2;
+ else
+ inc = 2;
+ }
+ TRACE_AND_STEP();
+ if (M.x86.mode & SYSMODE_PREFIX_REPE) {
+ /* REPE */
+ /* move them until CX is ZERO. */
+ while (M.x86.R_CX != 0) {
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ val = fetch_data_long_abs(M.x86.R_ES, M.x86.R_DI);
+ cmp_long(M.x86.R_EAX, val);
+ } else {
+ val = fetch_data_word_abs(M.x86.R_ES, M.x86.R_DI);
+ cmp_word(M.x86.R_AX, (u16)val);
+ }
+ M.x86.R_CX -= 1;
+ M.x86.R_DI += inc;
+ if (ACCESS_FLAG(F_ZF) == 0)
+ break;
+ }
+ M.x86.mode &= ~SYSMODE_PREFIX_REPE;
+ } else if (M.x86.mode & SYSMODE_PREFIX_REPNE) {
+ /* REPNE */
+ /* move them until CX is ZERO. */
+ while (M.x86.R_CX != 0) {
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ val = fetch_data_long_abs(M.x86.R_ES, M.x86.R_DI);
+ cmp_long(M.x86.R_EAX, val);
+ } else {
+ val = fetch_data_word_abs(M.x86.R_ES, M.x86.R_DI);
+ cmp_word(M.x86.R_AX, (u16)val);
+ }
+ M.x86.R_CX -= 1;
+ M.x86.R_DI += inc;
+ if (ACCESS_FLAG(F_ZF))
+ break; /* zero flag set means equal */
+ }
+ M.x86.mode &= ~SYSMODE_PREFIX_REPNE;
+ } else {
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ val = fetch_data_long_abs(M.x86.R_ES, M.x86.R_DI);
+ cmp_long(M.x86.R_EAX, val);
+ } else {
+ val = fetch_data_word_abs(M.x86.R_ES, M.x86.R_DI);
+ cmp_word(M.x86.R_AX, (u16)val);
+ }
+ M.x86.R_DI += inc;
+ }
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0xb0
+****************************************************************************/
+void x86emuOp_mov_byte_AL_IMM(u8 X86EMU_UNUSED(op1))
+{
+ u8 imm;
+
+ START_OF_INSTR();
+ DECODE_PRINTF("MOV\tAL,");
+ imm = fetch_byte_imm();
+ DECODE_PRINTF2("%x\n", imm);
+ TRACE_AND_STEP();
+ M.x86.R_AL = imm;
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0xb1
+****************************************************************************/
+void x86emuOp_mov_byte_CL_IMM(u8 X86EMU_UNUSED(op1))
+{
+ u8 imm;
+
+ START_OF_INSTR();
+ DECODE_PRINTF("MOV\tCL,");
+ imm = fetch_byte_imm();
+ DECODE_PRINTF2("%x\n", imm);
+ TRACE_AND_STEP();
+ M.x86.R_CL = imm;
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0xb2
+****************************************************************************/
+void x86emuOp_mov_byte_DL_IMM(u8 X86EMU_UNUSED(op1))
+{
+ u8 imm;
+
+ START_OF_INSTR();
+ DECODE_PRINTF("MOV\tDL,");
+ imm = fetch_byte_imm();
+ DECODE_PRINTF2("%x\n", imm);
+ TRACE_AND_STEP();
+ M.x86.R_DL = imm;
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0xb3
+****************************************************************************/
+void x86emuOp_mov_byte_BL_IMM(u8 X86EMU_UNUSED(op1))
+{
+ u8 imm;
+
+ START_OF_INSTR();
+ DECODE_PRINTF("MOV\tBL,");
+ imm = fetch_byte_imm();
+ DECODE_PRINTF2("%x\n", imm);
+ TRACE_AND_STEP();
+ M.x86.R_BL = imm;
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0xb4
+****************************************************************************/
+void x86emuOp_mov_byte_AH_IMM(u8 X86EMU_UNUSED(op1))
+{
+ u8 imm;
+
+ START_OF_INSTR();
+ DECODE_PRINTF("MOV\tAH,");
+ imm = fetch_byte_imm();
+ DECODE_PRINTF2("%x\n", imm);
+ TRACE_AND_STEP();
+ M.x86.R_AH = imm;
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0xb5
+****************************************************************************/
+void x86emuOp_mov_byte_CH_IMM(u8 X86EMU_UNUSED(op1))
+{
+ u8 imm;
+
+ START_OF_INSTR();
+ DECODE_PRINTF("MOV\tCH,");
+ imm = fetch_byte_imm();
+ DECODE_PRINTF2("%x\n", imm);
+ TRACE_AND_STEP();
+ M.x86.R_CH = imm;
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0xb6
+****************************************************************************/
+void x86emuOp_mov_byte_DH_IMM(u8 X86EMU_UNUSED(op1))
+{
+ u8 imm;
+
+ START_OF_INSTR();
+ DECODE_PRINTF("MOV\tDH,");
+ imm = fetch_byte_imm();
+ DECODE_PRINTF2("%x\n", imm);
+ TRACE_AND_STEP();
+ M.x86.R_DH = imm;
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0xb7
+****************************************************************************/
+void x86emuOp_mov_byte_BH_IMM(u8 X86EMU_UNUSED(op1))
+{
+ u8 imm;
+
+ START_OF_INSTR();
+ DECODE_PRINTF("MOV\tBH,");
+ imm = fetch_byte_imm();
+ DECODE_PRINTF2("%x\n", imm);
+ TRACE_AND_STEP();
+ M.x86.R_BH = imm;
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0xb8
+****************************************************************************/
+void x86emuOp_mov_word_AX_IMM(u8 X86EMU_UNUSED(op1))
+{
+ u32 srcval;
+
+ START_OF_INSTR();
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ DECODE_PRINTF("MOV\tEAX,");
+ srcval = fetch_long_imm();
+ } else {
+ DECODE_PRINTF("MOV\tAX,");
+ srcval = fetch_word_imm();
+ }
+ DECODE_PRINTF2("%x\n", srcval);
+ TRACE_AND_STEP();
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ M.x86.R_EAX = srcval;
+ } else {
+ M.x86.R_AX = (u16)srcval;
+ }
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0xb9
+****************************************************************************/
+void x86emuOp_mov_word_CX_IMM(u8 X86EMU_UNUSED(op1))
+{
+ u32 srcval;
+
+ START_OF_INSTR();
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ DECODE_PRINTF("MOV\tECX,");
+ srcval = fetch_long_imm();
+ } else {
+ DECODE_PRINTF("MOV\tCX,");
+ srcval = fetch_word_imm();
+ }
+ DECODE_PRINTF2("%x\n", srcval);
+ TRACE_AND_STEP();
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ M.x86.R_ECX = srcval;
+ } else {
+ M.x86.R_CX = (u16)srcval;
+ }
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0xba
+****************************************************************************/
+void x86emuOp_mov_word_DX_IMM(u8 X86EMU_UNUSED(op1))
+{
+ u32 srcval;
+
+ START_OF_INSTR();
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ DECODE_PRINTF("MOV\tEDX,");
+ srcval = fetch_long_imm();
+ } else {
+ DECODE_PRINTF("MOV\tDX,");
+ srcval = fetch_word_imm();
+ }
+ DECODE_PRINTF2("%x\n", srcval);
+ TRACE_AND_STEP();
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ M.x86.R_EDX = srcval;
+ } else {
+ M.x86.R_DX = (u16)srcval;
+ }
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0xbb
+****************************************************************************/
+void x86emuOp_mov_word_BX_IMM(u8 X86EMU_UNUSED(op1))
+{
+ u32 srcval;
+
+ START_OF_INSTR();
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ DECODE_PRINTF("MOV\tEBX,");
+ srcval = fetch_long_imm();
+ } else {
+ DECODE_PRINTF("MOV\tBX,");
+ srcval = fetch_word_imm();
+ }
+ DECODE_PRINTF2("%x\n", srcval);
+ TRACE_AND_STEP();
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ M.x86.R_EBX = srcval;
+ } else {
+ M.x86.R_BX = (u16)srcval;
+ }
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0xbc
+****************************************************************************/
+void x86emuOp_mov_word_SP_IMM(u8 X86EMU_UNUSED(op1))
+{
+ u32 srcval;
+
+ START_OF_INSTR();
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ DECODE_PRINTF("MOV\tESP,");
+ srcval = fetch_long_imm();
+ } else {
+ DECODE_PRINTF("MOV\tSP,");
+ srcval = fetch_word_imm();
+ }
+ DECODE_PRINTF2("%x\n", srcval);
+ TRACE_AND_STEP();
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ M.x86.R_ESP = srcval;
+ } else {
+ M.x86.R_SP = (u16)srcval;
+ }
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0xbd
+****************************************************************************/
+void x86emuOp_mov_word_BP_IMM(u8 X86EMU_UNUSED(op1))
+{
+ u32 srcval;
+
+ START_OF_INSTR();
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ DECODE_PRINTF("MOV\tEBP,");
+ srcval = fetch_long_imm();
+ } else {
+ DECODE_PRINTF("MOV\tBP,");
+ srcval = fetch_word_imm();
+ }
+ DECODE_PRINTF2("%x\n", srcval);
+ TRACE_AND_STEP();
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ M.x86.R_EBP = srcval;
+ } else {
+ M.x86.R_BP = (u16)srcval;
+ }
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0xbe
+****************************************************************************/
+void x86emuOp_mov_word_SI_IMM(u8 X86EMU_UNUSED(op1))
+{
+ u32 srcval;
+
+ START_OF_INSTR();
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ DECODE_PRINTF("MOV\tESI,");
+ srcval = fetch_long_imm();
+ } else {
+ DECODE_PRINTF("MOV\tSI,");
+ srcval = fetch_word_imm();
+ }
+ DECODE_PRINTF2("%x\n", srcval);
+ TRACE_AND_STEP();
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ M.x86.R_ESI = srcval;
+ } else {
+ M.x86.R_SI = (u16)srcval;
+ }
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0xbf
+****************************************************************************/
+void x86emuOp_mov_word_DI_IMM(u8 X86EMU_UNUSED(op1))
+{
+ u32 srcval;
+
+ START_OF_INSTR();
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ DECODE_PRINTF("MOV\tEDI,");
+ srcval = fetch_long_imm();
+ } else {
+ DECODE_PRINTF("MOV\tDI,");
+ srcval = fetch_word_imm();
+ }
+ DECODE_PRINTF2("%x\n", srcval);
+ TRACE_AND_STEP();
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ M.x86.R_EDI = srcval;
+ } else {
+ M.x86.R_DI = (u16)srcval;
+ }
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/* used by opcodes c0, d0, and d2. */
+static u8(*opcD0_byte_operation[])(u8 d, u8 s) =
+{
+ rol_byte,
+ ror_byte,
+ rcl_byte,
+ rcr_byte,
+ shl_byte,
+ shr_byte,
+ shl_byte, /* sal_byte === shl_byte by definition */
+ sar_byte,
+};
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0xc0
+****************************************************************************/
+void x86emuOp_opcC0_byte_RM_MEM(u8 X86EMU_UNUSED(op1))
+{
+ int mod, rl, rh;
+ u8 *destreg;
+ uint destoffset;
+ u8 destval;
+ u8 amt;
+
+ /*
+ * Yet another weirdo special case instruction format. Part of
+ * the opcode held below in "RH". Doubly nested case would
+ * result, except that the decoded instruction
+ */
+ START_OF_INSTR();
+ FETCH_DECODE_MODRM(mod, rh, rl);
+#ifdef DEBUG
+ if (DEBUG_DECODE()) {
+ /* XXX DECODE_PRINTF may be changed to something more
+ general, so that it is important to leave the strings
+ in the same format, even though the result is that the
+ above test is done twice. */
+
+ switch (rh) {
+ case 0:
+ DECODE_PRINTF("ROL\t");
+ break;
+ case 1:
+ DECODE_PRINTF("ROR\t");
+ break;
+ case 2:
+ DECODE_PRINTF("RCL\t");
+ break;
+ case 3:
+ DECODE_PRINTF("RCR\t");
+ break;
+ case 4:
+ DECODE_PRINTF("SHL\t");
+ break;
+ case 5:
+ DECODE_PRINTF("SHR\t");
+ break;
+ case 6:
+ DECODE_PRINTF("SAL\t");
+ break;
+ case 7:
+ DECODE_PRINTF("SAR\t");
+ break;
+ }
+ }
+#endif
+ /* know operation, decode the mod byte to find the addressing
+ mode. */
+ switch (mod) {
+ case 0:
+ DECODE_PRINTF("BYTE PTR ");
+ destoffset = decode_rm00_address(rl);
+ amt = fetch_byte_imm();
+ DECODE_PRINTF2(",%x\n", amt);
+ destval = fetch_data_byte(destoffset);
+ TRACE_AND_STEP();
+ destval = (*opcD0_byte_operation[rh]) (destval, amt);
+ store_data_byte(destoffset, destval);
+ break;
+ case 1:
+ DECODE_PRINTF("BYTE PTR ");
+ destoffset = decode_rm01_address(rl);
+ amt = fetch_byte_imm();
+ DECODE_PRINTF2(",%x\n", amt);
+ destval = fetch_data_byte(destoffset);
+ TRACE_AND_STEP();
+ destval = (*opcD0_byte_operation[rh]) (destval, amt);
+ store_data_byte(destoffset, destval);
+ break;
+ case 2:
+ DECODE_PRINTF("BYTE PTR ");
+ destoffset = decode_rm10_address(rl);
+ amt = fetch_byte_imm();
+ DECODE_PRINTF2(",%x\n", amt);
+ destval = fetch_data_byte(destoffset);
+ TRACE_AND_STEP();
+ destval = (*opcD0_byte_operation[rh]) (destval, amt);
+ store_data_byte(destoffset, destval);
+ break;
+ case 3: /* register to register */
+ destreg = DECODE_RM_BYTE_REGISTER(rl);
+ amt = fetch_byte_imm();
+ DECODE_PRINTF2(",%x\n", amt);
+ TRACE_AND_STEP();
+ destval = (*opcD0_byte_operation[rh]) (*destreg, amt);
+ *destreg = destval;
+ break;
+ }
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/* used by opcodes c1, d1, and d3. */
+static u16(*opcD1_word_operation[])(u16 s, u8 d) =
+{
+ rol_word,
+ ror_word,
+ rcl_word,
+ rcr_word,
+ shl_word,
+ shr_word,
+ shl_word, /* sal_byte === shl_byte by definition */
+ sar_word,
+};
+
+/* used by opcodes c1, d1, and d3. */
+static u32 (*opcD1_long_operation[])(u32 s, u8 d) =
+{
+ rol_long,
+ ror_long,
+ rcl_long,
+ rcr_long,
+ shl_long,
+ shr_long,
+ shl_long, /* sal_byte === shl_byte by definition */
+ sar_long,
+};
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0xc1
+****************************************************************************/
+void x86emuOp_opcC1_word_RM_MEM(u8 X86EMU_UNUSED(op1))
+{
+ int mod, rl, rh;
+ uint destoffset;
+ u8 amt;
+
+ /*
+ * Yet another weirdo special case instruction format. Part of
+ * the opcode held below in "RH". Doubly nested case would
+ * result, except that the decoded instruction
+ */
+ START_OF_INSTR();
+ FETCH_DECODE_MODRM(mod, rh, rl);
+#ifdef DEBUG
+ if (DEBUG_DECODE()) {
+ /* XXX DECODE_PRINTF may be changed to something more
+ general, so that it is important to leave the strings
+ in the same format, even though the result is that the
+ above test is done twice. */
+
+ switch (rh) {
+ case 0:
+ DECODE_PRINTF("ROL\t");
+ break;
+ case 1:
+ DECODE_PRINTF("ROR\t");
+ break;
+ case 2:
+ DECODE_PRINTF("RCL\t");
+ break;
+ case 3:
+ DECODE_PRINTF("RCR\t");
+ break;
+ case 4:
+ DECODE_PRINTF("SHL\t");
+ break;
+ case 5:
+ DECODE_PRINTF("SHR\t");
+ break;
+ case 6:
+ DECODE_PRINTF("SAL\t");
+ break;
+ case 7:
+ DECODE_PRINTF("SAR\t");
+ break;
+ }
+ }
+#endif
+ /* know operation, decode the mod byte to find the addressing
+ mode. */
+ switch (mod) {
+ case 0:
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 destval;
+
+ DECODE_PRINTF("DWORD PTR ");
+ destoffset = decode_rm00_address(rl);
+ amt = fetch_byte_imm();
+ DECODE_PRINTF2(",%x\n", amt);
+ destval = fetch_data_long(destoffset);
+ TRACE_AND_STEP();
+ destval = (*opcD1_long_operation[rh]) (destval, amt);
+ store_data_long(destoffset, destval);
+ } else {
+ u16 destval;
+
+ DECODE_PRINTF("WORD PTR ");
+ destoffset = decode_rm00_address(rl);
+ amt = fetch_byte_imm();
+ DECODE_PRINTF2(",%x\n", amt);
+ destval = fetch_data_word(destoffset);
+ TRACE_AND_STEP();
+ destval = (*opcD1_word_operation[rh]) (destval, amt);
+ store_data_word(destoffset, destval);
+ }
+ break;
+ case 1:
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 destval;
+
+ DECODE_PRINTF("DWORD PTR ");
+ destoffset = decode_rm01_address(rl);
+ amt = fetch_byte_imm();
+ DECODE_PRINTF2(",%x\n", amt);
+ destval = fetch_data_long(destoffset);
+ TRACE_AND_STEP();
+ destval = (*opcD1_long_operation[rh]) (destval, amt);
+ store_data_long(destoffset, destval);
+ } else {
+ u16 destval;
+
+ DECODE_PRINTF("WORD PTR ");
+ destoffset = decode_rm01_address(rl);
+ amt = fetch_byte_imm();
+ DECODE_PRINTF2(",%x\n", amt);
+ destval = fetch_data_word(destoffset);
+ TRACE_AND_STEP();
+ destval = (*opcD1_word_operation[rh]) (destval, amt);
+ store_data_word(destoffset, destval);
+ }
+ break;
+ case 2:
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 destval;
+
+ DECODE_PRINTF("DWORD PTR ");
+ destoffset = decode_rm10_address(rl);
+ amt = fetch_byte_imm();
+ DECODE_PRINTF2(",%x\n", amt);
+ destval = fetch_data_long(destoffset);
+ TRACE_AND_STEP();
+ destval = (*opcD1_long_operation[rh]) (destval, amt);
+ store_data_long(destoffset, destval);
+ } else {
+ u16 destval;
+
+ DECODE_PRINTF("WORD PTR ");
+ destoffset = decode_rm10_address(rl);
+ amt = fetch_byte_imm();
+ DECODE_PRINTF2(",%x\n", amt);
+ destval = fetch_data_word(destoffset);
+ TRACE_AND_STEP();
+ destval = (*opcD1_word_operation[rh]) (destval, amt);
+ store_data_word(destoffset, destval);
+ }
+ break;
+ case 3: /* register to register */
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 *destreg;
+
+ destreg = DECODE_RM_LONG_REGISTER(rl);
+ amt = fetch_byte_imm();
+ DECODE_PRINTF2(",%x\n", amt);
+ TRACE_AND_STEP();
+ *destreg = (*opcD1_long_operation[rh]) (*destreg, amt);
+ } else {
+ u16 *destreg;
+
+ destreg = DECODE_RM_WORD_REGISTER(rl);
+ amt = fetch_byte_imm();
+ DECODE_PRINTF2(",%x\n", amt);
+ TRACE_AND_STEP();
+ *destreg = (*opcD1_word_operation[rh]) (*destreg, amt);
+ }
+ break;
+ }
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0xc2
+****************************************************************************/
+void x86emuOp_ret_near_IMM(u8 X86EMU_UNUSED(op1))
+{
+ u16 imm;
+
+ START_OF_INSTR();
+ DECODE_PRINTF("RET\t");
+ imm = fetch_word_imm();
+ DECODE_PRINTF2("%x\n", imm);
+ RETURN_TRACE("RET",M.x86.saved_cs,M.x86.saved_ip);
+ TRACE_AND_STEP();
+ M.x86.R_IP = pop_word();
+ M.x86.R_SP += imm;
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0xc3
+****************************************************************************/
+void x86emuOp_ret_near(u8 X86EMU_UNUSED(op1))
+{
+ START_OF_INSTR();
+ DECODE_PRINTF("RET\n");
+ RETURN_TRACE("RET",M.x86.saved_cs,M.x86.saved_ip);
+ TRACE_AND_STEP();
+ M.x86.R_IP = pop_word();
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0xc4
+****************************************************************************/
+void x86emuOp_les_R_IMM(u8 X86EMU_UNUSED(op1))
+{
+ int mod, rh, rl;
+ u16 *dstreg;
+ uint srcoffset;
+
+ START_OF_INSTR();
+ DECODE_PRINTF("LES\t");
+ FETCH_DECODE_MODRM(mod, rh, rl);
+ switch (mod) {
+ case 0:
+ dstreg = DECODE_RM_WORD_REGISTER(rh);
+ DECODE_PRINTF(",");
+ srcoffset = decode_rm00_address(rl);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ *dstreg = fetch_data_word(srcoffset);
+ M.x86.R_ES = fetch_data_word(srcoffset + 2);
+ break;
+ case 1:
+ dstreg = DECODE_RM_WORD_REGISTER(rh);
+ DECODE_PRINTF(",");
+ srcoffset = decode_rm01_address(rl);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ *dstreg = fetch_data_word(srcoffset);
+ M.x86.R_ES = fetch_data_word(srcoffset + 2);
+ break;
+ case 2:
+ dstreg = DECODE_RM_WORD_REGISTER(rh);
+ DECODE_PRINTF(",");
+ srcoffset = decode_rm10_address(rl);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ *dstreg = fetch_data_word(srcoffset);
+ M.x86.R_ES = fetch_data_word(srcoffset + 2);
+ break;
+ case 3: /* register to register */
+ /* UNDEFINED! */
+ TRACE_AND_STEP();
+ }
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0xc5
+****************************************************************************/
+void x86emuOp_lds_R_IMM(u8 X86EMU_UNUSED(op1))
+{
+ int mod, rh, rl;
+ u16 *dstreg;
+ uint srcoffset;
+
+ START_OF_INSTR();
+ DECODE_PRINTF("LDS\t");
+ FETCH_DECODE_MODRM(mod, rh, rl);
+ switch (mod) {
+ case 0:
+ dstreg = DECODE_RM_WORD_REGISTER(rh);
+ DECODE_PRINTF(",");
+ srcoffset = decode_rm00_address(rl);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ *dstreg = fetch_data_word(srcoffset);
+ M.x86.R_DS = fetch_data_word(srcoffset + 2);
+ break;
+ case 1:
+ dstreg = DECODE_RM_WORD_REGISTER(rh);
+ DECODE_PRINTF(",");
+ srcoffset = decode_rm01_address(rl);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ *dstreg = fetch_data_word(srcoffset);
+ M.x86.R_DS = fetch_data_word(srcoffset + 2);
+ break;
+ case 2:
+ dstreg = DECODE_RM_WORD_REGISTER(rh);
+ DECODE_PRINTF(",");
+ srcoffset = decode_rm10_address(rl);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ *dstreg = fetch_data_word(srcoffset);
+ M.x86.R_DS = fetch_data_word(srcoffset + 2);
+ break;
+ case 3: /* register to register */
+ /* UNDEFINED! */
+ TRACE_AND_STEP();
+ }
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0xc6
+****************************************************************************/
+void x86emuOp_mov_byte_RM_IMM(u8 X86EMU_UNUSED(op1))
+{
+ int mod, rl, rh;
+ u8 *destreg;
+ uint destoffset;
+ u8 imm;
+
+ START_OF_INSTR();
+ DECODE_PRINTF("MOV\t");
+ FETCH_DECODE_MODRM(mod, rh, rl);
+ if (rh != 0) {
+ DECODE_PRINTF("ILLEGAL DECODE OF OPCODE c6\n");
+ HALT_SYS();
+ }
+ switch (mod) {
+ case 0:
+ DECODE_PRINTF("BYTE PTR ");
+ destoffset = decode_rm00_address(rl);
+ imm = fetch_byte_imm();
+ DECODE_PRINTF2(",%2x\n", imm);
+ TRACE_AND_STEP();
+ store_data_byte(destoffset, imm);
+ break;
+ case 1:
+ DECODE_PRINTF("BYTE PTR ");
+ destoffset = decode_rm01_address(rl);
+ imm = fetch_byte_imm();
+ DECODE_PRINTF2(",%2x\n", imm);
+ TRACE_AND_STEP();
+ store_data_byte(destoffset, imm);
+ break;
+ case 2:
+ DECODE_PRINTF("BYTE PTR ");
+ destoffset = decode_rm10_address(rl);
+ imm = fetch_byte_imm();
+ DECODE_PRINTF2(",%2x\n", imm);
+ TRACE_AND_STEP();
+ store_data_byte(destoffset, imm);
+ break;
+ case 3: /* register to register */
+ destreg = DECODE_RM_BYTE_REGISTER(rl);
+ imm = fetch_byte_imm();
+ DECODE_PRINTF2(",%2x\n", imm);
+ TRACE_AND_STEP();
+ *destreg = imm;
+ break;
+ }
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0xc7
+****************************************************************************/
+void x86emuOp_mov_word_RM_IMM(u8 X86EMU_UNUSED(op1))
+{
+ int mod, rl, rh;
+ uint destoffset;
+
+ START_OF_INSTR();
+ DECODE_PRINTF("MOV\t");
+ FETCH_DECODE_MODRM(mod, rh, rl);
+ if (rh != 0) {
+ DECODE_PRINTF("ILLEGAL DECODE OF OPCODE 8F\n");
+ HALT_SYS();
+ }
+ switch (mod) {
+ case 0:
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 imm;
+
+ DECODE_PRINTF("DWORD PTR ");
+ destoffset = decode_rm00_address(rl);
+ imm = fetch_long_imm();
+ DECODE_PRINTF2(",%x\n", imm);
+ TRACE_AND_STEP();
+ store_data_long(destoffset, imm);
+ } else {
+ u16 imm;
+
+ DECODE_PRINTF("WORD PTR ");
+ destoffset = decode_rm00_address(rl);
+ imm = fetch_word_imm();
+ DECODE_PRINTF2(",%x\n", imm);
+ TRACE_AND_STEP();
+ store_data_word(destoffset, imm);
+ }
+ break;
+ case 1:
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 imm;
+
+ DECODE_PRINTF("DWORD PTR ");
+ destoffset = decode_rm01_address(rl);
+ imm = fetch_long_imm();
+ DECODE_PRINTF2(",%x\n", imm);
+ TRACE_AND_STEP();
+ store_data_long(destoffset, imm);
+ } else {
+ u16 imm;
+
+ DECODE_PRINTF("WORD PTR ");
+ destoffset = decode_rm01_address(rl);
+ imm = fetch_word_imm();
+ DECODE_PRINTF2(",%x\n", imm);
+ TRACE_AND_STEP();
+ store_data_word(destoffset, imm);
+ }
+ break;
+ case 2:
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 imm;
+
+ DECODE_PRINTF("DWORD PTR ");
+ destoffset = decode_rm10_address(rl);
+ imm = fetch_long_imm();
+ DECODE_PRINTF2(",%x\n", imm);
+ TRACE_AND_STEP();
+ store_data_long(destoffset, imm);
+ } else {
+ u16 imm;
+
+ DECODE_PRINTF("WORD PTR ");
+ destoffset = decode_rm10_address(rl);
+ imm = fetch_word_imm();
+ DECODE_PRINTF2(",%x\n", imm);
+ TRACE_AND_STEP();
+ store_data_word(destoffset, imm);
+ }
+ break;
+ case 3: /* register to register */
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 *destreg;
+ u32 imm;
+
+ destreg = DECODE_RM_LONG_REGISTER(rl);
+ imm = fetch_long_imm();
+ DECODE_PRINTF2(",%x\n", imm);
+ TRACE_AND_STEP();
+ *destreg = imm;
+ } else {
+ u16 *destreg;
+ u16 imm;
+
+ destreg = DECODE_RM_WORD_REGISTER(rl);
+ imm = fetch_word_imm();
+ DECODE_PRINTF2(",%x\n", imm);
+ TRACE_AND_STEP();
+ *destreg = imm;
+ }
+ break;
+ }
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0xc8
+****************************************************************************/
+void x86emuOp_enter(u8 X86EMU_UNUSED(op1))
+{
+ u16 local,frame_pointer;
+ u8 nesting;
+ int i;
+
+ START_OF_INSTR();
+ local = fetch_word_imm();
+ nesting = fetch_byte_imm();
+ DECODE_PRINTF2("ENTER %x\n", local);
+ DECODE_PRINTF2(",%x\n", nesting);
+ TRACE_AND_STEP();
+ push_word(M.x86.R_BP);
+ frame_pointer = M.x86.R_SP;
+ if (nesting > 0) {
+ for (i = 1; i < nesting; i++) {
+ M.x86.R_BP -= 2;
+ push_word(fetch_data_word_abs(M.x86.R_SS, M.x86.R_BP));
+ }
+ push_word(frame_pointer);
+ }
+ M.x86.R_BP = frame_pointer;
+ M.x86.R_SP = (u16)(M.x86.R_SP - local);
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0xc9
+****************************************************************************/
+void x86emuOp_leave(u8 X86EMU_UNUSED(op1))
+{
+ START_OF_INSTR();
+ DECODE_PRINTF("LEAVE\n");
+ TRACE_AND_STEP();
+ M.x86.R_SP = M.x86.R_BP;
+ M.x86.R_BP = pop_word();
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0xca
+****************************************************************************/
+void x86emuOp_ret_far_IMM(u8 X86EMU_UNUSED(op1))
+{
+ u16 imm;
+
+ START_OF_INSTR();
+ DECODE_PRINTF("RETF\t");
+ imm = fetch_word_imm();
+ DECODE_PRINTF2("%x\n", imm);
+ RETURN_TRACE("RETF",M.x86.saved_cs,M.x86.saved_ip);
+ TRACE_AND_STEP();
+ M.x86.R_IP = pop_word();
+ M.x86.R_CS = pop_word();
+ M.x86.R_SP += imm;
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0xcb
+****************************************************************************/
+void x86emuOp_ret_far(u8 X86EMU_UNUSED(op1))
+{
+ START_OF_INSTR();
+ DECODE_PRINTF("RETF\n");
+ RETURN_TRACE("RETF",M.x86.saved_cs,M.x86.saved_ip);
+ TRACE_AND_STEP();
+ M.x86.R_IP = pop_word();
+ M.x86.R_CS = pop_word();
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0xcc
+****************************************************************************/
+void x86emuOp_int3(u8 X86EMU_UNUSED(op1))
+{
+ u16 tmp;
+
+ START_OF_INSTR();
+ DECODE_PRINTF("INT 3\n");
+ tmp = (u16) mem_access_word(3 * 4 + 2);
+ /* access the segment register */
+ TRACE_AND_STEP();
+ if (_X86EMU_intrTab[3]) {
+ (*_X86EMU_intrTab[3])(3);
+ } else {
+ push_word((u16)M.x86.R_FLG);
+ CLEAR_FLAG(F_IF);
+ CLEAR_FLAG(F_TF);
+ push_word(M.x86.R_CS);
+ M.x86.R_CS = mem_access_word(3 * 4 + 2);
+ push_word(M.x86.R_IP);
+ M.x86.R_IP = mem_access_word(3 * 4);
+ }
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0xcd
+****************************************************************************/
+void x86emuOp_int_IMM(u8 X86EMU_UNUSED(op1))
+{
+ u16 tmp;
+ u8 intnum;
+
+ START_OF_INSTR();
+ DECODE_PRINTF("INT\t");
+ intnum = fetch_byte_imm();
+ DECODE_PRINTF2("%x\n", intnum);
+ tmp = mem_access_word(intnum * 4 + 2);
+ TRACE_AND_STEP();
+ if (_X86EMU_intrTab[intnum]) {
+ (*_X86EMU_intrTab[intnum])(intnum);
+ } else {
+ push_word((u16)M.x86.R_FLG);
+ CLEAR_FLAG(F_IF);
+ CLEAR_FLAG(F_TF);
+ push_word(M.x86.R_CS);
+ M.x86.R_CS = mem_access_word(intnum * 4 + 2);
+ push_word(M.x86.R_IP);
+ M.x86.R_IP = mem_access_word(intnum * 4);
+ }
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0xce
+****************************************************************************/
+void x86emuOp_into(u8 X86EMU_UNUSED(op1))
+{
+ u16 tmp;
+
+ START_OF_INSTR();
+ DECODE_PRINTF("INTO\n");
+ TRACE_AND_STEP();
+ if (ACCESS_FLAG(F_OF)) {
+ tmp = mem_access_word(4 * 4 + 2);
+ if (_X86EMU_intrTab[4]) {
+ (*_X86EMU_intrTab[4])(4);
+ } else {
+ push_word((u16)M.x86.R_FLG);
+ CLEAR_FLAG(F_IF);
+ CLEAR_FLAG(F_TF);
+ push_word(M.x86.R_CS);
+ M.x86.R_CS = mem_access_word(4 * 4 + 2);
+ push_word(M.x86.R_IP);
+ M.x86.R_IP = mem_access_word(4 * 4);
+ }
+ }
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0xcf
+****************************************************************************/
+void x86emuOp_iret(u8 X86EMU_UNUSED(op1))
+{
+ START_OF_INSTR();
+ DECODE_PRINTF("IRET\n");
+
+ TRACE_AND_STEP();
+
+ M.x86.R_IP = pop_word();
+ M.x86.R_CS = pop_word();
+ M.x86.R_FLG = pop_word();
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0xd0
+****************************************************************************/
+void x86emuOp_opcD0_byte_RM_1(u8 X86EMU_UNUSED(op1))
+{
+ int mod, rl, rh;
+ u8 *destreg;
+ uint destoffset;
+ u8 destval;
+
+ /*
+ * Yet another weirdo special case instruction format. Part of
+ * the opcode held below in "RH". Doubly nested case would
+ * result, except that the decoded instruction
+ */
+ START_OF_INSTR();
+ FETCH_DECODE_MODRM(mod, rh, rl);
+#ifdef DEBUG
+ if (DEBUG_DECODE()) {
+ /* XXX DECODE_PRINTF may be changed to something more
+ general, so that it is important to leave the strings
+ in the same format, even though the result is that the
+ above test is done twice. */
+ switch (rh) {
+ case 0:
+ DECODE_PRINTF("ROL\t");
+ break;
+ case 1:
+ DECODE_PRINTF("ROR\t");
+ break;
+ case 2:
+ DECODE_PRINTF("RCL\t");
+ break;
+ case 3:
+ DECODE_PRINTF("RCR\t");
+ break;
+ case 4:
+ DECODE_PRINTF("SHL\t");
+ break;
+ case 5:
+ DECODE_PRINTF("SHR\t");
+ break;
+ case 6:
+ DECODE_PRINTF("SAL\t");
+ break;
+ case 7:
+ DECODE_PRINTF("SAR\t");
+ break;
+ }
+ }
+#endif
+ /* know operation, decode the mod byte to find the addressing
+ mode. */
+ switch (mod) {
+ case 0:
+ DECODE_PRINTF("BYTE PTR ");
+ destoffset = decode_rm00_address(rl);
+ DECODE_PRINTF(",1\n");
+ destval = fetch_data_byte(destoffset);
+ TRACE_AND_STEP();
+ destval = (*opcD0_byte_operation[rh]) (destval, 1);
+ store_data_byte(destoffset, destval);
+ break;
+ case 1:
+ DECODE_PRINTF("BYTE PTR ");
+ destoffset = decode_rm01_address(rl);
+ DECODE_PRINTF(",1\n");
+ destval = fetch_data_byte(destoffset);
+ TRACE_AND_STEP();
+ destval = (*opcD0_byte_operation[rh]) (destval, 1);
+ store_data_byte(destoffset, destval);
+ break;
+ case 2:
+ DECODE_PRINTF("BYTE PTR ");
+ destoffset = decode_rm10_address(rl);
+ DECODE_PRINTF(",1\n");
+ destval = fetch_data_byte(destoffset);
+ TRACE_AND_STEP();
+ destval = (*opcD0_byte_operation[rh]) (destval, 1);
+ store_data_byte(destoffset, destval);
+ break;
+ case 3: /* register to register */
+ destreg = DECODE_RM_BYTE_REGISTER(rl);
+ DECODE_PRINTF(",1\n");
+ TRACE_AND_STEP();
+ destval = (*opcD0_byte_operation[rh]) (*destreg, 1);
+ *destreg = destval;
+ break;
+ }
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0xd1
+****************************************************************************/
+void x86emuOp_opcD1_word_RM_1(u8 X86EMU_UNUSED(op1))
+{
+ int mod, rl, rh;
+ uint destoffset;
+
+ /*
+ * Yet another weirdo special case instruction format. Part of
+ * the opcode held below in "RH". Doubly nested case would
+ * result, except that the decoded instruction
+ */
+ START_OF_INSTR();
+ FETCH_DECODE_MODRM(mod, rh, rl);
+#ifdef DEBUG
+ if (DEBUG_DECODE()) {
+ /* XXX DECODE_PRINTF may be changed to something more
+ general, so that it is important to leave the strings
+ in the same format, even though the result is that the
+ above test is done twice. */
+ switch (rh) {
+ case 0:
+ DECODE_PRINTF("ROL\t");
+ break;
+ case 1:
+ DECODE_PRINTF("ROR\t");
+ break;
+ case 2:
+ DECODE_PRINTF("RCL\t");
+ break;
+ case 3:
+ DECODE_PRINTF("RCR\t");
+ break;
+ case 4:
+ DECODE_PRINTF("SHL\t");
+ break;
+ case 5:
+ DECODE_PRINTF("SHR\t");
+ break;
+ case 6:
+ DECODE_PRINTF("SAL\t");
+ break;
+ case 7:
+ DECODE_PRINTF("SAR\t");
+ break;
+ }
+ }
+#endif
+ /* know operation, decode the mod byte to find the addressing
+ mode. */
+ switch (mod) {
+ case 0:
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 destval;
+
+ DECODE_PRINTF("DWORD PTR ");
+ destoffset = decode_rm00_address(rl);
+ DECODE_PRINTF(",1\n");
+ destval = fetch_data_long(destoffset);
+ TRACE_AND_STEP();
+ destval = (*opcD1_long_operation[rh]) (destval, 1);
+ store_data_long(destoffset, destval);
+ } else {
+ u16 destval;
+
+ DECODE_PRINTF("WORD PTR ");
+ destoffset = decode_rm00_address(rl);
+ DECODE_PRINTF(",1\n");
+ destval = fetch_data_word(destoffset);
+ TRACE_AND_STEP();
+ destval = (*opcD1_word_operation[rh]) (destval, 1);
+ store_data_word(destoffset, destval);
+ }
+ break;
+ case 1:
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 destval;
+
+ DECODE_PRINTF("DWORD PTR ");
+ destoffset = decode_rm01_address(rl);
+ DECODE_PRINTF(",1\n");
+ destval = fetch_data_long(destoffset);
+ TRACE_AND_STEP();
+ destval = (*opcD1_long_operation[rh]) (destval, 1);
+ store_data_long(destoffset, destval);
+ } else {
+ u16 destval;
+
+ DECODE_PRINTF("WORD PTR ");
+ destoffset = decode_rm01_address(rl);
+ DECODE_PRINTF(",1\n");
+ destval = fetch_data_word(destoffset);
+ TRACE_AND_STEP();
+ destval = (*opcD1_word_operation[rh]) (destval, 1);
+ store_data_word(destoffset, destval);
+ }
+ break;
+ case 2:
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 destval;
+
+ DECODE_PRINTF("DWORD PTR ");
+ destoffset = decode_rm10_address(rl);
+ DECODE_PRINTF(",1\n");
+ destval = fetch_data_long(destoffset);
+ TRACE_AND_STEP();
+ destval = (*opcD1_long_operation[rh]) (destval, 1);
+ store_data_long(destoffset, destval);
+ } else {
+ u16 destval;
+
+ DECODE_PRINTF("BYTE PTR ");
+ destoffset = decode_rm10_address(rl);
+ DECODE_PRINTF(",1\n");
+ destval = fetch_data_word(destoffset);
+ TRACE_AND_STEP();
+ destval = (*opcD1_word_operation[rh]) (destval, 1);
+ store_data_word(destoffset, destval);
+ }
+ break;
+ case 3: /* register to register */
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 destval;
+ u32 *destreg;
+
+ destreg = DECODE_RM_LONG_REGISTER(rl);
+ DECODE_PRINTF(",1\n");
+ TRACE_AND_STEP();
+ destval = (*opcD1_long_operation[rh]) (*destreg, 1);
+ *destreg = destval;
+ } else {
+ u16 destval;
+ u16 *destreg;
+
+ destreg = DECODE_RM_WORD_REGISTER(rl);
+ DECODE_PRINTF(",1\n");
+ TRACE_AND_STEP();
+ destval = (*opcD1_word_operation[rh]) (*destreg, 1);
+ *destreg = destval;
+ }
+ break;
+ }
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0xd2
+****************************************************************************/
+void x86emuOp_opcD2_byte_RM_CL(u8 X86EMU_UNUSED(op1))
+{
+ int mod, rl, rh;
+ u8 *destreg;
+ uint destoffset;
+ u8 destval;
+ u8 amt;
+
+ /*
+ * Yet another weirdo special case instruction format. Part of
+ * the opcode held below in "RH". Doubly nested case would
+ * result, except that the decoded instruction
+ */
+ START_OF_INSTR();
+ FETCH_DECODE_MODRM(mod, rh, rl);
+#ifdef DEBUG
+ if (DEBUG_DECODE()) {
+ /* XXX DECODE_PRINTF may be changed to something more
+ general, so that it is important to leave the strings
+ in the same format, even though the result is that the
+ above test is done twice. */
+ switch (rh) {
+ case 0:
+ DECODE_PRINTF("ROL\t");
+ break;
+ case 1:
+ DECODE_PRINTF("ROR\t");
+ break;
+ case 2:
+ DECODE_PRINTF("RCL\t");
+ break;
+ case 3:
+ DECODE_PRINTF("RCR\t");
+ break;
+ case 4:
+ DECODE_PRINTF("SHL\t");
+ break;
+ case 5:
+ DECODE_PRINTF("SHR\t");
+ break;
+ case 6:
+ DECODE_PRINTF("SAL\t");
+ break;
+ case 7:
+ DECODE_PRINTF("SAR\t");
+ break;
+ }
+ }
+#endif
+ /* know operation, decode the mod byte to find the addressing
+ mode. */
+ amt = M.x86.R_CL;
+ switch (mod) {
+ case 0:
+ DECODE_PRINTF("BYTE PTR ");
+ destoffset = decode_rm00_address(rl);
+ DECODE_PRINTF(",CL\n");
+ destval = fetch_data_byte(destoffset);
+ TRACE_AND_STEP();
+ destval = (*opcD0_byte_operation[rh]) (destval, amt);
+ store_data_byte(destoffset, destval);
+ break;
+ case 1:
+ DECODE_PRINTF("BYTE PTR ");
+ destoffset = decode_rm01_address(rl);
+ DECODE_PRINTF(",CL\n");
+ destval = fetch_data_byte(destoffset);
+ TRACE_AND_STEP();
+ destval = (*opcD0_byte_operation[rh]) (destval, amt);
+ store_data_byte(destoffset, destval);
+ break;
+ case 2:
+ DECODE_PRINTF("BYTE PTR ");
+ destoffset = decode_rm10_address(rl);
+ DECODE_PRINTF(",CL\n");
+ destval = fetch_data_byte(destoffset);
+ TRACE_AND_STEP();
+ destval = (*opcD0_byte_operation[rh]) (destval, amt);
+ store_data_byte(destoffset, destval);
+ break;
+ case 3: /* register to register */
+ destreg = DECODE_RM_BYTE_REGISTER(rl);
+ DECODE_PRINTF(",CL\n");
+ TRACE_AND_STEP();
+ destval = (*opcD0_byte_operation[rh]) (*destreg, amt);
+ *destreg = destval;
+ break;
+ }
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0xd3
+****************************************************************************/
+void x86emuOp_opcD3_word_RM_CL(u8 X86EMU_UNUSED(op1))
+{
+ int mod, rl, rh;
+ uint destoffset;
+ u8 amt;
+
+ /*
+ * Yet another weirdo special case instruction format. Part of
+ * the opcode held below in "RH". Doubly nested case would
+ * result, except that the decoded instruction
+ */
+ START_OF_INSTR();
+ FETCH_DECODE_MODRM(mod, rh, rl);
+#ifdef DEBUG
+ if (DEBUG_DECODE()) {
+ /* XXX DECODE_PRINTF may be changed to something more
+ general, so that it is important to leave the strings
+ in the same format, even though the result is that the
+ above test is done twice. */
+ switch (rh) {
+ case 0:
+ DECODE_PRINTF("ROL\t");
+ break;
+ case 1:
+ DECODE_PRINTF("ROR\t");
+ break;
+ case 2:
+ DECODE_PRINTF("RCL\t");
+ break;
+ case 3:
+ DECODE_PRINTF("RCR\t");
+ break;
+ case 4:
+ DECODE_PRINTF("SHL\t");
+ break;
+ case 5:
+ DECODE_PRINTF("SHR\t");
+ break;
+ case 6:
+ DECODE_PRINTF("SAL\t");
+ break;
+ case 7:
+ DECODE_PRINTF("SAR\t");
+ break;
+ }
+ }
+#endif
+ /* know operation, decode the mod byte to find the addressing
+ mode. */
+ amt = M.x86.R_CL;
+ switch (mod) {
+ case 0:
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 destval;
+
+ DECODE_PRINTF("DWORD PTR ");
+ destoffset = decode_rm00_address(rl);
+ DECODE_PRINTF(",CL\n");
+ destval = fetch_data_long(destoffset);
+ TRACE_AND_STEP();
+ destval = (*opcD1_long_operation[rh]) (destval, amt);
+ store_data_long(destoffset, destval);
+ } else {
+ u16 destval;
+
+ DECODE_PRINTF("WORD PTR ");
+ destoffset = decode_rm00_address(rl);
+ DECODE_PRINTF(",CL\n");
+ destval = fetch_data_word(destoffset);
+ TRACE_AND_STEP();
+ destval = (*opcD1_word_operation[rh]) (destval, amt);
+ store_data_word(destoffset, destval);
+ }
+ break;
+ case 1:
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 destval;
+
+ DECODE_PRINTF("DWORD PTR ");
+ destoffset = decode_rm01_address(rl);
+ DECODE_PRINTF(",CL\n");
+ destval = fetch_data_long(destoffset);
+ TRACE_AND_STEP();
+ destval = (*opcD1_long_operation[rh]) (destval, amt);
+ store_data_long(destoffset, destval);
+ } else {
+ u16 destval;
+
+ DECODE_PRINTF("WORD PTR ");
+ destoffset = decode_rm01_address(rl);
+ DECODE_PRINTF(",CL\n");
+ destval = fetch_data_word(destoffset);
+ TRACE_AND_STEP();
+ destval = (*opcD1_word_operation[rh]) (destval, amt);
+ store_data_word(destoffset, destval);
+ }
+ break;
+ case 2:
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 destval;
+
+ DECODE_PRINTF("DWORD PTR ");
+ destoffset = decode_rm10_address(rl);
+ DECODE_PRINTF(",CL\n");
+ destval = fetch_data_long(destoffset);
+ TRACE_AND_STEP();
+ destval = (*opcD1_long_operation[rh]) (destval, amt);
+ store_data_long(destoffset, destval);
+ } else {
+ u16 destval;
+
+ DECODE_PRINTF("WORD PTR ");
+ destoffset = decode_rm10_address(rl);
+ DECODE_PRINTF(",CL\n");
+ destval = fetch_data_word(destoffset);
+ TRACE_AND_STEP();
+ destval = (*opcD1_word_operation[rh]) (destval, amt);
+ store_data_word(destoffset, destval);
+ }
+ break;
+ case 3: /* register to register */
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 *destreg;
+
+ destreg = DECODE_RM_LONG_REGISTER(rl);
+ DECODE_PRINTF(",CL\n");
+ TRACE_AND_STEP();
+ *destreg = (*opcD1_long_operation[rh]) (*destreg, amt);
+ } else {
+ u16 *destreg;
+
+ destreg = DECODE_RM_WORD_REGISTER(rl);
+ DECODE_PRINTF(",CL\n");
+ TRACE_AND_STEP();
+ *destreg = (*opcD1_word_operation[rh]) (*destreg, amt);
+ }
+ break;
+ }
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0xd4
+****************************************************************************/
+void x86emuOp_aam(u8 X86EMU_UNUSED(op1))
+{
+ u8 a;
+
+ START_OF_INSTR();
+ DECODE_PRINTF("AAM\n");
+ a = fetch_byte_imm(); /* this is a stupid encoding. */
+ if (a != 10) {
+ DECODE_PRINTF("ERROR DECODING AAM\n");
+ TRACE_REGS();
+ HALT_SYS();
+ }
+ TRACE_AND_STEP();
+ /* note the type change here --- returning AL and AH in AX. */
+ M.x86.R_AX = aam_word(M.x86.R_AL);
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0xd5
+****************************************************************************/
+void x86emuOp_aad(u8 X86EMU_UNUSED(op1))
+{
+ u8 a;
+
+ START_OF_INSTR();
+ DECODE_PRINTF("AAD\n");
+ a = fetch_byte_imm();
+ TRACE_AND_STEP();
+ M.x86.R_AX = aad_word(M.x86.R_AX);
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/* opcode 0xd6 ILLEGAL OPCODE */
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0xd7
+****************************************************************************/
+void x86emuOp_xlat(u8 X86EMU_UNUSED(op1))
+{
+ u16 addr;
+
+ START_OF_INSTR();
+ DECODE_PRINTF("XLAT\n");
+ TRACE_AND_STEP();
+ addr = (u16)(M.x86.R_BX + (u8)M.x86.R_AL);
+ M.x86.R_AL = fetch_data_byte(addr);
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/* instuctions D8 .. DF are in i87_ops.c */
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0xe0
+****************************************************************************/
+void x86emuOp_loopne(u8 X86EMU_UNUSED(op1))
+{
+ s16 ip;
+
+ START_OF_INSTR();
+ DECODE_PRINTF("LOOPNE\t");
+ ip = (s8) fetch_byte_imm();
+ ip += (s16) M.x86.R_IP;
+ DECODE_PRINTF2("%04x\n", ip);
+ TRACE_AND_STEP();
+ M.x86.R_CX -= 1;
+ if (M.x86.R_CX != 0 && !ACCESS_FLAG(F_ZF)) /* CX != 0 and !ZF */
+ M.x86.R_IP = ip;
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0xe1
+****************************************************************************/
+void x86emuOp_loope(u8 X86EMU_UNUSED(op1))
+{
+ s16 ip;
+
+ START_OF_INSTR();
+ DECODE_PRINTF("LOOPE\t");
+ ip = (s8) fetch_byte_imm();
+ ip += (s16) M.x86.R_IP;
+ DECODE_PRINTF2("%04x\n", ip);
+ TRACE_AND_STEP();
+ M.x86.R_CX -= 1;
+ if (M.x86.R_CX != 0 && ACCESS_FLAG(F_ZF)) /* CX != 0 and ZF */
+ M.x86.R_IP = ip;
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0xe2
+****************************************************************************/
+void x86emuOp_loop(u8 X86EMU_UNUSED(op1))
+{
+ s16 ip;
+
+ START_OF_INSTR();
+ DECODE_PRINTF("LOOP\t");
+ ip = (s8) fetch_byte_imm();
+ ip += (s16) M.x86.R_IP;
+ DECODE_PRINTF2("%04x\n", ip);
+ TRACE_AND_STEP();
+ M.x86.R_CX -= 1;
+ if (M.x86.R_CX != 0)
+ M.x86.R_IP = ip;
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0xe3
+****************************************************************************/
+void x86emuOp_jcxz(u8 X86EMU_UNUSED(op1))
+{
+ u16 target;
+ s8 offset;
+
+ /* jump to byte offset if overflow flag is set */
+ START_OF_INSTR();
+ DECODE_PRINTF("JCXZ\t");
+ offset = (s8)fetch_byte_imm();
+ target = (u16)(M.x86.R_IP + offset);
+ DECODE_PRINTF2("%x\n", target);
+ TRACE_AND_STEP();
+ if (M.x86.R_CX == 0)
+ M.x86.R_IP = target;
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0xe4
+****************************************************************************/
+void x86emuOp_in_byte_AL_IMM(u8 X86EMU_UNUSED(op1))
+{
+ u8 port;
+
+ START_OF_INSTR();
+ DECODE_PRINTF("IN\t");
+ port = (u8) fetch_byte_imm();
+ DECODE_PRINTF2("%x,AL\n", port);
+ TRACE_AND_STEP();
+ M.x86.R_AL = (*sys_inb)(port);
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0xe5
+****************************************************************************/
+void x86emuOp_in_word_AX_IMM(u8 X86EMU_UNUSED(op1))
+{
+ u8 port;
+
+ START_OF_INSTR();
+ DECODE_PRINTF("IN\t");
+ port = (u8) fetch_byte_imm();
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ DECODE_PRINTF2("EAX,%x\n", port);
+ } else {
+ DECODE_PRINTF2("AX,%x\n", port);
+ }
+ TRACE_AND_STEP();
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ M.x86.R_EAX = (*sys_inl)(port);
+ } else {
+ M.x86.R_AX = (*sys_inw)(port);
+ }
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0xe6
+****************************************************************************/
+void x86emuOp_out_byte_IMM_AL(u8 X86EMU_UNUSED(op1))
+{
+ u8 port;
+
+ START_OF_INSTR();
+ DECODE_PRINTF("OUT\t");
+ port = (u8) fetch_byte_imm();
+ DECODE_PRINTF2("%x,AL\n", port);
+ TRACE_AND_STEP();
+ (*sys_outb)(port, M.x86.R_AL);
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0xe7
+****************************************************************************/
+void x86emuOp_out_word_IMM_AX(u8 X86EMU_UNUSED(op1))
+{
+ u8 port;
+
+ START_OF_INSTR();
+ DECODE_PRINTF("OUT\t");
+ port = (u8) fetch_byte_imm();
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ DECODE_PRINTF2("%x,EAX\n", port);
+ } else {
+ DECODE_PRINTF2("%x,AX\n", port);
+ }
+ TRACE_AND_STEP();
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ (*sys_outl)(port, M.x86.R_EAX);
+ } else {
+ (*sys_outw)(port, M.x86.R_AX);
+ }
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0xe8
+****************************************************************************/
+void x86emuOp_call_near_IMM(u8 X86EMU_UNUSED(op1))
+{
+ s16 ip;
+
+ START_OF_INSTR();
+ DECODE_PRINTF("CALL\t");
+ ip = (s16) fetch_word_imm();
+ ip += (s16) M.x86.R_IP; /* CHECK SIGN */
+ DECODE_PRINTF2("%04x\n", ip);
+ CALL_TRACE(M.x86.saved_cs, M.x86.saved_ip, M.x86.R_CS, ip, "");
+ TRACE_AND_STEP();
+ push_word(M.x86.R_IP);
+ M.x86.R_IP = ip;
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0xe9
+****************************************************************************/
+void x86emuOp_jump_near_IMM(u8 X86EMU_UNUSED(op1))
+{
+ int ip;
+
+ START_OF_INSTR();
+ DECODE_PRINTF("JMP\t");
+ ip = (s16)fetch_word_imm();
+ ip += (s16)M.x86.R_IP;
+ DECODE_PRINTF2("%04x\n", ip);
+ TRACE_AND_STEP();
+ M.x86.R_IP = (u16)ip;
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0xea
+****************************************************************************/
+void x86emuOp_jump_far_IMM(u8 X86EMU_UNUSED(op1))
+{
+ u16 cs, ip;
+
+ START_OF_INSTR();
+ DECODE_PRINTF("JMP\tFAR ");
+ ip = fetch_word_imm();
+ cs = fetch_word_imm();
+ DECODE_PRINTF2("%04x:", cs);
+ DECODE_PRINTF2("%04x\n", ip);
+ TRACE_AND_STEP();
+ M.x86.R_IP = ip;
+ M.x86.R_CS = cs;
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0xeb
+****************************************************************************/
+void x86emuOp_jump_byte_IMM(u8 X86EMU_UNUSED(op1))
+{
+ u16 target;
+ s8 offset;
+
+ START_OF_INSTR();
+ DECODE_PRINTF("JMP\t");
+ offset = (s8)fetch_byte_imm();
+ target = (u16)(M.x86.R_IP + offset);
+ DECODE_PRINTF2("%x\n", target);
+ TRACE_AND_STEP();
+ M.x86.R_IP = target;
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0xec
+****************************************************************************/
+void x86emuOp_in_byte_AL_DX(u8 X86EMU_UNUSED(op1))
+{
+ START_OF_INSTR();
+ DECODE_PRINTF("IN\tAL,DX\n");
+ TRACE_AND_STEP();
+ M.x86.R_AL = (*sys_inb)(M.x86.R_DX);
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0xed
+****************************************************************************/
+void x86emuOp_in_word_AX_DX(u8 X86EMU_UNUSED(op1))
+{
+ START_OF_INSTR();
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ DECODE_PRINTF("IN\tEAX,DX\n");
+ } else {
+ DECODE_PRINTF("IN\tAX,DX\n");
+ }
+ TRACE_AND_STEP();
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ M.x86.R_EAX = (*sys_inl)(M.x86.R_DX);
+ } else {
+ M.x86.R_AX = (*sys_inw)(M.x86.R_DX);
+ }
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0xee
+****************************************************************************/
+void x86emuOp_out_byte_DX_AL(u8 X86EMU_UNUSED(op1))
+{
+ START_OF_INSTR();
+ DECODE_PRINTF("OUT\tDX,AL\n");
+ TRACE_AND_STEP();
+ (*sys_outb)(M.x86.R_DX, M.x86.R_AL);
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0xef
+****************************************************************************/
+void x86emuOp_out_word_DX_AX(u8 X86EMU_UNUSED(op1))
+{
+ START_OF_INSTR();
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ DECODE_PRINTF("OUT\tDX,EAX\n");
+ } else {
+ DECODE_PRINTF("OUT\tDX,AX\n");
+ }
+ TRACE_AND_STEP();
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ (*sys_outl)(M.x86.R_DX, M.x86.R_EAX);
+ } else {
+ (*sys_outw)(M.x86.R_DX, M.x86.R_AX);
+ }
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0xf0
+****************************************************************************/
+void x86emuOp_lock(u8 X86EMU_UNUSED(op1))
+{
+ START_OF_INSTR();
+ DECODE_PRINTF("LOCK:\n");
+ TRACE_AND_STEP();
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/*opcode 0xf1 ILLEGAL OPERATION */
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0xf2
+****************************************************************************/
+void x86emuOp_repne(u8 X86EMU_UNUSED(op1))
+{
+ START_OF_INSTR();
+ DECODE_PRINTF("REPNE\n");
+ TRACE_AND_STEP();
+ M.x86.mode |= SYSMODE_PREFIX_REPNE;
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0xf3
+****************************************************************************/
+void x86emuOp_repe(u8 X86EMU_UNUSED(op1))
+{
+ START_OF_INSTR();
+ DECODE_PRINTF("REPE\n");
+ TRACE_AND_STEP();
+ M.x86.mode |= SYSMODE_PREFIX_REPE;
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0xf4
+****************************************************************************/
+void x86emuOp_halt(u8 X86EMU_UNUSED(op1))
+{
+ START_OF_INSTR();
+ DECODE_PRINTF("HALT\n");
+ TRACE_AND_STEP();
+ HALT_SYS();
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0xf5
+****************************************************************************/
+void x86emuOp_cmc(u8 X86EMU_UNUSED(op1))
+{
+ /* complement the carry flag. */
+ START_OF_INSTR();
+ DECODE_PRINTF("CMC\n");
+ TRACE_AND_STEP();
+ TOGGLE_FLAG(F_CF);
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0xf6
+****************************************************************************/
+void x86emuOp_opcF6_byte_RM(u8 X86EMU_UNUSED(op1))
+{
+ int mod, rl, rh;
+ u8 *destreg;
+ uint destoffset;
+ u8 destval, srcval;
+
+ /* long, drawn out code follows. Double switch for a total
+ of 32 cases. */
+ START_OF_INSTR();
+ FETCH_DECODE_MODRM(mod, rh, rl);
+ switch (mod) {
+ case 0: /* mod=00 */
+ switch (rh) {
+ case 0: /* test byte imm */
+ DECODE_PRINTF("TEST\tBYTE PTR ");
+ destoffset = decode_rm00_address(rl);
+ DECODE_PRINTF(",");
+ srcval = fetch_byte_imm();
+ DECODE_PRINTF2("%02x\n", srcval);
+ destval = fetch_data_byte(destoffset);
+ TRACE_AND_STEP();
+ test_byte(destval, srcval);
+ break;
+ case 1:
+ DECODE_PRINTF("ILLEGAL OP MOD=00 RH=01 OP=F6\n");
+ HALT_SYS();
+ break;
+ case 2:
+ DECODE_PRINTF("NOT\tBYTE PTR ");
+ destoffset = decode_rm00_address(rl);
+ DECODE_PRINTF("\n");
+ destval = fetch_data_byte(destoffset);
+ TRACE_AND_STEP();
+ destval = not_byte(destval);
+ store_data_byte(destoffset, destval);
+ break;
+ case 3:
+ DECODE_PRINTF("NEG\tBYTE PTR ");
+ destoffset = decode_rm00_address(rl);
+ DECODE_PRINTF("\n");
+ destval = fetch_data_byte(destoffset);
+ TRACE_AND_STEP();
+ destval = neg_byte(destval);
+ store_data_byte(destoffset, destval);
+ break;
+ case 4:
+ DECODE_PRINTF("MUL\tBYTE PTR ");
+ destoffset = decode_rm00_address(rl);
+ DECODE_PRINTF("\n");
+ destval = fetch_data_byte(destoffset);
+ TRACE_AND_STEP();
+ mul_byte(destval);
+ break;
+ case 5:
+ DECODE_PRINTF("IMUL\tBYTE PTR ");
+ destoffset = decode_rm00_address(rl);
+ DECODE_PRINTF("\n");
+ destval = fetch_data_byte(destoffset);
+ TRACE_AND_STEP();
+ imul_byte(destval);
+ break;
+ case 6:
+ DECODE_PRINTF("DIV\tBYTE PTR ");
+ destoffset = decode_rm00_address(rl);
+ DECODE_PRINTF("\n");
+ destval = fetch_data_byte(destoffset);
+ TRACE_AND_STEP();
+ div_byte(destval);
+ break;
+ case 7:
+ DECODE_PRINTF("IDIV\tBYTE PTR ");
+ destoffset = decode_rm00_address(rl);
+ DECODE_PRINTF("\n");
+ destval = fetch_data_byte(destoffset);
+ TRACE_AND_STEP();
+ idiv_byte(destval);
+ break;
+ }
+ break; /* end mod==00 */
+ case 1: /* mod=01 */
+ switch (rh) {
+ case 0: /* test byte imm */
+ DECODE_PRINTF("TEST\tBYTE PTR ");
+ destoffset = decode_rm01_address(rl);
+ DECODE_PRINTF(",");
+ srcval = fetch_byte_imm();
+ DECODE_PRINTF2("%02x\n", srcval);
+ destval = fetch_data_byte(destoffset);
+ TRACE_AND_STEP();
+ test_byte(destval, srcval);
+ break;
+ case 1:
+ DECODE_PRINTF("ILLEGAL OP MOD=01 RH=01 OP=F6\n");
+ HALT_SYS();
+ break;
+ case 2:
+ DECODE_PRINTF("NOT\tBYTE PTR ");
+ destoffset = decode_rm01_address(rl);
+ DECODE_PRINTF("\n");
+ destval = fetch_data_byte(destoffset);
+ TRACE_AND_STEP();
+ destval = not_byte(destval);
+ store_data_byte(destoffset, destval);
+ break;
+ case 3:
+ DECODE_PRINTF("NEG\tBYTE PTR ");
+ destoffset = decode_rm01_address(rl);
+ DECODE_PRINTF("\n");
+ destval = fetch_data_byte(destoffset);
+ TRACE_AND_STEP();
+ destval = neg_byte(destval);
+ store_data_byte(destoffset, destval);
+ break;
+ case 4:
+ DECODE_PRINTF("MUL\tBYTE PTR ");
+ destoffset = decode_rm01_address(rl);
+ DECODE_PRINTF("\n");
+ destval = fetch_data_byte(destoffset);
+ TRACE_AND_STEP();
+ mul_byte(destval);
+ break;
+ case 5:
+ DECODE_PRINTF("IMUL\tBYTE PTR ");
+ destoffset = decode_rm01_address(rl);
+ DECODE_PRINTF("\n");
+ destval = fetch_data_byte(destoffset);
+ TRACE_AND_STEP();
+ imul_byte(destval);
+ break;
+ case 6:
+ DECODE_PRINTF("DIV\tBYTE PTR ");
+ destoffset = decode_rm01_address(rl);
+ DECODE_PRINTF("\n");
+ destval = fetch_data_byte(destoffset);
+ TRACE_AND_STEP();
+ div_byte(destval);
+ break;
+ case 7:
+ DECODE_PRINTF("IDIV\tBYTE PTR ");
+ destoffset = decode_rm01_address(rl);
+ DECODE_PRINTF("\n");
+ destval = fetch_data_byte(destoffset);
+ TRACE_AND_STEP();
+ idiv_byte(destval);
+ break;
+ }
+ break; /* end mod==01 */
+ case 2: /* mod=10 */
+ switch (rh) {
+ case 0: /* test byte imm */
+ DECODE_PRINTF("TEST\tBYTE PTR ");
+ destoffset = decode_rm10_address(rl);
+ DECODE_PRINTF(",");
+ srcval = fetch_byte_imm();
+ DECODE_PRINTF2("%02x\n", srcval);
+ destval = fetch_data_byte(destoffset);
+ TRACE_AND_STEP();
+ test_byte(destval, srcval);
+ break;
+ case 1:
+ DECODE_PRINTF("ILLEGAL OP MOD=10 RH=01 OP=F6\n");
+ HALT_SYS();
+ break;
+ case 2:
+ DECODE_PRINTF("NOT\tBYTE PTR ");
+ destoffset = decode_rm10_address(rl);
+ DECODE_PRINTF("\n");
+ destval = fetch_data_byte(destoffset);
+ TRACE_AND_STEP();
+ destval = not_byte(destval);
+ store_data_byte(destoffset, destval);
+ break;
+ case 3:
+ DECODE_PRINTF("NEG\tBYTE PTR ");
+ destoffset = decode_rm10_address(rl);
+ DECODE_PRINTF("\n");
+ destval = fetch_data_byte(destoffset);
+ TRACE_AND_STEP();
+ destval = neg_byte(destval);
+ store_data_byte(destoffset, destval);
+ break;
+ case 4:
+ DECODE_PRINTF("MUL\tBYTE PTR ");
+ destoffset = decode_rm10_address(rl);
+ DECODE_PRINTF("\n");
+ destval = fetch_data_byte(destoffset);
+ TRACE_AND_STEP();
+ mul_byte(destval);
+ break;
+ case 5:
+ DECODE_PRINTF("IMUL\tBYTE PTR ");
+ destoffset = decode_rm10_address(rl);
+ DECODE_PRINTF("\n");
+ destval = fetch_data_byte(destoffset);
+ TRACE_AND_STEP();
+ imul_byte(destval);
+ break;
+ case 6:
+ DECODE_PRINTF("DIV\tBYTE PTR ");
+ destoffset = decode_rm10_address(rl);
+ DECODE_PRINTF("\n");
+ destval = fetch_data_byte(destoffset);
+ TRACE_AND_STEP();
+ div_byte(destval);
+ break;
+ case 7:
+ DECODE_PRINTF("IDIV\tBYTE PTR ");
+ destoffset = decode_rm10_address(rl);
+ DECODE_PRINTF("\n");
+ destval = fetch_data_byte(destoffset);
+ TRACE_AND_STEP();
+ idiv_byte(destval);
+ break;
+ }
+ break; /* end mod==10 */
+ case 3: /* mod=11 */
+ switch (rh) {
+ case 0: /* test byte imm */
+ DECODE_PRINTF("TEST\t");
+ destreg = DECODE_RM_BYTE_REGISTER(rl);
+ DECODE_PRINTF(",");
+ srcval = fetch_byte_imm();
+ DECODE_PRINTF2("%02x\n", srcval);
+ TRACE_AND_STEP();
+ test_byte(*destreg, srcval);
+ break;
+ case 1:
+ DECODE_PRINTF("ILLEGAL OP MOD=00 RH=01 OP=F6\n");
+ HALT_SYS();
+ break;
+ case 2:
+ DECODE_PRINTF("NOT\t");
+ destreg = DECODE_RM_BYTE_REGISTER(rl);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ *destreg = not_byte(*destreg);
+ break;
+ case 3:
+ DECODE_PRINTF("NEG\t");
+ destreg = DECODE_RM_BYTE_REGISTER(rl);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ *destreg = neg_byte(*destreg);
+ break;
+ case 4:
+ DECODE_PRINTF("MUL\t");
+ destreg = DECODE_RM_BYTE_REGISTER(rl);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ mul_byte(*destreg); /*!!! */
+ break;
+ case 5:
+ DECODE_PRINTF("IMUL\t");
+ destreg = DECODE_RM_BYTE_REGISTER(rl);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ imul_byte(*destreg);
+ break;
+ case 6:
+ DECODE_PRINTF("DIV\t");
+ destreg = DECODE_RM_BYTE_REGISTER(rl);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ div_byte(*destreg);
+ break;
+ case 7:
+ DECODE_PRINTF("IDIV\t");
+ destreg = DECODE_RM_BYTE_REGISTER(rl);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ idiv_byte(*destreg);
+ break;
+ }
+ break; /* end mod==11 */
+ }
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0xf7
+****************************************************************************/
+void x86emuOp_opcF7_word_RM(u8 X86EMU_UNUSED(op1))
+{
+ int mod, rl, rh;
+ uint destoffset;
+
+ /* long, drawn out code follows. Double switch for a total
+ of 32 cases. */
+ START_OF_INSTR();
+ FETCH_DECODE_MODRM(mod, rh, rl);
+ switch (mod) {
+ case 0: /* mod=00 */
+ switch (rh) {
+ case 0: /* test word imm */
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 destval,srcval;
+
+ DECODE_PRINTF("TEST\tDWORD PTR ");
+ destoffset = decode_rm00_address(rl);
+ DECODE_PRINTF(",");
+ srcval = fetch_long_imm();
+ DECODE_PRINTF2("%x\n", srcval);
+ destval = fetch_data_long(destoffset);
+ TRACE_AND_STEP();
+ test_long(destval, srcval);
+ } else {
+ u16 destval,srcval;
+
+ DECODE_PRINTF("TEST\tWORD PTR ");
+ destoffset = decode_rm00_address(rl);
+ DECODE_PRINTF(",");
+ srcval = fetch_word_imm();
+ DECODE_PRINTF2("%x\n", srcval);
+ destval = fetch_data_word(destoffset);
+ TRACE_AND_STEP();
+ test_word(destval, srcval);
+ }
+ break;
+ case 1:
+ DECODE_PRINTF("ILLEGAL OP MOD=00 RH=01 OP=F7\n");
+ HALT_SYS();
+ break;
+ case 2:
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 destval;
+
+ DECODE_PRINTF("NOT\tDWORD PTR ");
+ destoffset = decode_rm00_address(rl);
+ DECODE_PRINTF("\n");
+ destval = fetch_data_long(destoffset);
+ TRACE_AND_STEP();
+ destval = not_long(destval);
+ store_data_long(destoffset, destval);
+ } else {
+ u16 destval;
+
+ DECODE_PRINTF("NOT\tWORD PTR ");
+ destoffset = decode_rm00_address(rl);
+ DECODE_PRINTF("\n");
+ destval = fetch_data_word(destoffset);
+ TRACE_AND_STEP();
+ destval = not_word(destval);
+ store_data_word(destoffset, destval);
+ }
+ break;
+ case 3:
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 destval;
+
+ DECODE_PRINTF("NEG\tDWORD PTR ");
+ destoffset = decode_rm00_address(rl);
+ DECODE_PRINTF("\n");
+ destval = fetch_data_long(destoffset);
+ TRACE_AND_STEP();
+ destval = neg_long(destval);
+ store_data_long(destoffset, destval);
+ } else {
+ u16 destval;
+
+ DECODE_PRINTF("NEG\tWORD PTR ");
+ destoffset = decode_rm00_address(rl);
+ DECODE_PRINTF("\n");
+ destval = fetch_data_word(destoffset);
+ TRACE_AND_STEP();
+ destval = neg_word(destval);
+ store_data_word(destoffset, destval);
+ }
+ break;
+ case 4:
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 destval;
+
+ DECODE_PRINTF("MUL\tDWORD PTR ");
+ destoffset = decode_rm00_address(rl);
+ DECODE_PRINTF("\n");
+ destval = fetch_data_long(destoffset);
+ TRACE_AND_STEP();
+ mul_long(destval);
+ } else {
+ u16 destval;
+
+ DECODE_PRINTF("MUL\tWORD PTR ");
+ destoffset = decode_rm00_address(rl);
+ DECODE_PRINTF("\n");
+ destval = fetch_data_word(destoffset);
+ TRACE_AND_STEP();
+ mul_word(destval);
+ }
+ break;
+ case 5:
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 destval;
+
+ DECODE_PRINTF("IMUL\tDWORD PTR ");
+ destoffset = decode_rm00_address(rl);
+ DECODE_PRINTF("\n");
+ destval = fetch_data_long(destoffset);
+ TRACE_AND_STEP();
+ imul_long(destval);
+ } else {
+ u16 destval;
+
+ DECODE_PRINTF("IMUL\tWORD PTR ");
+ destoffset = decode_rm00_address(rl);
+ DECODE_PRINTF("\n");
+ destval = fetch_data_word(destoffset);
+ TRACE_AND_STEP();
+ imul_word(destval);
+ }
+ break;
+ case 6:
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 destval;
+
+ DECODE_PRINTF("DIV\tDWORD PTR ");
+ destoffset = decode_rm00_address(rl);
+ DECODE_PRINTF("\n");
+ destval = fetch_data_long(destoffset);
+ TRACE_AND_STEP();
+ div_long(destval);
+ } else {
+ u16 destval;
+
+ DECODE_PRINTF("DIV\tWORD PTR ");
+ destoffset = decode_rm00_address(rl);
+ DECODE_PRINTF("\n");
+ destval = fetch_data_word(destoffset);
+ TRACE_AND_STEP();
+ div_word(destval);
+ }
+ break;
+ case 7:
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 destval;
+
+ DECODE_PRINTF("IDIV\tDWORD PTR ");
+ destoffset = decode_rm00_address(rl);
+ DECODE_PRINTF("\n");
+ destval = fetch_data_long(destoffset);
+ TRACE_AND_STEP();
+ idiv_long(destval);
+ } else {
+ u16 destval;
+
+ DECODE_PRINTF("IDIV\tWORD PTR ");
+ destoffset = decode_rm00_address(rl);
+ DECODE_PRINTF("\n");
+ destval = fetch_data_word(destoffset);
+ TRACE_AND_STEP();
+ idiv_word(destval);
+ }
+ break;
+ }
+ break; /* end mod==00 */
+ case 1: /* mod=01 */
+ switch (rh) {
+ case 0: /* test word imm */
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 destval,srcval;
+
+ DECODE_PRINTF("TEST\tDWORD PTR ");
+ destoffset = decode_rm01_address(rl);
+ DECODE_PRINTF(",");
+ srcval = fetch_long_imm();
+ DECODE_PRINTF2("%x\n", srcval);
+ destval = fetch_data_long(destoffset);
+ TRACE_AND_STEP();
+ test_long(destval, srcval);
+ } else {
+ u16 destval,srcval;
+
+ DECODE_PRINTF("TEST\tWORD PTR ");
+ destoffset = decode_rm01_address(rl);
+ DECODE_PRINTF(",");
+ srcval = fetch_word_imm();
+ DECODE_PRINTF2("%x\n", srcval);
+ destval = fetch_data_word(destoffset);
+ TRACE_AND_STEP();
+ test_word(destval, srcval);
+ }
+ break;
+ case 1:
+ DECODE_PRINTF("ILLEGAL OP MOD=01 RH=01 OP=F6\n");
+ HALT_SYS();
+ break;
+ case 2:
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 destval;
+
+ DECODE_PRINTF("NOT\tDWORD PTR ");
+ destoffset = decode_rm01_address(rl);
+ DECODE_PRINTF("\n");
+ destval = fetch_data_long(destoffset);
+ TRACE_AND_STEP();
+ destval = not_long(destval);
+ store_data_long(destoffset, destval);
+ } else {
+ u16 destval;
+
+ DECODE_PRINTF("NOT\tWORD PTR ");
+ destoffset = decode_rm01_address(rl);
+ DECODE_PRINTF("\n");
+ destval = fetch_data_word(destoffset);
+ TRACE_AND_STEP();
+ destval = not_word(destval);
+ store_data_word(destoffset, destval);
+ }
+ break;
+ case 3:
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 destval;
+
+ DECODE_PRINTF("NEG\tDWORD PTR ");
+ destoffset = decode_rm01_address(rl);
+ DECODE_PRINTF("\n");
+ destval = fetch_data_long(destoffset);
+ TRACE_AND_STEP();
+ destval = neg_long(destval);
+ store_data_long(destoffset, destval);
+ } else {
+ u16 destval;
+
+ DECODE_PRINTF("NEG\tWORD PTR ");
+ destoffset = decode_rm01_address(rl);
+ DECODE_PRINTF("\n");
+ destval = fetch_data_word(destoffset);
+ TRACE_AND_STEP();
+ destval = neg_word(destval);
+ store_data_word(destoffset, destval);
+ }
+ break;
+ case 4:
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 destval;
+
+ DECODE_PRINTF("MUL\tDWORD PTR ");
+ destoffset = decode_rm01_address(rl);
+ DECODE_PRINTF("\n");
+ destval = fetch_data_long(destoffset);
+ TRACE_AND_STEP();
+ mul_long(destval);
+ } else {
+ u16 destval;
+
+ DECODE_PRINTF("MUL\tWORD PTR ");
+ destoffset = decode_rm01_address(rl);
+ DECODE_PRINTF("\n");
+ destval = fetch_data_word(destoffset);
+ TRACE_AND_STEP();
+ mul_word(destval);
+ }
+ break;
+ case 5:
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 destval;
+
+ DECODE_PRINTF("IMUL\tDWORD PTR ");
+ destoffset = decode_rm01_address(rl);
+ DECODE_PRINTF("\n");
+ destval = fetch_data_long(destoffset);
+ TRACE_AND_STEP();
+ imul_long(destval);
+ } else {
+ u16 destval;
+
+ DECODE_PRINTF("IMUL\tWORD PTR ");
+ destoffset = decode_rm01_address(rl);
+ DECODE_PRINTF("\n");
+ destval = fetch_data_word(destoffset);
+ TRACE_AND_STEP();
+ imul_word(destval);
+ }
+ break;
+ case 6:
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 destval;
+
+ DECODE_PRINTF("DIV\tDWORD PTR ");
+ destoffset = decode_rm01_address(rl);
+ DECODE_PRINTF("\n");
+ destval = fetch_data_long(destoffset);
+ TRACE_AND_STEP();
+ div_long(destval);
+ } else {
+ u16 destval;
+
+ DECODE_PRINTF("DIV\tWORD PTR ");
+ destoffset = decode_rm01_address(rl);
+ DECODE_PRINTF("\n");
+ destval = fetch_data_word(destoffset);
+ TRACE_AND_STEP();
+ div_word(destval);
+ }
+ break;
+ case 7:
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 destval;
+
+ DECODE_PRINTF("IDIV\tDWORD PTR ");
+ destoffset = decode_rm01_address(rl);
+ DECODE_PRINTF("\n");
+ destval = fetch_data_long(destoffset);
+ TRACE_AND_STEP();
+ idiv_long(destval);
+ } else {
+ u16 destval;
+
+ DECODE_PRINTF("IDIV\tWORD PTR ");
+ destoffset = decode_rm01_address(rl);
+ DECODE_PRINTF("\n");
+ destval = fetch_data_word(destoffset);
+ TRACE_AND_STEP();
+ idiv_word(destval);
+ }
+ break;
+ }
+ break; /* end mod==01 */
+ case 2: /* mod=10 */
+ switch (rh) {
+ case 0: /* test word imm */
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 destval,srcval;
+
+ DECODE_PRINTF("TEST\tDWORD PTR ");
+ destoffset = decode_rm10_address(rl);
+ DECODE_PRINTF(",");
+ srcval = fetch_long_imm();
+ DECODE_PRINTF2("%x\n", srcval);
+ destval = fetch_data_long(destoffset);
+ TRACE_AND_STEP();
+ test_long(destval, srcval);
+ } else {
+ u16 destval,srcval;
+
+ DECODE_PRINTF("TEST\tWORD PTR ");
+ destoffset = decode_rm10_address(rl);
+ DECODE_PRINTF(",");
+ srcval = fetch_word_imm();
+ DECODE_PRINTF2("%x\n", srcval);
+ destval = fetch_data_word(destoffset);
+ TRACE_AND_STEP();
+ test_word(destval, srcval);
+ }
+ break;
+ case 1:
+ DECODE_PRINTF("ILLEGAL OP MOD=10 RH=01 OP=F6\n");
+ HALT_SYS();
+ break;
+ case 2:
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 destval;
+
+ DECODE_PRINTF("NOT\tDWORD PTR ");
+ destoffset = decode_rm10_address(rl);
+ DECODE_PRINTF("\n");
+ destval = fetch_data_long(destoffset);
+ TRACE_AND_STEP();
+ destval = not_long(destval);
+ store_data_long(destoffset, destval);
+ } else {
+ u16 destval;
+
+ DECODE_PRINTF("NOT\tWORD PTR ");
+ destoffset = decode_rm10_address(rl);
+ DECODE_PRINTF("\n");
+ destval = fetch_data_word(destoffset);
+ TRACE_AND_STEP();
+ destval = not_word(destval);
+ store_data_word(destoffset, destval);
+ }
+ break;
+ case 3:
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 destval;
+
+ DECODE_PRINTF("NEG\tDWORD PTR ");
+ destoffset = decode_rm10_address(rl);
+ DECODE_PRINTF("\n");
+ destval = fetch_data_long(destoffset);
+ TRACE_AND_STEP();
+ destval = neg_long(destval);
+ store_data_long(destoffset, destval);
+ } else {
+ u16 destval;
+
+ DECODE_PRINTF("NEG\tWORD PTR ");
+ destoffset = decode_rm10_address(rl);
+ DECODE_PRINTF("\n");
+ destval = fetch_data_word(destoffset);
+ TRACE_AND_STEP();
+ destval = neg_word(destval);
+ store_data_word(destoffset, destval);
+ }
+ break;
+ case 4:
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 destval;
+
+ DECODE_PRINTF("MUL\tDWORD PTR ");
+ destoffset = decode_rm10_address(rl);
+ DECODE_PRINTF("\n");
+ destval = fetch_data_long(destoffset);
+ TRACE_AND_STEP();
+ mul_long(destval);
+ } else {
+ u16 destval;
+
+ DECODE_PRINTF("MUL\tWORD PTR ");
+ destoffset = decode_rm10_address(rl);
+ DECODE_PRINTF("\n");
+ destval = fetch_data_word(destoffset);
+ TRACE_AND_STEP();
+ mul_word(destval);
+ }
+ break;
+ case 5:
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 destval;
+
+ DECODE_PRINTF("IMUL\tDWORD PTR ");
+ destoffset = decode_rm10_address(rl);
+ DECODE_PRINTF("\n");
+ destval = fetch_data_long(destoffset);
+ TRACE_AND_STEP();
+ imul_long(destval);
+ } else {
+ u16 destval;
+
+ DECODE_PRINTF("IMUL\tWORD PTR ");
+ destoffset = decode_rm10_address(rl);
+ DECODE_PRINTF("\n");
+ destval = fetch_data_word(destoffset);
+ TRACE_AND_STEP();
+ imul_word(destval);
+ }
+ break;
+ case 6:
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 destval;
+
+ DECODE_PRINTF("DIV\tDWORD PTR ");
+ destoffset = decode_rm10_address(rl);
+ DECODE_PRINTF("\n");
+ destval = fetch_data_long(destoffset);
+ TRACE_AND_STEP();
+ div_long(destval);
+ } else {
+ u16 destval;
+
+ DECODE_PRINTF("DIV\tWORD PTR ");
+ destoffset = decode_rm10_address(rl);
+ DECODE_PRINTF("\n");
+ destval = fetch_data_word(destoffset);
+ TRACE_AND_STEP();
+ div_word(destval);
+ }
+ break;
+ case 7:
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 destval;
+
+ DECODE_PRINTF("IDIV\tDWORD PTR ");
+ destoffset = decode_rm10_address(rl);
+ DECODE_PRINTF("\n");
+ destval = fetch_data_long(destoffset);
+ TRACE_AND_STEP();
+ idiv_long(destval);
+ } else {
+ u16 destval;
+
+ DECODE_PRINTF("IDIV\tWORD PTR ");
+ destoffset = decode_rm10_address(rl);
+ DECODE_PRINTF("\n");
+ destval = fetch_data_word(destoffset);
+ TRACE_AND_STEP();
+ idiv_word(destval);
+ }
+ break;
+ }
+ break; /* end mod==10 */
+ case 3: /* mod=11 */
+ switch (rh) {
+ case 0: /* test word imm */
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 *destreg;
+ u32 srcval;
+
+ DECODE_PRINTF("TEST\t");
+ destreg = DECODE_RM_LONG_REGISTER(rl);
+ DECODE_PRINTF(",");
+ srcval = fetch_long_imm();
+ DECODE_PRINTF2("%x\n", srcval);
+ TRACE_AND_STEP();
+ test_long(*destreg, srcval);
+ } else {
+ u16 *destreg;
+ u16 srcval;
+
+ DECODE_PRINTF("TEST\t");
+ destreg = DECODE_RM_WORD_REGISTER(rl);
+ DECODE_PRINTF(",");
+ srcval = fetch_word_imm();
+ DECODE_PRINTF2("%x\n", srcval);
+ TRACE_AND_STEP();
+ test_word(*destreg, srcval);
+ }
+ break;
+ case 1:
+ DECODE_PRINTF("ILLEGAL OP MOD=00 RH=01 OP=F6\n");
+ HALT_SYS();
+ break;
+ case 2:
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 *destreg;
+
+ DECODE_PRINTF("NOT\t");
+ destreg = DECODE_RM_LONG_REGISTER(rl);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ *destreg = not_long(*destreg);
+ } else {
+ u16 *destreg;
+
+ DECODE_PRINTF("NOT\t");
+ destreg = DECODE_RM_WORD_REGISTER(rl);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ *destreg = not_word(*destreg);
+ }
+ break;
+ case 3:
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 *destreg;
+
+ DECODE_PRINTF("NEG\t");
+ destreg = DECODE_RM_LONG_REGISTER(rl);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ *destreg = neg_long(*destreg);
+ } else {
+ u16 *destreg;
+
+ DECODE_PRINTF("NEG\t");
+ destreg = DECODE_RM_WORD_REGISTER(rl);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ *destreg = neg_word(*destreg);
+ }
+ break;
+ case 4:
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 *destreg;
+
+ DECODE_PRINTF("MUL\t");
+ destreg = DECODE_RM_LONG_REGISTER(rl);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ mul_long(*destreg); /*!!! */
+ } else {
+ u16 *destreg;
+
+ DECODE_PRINTF("MUL\t");
+ destreg = DECODE_RM_WORD_REGISTER(rl);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ mul_word(*destreg); /*!!! */
+ }
+ break;
+ case 5:
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 *destreg;
+
+ DECODE_PRINTF("IMUL\t");
+ destreg = DECODE_RM_LONG_REGISTER(rl);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ imul_long(*destreg);
+ } else {
+ u16 *destreg;
+
+ DECODE_PRINTF("IMUL\t");
+ destreg = DECODE_RM_WORD_REGISTER(rl);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ imul_word(*destreg);
+ }
+ break;
+ case 6:
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 *destreg;
+
+ DECODE_PRINTF("DIV\t");
+ destreg = DECODE_RM_LONG_REGISTER(rl);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ div_long(*destreg);
+ } else {
+ u16 *destreg;
+
+ DECODE_PRINTF("DIV\t");
+ destreg = DECODE_RM_WORD_REGISTER(rl);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ div_word(*destreg);
+ }
+ break;
+ case 7:
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 *destreg;
+
+ DECODE_PRINTF("IDIV\t");
+ destreg = DECODE_RM_LONG_REGISTER(rl);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ idiv_long(*destreg);
+ } else {
+ u16 *destreg;
+
+ DECODE_PRINTF("IDIV\t");
+ destreg = DECODE_RM_WORD_REGISTER(rl);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ idiv_word(*destreg);
+ }
+ break;
+ }
+ break; /* end mod==11 */
+ }
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0xf8
+****************************************************************************/
+void x86emuOp_clc(u8 X86EMU_UNUSED(op1))
+{
+ /* clear the carry flag. */
+ START_OF_INSTR();
+ DECODE_PRINTF("CLC\n");
+ TRACE_AND_STEP();
+ CLEAR_FLAG(F_CF);
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0xf9
+****************************************************************************/
+void x86emuOp_stc(u8 X86EMU_UNUSED(op1))
+{
+ /* set the carry flag. */
+ START_OF_INSTR();
+ DECODE_PRINTF("STC\n");
+ TRACE_AND_STEP();
+ SET_FLAG(F_CF);
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0xfa
+****************************************************************************/
+void x86emuOp_cli(u8 X86EMU_UNUSED(op1))
+{
+ /* clear interrupts. */
+ START_OF_INSTR();
+ DECODE_PRINTF("CLI\n");
+ TRACE_AND_STEP();
+ CLEAR_FLAG(F_IF);
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0xfb
+****************************************************************************/
+void x86emuOp_sti(u8 X86EMU_UNUSED(op1))
+{
+ /* enable interrupts. */
+ START_OF_INSTR();
+ DECODE_PRINTF("STI\n");
+ TRACE_AND_STEP();
+ SET_FLAG(F_IF);
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0xfc
+****************************************************************************/
+void x86emuOp_cld(u8 X86EMU_UNUSED(op1))
+{
+ /* clear interrupts. */
+ START_OF_INSTR();
+ DECODE_PRINTF("CLD\n");
+ TRACE_AND_STEP();
+ CLEAR_FLAG(F_DF);
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0xfd
+****************************************************************************/
+void x86emuOp_std(u8 X86EMU_UNUSED(op1))
+{
+ /* clear interrupts. */
+ START_OF_INSTR();
+ DECODE_PRINTF("STD\n");
+ TRACE_AND_STEP();
+ SET_FLAG(F_DF);
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0xfe
+****************************************************************************/
+void x86emuOp_opcFE_byte_RM(u8 X86EMU_UNUSED(op1))
+{
+ int mod, rh, rl;
+ u8 destval;
+ uint destoffset;
+ u8 *destreg;
+
+ /* Yet another special case instruction. */
+ START_OF_INSTR();
+ FETCH_DECODE_MODRM(mod, rh, rl);
+#ifdef DEBUG
+ if (DEBUG_DECODE()) {
+ /* XXX DECODE_PRINTF may be changed to something more
+ general, so that it is important to leave the strings
+ in the same format, even though the result is that the
+ above test is done twice. */
+
+ switch (rh) {
+ case 0:
+ DECODE_PRINTF("INC\t");
+ break;
+ case 1:
+ DECODE_PRINTF("DEC\t");
+ break;
+ case 2:
+ case 3:
+ case 4:
+ case 5:
+ case 6:
+ case 7:
+ DECODE_PRINTF2("ILLEGAL OP MAJOR OP 0xFE MINOR OP %x \n", mod);
+ HALT_SYS();
+ break;
+ }
+ }
+#endif
+ switch (mod) {
+ case 0:
+ DECODE_PRINTF("BYTE PTR ");
+ destoffset = decode_rm00_address(rl);
+ DECODE_PRINTF("\n");
+ switch (rh) {
+ case 0: /* inc word ptr ... */
+ destval = fetch_data_byte(destoffset);
+ TRACE_AND_STEP();
+ destval = inc_byte(destval);
+ store_data_byte(destoffset, destval);
+ break;
+ case 1: /* dec word ptr ... */
+ destval = fetch_data_byte(destoffset);
+ TRACE_AND_STEP();
+ destval = dec_byte(destval);
+ store_data_byte(destoffset, destval);
+ break;
+ }
+ break;
+ case 1:
+ DECODE_PRINTF("BYTE PTR ");
+ destoffset = decode_rm01_address(rl);
+ DECODE_PRINTF("\n");
+ switch (rh) {
+ case 0:
+ destval = fetch_data_byte(destoffset);
+ TRACE_AND_STEP();
+ destval = inc_byte(destval);
+ store_data_byte(destoffset, destval);
+ break;
+ case 1:
+ destval = fetch_data_byte(destoffset);
+ TRACE_AND_STEP();
+ destval = dec_byte(destval);
+ store_data_byte(destoffset, destval);
+ break;
+ }
+ break;
+ case 2:
+ DECODE_PRINTF("BYTE PTR ");
+ destoffset = decode_rm10_address(rl);
+ DECODE_PRINTF("\n");
+ switch (rh) {
+ case 0:
+ destval = fetch_data_byte(destoffset);
+ TRACE_AND_STEP();
+ destval = inc_byte(destval);
+ store_data_byte(destoffset, destval);
+ break;
+ case 1:
+ destval = fetch_data_byte(destoffset);
+ TRACE_AND_STEP();
+ destval = dec_byte(destval);
+ store_data_byte(destoffset, destval);
+ break;
+ }
+ break;
+ case 3:
+ destreg = DECODE_RM_BYTE_REGISTER(rl);
+ DECODE_PRINTF("\n");
+ switch (rh) {
+ case 0:
+ TRACE_AND_STEP();
+ *destreg = inc_byte(*destreg);
+ break;
+ case 1:
+ TRACE_AND_STEP();
+ *destreg = dec_byte(*destreg);
+ break;
+ }
+ break;
+ }
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0xff
+****************************************************************************/
+void x86emuOp_opcFF_word_RM(u8 X86EMU_UNUSED(op1))
+{
+ int mod, rh, rl;
+ uint destoffset = 0;
+ u16 *destreg;
+ u16 destval,destval2;
+
+ /* Yet another special case instruction. */
+ START_OF_INSTR();
+ FETCH_DECODE_MODRM(mod, rh, rl);
+#ifdef DEBUG
+ if (DEBUG_DECODE()) {
+ /* XXX DECODE_PRINTF may be changed to something more
+ general, so that it is important to leave the strings
+ in the same format, even though the result is that the
+ above test is done twice. */
+
+ switch (rh) {
+ case 0:
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ DECODE_PRINTF("INC\tDWORD PTR ");
+ } else {
+ DECODE_PRINTF("INC\tWORD PTR ");
+ }
+ break;
+ case 1:
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ DECODE_PRINTF("DEC\tDWORD PTR ");
+ } else {
+ DECODE_PRINTF("DEC\tWORD PTR ");
+ }
+ break;
+ case 2:
+ DECODE_PRINTF("CALL\t ");
+ break;
+ case 3:
+ DECODE_PRINTF("CALL\tFAR ");
+ break;
+ case 4:
+ DECODE_PRINTF("JMP\t");
+ break;
+ case 5:
+ DECODE_PRINTF("JMP\tFAR ");
+ break;
+ case 6:
+ DECODE_PRINTF("PUSH\t");
+ break;
+ case 7:
+ DECODE_PRINTF("ILLEGAL DECODING OF OPCODE FF\t");
+ HALT_SYS();
+ break;
+ }
+ }
+#endif
+ switch (mod) {
+ case 0:
+ destoffset = decode_rm00_address(rl);
+ DECODE_PRINTF("\n");
+ switch (rh) {
+ case 0: /* inc word ptr ... */
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 destval;
+
+ destval = fetch_data_long(destoffset);
+ TRACE_AND_STEP();
+ destval = inc_long(destval);
+ store_data_long(destoffset, destval);
+ } else {
+ u16 destval;
+
+ destval = fetch_data_word(destoffset);
+ TRACE_AND_STEP();
+ destval = inc_word(destval);
+ store_data_word(destoffset, destval);
+ }
+ break;
+ case 1: /* dec word ptr ... */
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 destval;
+
+ destval = fetch_data_long(destoffset);
+ TRACE_AND_STEP();
+ destval = dec_long(destval);
+ store_data_long(destoffset, destval);
+ } else {
+ u16 destval;
+
+ destval = fetch_data_word(destoffset);
+ TRACE_AND_STEP();
+ destval = dec_word(destval);
+ store_data_word(destoffset, destval);
+ }
+ break;
+ case 2: /* call word ptr ... */
+ destval = fetch_data_word(destoffset);
+ TRACE_AND_STEP();
+ push_word(M.x86.R_IP);
+ M.x86.R_IP = destval;
+ break;
+ case 3: /* call far ptr ... */
+ destval = fetch_data_word(destoffset);
+ destval2 = fetch_data_word(destoffset + 2);
+ TRACE_AND_STEP();
+ push_word(M.x86.R_CS);
+ M.x86.R_CS = destval2;
+ push_word(M.x86.R_IP);
+ M.x86.R_IP = destval;
+ break;
+ case 4: /* jmp word ptr ... */
+ destval = fetch_data_word(destoffset);
+ TRACE_AND_STEP();
+ M.x86.R_IP = destval;
+ break;
+ case 5: /* jmp far ptr ... */
+ destval = fetch_data_word(destoffset);
+ destval2 = fetch_data_word(destoffset + 2);
+ TRACE_AND_STEP();
+ M.x86.R_IP = destval;
+ M.x86.R_CS = destval2;
+ break;
+ case 6: /* push word ptr ... */
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 destval;
+
+ destval = fetch_data_long(destoffset);
+ TRACE_AND_STEP();
+ push_long(destval);
+ } else {
+ u16 destval;
+
+ destval = fetch_data_word(destoffset);
+ TRACE_AND_STEP();
+ push_word(destval);
+ }
+ break;
+ }
+ break;
+ case 1:
+ destoffset = decode_rm01_address(rl);
+ DECODE_PRINTF("\n");
+ switch (rh) {
+ case 0:
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 destval;
+
+ destval = fetch_data_long(destoffset);
+ TRACE_AND_STEP();
+ destval = inc_long(destval);
+ store_data_long(destoffset, destval);
+ } else {
+ u16 destval;
+
+ destval = fetch_data_word(destoffset);
+ TRACE_AND_STEP();
+ destval = inc_word(destval);
+ store_data_word(destoffset, destval);
+ }
+ break;
+ case 1:
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 destval;
+
+ destval = fetch_data_long(destoffset);
+ TRACE_AND_STEP();
+ destval = dec_long(destval);
+ store_data_long(destoffset, destval);
+ } else {
+ u16 destval;
+
+ destval = fetch_data_word(destoffset);
+ TRACE_AND_STEP();
+ destval = dec_word(destval);
+ store_data_word(destoffset, destval);
+ }
+ break;
+ case 2: /* call word ptr ... */
+ destval = fetch_data_word(destoffset);
+ TRACE_AND_STEP();
+ push_word(M.x86.R_IP);
+ M.x86.R_IP = destval;
+ break;
+ case 3: /* call far ptr ... */
+ destval = fetch_data_word(destoffset);
+ destval2 = fetch_data_word(destoffset + 2);
+ TRACE_AND_STEP();
+ push_word(M.x86.R_CS);
+ M.x86.R_CS = destval2;
+ push_word(M.x86.R_IP);
+ M.x86.R_IP = destval;
+ break;
+ case 4: /* jmp word ptr ... */
+ destval = fetch_data_word(destoffset);
+ TRACE_AND_STEP();
+ M.x86.R_IP = destval;
+ break;
+ case 5: /* jmp far ptr ... */
+ destval = fetch_data_word(destoffset);
+ destval2 = fetch_data_word(destoffset + 2);
+ TRACE_AND_STEP();
+ M.x86.R_IP = destval;
+ M.x86.R_CS = destval2;
+ break;
+ case 6: /* push word ptr ... */
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 destval;
+
+ destval = fetch_data_long(destoffset);
+ TRACE_AND_STEP();
+ push_long(destval);
+ } else {
+ u16 destval;
+
+ destval = fetch_data_word(destoffset);
+ TRACE_AND_STEP();
+ push_word(destval);
+ }
+ break;
+ }
+ break;
+ case 2:
+ destoffset = decode_rm10_address(rl);
+ DECODE_PRINTF("\n");
+ switch (rh) {
+ case 0:
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 destval;
+
+ destval = fetch_data_long(destoffset);
+ TRACE_AND_STEP();
+ destval = inc_long(destval);
+ store_data_long(destoffset, destval);
+ } else {
+ u16 destval;
+
+ destval = fetch_data_word(destoffset);
+ TRACE_AND_STEP();
+ destval = inc_word(destval);
+ store_data_word(destoffset, destval);
+ }
+ break;
+ case 1:
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 destval;
+
+ destval = fetch_data_long(destoffset);
+ TRACE_AND_STEP();
+ destval = dec_long(destval);
+ store_data_long(destoffset, destval);
+ } else {
+ u16 destval;
+
+ destval = fetch_data_word(destoffset);
+ TRACE_AND_STEP();
+ destval = dec_word(destval);
+ store_data_word(destoffset, destval);
+ }
+ break;
+ case 2: /* call word ptr ... */
+ destval = fetch_data_word(destoffset);
+ TRACE_AND_STEP();
+ push_word(M.x86.R_IP);
+ M.x86.R_IP = destval;
+ break;
+ case 3: /* call far ptr ... */
+ destval = fetch_data_word(destoffset);
+ destval2 = fetch_data_word(destoffset + 2);
+ TRACE_AND_STEP();
+ push_word(M.x86.R_CS);
+ M.x86.R_CS = destval2;
+ push_word(M.x86.R_IP);
+ M.x86.R_IP = destval;
+ break;
+ case 4: /* jmp word ptr ... */
+ destval = fetch_data_word(destoffset);
+ TRACE_AND_STEP();
+ M.x86.R_IP = destval;
+ break;
+ case 5: /* jmp far ptr ... */
+ destval = fetch_data_word(destoffset);
+ destval2 = fetch_data_word(destoffset + 2);
+ TRACE_AND_STEP();
+ M.x86.R_IP = destval;
+ M.x86.R_CS = destval2;
+ break;
+ case 6: /* push word ptr ... */
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 destval;
+
+ destval = fetch_data_long(destoffset);
+ TRACE_AND_STEP();
+ push_long(destval);
+ } else {
+ u16 destval;
+
+ destval = fetch_data_word(destoffset);
+ TRACE_AND_STEP();
+ push_word(destval);
+ }
+ break;
+ }
+ break;
+ case 3:
+ switch (rh) {
+ case 0:
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 *destreg;
+
+ destreg = DECODE_RM_LONG_REGISTER(rl);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ *destreg = inc_long(*destreg);
+ } else {
+ u16 *destreg;
+
+ destreg = DECODE_RM_WORD_REGISTER(rl);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ *destreg = inc_word(*destreg);
+ }
+ break;
+ case 1:
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 *destreg;
+
+ destreg = DECODE_RM_LONG_REGISTER(rl);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ *destreg = dec_long(*destreg);
+ } else {
+ u16 *destreg;
+
+ destreg = DECODE_RM_WORD_REGISTER(rl);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ *destreg = dec_word(*destreg);
+ }
+ break;
+ case 2: /* call word ptr ... */
+ destreg = DECODE_RM_WORD_REGISTER(rl);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ push_word(M.x86.R_IP);
+ M.x86.R_IP = *destreg;
+ break;
+ case 3: /* jmp far ptr ... */
+ DECODE_PRINTF("OPERATION UNDEFINED 0XFF \n");
+ TRACE_AND_STEP();
+ HALT_SYS();
+ break;
+
+ case 4: /* jmp ... */
+ destreg = DECODE_RM_WORD_REGISTER(rl);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ M.x86.R_IP = (u16) (*destreg);
+ break;
+ case 5: /* jmp far ptr ... */
+ DECODE_PRINTF("OPERATION UNDEFINED 0XFF \n");
+ TRACE_AND_STEP();
+ HALT_SYS();
+ break;
+ case 6:
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 *destreg;
+
+ destreg = DECODE_RM_LONG_REGISTER(rl);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ push_long(*destreg);
+ } else {
+ u16 *destreg;
+
+ destreg = DECODE_RM_WORD_REGISTER(rl);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ push_word(*destreg);
+ }
+ break;
+ }
+ break;
+ }
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/***************************************************************************
+ * Single byte operation code table:
+ **************************************************************************/
+void (*x86emu_optab[256])(u8) =
+{
+/* 0x00 */ x86emuOp_add_byte_RM_R,
+/* 0x01 */ x86emuOp_add_word_RM_R,
+/* 0x02 */ x86emuOp_add_byte_R_RM,
+/* 0x03 */ x86emuOp_add_word_R_RM,
+/* 0x04 */ x86emuOp_add_byte_AL_IMM,
+/* 0x05 */ x86emuOp_add_word_AX_IMM,
+/* 0x06 */ x86emuOp_push_ES,
+/* 0x07 */ x86emuOp_pop_ES,
+
+/* 0x08 */ x86emuOp_or_byte_RM_R,
+/* 0x09 */ x86emuOp_or_word_RM_R,
+/* 0x0a */ x86emuOp_or_byte_R_RM,
+/* 0x0b */ x86emuOp_or_word_R_RM,
+/* 0x0c */ x86emuOp_or_byte_AL_IMM,
+/* 0x0d */ x86emuOp_or_word_AX_IMM,
+/* 0x0e */ x86emuOp_push_CS,
+/* 0x0f */ x86emuOp_two_byte,
+
+/* 0x10 */ x86emuOp_adc_byte_RM_R,
+/* 0x11 */ x86emuOp_adc_word_RM_R,
+/* 0x12 */ x86emuOp_adc_byte_R_RM,
+/* 0x13 */ x86emuOp_adc_word_R_RM,
+/* 0x14 */ x86emuOp_adc_byte_AL_IMM,
+/* 0x15 */ x86emuOp_adc_word_AX_IMM,
+/* 0x16 */ x86emuOp_push_SS,
+/* 0x17 */ x86emuOp_pop_SS,
+
+/* 0x18 */ x86emuOp_sbb_byte_RM_R,
+/* 0x19 */ x86emuOp_sbb_word_RM_R,
+/* 0x1a */ x86emuOp_sbb_byte_R_RM,
+/* 0x1b */ x86emuOp_sbb_word_R_RM,
+/* 0x1c */ x86emuOp_sbb_byte_AL_IMM,
+/* 0x1d */ x86emuOp_sbb_word_AX_IMM,
+/* 0x1e */ x86emuOp_push_DS,
+/* 0x1f */ x86emuOp_pop_DS,
+
+/* 0x20 */ x86emuOp_and_byte_RM_R,
+/* 0x21 */ x86emuOp_and_word_RM_R,
+/* 0x22 */ x86emuOp_and_byte_R_RM,
+/* 0x23 */ x86emuOp_and_word_R_RM,
+/* 0x24 */ x86emuOp_and_byte_AL_IMM,
+/* 0x25 */ x86emuOp_and_word_AX_IMM,
+/* 0x26 */ x86emuOp_segovr_ES,
+/* 0x27 */ x86emuOp_daa,
+
+/* 0x28 */ x86emuOp_sub_byte_RM_R,
+/* 0x29 */ x86emuOp_sub_word_RM_R,
+/* 0x2a */ x86emuOp_sub_byte_R_RM,
+/* 0x2b */ x86emuOp_sub_word_R_RM,
+/* 0x2c */ x86emuOp_sub_byte_AL_IMM,
+/* 0x2d */ x86emuOp_sub_word_AX_IMM,
+/* 0x2e */ x86emuOp_segovr_CS,
+/* 0x2f */ x86emuOp_das,
+
+/* 0x30 */ x86emuOp_xor_byte_RM_R,
+/* 0x31 */ x86emuOp_xor_word_RM_R,
+/* 0x32 */ x86emuOp_xor_byte_R_RM,
+/* 0x33 */ x86emuOp_xor_word_R_RM,
+/* 0x34 */ x86emuOp_xor_byte_AL_IMM,
+/* 0x35 */ x86emuOp_xor_word_AX_IMM,
+/* 0x36 */ x86emuOp_segovr_SS,
+/* 0x37 */ x86emuOp_aaa,
+
+/* 0x38 */ x86emuOp_cmp_byte_RM_R,
+/* 0x39 */ x86emuOp_cmp_word_RM_R,
+/* 0x3a */ x86emuOp_cmp_byte_R_RM,
+/* 0x3b */ x86emuOp_cmp_word_R_RM,
+/* 0x3c */ x86emuOp_cmp_byte_AL_IMM,
+/* 0x3d */ x86emuOp_cmp_word_AX_IMM,
+/* 0x3e */ x86emuOp_segovr_DS,
+/* 0x3f */ x86emuOp_aas,
+
+/* 0x40 */ x86emuOp_inc_AX,
+/* 0x41 */ x86emuOp_inc_CX,
+/* 0x42 */ x86emuOp_inc_DX,
+/* 0x43 */ x86emuOp_inc_BX,
+/* 0x44 */ x86emuOp_inc_SP,
+/* 0x45 */ x86emuOp_inc_BP,
+/* 0x46 */ x86emuOp_inc_SI,
+/* 0x47 */ x86emuOp_inc_DI,
+
+/* 0x48 */ x86emuOp_dec_AX,
+/* 0x49 */ x86emuOp_dec_CX,
+/* 0x4a */ x86emuOp_dec_DX,
+/* 0x4b */ x86emuOp_dec_BX,
+/* 0x4c */ x86emuOp_dec_SP,
+/* 0x4d */ x86emuOp_dec_BP,
+/* 0x4e */ x86emuOp_dec_SI,
+/* 0x4f */ x86emuOp_dec_DI,
+
+/* 0x50 */ x86emuOp_push_AX,
+/* 0x51 */ x86emuOp_push_CX,
+/* 0x52 */ x86emuOp_push_DX,
+/* 0x53 */ x86emuOp_push_BX,
+/* 0x54 */ x86emuOp_push_SP,
+/* 0x55 */ x86emuOp_push_BP,
+/* 0x56 */ x86emuOp_push_SI,
+/* 0x57 */ x86emuOp_push_DI,
+
+/* 0x58 */ x86emuOp_pop_AX,
+/* 0x59 */ x86emuOp_pop_CX,
+/* 0x5a */ x86emuOp_pop_DX,
+/* 0x5b */ x86emuOp_pop_BX,
+/* 0x5c */ x86emuOp_pop_SP,
+/* 0x5d */ x86emuOp_pop_BP,
+/* 0x5e */ x86emuOp_pop_SI,
+/* 0x5f */ x86emuOp_pop_DI,
+
+/* 0x60 */ x86emuOp_push_all,
+/* 0x61 */ x86emuOp_pop_all,
+/* 0x62 */ x86emuOp_illegal_op, /* bound */
+/* 0x63 */ x86emuOp_illegal_op, /* arpl */
+/* 0x64 */ x86emuOp_segovr_FS,
+/* 0x65 */ x86emuOp_segovr_GS,
+/* 0x66 */ x86emuOp_prefix_data,
+/* 0x67 */ x86emuOp_prefix_addr,
+
+/* 0x68 */ x86emuOp_push_word_IMM,
+/* 0x69 */ x86emuOp_imul_word_IMM,
+/* 0x6a */ x86emuOp_push_byte_IMM,
+/* 0x6b */ x86emuOp_imul_byte_IMM,
+/* 0x6c */ x86emuOp_ins_byte,
+/* 0x6d */ x86emuOp_ins_word,
+/* 0x6e */ x86emuOp_outs_byte,
+/* 0x6f */ x86emuOp_outs_word,
+
+/* 0x70 */ x86emuOp_jump_near_O,
+/* 0x71 */ x86emuOp_jump_near_NO,
+/* 0x72 */ x86emuOp_jump_near_B,
+/* 0x73 */ x86emuOp_jump_near_NB,
+/* 0x74 */ x86emuOp_jump_near_Z,
+/* 0x75 */ x86emuOp_jump_near_NZ,
+/* 0x76 */ x86emuOp_jump_near_BE,
+/* 0x77 */ x86emuOp_jump_near_NBE,
+
+/* 0x78 */ x86emuOp_jump_near_S,
+/* 0x79 */ x86emuOp_jump_near_NS,
+/* 0x7a */ x86emuOp_jump_near_P,
+/* 0x7b */ x86emuOp_jump_near_NP,
+/* 0x7c */ x86emuOp_jump_near_L,
+/* 0x7d */ x86emuOp_jump_near_NL,
+/* 0x7e */ x86emuOp_jump_near_LE,
+/* 0x7f */ x86emuOp_jump_near_NLE,
+
+/* 0x80 */ x86emuOp_opc80_byte_RM_IMM,
+/* 0x81 */ x86emuOp_opc81_word_RM_IMM,
+/* 0x82 */ x86emuOp_opc82_byte_RM_IMM,
+/* 0x83 */ x86emuOp_opc83_word_RM_IMM,
+/* 0x84 */ x86emuOp_test_byte_RM_R,
+/* 0x85 */ x86emuOp_test_word_RM_R,
+/* 0x86 */ x86emuOp_xchg_byte_RM_R,
+/* 0x87 */ x86emuOp_xchg_word_RM_R,
+
+/* 0x88 */ x86emuOp_mov_byte_RM_R,
+/* 0x89 */ x86emuOp_mov_word_RM_R,
+/* 0x8a */ x86emuOp_mov_byte_R_RM,
+/* 0x8b */ x86emuOp_mov_word_R_RM,
+/* 0x8c */ x86emuOp_mov_word_RM_SR,
+/* 0x8d */ x86emuOp_lea_word_R_M,
+/* 0x8e */ x86emuOp_mov_word_SR_RM,
+/* 0x8f */ x86emuOp_pop_RM,
+
+/* 0x90 */ x86emuOp_nop,
+/* 0x91 */ x86emuOp_xchg_word_AX_CX,
+/* 0x92 */ x86emuOp_xchg_word_AX_DX,
+/* 0x93 */ x86emuOp_xchg_word_AX_BX,
+/* 0x94 */ x86emuOp_xchg_word_AX_SP,
+/* 0x95 */ x86emuOp_xchg_word_AX_BP,
+/* 0x96 */ x86emuOp_xchg_word_AX_SI,
+/* 0x97 */ x86emuOp_xchg_word_AX_DI,
+
+/* 0x98 */ x86emuOp_cbw,
+/* 0x99 */ x86emuOp_cwd,
+/* 0x9a */ x86emuOp_call_far_IMM,
+/* 0x9b */ x86emuOp_wait,
+/* 0x9c */ x86emuOp_pushf_word,
+/* 0x9d */ x86emuOp_popf_word,
+/* 0x9e */ x86emuOp_sahf,
+/* 0x9f */ x86emuOp_lahf,
+
+/* 0xa0 */ x86emuOp_mov_AL_M_IMM,
+/* 0xa1 */ x86emuOp_mov_AX_M_IMM,
+/* 0xa2 */ x86emuOp_mov_M_AL_IMM,
+/* 0xa3 */ x86emuOp_mov_M_AX_IMM,
+/* 0xa4 */ x86emuOp_movs_byte,
+/* 0xa5 */ x86emuOp_movs_word,
+/* 0xa6 */ x86emuOp_cmps_byte,
+/* 0xa7 */ x86emuOp_cmps_word,
+/* 0xa8 */ x86emuOp_test_AL_IMM,
+/* 0xa9 */ x86emuOp_test_AX_IMM,
+/* 0xaa */ x86emuOp_stos_byte,
+/* 0xab */ x86emuOp_stos_word,
+/* 0xac */ x86emuOp_lods_byte,
+/* 0xad */ x86emuOp_lods_word,
+/* 0xac */ x86emuOp_scas_byte,
+/* 0xad */ x86emuOp_scas_word,
+
+
+/* 0xb0 */ x86emuOp_mov_byte_AL_IMM,
+/* 0xb1 */ x86emuOp_mov_byte_CL_IMM,
+/* 0xb2 */ x86emuOp_mov_byte_DL_IMM,
+/* 0xb3 */ x86emuOp_mov_byte_BL_IMM,
+/* 0xb4 */ x86emuOp_mov_byte_AH_IMM,
+/* 0xb5 */ x86emuOp_mov_byte_CH_IMM,
+/* 0xb6 */ x86emuOp_mov_byte_DH_IMM,
+/* 0xb7 */ x86emuOp_mov_byte_BH_IMM,
+
+/* 0xb8 */ x86emuOp_mov_word_AX_IMM,
+/* 0xb9 */ x86emuOp_mov_word_CX_IMM,
+/* 0xba */ x86emuOp_mov_word_DX_IMM,
+/* 0xbb */ x86emuOp_mov_word_BX_IMM,
+/* 0xbc */ x86emuOp_mov_word_SP_IMM,
+/* 0xbd */ x86emuOp_mov_word_BP_IMM,
+/* 0xbe */ x86emuOp_mov_word_SI_IMM,
+/* 0xbf */ x86emuOp_mov_word_DI_IMM,
+
+/* 0xc0 */ x86emuOp_opcC0_byte_RM_MEM,
+/* 0xc1 */ x86emuOp_opcC1_word_RM_MEM,
+/* 0xc2 */ x86emuOp_ret_near_IMM,
+/* 0xc3 */ x86emuOp_ret_near,
+/* 0xc4 */ x86emuOp_les_R_IMM,
+/* 0xc5 */ x86emuOp_lds_R_IMM,
+/* 0xc6 */ x86emuOp_mov_byte_RM_IMM,
+/* 0xc7 */ x86emuOp_mov_word_RM_IMM,
+/* 0xc8 */ x86emuOp_enter,
+/* 0xc9 */ x86emuOp_leave,
+/* 0xca */ x86emuOp_ret_far_IMM,
+/* 0xcb */ x86emuOp_ret_far,
+/* 0xcc */ x86emuOp_int3,
+/* 0xcd */ x86emuOp_int_IMM,
+/* 0xce */ x86emuOp_into,
+/* 0xcf */ x86emuOp_iret,
+
+/* 0xd0 */ x86emuOp_opcD0_byte_RM_1,
+/* 0xd1 */ x86emuOp_opcD1_word_RM_1,
+/* 0xd2 */ x86emuOp_opcD2_byte_RM_CL,
+/* 0xd3 */ x86emuOp_opcD3_word_RM_CL,
+/* 0xd4 */ x86emuOp_aam,
+/* 0xd5 */ x86emuOp_aad,
+/* 0xd6 */ x86emuOp_illegal_op, /* Undocumented SETALC instruction */
+/* 0xd7 */ x86emuOp_xlat,
+/* 0xd8 */ x86emuOp_esc_coprocess_d8,
+/* 0xd9 */ x86emuOp_esc_coprocess_d9,
+/* 0xda */ x86emuOp_esc_coprocess_da,
+/* 0xdb */ x86emuOp_esc_coprocess_db,
+/* 0xdc */ x86emuOp_esc_coprocess_dc,
+/* 0xdd */ x86emuOp_esc_coprocess_dd,
+/* 0xde */ x86emuOp_esc_coprocess_de,
+/* 0xdf */ x86emuOp_esc_coprocess_df,
+
+/* 0xe0 */ x86emuOp_loopne,
+/* 0xe1 */ x86emuOp_loope,
+/* 0xe2 */ x86emuOp_loop,
+/* 0xe3 */ x86emuOp_jcxz,
+/* 0xe4 */ x86emuOp_in_byte_AL_IMM,
+/* 0xe5 */ x86emuOp_in_word_AX_IMM,
+/* 0xe6 */ x86emuOp_out_byte_IMM_AL,
+/* 0xe7 */ x86emuOp_out_word_IMM_AX,
+
+/* 0xe8 */ x86emuOp_call_near_IMM,
+/* 0xe9 */ x86emuOp_jump_near_IMM,
+/* 0xea */ x86emuOp_jump_far_IMM,
+/* 0xeb */ x86emuOp_jump_byte_IMM,
+/* 0xec */ x86emuOp_in_byte_AL_DX,
+/* 0xed */ x86emuOp_in_word_AX_DX,
+/* 0xee */ x86emuOp_out_byte_DX_AL,
+/* 0xef */ x86emuOp_out_word_DX_AX,
+
+/* 0xf0 */ x86emuOp_lock,
+/* 0xf1 */ x86emuOp_illegal_op,
+/* 0xf2 */ x86emuOp_repne,
+/* 0xf3 */ x86emuOp_repe,
+/* 0xf4 */ x86emuOp_halt,
+/* 0xf5 */ x86emuOp_cmc,
+/* 0xf6 */ x86emuOp_opcF6_byte_RM,
+/* 0xf7 */ x86emuOp_opcF7_word_RM,
+
+/* 0xf8 */ x86emuOp_clc,
+/* 0xf9 */ x86emuOp_stc,
+/* 0xfa */ x86emuOp_cli,
+/* 0xfb */ x86emuOp_sti,
+/* 0xfc */ x86emuOp_cld,
+/* 0xfd */ x86emuOp_std,
+/* 0xfe */ x86emuOp_opcFE_byte_RM,
+/* 0xff */ x86emuOp_opcFF_word_RM,
+};
+
+void tables_relocate(unsigned int offset)
+{
+ int i;
+ for (i=0; i<8; i++)
+ {
+ opc80_byte_operation[i] -= offset;
+ opc81_word_operation[i] -= offset;
+ opc81_long_operation[i] -= offset;
+
+ opc82_byte_operation[i] -= offset;
+ opc83_word_operation[i] -= offset;
+ opc83_long_operation[i] -= offset;
+
+ opcD0_byte_operation[i] -= offset;
+ opcD1_word_operation[i] -= offset;
+ opcD1_long_operation[i] -= offset;
+ }
+}
diff --git a/board/MAI/bios_emulator/scitech/src/x86emu/ops2.c b/board/MAI/bios_emulator/scitech/src/x86emu/ops2.c
new file mode 100644
index 00000000000..2ada44ee212
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/x86emu/ops2.c
@@ -0,0 +1,2800 @@
+/****************************************************************************
+*
+* Realmode X86 Emulator Library
+*
+* Copyright (C) 1996-1999 SciTech Software, Inc.
+* Copyright (C) David Mosberger-Tang
+* Copyright (C) 1999 Egbert Eich
+*
+* ========================================================================
+*
+* Permission to use, copy, modify, distribute, and sell this software and
+* its documentation for any purpose is hereby granted without fee,
+* provided that the above copyright notice appear in all copies and that
+* both that copyright notice and this permission notice appear in
+* supporting documentation, and that the name of the authors not be used
+* in advertising or publicity pertaining to distribution of the software
+* without specific, written prior permission. The authors makes no
+* representations about the suitability of this software for any purpose.
+* It is provided "as is" without express or implied warranty.
+*
+* THE AUTHORS DISCLAIMS ALL WARRANTIES WITH REGARD TO THIS SOFTWARE,
+* INCLUDING ALL IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS, IN NO
+* EVENT SHALL THE AUTHORS BE LIABLE FOR ANY SPECIAL, INDIRECT OR
+* CONSEQUENTIAL DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF
+* USE, DATA OR PROFITS, WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE OR
+* OTHER TORTIOUS ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE OR
+* PERFORMANCE OF THIS SOFTWARE.
+*
+* ========================================================================
+*
+* Language: ANSI C
+* Environment: Any
+* Developer: Kendall Bennett
+*
+* Description: This file includes subroutines to implement the decoding
+* and emulation of all the x86 extended two-byte processor
+* instructions.
+*
+****************************************************************************/
+
+#include "x86emu/x86emui.h"
+
+/*----------------------------- Implementation ----------------------------*/
+
+/****************************************************************************
+PARAMETERS:
+op1 - Instruction op code
+
+REMARKS:
+Handles illegal opcodes.
+****************************************************************************/
+void x86emuOp2_illegal_op(
+ u8 op2)
+{
+ START_OF_INSTR();
+ DECODE_PRINTF("ILLEGAL EXTENDED X86 OPCODE\n");
+ TRACE_REGS();
+ printk("%04x:%04x: %02X ILLEGAL EXTENDED X86 OPCODE!\n",
+ M.x86.R_CS, M.x86.R_IP-2,op2);
+ HALT_SYS();
+ END_OF_INSTR();
+}
+
+#define xorl(a,b) ((a) && !(b)) || (!(a) && (b))
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0x0f,0x80-0x8F
+****************************************************************************/
+void x86emuOp2_long_jump(u8 op2)
+{
+ s32 target;
+ char *name = 0;
+ int cond = 0;
+
+ /* conditional jump to word offset. */
+ START_OF_INSTR();
+ switch (op2) {
+ case 0x80:
+ name = "JO\t";
+ cond = ACCESS_FLAG(F_OF);
+ break;
+ case 0x81:
+ name = "JNO\t";
+ cond = !ACCESS_FLAG(F_OF);
+ break;
+ case 0x82:
+ name = "JB\t";
+ cond = ACCESS_FLAG(F_CF);
+ break;
+ case 0x83:
+ name = "JNB\t";
+ cond = !ACCESS_FLAG(F_CF);
+ break;
+ case 0x84:
+ name = "JZ\t";
+ cond = ACCESS_FLAG(F_ZF);
+ break;
+ case 0x85:
+ name = "JNZ\t";
+ cond = !ACCESS_FLAG(F_ZF);
+ break;
+ case 0x86:
+ name = "JBE\t";
+ cond = ACCESS_FLAG(F_CF) || ACCESS_FLAG(F_ZF);
+ break;
+ case 0x87:
+ name = "JNBE\t";
+ cond = !(ACCESS_FLAG(F_CF) || ACCESS_FLAG(F_ZF));
+ break;
+ case 0x88:
+ name = "JS\t";
+ cond = ACCESS_FLAG(F_SF);
+ break;
+ case 0x89:
+ name = "JNS\t";
+ cond = !ACCESS_FLAG(F_SF);
+ break;
+ case 0x8a:
+ name = "JP\t";
+ cond = ACCESS_FLAG(F_PF);
+ break;
+ case 0x8b:
+ name = "JNP\t";
+ cond = !ACCESS_FLAG(F_PF);
+ break;
+ case 0x8c:
+ name = "JL\t";
+ cond = xorl(ACCESS_FLAG(F_SF), ACCESS_FLAG(F_OF));
+ break;
+ case 0x8d:
+ name = "JNL\t";
+ cond = xorl(ACCESS_FLAG(F_SF), ACCESS_FLAG(F_OF));
+ break;
+ case 0x8e:
+ name = "JLE\t";
+ cond = (xorl(ACCESS_FLAG(F_SF), ACCESS_FLAG(F_OF)) ||
+ ACCESS_FLAG(F_ZF));
+ break;
+ case 0x8f:
+ name = "JNLE\t";
+ cond = !(xorl(ACCESS_FLAG(F_SF), ACCESS_FLAG(F_OF)) ||
+ ACCESS_FLAG(F_ZF));
+ break;
+ }
+ DECODE_PRINTF(name);
+ target = (s16) fetch_word_imm();
+ target += (s16) M.x86.R_IP;
+ DECODE_PRINTF2("%04x\n", target);
+ TRACE_AND_STEP();
+ if (cond)
+ M.x86.R_IP = (u16)target;
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0x0f,0x90-0x9F
+****************************************************************************/
+void x86emuOp2_set_byte(u8 op2)
+{
+ int mod, rl, rh;
+ uint destoffset;
+ u8 *destreg;
+ char *name = 0;
+ int cond = 0;
+
+ START_OF_INSTR();
+ switch (op2) {
+ case 0x90:
+ name = "SETO\t";
+ cond = ACCESS_FLAG(F_OF);
+ break;
+ case 0x91:
+ name = "SETNO\t";
+ cond = !ACCESS_FLAG(F_OF);
+ break;
+ case 0x92:
+ name = "SETB\t";
+ cond = ACCESS_FLAG(F_CF);
+ break;
+ case 0x93:
+ name = "SETNB\t";
+ cond = !ACCESS_FLAG(F_CF);
+ break;
+ case 0x94:
+ name = "SETZ\t";
+ cond = ACCESS_FLAG(F_ZF);
+ break;
+ case 0x95:
+ name = "SETNZ\t";
+ cond = !ACCESS_FLAG(F_ZF);
+ break;
+ case 0x96:
+ name = "SETBE\t";
+ cond = ACCESS_FLAG(F_CF) || ACCESS_FLAG(F_ZF);
+ break;
+ case 0x97:
+ name = "SETNBE\t";
+ cond = !(ACCESS_FLAG(F_CF) || ACCESS_FLAG(F_ZF));
+ break;
+ case 0x98:
+ name = "SETS\t";
+ cond = ACCESS_FLAG(F_SF);
+ break;
+ case 0x99:
+ name = "SETNS\t";
+ cond = !ACCESS_FLAG(F_SF);
+ break;
+ case 0x9a:
+ name = "SETP\t";
+ cond = ACCESS_FLAG(F_PF);
+ break;
+ case 0x9b:
+ name = "SETNP\t";
+ cond = !ACCESS_FLAG(F_PF);
+ break;
+ case 0x9c:
+ name = "SETL\t";
+ cond = xorl(ACCESS_FLAG(F_SF), ACCESS_FLAG(F_OF));
+ break;
+ case 0x9d:
+ name = "SETNL\t";
+ cond = xorl(ACCESS_FLAG(F_SF), ACCESS_FLAG(F_OF));
+ break;
+ case 0x9e:
+ name = "SETLE\t";
+ cond = (xorl(ACCESS_FLAG(F_SF), ACCESS_FLAG(F_OF)) ||
+ ACCESS_FLAG(F_ZF));
+ break;
+ case 0x9f:
+ name = "SETNLE\t";
+ cond = !(xorl(ACCESS_FLAG(F_SF), ACCESS_FLAG(F_OF)) ||
+ ACCESS_FLAG(F_ZF));
+ break;
+ }
+ DECODE_PRINTF(name);
+ FETCH_DECODE_MODRM(mod, rh, rl);
+ switch (mod) {
+ case 0:
+ destoffset = decode_rm00_address(rl);
+ TRACE_AND_STEP();
+ store_data_byte(destoffset, cond ? 0x01 : 0x00);
+ break;
+ case 1:
+ destoffset = decode_rm01_address(rl);
+ TRACE_AND_STEP();
+ store_data_byte(destoffset, cond ? 0x01 : 0x00);
+ break;
+ case 2:
+ destoffset = decode_rm10_address(rl);
+ TRACE_AND_STEP();
+ store_data_byte(destoffset, cond ? 0x01 : 0x00);
+ break;
+ case 3: /* register to register */
+ destreg = DECODE_RM_BYTE_REGISTER(rl);
+ TRACE_AND_STEP();
+ *destreg = cond ? 0x01 : 0x00;
+ break;
+ }
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0x0f,0xa0
+****************************************************************************/
+void x86emuOp2_push_FS(u8 X86EMU_UNUSED(op2))
+{
+ START_OF_INSTR();
+ DECODE_PRINTF("PUSH\tFS\n");
+ TRACE_AND_STEP();
+ push_word(M.x86.R_FS);
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0x0f,0xa1
+****************************************************************************/
+void x86emuOp2_pop_FS(u8 X86EMU_UNUSED(op2))
+{
+ START_OF_INSTR();
+ DECODE_PRINTF("POP\tFS\n");
+ TRACE_AND_STEP();
+ M.x86.R_FS = pop_word();
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0x0f,0xa3
+****************************************************************************/
+void x86emuOp2_bt_R(u8 X86EMU_UNUSED(op2))
+{
+ int mod, rl, rh;
+ uint srcoffset;
+ int bit,disp;
+
+ START_OF_INSTR();
+ DECODE_PRINTF("BT\t");
+ FETCH_DECODE_MODRM(mod, rh, rl);
+ switch (mod) {
+ case 0:
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 srcval;
+ u32 *shiftreg;
+
+ srcoffset = decode_rm00_address(rl);
+ DECODE_PRINTF(",");
+ shiftreg = DECODE_RM_LONG_REGISTER(rh);
+ TRACE_AND_STEP();
+ bit = *shiftreg & 0x1F;
+ disp = (s16)*shiftreg >> 5;
+ srcval = fetch_data_long(srcoffset+disp);
+ CONDITIONAL_SET_FLAG(srcval & (0x1 << bit),F_CF);
+ } else {
+ u16 srcval;
+ u16 *shiftreg;
+
+ srcoffset = decode_rm00_address(rl);
+ DECODE_PRINTF(",");
+ shiftreg = DECODE_RM_WORD_REGISTER(rh);
+ TRACE_AND_STEP();
+ bit = *shiftreg & 0xF;
+ disp = (s16)*shiftreg >> 4;
+ srcval = fetch_data_word(srcoffset+disp);
+ CONDITIONAL_SET_FLAG(srcval & (0x1 << bit),F_CF);
+ }
+ break;
+ case 1:
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 srcval;
+ u32 *shiftreg;
+
+ srcoffset = decode_rm01_address(rl);
+ DECODE_PRINTF(",");
+ shiftreg = DECODE_RM_LONG_REGISTER(rh);
+ TRACE_AND_STEP();
+ bit = *shiftreg & 0x1F;
+ disp = (s16)*shiftreg >> 5;
+ srcval = fetch_data_long(srcoffset+disp);
+ CONDITIONAL_SET_FLAG(srcval & (0x1 << bit),F_CF);
+ } else {
+ u16 srcval;
+ u16 *shiftreg;
+
+ srcoffset = decode_rm01_address(rl);
+ DECODE_PRINTF(",");
+ shiftreg = DECODE_RM_WORD_REGISTER(rh);
+ TRACE_AND_STEP();
+ bit = *shiftreg & 0xF;
+ disp = (s16)*shiftreg >> 4;
+ srcval = fetch_data_word(srcoffset+disp);
+ CONDITIONAL_SET_FLAG(srcval & (0x1 << bit),F_CF);
+ }
+ break;
+ case 2:
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 srcval;
+ u32 *shiftreg;
+
+ srcoffset = decode_rm10_address(rl);
+ DECODE_PRINTF(",");
+ shiftreg = DECODE_RM_LONG_REGISTER(rh);
+ TRACE_AND_STEP();
+ bit = *shiftreg & 0x1F;
+ disp = (s16)*shiftreg >> 5;
+ srcval = fetch_data_long(srcoffset+disp);
+ CONDITIONAL_SET_FLAG(srcval & (0x1 << bit),F_CF);
+ } else {
+ u16 srcval;
+ u16 *shiftreg;
+
+ srcoffset = decode_rm10_address(rl);
+ DECODE_PRINTF(",");
+ shiftreg = DECODE_RM_WORD_REGISTER(rh);
+ TRACE_AND_STEP();
+ bit = *shiftreg & 0xF;
+ disp = (s16)*shiftreg >> 4;
+ srcval = fetch_data_word(srcoffset+disp);
+ CONDITIONAL_SET_FLAG(srcval & (0x1 << bit),F_CF);
+ }
+ break;
+ case 3: /* register to register */
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 *srcreg,*shiftreg;
+
+ srcreg = DECODE_RM_LONG_REGISTER(rl);
+ DECODE_PRINTF(",");
+ shiftreg = DECODE_RM_LONG_REGISTER(rh);
+ TRACE_AND_STEP();
+ bit = *shiftreg & 0x1F;
+ CONDITIONAL_SET_FLAG(*srcreg & (0x1 << bit),F_CF);
+ } else {
+ u16 *srcreg,*shiftreg;
+
+ srcreg = DECODE_RM_WORD_REGISTER(rl);
+ DECODE_PRINTF(",");
+ shiftreg = DECODE_RM_WORD_REGISTER(rh);
+ TRACE_AND_STEP();
+ bit = *shiftreg & 0xF;
+ CONDITIONAL_SET_FLAG(*srcreg & (0x1 << bit),F_CF);
+ }
+ break;
+ }
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0x0f,0xa4
+****************************************************************************/
+void x86emuOp2_shld_IMM(u8 X86EMU_UNUSED(op2))
+{
+ int mod, rl, rh;
+ uint destoffset;
+ u8 shift;
+
+ START_OF_INSTR();
+ DECODE_PRINTF("SHLD\t");
+ FETCH_DECODE_MODRM(mod, rh, rl);
+ switch (mod) {
+ case 0:
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 destval;
+ u32 *shiftreg;
+
+ destoffset = decode_rm00_address(rl);
+ DECODE_PRINTF(",");
+ shiftreg = DECODE_RM_LONG_REGISTER(rh);
+ DECODE_PRINTF(",");
+ shift = fetch_byte_imm();
+ DECODE_PRINTF2("%d\n", shift);
+ TRACE_AND_STEP();
+ destval = fetch_data_long(destoffset);
+ destval = shld_long(destval,*shiftreg,shift);
+ store_data_long(destoffset, destval);
+ } else {
+ u16 destval;
+ u16 *shiftreg;
+
+ destoffset = decode_rm00_address(rl);
+ DECODE_PRINTF(",");
+ shiftreg = DECODE_RM_WORD_REGISTER(rh);
+ DECODE_PRINTF(",");
+ shift = fetch_byte_imm();
+ DECODE_PRINTF2("%d\n", shift);
+ TRACE_AND_STEP();
+ destval = fetch_data_word(destoffset);
+ destval = shld_word(destval,*shiftreg,shift);
+ store_data_word(destoffset, destval);
+ }
+ break;
+ case 1:
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 destval;
+ u32 *shiftreg;
+
+ destoffset = decode_rm01_address(rl);
+ DECODE_PRINTF(",");
+ shiftreg = DECODE_RM_LONG_REGISTER(rh);
+ DECODE_PRINTF(",");
+ shift = fetch_byte_imm();
+ DECODE_PRINTF2("%d\n", shift);
+ TRACE_AND_STEP();
+ destval = fetch_data_long(destoffset);
+ destval = shld_long(destval,*shiftreg,shift);
+ store_data_long(destoffset, destval);
+ } else {
+ u16 destval;
+ u16 *shiftreg;
+
+ destoffset = decode_rm01_address(rl);
+ DECODE_PRINTF(",");
+ shiftreg = DECODE_RM_WORD_REGISTER(rh);
+ DECODE_PRINTF(",");
+ shift = fetch_byte_imm();
+ DECODE_PRINTF2("%d\n", shift);
+ TRACE_AND_STEP();
+ destval = fetch_data_word(destoffset);
+ destval = shld_word(destval,*shiftreg,shift);
+ store_data_word(destoffset, destval);
+ }
+ break;
+ case 2:
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 destval;
+ u32 *shiftreg;
+
+ destoffset = decode_rm10_address(rl);
+ DECODE_PRINTF(",");
+ shiftreg = DECODE_RM_LONG_REGISTER(rh);
+ DECODE_PRINTF(",");
+ shift = fetch_byte_imm();
+ DECODE_PRINTF2("%d\n", shift);
+ TRACE_AND_STEP();
+ destval = fetch_data_long(destoffset);
+ destval = shld_long(destval,*shiftreg,shift);
+ store_data_long(destoffset, destval);
+ } else {
+ u16 destval;
+ u16 *shiftreg;
+
+ destoffset = decode_rm10_address(rl);
+ DECODE_PRINTF(",");
+ shiftreg = DECODE_RM_WORD_REGISTER(rh);
+ DECODE_PRINTF(",");
+ shift = fetch_byte_imm();
+ DECODE_PRINTF2("%d\n", shift);
+ TRACE_AND_STEP();
+ destval = fetch_data_word(destoffset);
+ destval = shld_word(destval,*shiftreg,shift);
+ store_data_word(destoffset, destval);
+ }
+ break;
+ case 3: /* register to register */
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 *destreg,*shiftreg;
+
+ destreg = DECODE_RM_LONG_REGISTER(rl);
+ DECODE_PRINTF(",");
+ shiftreg = DECODE_RM_LONG_REGISTER(rh);
+ DECODE_PRINTF(",");
+ shift = fetch_byte_imm();
+ DECODE_PRINTF2("%d\n", shift);
+ TRACE_AND_STEP();
+ *destreg = shld_long(*destreg,*shiftreg,shift);
+ } else {
+ u16 *destreg,*shiftreg;
+
+ destreg = DECODE_RM_WORD_REGISTER(rl);
+ DECODE_PRINTF(",");
+ shiftreg = DECODE_RM_WORD_REGISTER(rh);
+ DECODE_PRINTF(",");
+ shift = fetch_byte_imm();
+ DECODE_PRINTF2("%d\n", shift);
+ TRACE_AND_STEP();
+ *destreg = shld_word(*destreg,*shiftreg,shift);
+ }
+ break;
+ }
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0x0f,0xa5
+****************************************************************************/
+void x86emuOp2_shld_CL(u8 X86EMU_UNUSED(op2))
+{
+ int mod, rl, rh;
+ uint destoffset;
+
+ START_OF_INSTR();
+ DECODE_PRINTF("SHLD\t");
+ FETCH_DECODE_MODRM(mod, rh, rl);
+ switch (mod) {
+ case 0:
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 destval;
+ u32 *shiftreg;
+
+ destoffset = decode_rm00_address(rl);
+ DECODE_PRINTF(",");
+ shiftreg = DECODE_RM_LONG_REGISTER(rh);
+ DECODE_PRINTF(",CL\n");
+ TRACE_AND_STEP();
+ destval = fetch_data_long(destoffset);
+ destval = shld_long(destval,*shiftreg,M.x86.R_CL);
+ store_data_long(destoffset, destval);
+ } else {
+ u16 destval;
+ u16 *shiftreg;
+
+ destoffset = decode_rm00_address(rl);
+ DECODE_PRINTF(",");
+ shiftreg = DECODE_RM_WORD_REGISTER(rh);
+ DECODE_PRINTF(",CL\n");
+ TRACE_AND_STEP();
+ destval = fetch_data_word(destoffset);
+ destval = shld_word(destval,*shiftreg,M.x86.R_CL);
+ store_data_word(destoffset, destval);
+ }
+ break;
+ case 1:
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 destval;
+ u32 *shiftreg;
+
+ destoffset = decode_rm01_address(rl);
+ DECODE_PRINTF(",");
+ shiftreg = DECODE_RM_LONG_REGISTER(rh);
+ DECODE_PRINTF(",CL\n");
+ TRACE_AND_STEP();
+ destval = fetch_data_long(destoffset);
+ destval = shld_long(destval,*shiftreg,M.x86.R_CL);
+ store_data_long(destoffset, destval);
+ } else {
+ u16 destval;
+ u16 *shiftreg;
+
+ destoffset = decode_rm01_address(rl);
+ DECODE_PRINTF(",");
+ shiftreg = DECODE_RM_WORD_REGISTER(rh);
+ DECODE_PRINTF(",CL\n");
+ TRACE_AND_STEP();
+ destval = fetch_data_word(destoffset);
+ destval = shld_word(destval,*shiftreg,M.x86.R_CL);
+ store_data_word(destoffset, destval);
+ }
+ break;
+ case 2:
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 destval;
+ u32 *shiftreg;
+
+ destoffset = decode_rm10_address(rl);
+ DECODE_PRINTF(",");
+ shiftreg = DECODE_RM_LONG_REGISTER(rh);
+ DECODE_PRINTF(",CL\n");
+ TRACE_AND_STEP();
+ destval = fetch_data_long(destoffset);
+ destval = shld_long(destval,*shiftreg,M.x86.R_CL);
+ store_data_long(destoffset, destval);
+ } else {
+ u16 destval;
+ u16 *shiftreg;
+
+ destoffset = decode_rm10_address(rl);
+ DECODE_PRINTF(",");
+ shiftreg = DECODE_RM_WORD_REGISTER(rh);
+ DECODE_PRINTF(",CL\n");
+ TRACE_AND_STEP();
+ destval = fetch_data_word(destoffset);
+ destval = shld_word(destval,*shiftreg,M.x86.R_CL);
+ store_data_word(destoffset, destval);
+ }
+ break;
+ case 3: /* register to register */
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 *destreg,*shiftreg;
+
+ destreg = DECODE_RM_LONG_REGISTER(rl);
+ DECODE_PRINTF(",");
+ shiftreg = DECODE_RM_LONG_REGISTER(rh);
+ DECODE_PRINTF(",CL\n");
+ TRACE_AND_STEP();
+ *destreg = shld_long(*destreg,*shiftreg,M.x86.R_CL);
+ } else {
+ u16 *destreg,*shiftreg;
+
+ destreg = DECODE_RM_WORD_REGISTER(rl);
+ DECODE_PRINTF(",");
+ shiftreg = DECODE_RM_WORD_REGISTER(rh);
+ DECODE_PRINTF(",CL\n");
+ TRACE_AND_STEP();
+ *destreg = shld_word(*destreg,*shiftreg,M.x86.R_CL);
+ }
+ break;
+ }
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0x0f,0xa8
+****************************************************************************/
+void x86emuOp2_push_GS(u8 X86EMU_UNUSED(op2))
+{
+ START_OF_INSTR();
+ DECODE_PRINTF("PUSH\tGS\n");
+ TRACE_AND_STEP();
+ push_word(M.x86.R_GS);
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0x0f,0xa9
+****************************************************************************/
+void x86emuOp2_pop_GS(u8 X86EMU_UNUSED(op2))
+{
+ START_OF_INSTR();
+ DECODE_PRINTF("POP\tGS\n");
+ TRACE_AND_STEP();
+ M.x86.R_GS = pop_word();
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0x0f,0xaa
+****************************************************************************/
+void x86emuOp2_bts_R(u8 X86EMU_UNUSED(op2))
+{
+ int mod, rl, rh;
+ uint srcoffset;
+ int bit,disp;
+
+ START_OF_INSTR();
+ DECODE_PRINTF("BTS\t");
+ FETCH_DECODE_MODRM(mod, rh, rl);
+ switch (mod) {
+ case 0:
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 srcval,mask;
+ u32 *shiftreg;
+
+ srcoffset = decode_rm00_address(rl);
+ DECODE_PRINTF(",");
+ shiftreg = DECODE_RM_LONG_REGISTER(rh);
+ TRACE_AND_STEP();
+ bit = *shiftreg & 0x1F;
+ disp = (s16)*shiftreg >> 5;
+ srcval = fetch_data_long(srcoffset+disp);
+ mask = (0x1 << bit);
+ CONDITIONAL_SET_FLAG(srcval & mask,F_CF);
+ store_data_long(srcoffset+disp, srcval | mask);
+ } else {
+ u16 srcval,mask;
+ u16 *shiftreg;
+
+ srcoffset = decode_rm00_address(rl);
+ DECODE_PRINTF(",");
+ shiftreg = DECODE_RM_WORD_REGISTER(rh);
+ TRACE_AND_STEP();
+ bit = *shiftreg & 0xF;
+ disp = (s16)*shiftreg >> 4;
+ srcval = fetch_data_word(srcoffset+disp);
+ mask = (u16)(0x1 << bit);
+ CONDITIONAL_SET_FLAG(srcval & mask,F_CF);
+ store_data_word(srcoffset+disp, srcval | mask);
+ }
+ break;
+ case 1:
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 srcval,mask;
+ u32 *shiftreg;
+
+ srcoffset = decode_rm01_address(rl);
+ DECODE_PRINTF(",");
+ shiftreg = DECODE_RM_LONG_REGISTER(rh);
+ TRACE_AND_STEP();
+ bit = *shiftreg & 0x1F;
+ disp = (s16)*shiftreg >> 5;
+ srcval = fetch_data_long(srcoffset+disp);
+ mask = (0x1 << bit);
+ CONDITIONAL_SET_FLAG(srcval & mask,F_CF);
+ store_data_long(srcoffset+disp, srcval | mask);
+ } else {
+ u16 srcval,mask;
+ u16 *shiftreg;
+
+ srcoffset = decode_rm01_address(rl);
+ DECODE_PRINTF(",");
+ shiftreg = DECODE_RM_WORD_REGISTER(rh);
+ TRACE_AND_STEP();
+ bit = *shiftreg & 0xF;
+ disp = (s16)*shiftreg >> 4;
+ srcval = fetch_data_word(srcoffset+disp);
+ mask = (u16)(0x1 << bit);
+ CONDITIONAL_SET_FLAG(srcval & mask,F_CF);
+ store_data_word(srcoffset+disp, srcval | mask);
+ }
+ break;
+ case 2:
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 srcval,mask;
+ u32 *shiftreg;
+
+ srcoffset = decode_rm10_address(rl);
+ DECODE_PRINTF(",");
+ shiftreg = DECODE_RM_LONG_REGISTER(rh);
+ TRACE_AND_STEP();
+ bit = *shiftreg & 0x1F;
+ disp = (s16)*shiftreg >> 5;
+ srcval = fetch_data_long(srcoffset+disp);
+ mask = (0x1 << bit);
+ CONDITIONAL_SET_FLAG(srcval & mask,F_CF);
+ store_data_long(srcoffset+disp, srcval | mask);
+ } else {
+ u16 srcval,mask;
+ u16 *shiftreg;
+
+ srcoffset = decode_rm10_address(rl);
+ DECODE_PRINTF(",");
+ shiftreg = DECODE_RM_WORD_REGISTER(rh);
+ TRACE_AND_STEP();
+ bit = *shiftreg & 0xF;
+ disp = (s16)*shiftreg >> 4;
+ srcval = fetch_data_word(srcoffset+disp);
+ mask = (u16)(0x1 << bit);
+ CONDITIONAL_SET_FLAG(srcval & mask,F_CF);
+ store_data_word(srcoffset+disp, srcval | mask);
+ }
+ break;
+ case 3: /* register to register */
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 *srcreg,*shiftreg;
+ u32 mask;
+
+ srcreg = DECODE_RM_LONG_REGISTER(rl);
+ DECODE_PRINTF(",");
+ shiftreg = DECODE_RM_LONG_REGISTER(rh);
+ TRACE_AND_STEP();
+ bit = *shiftreg & 0x1F;
+ mask = (0x1 << bit);
+ CONDITIONAL_SET_FLAG(*srcreg & mask,F_CF);
+ *srcreg |= mask;
+ } else {
+ u16 *srcreg,*shiftreg;
+ u16 mask;
+
+ srcreg = DECODE_RM_WORD_REGISTER(rl);
+ DECODE_PRINTF(",");
+ shiftreg = DECODE_RM_WORD_REGISTER(rh);
+ TRACE_AND_STEP();
+ bit = *shiftreg & 0xF;
+ mask = (u16)(0x1 << bit);
+ CONDITIONAL_SET_FLAG(*srcreg & mask,F_CF);
+ *srcreg |= mask;
+ }
+ break;
+ }
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0x0f,0xac
+****************************************************************************/
+void x86emuOp2_shrd_IMM(u8 X86EMU_UNUSED(op2))
+{
+ int mod, rl, rh;
+ uint destoffset;
+ u8 shift;
+
+ START_OF_INSTR();
+ DECODE_PRINTF("SHLD\t");
+ FETCH_DECODE_MODRM(mod, rh, rl);
+ switch (mod) {
+ case 0:
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 destval;
+ u32 *shiftreg;
+
+ destoffset = decode_rm00_address(rl);
+ DECODE_PRINTF(",");
+ shiftreg = DECODE_RM_LONG_REGISTER(rh);
+ DECODE_PRINTF(",");
+ shift = fetch_byte_imm();
+ DECODE_PRINTF2("%d\n", shift);
+ TRACE_AND_STEP();
+ destval = fetch_data_long(destoffset);
+ destval = shrd_long(destval,*shiftreg,shift);
+ store_data_long(destoffset, destval);
+ } else {
+ u16 destval;
+ u16 *shiftreg;
+
+ destoffset = decode_rm00_address(rl);
+ DECODE_PRINTF(",");
+ shiftreg = DECODE_RM_WORD_REGISTER(rh);
+ DECODE_PRINTF(",");
+ shift = fetch_byte_imm();
+ DECODE_PRINTF2("%d\n", shift);
+ TRACE_AND_STEP();
+ destval = fetch_data_word(destoffset);
+ destval = shrd_word(destval,*shiftreg,shift);
+ store_data_word(destoffset, destval);
+ }
+ break;
+ case 1:
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 destval;
+ u32 *shiftreg;
+
+ destoffset = decode_rm01_address(rl);
+ DECODE_PRINTF(",");
+ shiftreg = DECODE_RM_LONG_REGISTER(rh);
+ DECODE_PRINTF(",");
+ shift = fetch_byte_imm();
+ DECODE_PRINTF2("%d\n", shift);
+ TRACE_AND_STEP();
+ destval = fetch_data_long(destoffset);
+ destval = shrd_long(destval,*shiftreg,shift);
+ store_data_long(destoffset, destval);
+ } else {
+ u16 destval;
+ u16 *shiftreg;
+
+ destoffset = decode_rm01_address(rl);
+ DECODE_PRINTF(",");
+ shiftreg = DECODE_RM_WORD_REGISTER(rh);
+ DECODE_PRINTF(",");
+ shift = fetch_byte_imm();
+ DECODE_PRINTF2("%d\n", shift);
+ TRACE_AND_STEP();
+ destval = fetch_data_word(destoffset);
+ destval = shrd_word(destval,*shiftreg,shift);
+ store_data_word(destoffset, destval);
+ }
+ break;
+ case 2:
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 destval;
+ u32 *shiftreg;
+
+ destoffset = decode_rm10_address(rl);
+ DECODE_PRINTF(",");
+ shiftreg = DECODE_RM_LONG_REGISTER(rh);
+ DECODE_PRINTF(",");
+ shift = fetch_byte_imm();
+ DECODE_PRINTF2("%d\n", shift);
+ TRACE_AND_STEP();
+ destval = fetch_data_long(destoffset);
+ destval = shrd_long(destval,*shiftreg,shift);
+ store_data_long(destoffset, destval);
+ } else {
+ u16 destval;
+ u16 *shiftreg;
+
+ destoffset = decode_rm10_address(rl);
+ DECODE_PRINTF(",");
+ shiftreg = DECODE_RM_WORD_REGISTER(rh);
+ DECODE_PRINTF(",");
+ shift = fetch_byte_imm();
+ DECODE_PRINTF2("%d\n", shift);
+ TRACE_AND_STEP();
+ destval = fetch_data_word(destoffset);
+ destval = shrd_word(destval,*shiftreg,shift);
+ store_data_word(destoffset, destval);
+ }
+ break;
+ case 3: /* register to register */
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 *destreg,*shiftreg;
+
+ destreg = DECODE_RM_LONG_REGISTER(rl);
+ DECODE_PRINTF(",");
+ shiftreg = DECODE_RM_LONG_REGISTER(rh);
+ DECODE_PRINTF(",");
+ shift = fetch_byte_imm();
+ DECODE_PRINTF2("%d\n", shift);
+ TRACE_AND_STEP();
+ *destreg = shrd_long(*destreg,*shiftreg,shift);
+ } else {
+ u16 *destreg,*shiftreg;
+
+ destreg = DECODE_RM_WORD_REGISTER(rl);
+ DECODE_PRINTF(",");
+ shiftreg = DECODE_RM_WORD_REGISTER(rh);
+ DECODE_PRINTF(",");
+ shift = fetch_byte_imm();
+ DECODE_PRINTF2("%d\n", shift);
+ TRACE_AND_STEP();
+ *destreg = shrd_word(*destreg,*shiftreg,shift);
+ }
+ break;
+ }
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0x0f,0xad
+****************************************************************************/
+void x86emuOp2_shrd_CL(u8 X86EMU_UNUSED(op2))
+{
+ int mod, rl, rh;
+ uint destoffset;
+
+ START_OF_INSTR();
+ DECODE_PRINTF("SHLD\t");
+ FETCH_DECODE_MODRM(mod, rh, rl);
+ switch (mod) {
+ case 0:
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 destval;
+ u32 *shiftreg;
+
+ destoffset = decode_rm00_address(rl);
+ DECODE_PRINTF(",");
+ shiftreg = DECODE_RM_LONG_REGISTER(rh);
+ DECODE_PRINTF(",CL\n");
+ TRACE_AND_STEP();
+ destval = fetch_data_long(destoffset);
+ destval = shrd_long(destval,*shiftreg,M.x86.R_CL);
+ store_data_long(destoffset, destval);
+ } else {
+ u16 destval;
+ u16 *shiftreg;
+
+ destoffset = decode_rm00_address(rl);
+ DECODE_PRINTF(",");
+ shiftreg = DECODE_RM_WORD_REGISTER(rh);
+ DECODE_PRINTF(",CL\n");
+ TRACE_AND_STEP();
+ destval = fetch_data_word(destoffset);
+ destval = shrd_word(destval,*shiftreg,M.x86.R_CL);
+ store_data_word(destoffset, destval);
+ }
+ break;
+ case 1:
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 destval;
+ u32 *shiftreg;
+
+ destoffset = decode_rm01_address(rl);
+ DECODE_PRINTF(",");
+ shiftreg = DECODE_RM_LONG_REGISTER(rh);
+ DECODE_PRINTF(",CL\n");
+ TRACE_AND_STEP();
+ destval = fetch_data_long(destoffset);
+ destval = shrd_long(destval,*shiftreg,M.x86.R_CL);
+ store_data_long(destoffset, destval);
+ } else {
+ u16 destval;
+ u16 *shiftreg;
+
+ destoffset = decode_rm01_address(rl);
+ DECODE_PRINTF(",");
+ shiftreg = DECODE_RM_WORD_REGISTER(rh);
+ DECODE_PRINTF(",CL\n");
+ TRACE_AND_STEP();
+ destval = fetch_data_word(destoffset);
+ destval = shrd_word(destval,*shiftreg,M.x86.R_CL);
+ store_data_word(destoffset, destval);
+ }
+ break;
+ case 2:
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 destval;
+ u32 *shiftreg;
+
+ destoffset = decode_rm10_address(rl);
+ DECODE_PRINTF(",");
+ shiftreg = DECODE_RM_LONG_REGISTER(rh);
+ DECODE_PRINTF(",CL\n");
+ TRACE_AND_STEP();
+ destval = fetch_data_long(destoffset);
+ destval = shrd_long(destval,*shiftreg,M.x86.R_CL);
+ store_data_long(destoffset, destval);
+ } else {
+ u16 destval;
+ u16 *shiftreg;
+
+ destoffset = decode_rm10_address(rl);
+ DECODE_PRINTF(",");
+ shiftreg = DECODE_RM_WORD_REGISTER(rh);
+ DECODE_PRINTF(",CL\n");
+ TRACE_AND_STEP();
+ destval = fetch_data_word(destoffset);
+ destval = shrd_word(destval,*shiftreg,M.x86.R_CL);
+ store_data_word(destoffset, destval);
+ }
+ break;
+ case 3: /* register to register */
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 *destreg,*shiftreg;
+
+ destreg = DECODE_RM_LONG_REGISTER(rl);
+ DECODE_PRINTF(",");
+ shiftreg = DECODE_RM_LONG_REGISTER(rh);
+ DECODE_PRINTF(",CL\n");
+ TRACE_AND_STEP();
+ *destreg = shrd_long(*destreg,*shiftreg,M.x86.R_CL);
+ } else {
+ u16 *destreg,*shiftreg;
+
+ destreg = DECODE_RM_WORD_REGISTER(rl);
+ DECODE_PRINTF(",");
+ shiftreg = DECODE_RM_WORD_REGISTER(rh);
+ DECODE_PRINTF(",CL\n");
+ TRACE_AND_STEP();
+ *destreg = shrd_word(*destreg,*shiftreg,M.x86.R_CL);
+ }
+ break;
+ }
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0x0f,0xaf
+****************************************************************************/
+void x86emuOp2_imul_R_RM(u8 X86EMU_UNUSED(op2))
+{
+ int mod, rl, rh;
+ uint srcoffset;
+
+ START_OF_INSTR();
+ DECODE_PRINTF("IMUL\t");
+ FETCH_DECODE_MODRM(mod, rh, rl);
+ switch (mod) {
+ case 0:
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 *destreg;
+ u32 srcval;
+ u32 res_lo,res_hi;
+
+ destreg = DECODE_RM_LONG_REGISTER(rh);
+ DECODE_PRINTF(",");
+ srcoffset = decode_rm00_address(rl);
+ srcval = fetch_data_long(srcoffset);
+ TRACE_AND_STEP();
+ imul_long_direct(&res_lo,&res_hi,(s32)*destreg,(s32)srcval);
+ if (res_hi != 0) {
+ SET_FLAG(F_CF);
+ SET_FLAG(F_OF);
+ } else {
+ CLEAR_FLAG(F_CF);
+ CLEAR_FLAG(F_OF);
+ }
+ *destreg = (u32)res_lo;
+ } else {
+ u16 *destreg;
+ u16 srcval;
+ u32 res;
+
+ destreg = DECODE_RM_WORD_REGISTER(rh);
+ DECODE_PRINTF(",");
+ srcoffset = decode_rm00_address(rl);
+ srcval = fetch_data_word(srcoffset);
+ TRACE_AND_STEP();
+ res = (s16)*destreg * (s16)srcval;
+ if (res > 0xFFFF) {
+ SET_FLAG(F_CF);
+ SET_FLAG(F_OF);
+ } else {
+ CLEAR_FLAG(F_CF);
+ CLEAR_FLAG(F_OF);
+ }
+ *destreg = (u16)res;
+ }
+ break;
+ case 1:
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 *destreg;
+ u32 srcval;
+ u32 res_lo,res_hi;
+
+ destreg = DECODE_RM_LONG_REGISTER(rh);
+ DECODE_PRINTF(",");
+ srcoffset = decode_rm01_address(rl);
+ srcval = fetch_data_long(srcoffset);
+ TRACE_AND_STEP();
+ imul_long_direct(&res_lo,&res_hi,(s32)*destreg,(s32)srcval);
+ if (res_hi != 0) {
+ SET_FLAG(F_CF);
+ SET_FLAG(F_OF);
+ } else {
+ CLEAR_FLAG(F_CF);
+ CLEAR_FLAG(F_OF);
+ }
+ *destreg = (u32)res_lo;
+ } else {
+ u16 *destreg;
+ u16 srcval;
+ u32 res;
+
+ destreg = DECODE_RM_WORD_REGISTER(rh);
+ DECODE_PRINTF(",");
+ srcoffset = decode_rm01_address(rl);
+ srcval = fetch_data_word(srcoffset);
+ TRACE_AND_STEP();
+ res = (s16)*destreg * (s16)srcval;
+ if (res > 0xFFFF) {
+ SET_FLAG(F_CF);
+ SET_FLAG(F_OF);
+ } else {
+ CLEAR_FLAG(F_CF);
+ CLEAR_FLAG(F_OF);
+ }
+ *destreg = (u16)res;
+ }
+ break;
+ case 2:
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 *destreg;
+ u32 srcval;
+ u32 res_lo,res_hi;
+
+ destreg = DECODE_RM_LONG_REGISTER(rh);
+ DECODE_PRINTF(",");
+ srcoffset = decode_rm10_address(rl);
+ srcval = fetch_data_long(srcoffset);
+ TRACE_AND_STEP();
+ imul_long_direct(&res_lo,&res_hi,(s32)*destreg,(s32)srcval);
+ if (res_hi != 0) {
+ SET_FLAG(F_CF);
+ SET_FLAG(F_OF);
+ } else {
+ CLEAR_FLAG(F_CF);
+ CLEAR_FLAG(F_OF);
+ }
+ *destreg = (u32)res_lo;
+ } else {
+ u16 *destreg;
+ u16 srcval;
+ u32 res;
+
+ destreg = DECODE_RM_WORD_REGISTER(rh);
+ DECODE_PRINTF(",");
+ srcoffset = decode_rm10_address(rl);
+ srcval = fetch_data_word(srcoffset);
+ TRACE_AND_STEP();
+ res = (s16)*destreg * (s16)srcval;
+ if (res > 0xFFFF) {
+ SET_FLAG(F_CF);
+ SET_FLAG(F_OF);
+ } else {
+ CLEAR_FLAG(F_CF);
+ CLEAR_FLAG(F_OF);
+ }
+ *destreg = (u16)res;
+ }
+ break;
+ case 3: /* register to register */
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 *destreg,*srcreg;
+ u32 res_lo,res_hi;
+
+ destreg = DECODE_RM_LONG_REGISTER(rh);
+ DECODE_PRINTF(",");
+ srcreg = DECODE_RM_LONG_REGISTER(rl);
+ TRACE_AND_STEP();
+ imul_long_direct(&res_lo,&res_hi,(s32)*destreg,(s32)*srcreg);
+ if (res_hi != 0) {
+ SET_FLAG(F_CF);
+ SET_FLAG(F_OF);
+ } else {
+ CLEAR_FLAG(F_CF);
+ CLEAR_FLAG(F_OF);
+ }
+ *destreg = (u32)res_lo;
+ } else {
+ u16 *destreg,*srcreg;
+ u32 res;
+
+ destreg = DECODE_RM_WORD_REGISTER(rh);
+ DECODE_PRINTF(",");
+ srcreg = DECODE_RM_WORD_REGISTER(rl);
+ res = (s16)*destreg * (s16)*srcreg;
+ if (res > 0xFFFF) {
+ SET_FLAG(F_CF);
+ SET_FLAG(F_OF);
+ } else {
+ CLEAR_FLAG(F_CF);
+ CLEAR_FLAG(F_OF);
+ }
+ *destreg = (u16)res;
+ }
+ break;
+ }
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0x0f,0xb2
+****************************************************************************/
+void x86emuOp2_lss_R_IMM(u8 X86EMU_UNUSED(op2))
+{
+ int mod, rh, rl;
+ u16 *dstreg;
+ uint srcoffset;
+
+ START_OF_INSTR();
+ DECODE_PRINTF("LSS\t");
+ FETCH_DECODE_MODRM(mod, rh, rl);
+ switch (mod) {
+ case 0:
+ dstreg = DECODE_RM_WORD_REGISTER(rh);
+ DECODE_PRINTF(",");
+ srcoffset = decode_rm00_address(rl);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ *dstreg = fetch_data_word(srcoffset);
+ M.x86.R_SS = fetch_data_word(srcoffset + 2);
+ break;
+ case 1:
+ dstreg = DECODE_RM_WORD_REGISTER(rh);
+ DECODE_PRINTF(",");
+ srcoffset = decode_rm01_address(rl);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ *dstreg = fetch_data_word(srcoffset);
+ M.x86.R_SS = fetch_data_word(srcoffset + 2);
+ break;
+ case 2:
+ dstreg = DECODE_RM_WORD_REGISTER(rh);
+ DECODE_PRINTF(",");
+ srcoffset = decode_rm10_address(rl);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ *dstreg = fetch_data_word(srcoffset);
+ M.x86.R_SS = fetch_data_word(srcoffset + 2);
+ break;
+ case 3: /* register to register */
+ /* UNDEFINED! */
+ TRACE_AND_STEP();
+ }
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0x0f,0xb3
+****************************************************************************/
+void x86emuOp2_btr_R(u8 X86EMU_UNUSED(op2))
+{
+ int mod, rl, rh;
+ uint srcoffset;
+ int bit,disp;
+
+ START_OF_INSTR();
+ DECODE_PRINTF("BTR\t");
+ FETCH_DECODE_MODRM(mod, rh, rl);
+ switch (mod) {
+ case 0:
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 srcval,mask;
+ u32 *shiftreg;
+
+ srcoffset = decode_rm00_address(rl);
+ DECODE_PRINTF(",");
+ shiftreg = DECODE_RM_LONG_REGISTER(rh);
+ TRACE_AND_STEP();
+ bit = *shiftreg & 0x1F;
+ disp = (s16)*shiftreg >> 5;
+ srcval = fetch_data_long(srcoffset+disp);
+ mask = (0x1 << bit);
+ CONDITIONAL_SET_FLAG(srcval & mask,F_CF);
+ store_data_long(srcoffset+disp, srcval & ~mask);
+ } else {
+ u16 srcval,mask;
+ u16 *shiftreg;
+
+ srcoffset = decode_rm00_address(rl);
+ DECODE_PRINTF(",");
+ shiftreg = DECODE_RM_WORD_REGISTER(rh);
+ TRACE_AND_STEP();
+ bit = *shiftreg & 0xF;
+ disp = (s16)*shiftreg >> 4;
+ srcval = fetch_data_word(srcoffset+disp);
+ mask = (u16)(0x1 << bit);
+ CONDITIONAL_SET_FLAG(srcval & mask,F_CF);
+ store_data_word(srcoffset+disp, (u16)(srcval & ~mask));
+ }
+ break;
+ case 1:
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 srcval,mask;
+ u32 *shiftreg;
+
+ srcoffset = decode_rm01_address(rl);
+ DECODE_PRINTF(",");
+ shiftreg = DECODE_RM_LONG_REGISTER(rh);
+ TRACE_AND_STEP();
+ bit = *shiftreg & 0x1F;
+ disp = (s16)*shiftreg >> 5;
+ srcval = fetch_data_long(srcoffset+disp);
+ mask = (0x1 << bit);
+ CONDITIONAL_SET_FLAG(srcval & mask,F_CF);
+ store_data_long(srcoffset+disp, srcval & ~mask);
+ } else {
+ u16 srcval,mask;
+ u16 *shiftreg;
+
+ srcoffset = decode_rm01_address(rl);
+ DECODE_PRINTF(",");
+ shiftreg = DECODE_RM_WORD_REGISTER(rh);
+ TRACE_AND_STEP();
+ bit = *shiftreg & 0xF;
+ disp = (s16)*shiftreg >> 4;
+ srcval = fetch_data_word(srcoffset+disp);
+ mask = (u16)(0x1 << bit);
+ CONDITIONAL_SET_FLAG(srcval & mask,F_CF);
+ store_data_word(srcoffset+disp, (u16)(srcval & ~mask));
+ }
+ break;
+ case 2:
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 srcval,mask;
+ u32 *shiftreg;
+
+ srcoffset = decode_rm10_address(rl);
+ DECODE_PRINTF(",");
+ shiftreg = DECODE_RM_LONG_REGISTER(rh);
+ TRACE_AND_STEP();
+ bit = *shiftreg & 0x1F;
+ disp = (s16)*shiftreg >> 5;
+ srcval = fetch_data_long(srcoffset+disp);
+ mask = (0x1 << bit);
+ CONDITIONAL_SET_FLAG(srcval & mask,F_CF);
+ store_data_long(srcoffset+disp, srcval & ~mask);
+ } else {
+ u16 srcval,mask;
+ u16 *shiftreg;
+
+ srcoffset = decode_rm10_address(rl);
+ DECODE_PRINTF(",");
+ shiftreg = DECODE_RM_WORD_REGISTER(rh);
+ TRACE_AND_STEP();
+ bit = *shiftreg & 0xF;
+ disp = (s16)*shiftreg >> 4;
+ srcval = fetch_data_word(srcoffset+disp);
+ mask = (u16)(0x1 << bit);
+ CONDITIONAL_SET_FLAG(srcval & mask,F_CF);
+ store_data_word(srcoffset+disp, (u16)(srcval & ~mask));
+ }
+ break;
+ case 3: /* register to register */
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 *srcreg,*shiftreg;
+ u32 mask;
+
+ srcreg = DECODE_RM_LONG_REGISTER(rl);
+ DECODE_PRINTF(",");
+ shiftreg = DECODE_RM_LONG_REGISTER(rh);
+ TRACE_AND_STEP();
+ bit = *shiftreg & 0x1F;
+ mask = (0x1 << bit);
+ CONDITIONAL_SET_FLAG(*srcreg & mask,F_CF);
+ *srcreg &= ~mask;
+ } else {
+ u16 *srcreg,*shiftreg;
+ u16 mask;
+
+ srcreg = DECODE_RM_WORD_REGISTER(rl);
+ DECODE_PRINTF(",");
+ shiftreg = DECODE_RM_WORD_REGISTER(rh);
+ TRACE_AND_STEP();
+ bit = *shiftreg & 0xF;
+ mask = (u16)(0x1 << bit);
+ CONDITIONAL_SET_FLAG(*srcreg & mask,F_CF);
+ *srcreg &= ~mask;
+ }
+ break;
+ }
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0x0f,0xb4
+****************************************************************************/
+void x86emuOp2_lfs_R_IMM(u8 X86EMU_UNUSED(op2))
+{
+ int mod, rh, rl;
+ u16 *dstreg;
+ uint srcoffset;
+
+ START_OF_INSTR();
+ DECODE_PRINTF("LFS\t");
+ FETCH_DECODE_MODRM(mod, rh, rl);
+ switch (mod) {
+ case 0:
+ dstreg = DECODE_RM_WORD_REGISTER(rh);
+ DECODE_PRINTF(",");
+ srcoffset = decode_rm00_address(rl);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ *dstreg = fetch_data_word(srcoffset);
+ M.x86.R_FS = fetch_data_word(srcoffset + 2);
+ break;
+ case 1:
+ dstreg = DECODE_RM_WORD_REGISTER(rh);
+ DECODE_PRINTF(",");
+ srcoffset = decode_rm01_address(rl);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ *dstreg = fetch_data_word(srcoffset);
+ M.x86.R_FS = fetch_data_word(srcoffset + 2);
+ break;
+ case 2:
+ dstreg = DECODE_RM_WORD_REGISTER(rh);
+ DECODE_PRINTF(",");
+ srcoffset = decode_rm10_address(rl);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ *dstreg = fetch_data_word(srcoffset);
+ M.x86.R_FS = fetch_data_word(srcoffset + 2);
+ break;
+ case 3: /* register to register */
+ /* UNDEFINED! */
+ TRACE_AND_STEP();
+ }
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0x0f,0xb5
+****************************************************************************/
+void x86emuOp2_lgs_R_IMM(u8 X86EMU_UNUSED(op2))
+{
+ int mod, rh, rl;
+ u16 *dstreg;
+ uint srcoffset;
+
+ START_OF_INSTR();
+ DECODE_PRINTF("LGS\t");
+ FETCH_DECODE_MODRM(mod, rh, rl);
+ switch (mod) {
+ case 0:
+ dstreg = DECODE_RM_WORD_REGISTER(rh);
+ DECODE_PRINTF(",");
+ srcoffset = decode_rm00_address(rl);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ *dstreg = fetch_data_word(srcoffset);
+ M.x86.R_GS = fetch_data_word(srcoffset + 2);
+ break;
+ case 1:
+ dstreg = DECODE_RM_WORD_REGISTER(rh);
+ DECODE_PRINTF(",");
+ srcoffset = decode_rm01_address(rl);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ *dstreg = fetch_data_word(srcoffset);
+ M.x86.R_GS = fetch_data_word(srcoffset + 2);
+ break;
+ case 2:
+ dstreg = DECODE_RM_WORD_REGISTER(rh);
+ DECODE_PRINTF(",");
+ srcoffset = decode_rm10_address(rl);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ *dstreg = fetch_data_word(srcoffset);
+ M.x86.R_GS = fetch_data_word(srcoffset + 2);
+ break;
+ case 3: /* register to register */
+ /* UNDEFINED! */
+ TRACE_AND_STEP();
+ }
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0x0f,0xb6
+****************************************************************************/
+void x86emuOp2_movzx_byte_R_RM(u8 X86EMU_UNUSED(op2))
+{
+ int mod, rl, rh;
+ uint srcoffset;
+
+ START_OF_INSTR();
+ DECODE_PRINTF("MOVZX\t");
+ FETCH_DECODE_MODRM(mod, rh, rl);
+ switch (mod) {
+ case 0:
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 *destreg;
+ u32 srcval;
+
+ destreg = DECODE_RM_LONG_REGISTER(rh);
+ DECODE_PRINTF(",");
+ srcoffset = decode_rm00_address(rl);
+ srcval = fetch_data_byte(srcoffset);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ *destreg = srcval;
+ } else {
+ u16 *destreg;
+ u16 srcval;
+
+ destreg = DECODE_RM_WORD_REGISTER(rh);
+ DECODE_PRINTF(",");
+ srcoffset = decode_rm00_address(rl);
+ srcval = fetch_data_byte(srcoffset);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ *destreg = srcval;
+ }
+ break;
+ case 1:
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 *destreg;
+ u32 srcval;
+
+ destreg = DECODE_RM_LONG_REGISTER(rh);
+ DECODE_PRINTF(",");
+ srcoffset = decode_rm01_address(rl);
+ srcval = fetch_data_byte(srcoffset);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ *destreg = srcval;
+ } else {
+ u16 *destreg;
+ u16 srcval;
+
+ destreg = DECODE_RM_WORD_REGISTER(rh);
+ DECODE_PRINTF(",");
+ srcoffset = decode_rm01_address(rl);
+ srcval = fetch_data_byte(srcoffset);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ *destreg = srcval;
+ }
+ break;
+ case 2:
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 *destreg;
+ u32 srcval;
+
+ destreg = DECODE_RM_LONG_REGISTER(rh);
+ DECODE_PRINTF(",");
+ srcoffset = decode_rm10_address(rl);
+ srcval = fetch_data_byte(srcoffset);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ *destreg = srcval;
+ } else {
+ u16 *destreg;
+ u16 srcval;
+
+ destreg = DECODE_RM_WORD_REGISTER(rh);
+ DECODE_PRINTF(",");
+ srcoffset = decode_rm10_address(rl);
+ srcval = fetch_data_byte(srcoffset);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ *destreg = srcval;
+ }
+ break;
+ case 3: /* register to register */
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 *destreg;
+ u8 *srcreg;
+
+ destreg = DECODE_RM_LONG_REGISTER(rh);
+ DECODE_PRINTF(",");
+ srcreg = DECODE_RM_BYTE_REGISTER(rl);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ *destreg = *srcreg;
+ } else {
+ u16 *destreg;
+ u8 *srcreg;
+
+ destreg = DECODE_RM_WORD_REGISTER(rh);
+ DECODE_PRINTF(",");
+ srcreg = DECODE_RM_BYTE_REGISTER(rl);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ *destreg = *srcreg;
+ }
+ break;
+ }
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0x0f,0xb7
+****************************************************************************/
+void x86emuOp2_movzx_word_R_RM(u8 X86EMU_UNUSED(op2))
+{
+ int mod, rl, rh;
+ uint srcoffset;
+ u32 *destreg;
+ u32 srcval;
+ u16 *srcreg;
+
+ START_OF_INSTR();
+ DECODE_PRINTF("MOVZX\t");
+ FETCH_DECODE_MODRM(mod, rh, rl);
+ switch (mod) {
+ case 0:
+ destreg = DECODE_RM_LONG_REGISTER(rh);
+ DECODE_PRINTF(",");
+ srcoffset = decode_rm00_address(rl);
+ srcval = fetch_data_word(srcoffset);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ *destreg = srcval;
+ break;
+ case 1:
+ destreg = DECODE_RM_LONG_REGISTER(rh);
+ DECODE_PRINTF(",");
+ srcoffset = decode_rm01_address(rl);
+ srcval = fetch_data_word(srcoffset);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ *destreg = srcval;
+ break;
+ case 2:
+ destreg = DECODE_RM_LONG_REGISTER(rh);
+ DECODE_PRINTF(",");
+ srcoffset = decode_rm10_address(rl);
+ srcval = fetch_data_word(srcoffset);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ *destreg = srcval;
+ break;
+ case 3: /* register to register */
+ destreg = DECODE_RM_LONG_REGISTER(rh);
+ DECODE_PRINTF(",");
+ srcreg = DECODE_RM_WORD_REGISTER(rl);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ *destreg = *srcreg;
+ break;
+ }
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0x0f,0xba
+****************************************************************************/
+void x86emuOp2_btX_I(u8 X86EMU_UNUSED(op2))
+{
+ int mod, rl, rh;
+ uint srcoffset;
+ int bit;
+
+ START_OF_INSTR();
+ FETCH_DECODE_MODRM(mod, rh, rl);
+ switch (rh) {
+ case 3:
+ DECODE_PRINTF("BT\t");
+ break;
+ case 4:
+ DECODE_PRINTF("BTS\t");
+ break;
+ case 5:
+ DECODE_PRINTF("BTR\t");
+ break;
+ case 6:
+ DECODE_PRINTF("BTC\t");
+ break;
+ default:
+ DECODE_PRINTF("ILLEGAL EXTENDED X86 OPCODE\n");
+ TRACE_REGS();
+ printk("%04x:%04x: %02X%02X ILLEGAL EXTENDED X86 OPCODE EXTENSION!\n",
+ M.x86.R_CS, M.x86.R_IP-3,op2, (mod<<6)|(rh<<3)|rl);
+ HALT_SYS();
+ }
+ switch (mod) {
+ case 0:
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 srcval, mask;
+ u8 shift;
+
+ srcoffset = decode_rm00_address(rl);
+ DECODE_PRINTF(",");
+ shift = fetch_byte_imm();
+ TRACE_AND_STEP();
+ bit = shift & 0x1F;
+ srcval = fetch_data_long(srcoffset);
+ mask = (0x1 << bit);
+ CONDITIONAL_SET_FLAG(srcval & mask,F_CF);
+ switch (rh) {
+ case 4:
+ store_data_long(srcoffset, srcval | mask);
+ break;
+ case 5:
+ store_data_long(srcoffset, srcval & ~mask);
+ break;
+ case 6:
+ store_data_long(srcoffset, srcval ^ mask);
+ break;
+ default:
+ break;
+ }
+ } else {
+ u16 srcval, mask;
+ u8 shift;
+
+ srcoffset = decode_rm00_address(rl);
+ DECODE_PRINTF(",");
+ shift = fetch_byte_imm();
+ TRACE_AND_STEP();
+ bit = shift & 0xF;
+ srcval = fetch_data_word(srcoffset);
+ mask = (0x1 << bit);
+ CONDITIONAL_SET_FLAG(srcval & mask,F_CF);
+ switch (rh) {
+ case 4:
+ store_data_word(srcoffset, srcval | mask);
+ break;
+ case 5:
+ store_data_word(srcoffset, srcval & ~mask);
+ break;
+ case 6:
+ store_data_word(srcoffset, srcval ^ mask);
+ break;
+ default:
+ break;
+ }
+ }
+ break;
+ case 1:
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 srcval, mask;
+ u8 shift;
+
+ srcoffset = decode_rm01_address(rl);
+ DECODE_PRINTF(",");
+ shift = fetch_byte_imm();
+ TRACE_AND_STEP();
+ bit = shift & 0x1F;
+ srcval = fetch_data_long(srcoffset);
+ mask = (0x1 << bit);
+ CONDITIONAL_SET_FLAG(srcval & mask,F_CF);
+ switch (rh) {
+ case 4:
+ store_data_long(srcoffset, srcval | mask);
+ break;
+ case 5:
+ store_data_long(srcoffset, srcval & ~mask);
+ break;
+ case 6:
+ store_data_long(srcoffset, srcval ^ mask);
+ break;
+ default:
+ break;
+ }
+ } else {
+ u16 srcval, mask;
+ u8 shift;
+
+ srcoffset = decode_rm01_address(rl);
+ DECODE_PRINTF(",");
+ shift = fetch_byte_imm();
+ TRACE_AND_STEP();
+ bit = shift & 0xF;
+ srcval = fetch_data_word(srcoffset);
+ mask = (0x1 << bit);
+ CONDITIONAL_SET_FLAG(srcval & mask,F_CF);
+ switch (rh) {
+ case 4:
+ store_data_word(srcoffset, srcval | mask);
+ break;
+ case 5:
+ store_data_word(srcoffset, srcval & ~mask);
+ break;
+ case 6:
+ store_data_word(srcoffset, srcval ^ mask);
+ break;
+ default:
+ break;
+ }
+ }
+ break;
+ case 2:
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 srcval, mask;
+ u8 shift;
+
+ srcoffset = decode_rm10_address(rl);
+ DECODE_PRINTF(",");
+ shift = fetch_byte_imm();
+ TRACE_AND_STEP();
+ bit = shift & 0x1F;
+ srcval = fetch_data_long(srcoffset);
+ mask = (0x1 << bit);
+ CONDITIONAL_SET_FLAG(srcval & mask,F_CF);
+ switch (rh) {
+ case 4:
+ store_data_long(srcoffset, srcval | mask);
+ break;
+ case 5:
+ store_data_long(srcoffset, srcval & ~mask);
+ break;
+ case 6:
+ store_data_long(srcoffset, srcval ^ mask);
+ break;
+ default:
+ break;
+ }
+ } else {
+ u16 srcval, mask;
+ u8 shift;
+
+ srcoffset = decode_rm10_address(rl);
+ DECODE_PRINTF(",");
+ shift = fetch_byte_imm();
+ TRACE_AND_STEP();
+ bit = shift & 0xF;
+ srcval = fetch_data_word(srcoffset);
+ mask = (0x1 << bit);
+ CONDITIONAL_SET_FLAG(srcval & mask,F_CF);
+ switch (rh) {
+ case 4:
+ store_data_word(srcoffset, srcval | mask);
+ break;
+ case 5:
+ store_data_word(srcoffset, srcval & ~mask);
+ break;
+ case 6:
+ store_data_word(srcoffset, srcval ^ mask);
+ break;
+ default:
+ break;
+ }
+ }
+ break;
+ case 3: /* register to register */
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 *srcreg;
+ u32 mask;
+ u8 shift;
+
+ srcreg = DECODE_RM_LONG_REGISTER(rl);
+ DECODE_PRINTF(",");
+ shift = fetch_byte_imm();
+ TRACE_AND_STEP();
+ bit = shift & 0x1F;
+ mask = (0x1 << bit);
+ CONDITIONAL_SET_FLAG(*srcreg & mask,F_CF);
+ switch (rh) {
+ case 4:
+ *srcreg |= mask;
+ break;
+ case 5:
+ *srcreg &= ~mask;
+ break;
+ case 6:
+ *srcreg ^= mask;
+ break;
+ default:
+ break;
+ }
+ } else {
+ u16 *srcreg;
+ u16 mask;
+ u8 shift;
+
+ srcreg = DECODE_RM_WORD_REGISTER(rl);
+ DECODE_PRINTF(",");
+ shift = fetch_byte_imm();
+ TRACE_AND_STEP();
+ bit = shift & 0xF;
+ mask = (0x1 << bit);
+ CONDITIONAL_SET_FLAG(*srcreg & mask,F_CF);
+ switch (rh) {
+ case 4:
+ *srcreg |= mask;
+ break;
+ case 5:
+ *srcreg &= ~mask;
+ break;
+ case 6:
+ *srcreg ^= mask;
+ break;
+ default:
+ break;
+ }
+ }
+ break;
+ }
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0x0f,0xbb
+****************************************************************************/
+void x86emuOp2_btc_R(u8 X86EMU_UNUSED(op2))
+{
+ int mod, rl, rh;
+ uint srcoffset;
+ int bit,disp;
+
+ START_OF_INSTR();
+ DECODE_PRINTF("BTC\t");
+ FETCH_DECODE_MODRM(mod, rh, rl);
+ switch (mod) {
+ case 0:
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 srcval,mask;
+ u32 *shiftreg;
+
+ srcoffset = decode_rm00_address(rl);
+ DECODE_PRINTF(",");
+ shiftreg = DECODE_RM_LONG_REGISTER(rh);
+ TRACE_AND_STEP();
+ bit = *shiftreg & 0x1F;
+ disp = (s16)*shiftreg >> 5;
+ srcval = fetch_data_long(srcoffset+disp);
+ mask = (0x1 << bit);
+ CONDITIONAL_SET_FLAG(srcval & mask,F_CF);
+ store_data_long(srcoffset+disp, srcval ^ mask);
+ } else {
+ u16 srcval,mask;
+ u16 *shiftreg;
+
+ srcoffset = decode_rm00_address(rl);
+ DECODE_PRINTF(",");
+ shiftreg = DECODE_RM_WORD_REGISTER(rh);
+ TRACE_AND_STEP();
+ bit = *shiftreg & 0xF;
+ disp = (s16)*shiftreg >> 4;
+ srcval = fetch_data_word(srcoffset+disp);
+ mask = (u16)(0x1 << bit);
+ CONDITIONAL_SET_FLAG(srcval & mask,F_CF);
+ store_data_word(srcoffset+disp, (u16)(srcval ^ mask));
+ }
+ break;
+ case 1:
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 srcval,mask;
+ u32 *shiftreg;
+
+ srcoffset = decode_rm01_address(rl);
+ DECODE_PRINTF(",");
+ shiftreg = DECODE_RM_LONG_REGISTER(rh);
+ TRACE_AND_STEP();
+ bit = *shiftreg & 0x1F;
+ disp = (s16)*shiftreg >> 5;
+ srcval = fetch_data_long(srcoffset+disp);
+ mask = (0x1 << bit);
+ CONDITIONAL_SET_FLAG(srcval & mask,F_CF);
+ store_data_long(srcoffset+disp, srcval ^ mask);
+ } else {
+ u16 srcval,mask;
+ u16 *shiftreg;
+
+ srcoffset = decode_rm01_address(rl);
+ DECODE_PRINTF(",");
+ shiftreg = DECODE_RM_WORD_REGISTER(rh);
+ TRACE_AND_STEP();
+ bit = *shiftreg & 0xF;
+ disp = (s16)*shiftreg >> 4;
+ srcval = fetch_data_word(srcoffset+disp);
+ mask = (u16)(0x1 << bit);
+ CONDITIONAL_SET_FLAG(srcval & mask,F_CF);
+ store_data_word(srcoffset+disp, (u16)(srcval ^ mask));
+ }
+ break;
+ case 2:
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 srcval,mask;
+ u32 *shiftreg;
+
+ srcoffset = decode_rm10_address(rl);
+ DECODE_PRINTF(",");
+ shiftreg = DECODE_RM_LONG_REGISTER(rh);
+ TRACE_AND_STEP();
+ bit = *shiftreg & 0x1F;
+ disp = (s16)*shiftreg >> 5;
+ srcval = fetch_data_long(srcoffset+disp);
+ mask = (0x1 << bit);
+ CONDITIONAL_SET_FLAG(srcval & mask,F_CF);
+ store_data_long(srcoffset+disp, srcval ^ mask);
+ } else {
+ u16 srcval,mask;
+ u16 *shiftreg;
+
+ srcoffset = decode_rm10_address(rl);
+ DECODE_PRINTF(",");
+ shiftreg = DECODE_RM_WORD_REGISTER(rh);
+ TRACE_AND_STEP();
+ bit = *shiftreg & 0xF;
+ disp = (s16)*shiftreg >> 4;
+ srcval = fetch_data_word(srcoffset+disp);
+ mask = (u16)(0x1 << bit);
+ CONDITIONAL_SET_FLAG(srcval & mask,F_CF);
+ store_data_word(srcoffset+disp, (u16)(srcval ^ mask));
+ }
+ break;
+ case 3: /* register to register */
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 *srcreg,*shiftreg;
+ u32 mask;
+
+ srcreg = DECODE_RM_LONG_REGISTER(rl);
+ DECODE_PRINTF(",");
+ shiftreg = DECODE_RM_LONG_REGISTER(rh);
+ TRACE_AND_STEP();
+ bit = *shiftreg & 0x1F;
+ mask = (0x1 << bit);
+ CONDITIONAL_SET_FLAG(*srcreg & mask,F_CF);
+ *srcreg ^= mask;
+ } else {
+ u16 *srcreg,*shiftreg;
+ u16 mask;
+
+ srcreg = DECODE_RM_WORD_REGISTER(rl);
+ DECODE_PRINTF(",");
+ shiftreg = DECODE_RM_WORD_REGISTER(rh);
+ TRACE_AND_STEP();
+ bit = *shiftreg & 0xF;
+ mask = (u16)(0x1 << bit);
+ CONDITIONAL_SET_FLAG(*srcreg & mask,F_CF);
+ *srcreg ^= mask;
+ }
+ break;
+ }
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0x0f,0xbc
+****************************************************************************/
+void x86emuOp2_bsf(u8 X86EMU_UNUSED(op2))
+{
+ int mod, rl, rh;
+ uint srcoffset;
+
+ START_OF_INSTR();
+ DECODE_PRINTF("BSF\n");
+ FETCH_DECODE_MODRM(mod, rh, rl);
+ switch(mod) {
+ case 0:
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 srcval, *dstreg;
+
+ srcoffset = decode_rm00_address(rl);
+ DECODE_PRINTF(",");
+ dstreg = DECODE_RM_LONG_REGISTER(rh);
+ TRACE_AND_STEP();
+ srcval = fetch_data_long(srcoffset);
+ CONDITIONAL_SET_FLAG(srcval == 0, F_ZF);
+ for(*dstreg = 0; *dstreg < 32; (*dstreg)++)
+ if ((srcval >> *dstreg) & 1) break;
+ } else {
+ u16 srcval, *dstreg;
+
+ srcoffset = decode_rm00_address(rl);
+ DECODE_PRINTF(",");
+ dstreg = DECODE_RM_WORD_REGISTER(rh);
+ TRACE_AND_STEP();
+ srcval = fetch_data_word(srcoffset);
+ CONDITIONAL_SET_FLAG(srcval == 0, F_ZF);
+ for(*dstreg = 0; *dstreg < 16; (*dstreg)++)
+ if ((srcval >> *dstreg) & 1) break;
+ }
+ break;
+ case 1:
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 srcval, *dstreg;
+
+ srcoffset = decode_rm01_address(rl);
+ DECODE_PRINTF(",");
+ dstreg = DECODE_RM_LONG_REGISTER(rh);
+ TRACE_AND_STEP();
+ srcval = fetch_data_long(srcoffset);
+ CONDITIONAL_SET_FLAG(srcval == 0, F_ZF);
+ for(*dstreg = 0; *dstreg < 32; (*dstreg)++)
+ if ((srcval >> *dstreg) & 1) break;
+ } else {
+ u16 srcval, *dstreg;
+
+ srcoffset = decode_rm01_address(rl);
+ DECODE_PRINTF(",");
+ dstreg = DECODE_RM_WORD_REGISTER(rh);
+ TRACE_AND_STEP();
+ srcval = fetch_data_word(srcoffset);
+ CONDITIONAL_SET_FLAG(srcval == 0, F_ZF);
+ for(*dstreg = 0; *dstreg < 16; (*dstreg)++)
+ if ((srcval >> *dstreg) & 1) break;
+ }
+ break;
+ case 2:
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 srcval, *dstreg;
+
+ srcoffset = decode_rm10_address(rl);
+ DECODE_PRINTF(",");
+ dstreg = DECODE_RM_LONG_REGISTER(rh);
+ TRACE_AND_STEP();
+ srcval = fetch_data_long(srcoffset);
+ CONDITIONAL_SET_FLAG(srcval == 0, F_ZF);
+ for(*dstreg = 0; *dstreg < 32; (*dstreg)++)
+ if ((srcval >> *dstreg) & 1) break;
+ } else {
+ u16 srcval, *dstreg;
+
+ srcoffset = decode_rm10_address(rl);
+ DECODE_PRINTF(",");
+ dstreg = DECODE_RM_WORD_REGISTER(rh);
+ TRACE_AND_STEP();
+ srcval = fetch_data_word(srcoffset);
+ CONDITIONAL_SET_FLAG(srcval == 0, F_ZF);
+ for(*dstreg = 0; *dstreg < 16; (*dstreg)++)
+ if ((srcval >> *dstreg) & 1) break;
+ }
+ break;
+ case 3: /* register to register */
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 *srcreg, *dstreg;
+
+ srcreg = DECODE_RM_LONG_REGISTER(rl);
+ DECODE_PRINTF(",");
+ dstreg = DECODE_RM_LONG_REGISTER(rh);
+ TRACE_AND_STEP();
+ CONDITIONAL_SET_FLAG(*srcreg == 0, F_ZF);
+ for(*dstreg = 0; *dstreg < 32; (*dstreg)++)
+ if ((*srcreg >> *dstreg) & 1) break;
+ } else {
+ u16 *srcreg, *dstreg;
+
+ srcreg = DECODE_RM_WORD_REGISTER(rl);
+ DECODE_PRINTF(",");
+ dstreg = DECODE_RM_WORD_REGISTER(rh);
+ TRACE_AND_STEP();
+ CONDITIONAL_SET_FLAG(*srcreg == 0, F_ZF);
+ for(*dstreg = 0; *dstreg < 16; (*dstreg)++)
+ if ((*srcreg >> *dstreg) & 1) break;
+ }
+ break;
+ }
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0x0f,0xbd
+****************************************************************************/
+void x86emuOp2_bsr(u8 X86EMU_UNUSED(op2))
+{
+ int mod, rl, rh;
+ uint srcoffset;
+
+ START_OF_INSTR();
+ DECODE_PRINTF("BSF\n");
+ FETCH_DECODE_MODRM(mod, rh, rl);
+ switch(mod) {
+ case 0:
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 srcval, *dstreg;
+
+ srcoffset = decode_rm00_address(rl);
+ DECODE_PRINTF(",");
+ dstreg = DECODE_RM_LONG_REGISTER(rh);
+ TRACE_AND_STEP();
+ srcval = fetch_data_long(srcoffset);
+ CONDITIONAL_SET_FLAG(srcval == 0, F_ZF);
+ for(*dstreg = 31; *dstreg > 0; (*dstreg)--)
+ if ((srcval >> *dstreg) & 1) break;
+ } else {
+ u16 srcval, *dstreg;
+
+ srcoffset = decode_rm00_address(rl);
+ DECODE_PRINTF(",");
+ dstreg = DECODE_RM_WORD_REGISTER(rh);
+ TRACE_AND_STEP();
+ srcval = fetch_data_word(srcoffset);
+ CONDITIONAL_SET_FLAG(srcval == 0, F_ZF);
+ for(*dstreg = 15; *dstreg > 0; (*dstreg)--)
+ if ((srcval >> *dstreg) & 1) break;
+ }
+ break;
+ case 1:
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 srcval, *dstreg;
+
+ srcoffset = decode_rm01_address(rl);
+ DECODE_PRINTF(",");
+ dstreg = DECODE_RM_LONG_REGISTER(rh);
+ TRACE_AND_STEP();
+ srcval = fetch_data_long(srcoffset);
+ CONDITIONAL_SET_FLAG(srcval == 0, F_ZF);
+ for(*dstreg = 31; *dstreg > 0; (*dstreg)--)
+ if ((srcval >> *dstreg) & 1) break;
+ } else {
+ u16 srcval, *dstreg;
+
+ srcoffset = decode_rm01_address(rl);
+ DECODE_PRINTF(",");
+ dstreg = DECODE_RM_WORD_REGISTER(rh);
+ TRACE_AND_STEP();
+ srcval = fetch_data_word(srcoffset);
+ CONDITIONAL_SET_FLAG(srcval == 0, F_ZF);
+ for(*dstreg = 15; *dstreg > 0; (*dstreg)--)
+ if ((srcval >> *dstreg) & 1) break;
+ }
+ break;
+ case 2:
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 srcval, *dstreg;
+
+ srcoffset = decode_rm10_address(rl);
+ DECODE_PRINTF(",");
+ dstreg = DECODE_RM_LONG_REGISTER(rh);
+ TRACE_AND_STEP();
+ srcval = fetch_data_long(srcoffset);
+ CONDITIONAL_SET_FLAG(srcval == 0, F_ZF);
+ for(*dstreg = 31; *dstreg > 0; (*dstreg)--)
+ if ((srcval >> *dstreg) & 1) break;
+ } else {
+ u16 srcval, *dstreg;
+
+ srcoffset = decode_rm10_address(rl);
+ DECODE_PRINTF(",");
+ dstreg = DECODE_RM_WORD_REGISTER(rh);
+ TRACE_AND_STEP();
+ srcval = fetch_data_word(srcoffset);
+ CONDITIONAL_SET_FLAG(srcval == 0, F_ZF);
+ for(*dstreg = 15; *dstreg > 0; (*dstreg)--)
+ if ((srcval >> *dstreg) & 1) break;
+ }
+ break;
+ case 3: /* register to register */
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 *srcreg, *dstreg;
+
+ srcreg = DECODE_RM_LONG_REGISTER(rl);
+ DECODE_PRINTF(",");
+ dstreg = DECODE_RM_LONG_REGISTER(rh);
+ TRACE_AND_STEP();
+ CONDITIONAL_SET_FLAG(*srcreg == 0, F_ZF);
+ for(*dstreg = 31; *dstreg > 0; (*dstreg)--)
+ if ((*srcreg >> *dstreg) & 1) break;
+ } else {
+ u16 *srcreg, *dstreg;
+
+ srcreg = DECODE_RM_WORD_REGISTER(rl);
+ DECODE_PRINTF(",");
+ dstreg = DECODE_RM_WORD_REGISTER(rh);
+ TRACE_AND_STEP();
+ CONDITIONAL_SET_FLAG(*srcreg == 0, F_ZF);
+ for(*dstreg = 15; *dstreg > 0; (*dstreg)--)
+ if ((*srcreg >> *dstreg) & 1) break;
+ }
+ break;
+ }
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0x0f,0xbe
+****************************************************************************/
+void x86emuOp2_movsx_byte_R_RM(u8 X86EMU_UNUSED(op2))
+{
+ int mod, rl, rh;
+ uint srcoffset;
+
+ START_OF_INSTR();
+ DECODE_PRINTF("MOVSX\t");
+ FETCH_DECODE_MODRM(mod, rh, rl);
+ switch (mod) {
+ case 0:
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 *destreg;
+ u32 srcval;
+
+ destreg = DECODE_RM_LONG_REGISTER(rh);
+ DECODE_PRINTF(",");
+ srcoffset = decode_rm00_address(rl);
+ srcval = (s32)((s8)fetch_data_byte(srcoffset));
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ *destreg = srcval;
+ } else {
+ u16 *destreg;
+ u16 srcval;
+
+ destreg = DECODE_RM_WORD_REGISTER(rh);
+ DECODE_PRINTF(",");
+ srcoffset = decode_rm00_address(rl);
+ srcval = (s16)((s8)fetch_data_byte(srcoffset));
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ *destreg = srcval;
+ }
+ break;
+ case 1:
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 *destreg;
+ u32 srcval;
+
+ destreg = DECODE_RM_LONG_REGISTER(rh);
+ DECODE_PRINTF(",");
+ srcoffset = decode_rm01_address(rl);
+ srcval = (s32)((s8)fetch_data_byte(srcoffset));
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ *destreg = srcval;
+ } else {
+ u16 *destreg;
+ u16 srcval;
+
+ destreg = DECODE_RM_WORD_REGISTER(rh);
+ DECODE_PRINTF(",");
+ srcoffset = decode_rm01_address(rl);
+ srcval = (s16)((s8)fetch_data_byte(srcoffset));
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ *destreg = srcval;
+ }
+ break;
+ case 2:
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 *destreg;
+ u32 srcval;
+
+ destreg = DECODE_RM_LONG_REGISTER(rh);
+ DECODE_PRINTF(",");
+ srcoffset = decode_rm10_address(rl);
+ srcval = (s32)((s8)fetch_data_byte(srcoffset));
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ *destreg = srcval;
+ } else {
+ u16 *destreg;
+ u16 srcval;
+
+ destreg = DECODE_RM_WORD_REGISTER(rh);
+ DECODE_PRINTF(",");
+ srcoffset = decode_rm10_address(rl);
+ srcval = (s16)((s8)fetch_data_byte(srcoffset));
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ *destreg = srcval;
+ }
+ break;
+ case 3: /* register to register */
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ u32 *destreg;
+ u8 *srcreg;
+
+ destreg = DECODE_RM_LONG_REGISTER(rh);
+ DECODE_PRINTF(",");
+ srcreg = DECODE_RM_BYTE_REGISTER(rl);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ *destreg = (s32)((s8)*srcreg);
+ } else {
+ u16 *destreg;
+ u8 *srcreg;
+
+ destreg = DECODE_RM_WORD_REGISTER(rh);
+ DECODE_PRINTF(",");
+ srcreg = DECODE_RM_BYTE_REGISTER(rl);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ *destreg = (s16)((s8)*srcreg);
+ }
+ break;
+ }
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/****************************************************************************
+REMARKS:
+Handles opcode 0x0f,0xbf
+****************************************************************************/
+void x86emuOp2_movsx_word_R_RM(u8 X86EMU_UNUSED(op2))
+{
+ int mod, rl, rh;
+ uint srcoffset;
+ u32 *destreg;
+ u32 srcval;
+ u16 *srcreg;
+
+ START_OF_INSTR();
+ DECODE_PRINTF("MOVSX\t");
+ FETCH_DECODE_MODRM(mod, rh, rl);
+ switch (mod) {
+ case 0:
+ destreg = DECODE_RM_LONG_REGISTER(rh);
+ DECODE_PRINTF(",");
+ srcoffset = decode_rm00_address(rl);
+ srcval = (s32)((s16)fetch_data_word(srcoffset));
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ *destreg = srcval;
+ break;
+ case 1:
+ destreg = DECODE_RM_LONG_REGISTER(rh);
+ DECODE_PRINTF(",");
+ srcoffset = decode_rm01_address(rl);
+ srcval = (s32)((s16)fetch_data_word(srcoffset));
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ *destreg = srcval;
+ break;
+ case 2:
+ destreg = DECODE_RM_LONG_REGISTER(rh);
+ DECODE_PRINTF(",");
+ srcoffset = decode_rm10_address(rl);
+ srcval = (s32)((s16)fetch_data_word(srcoffset));
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ *destreg = srcval;
+ break;
+ case 3: /* register to register */
+ destreg = DECODE_RM_LONG_REGISTER(rh);
+ DECODE_PRINTF(",");
+ srcreg = DECODE_RM_WORD_REGISTER(rl);
+ DECODE_PRINTF("\n");
+ TRACE_AND_STEP();
+ *destreg = (s32)((s16)*srcreg);
+ break;
+ }
+ DECODE_CLEAR_SEGOVR();
+ END_OF_INSTR();
+}
+
+/***************************************************************************
+ * Double byte operation code table:
+ **************************************************************************/
+void (*x86emu_optab2[256])(u8) =
+{
+/* 0x00 */ x86emuOp2_illegal_op, /* Group F (ring 0 PM) */
+/* 0x01 */ x86emuOp2_illegal_op, /* Group G (ring 0 PM) */
+/* 0x02 */ x86emuOp2_illegal_op, /* lar (ring 0 PM) */
+/* 0x03 */ x86emuOp2_illegal_op, /* lsl (ring 0 PM) */
+/* 0x04 */ x86emuOp2_illegal_op,
+/* 0x05 */ x86emuOp2_illegal_op, /* loadall (undocumented) */
+/* 0x06 */ x86emuOp2_illegal_op, /* clts (ring 0 PM) */
+/* 0x07 */ x86emuOp2_illegal_op, /* loadall (undocumented) */
+/* 0x08 */ x86emuOp2_illegal_op, /* invd (ring 0 PM) */
+/* 0x09 */ x86emuOp2_illegal_op, /* wbinvd (ring 0 PM) */
+/* 0x0a */ x86emuOp2_illegal_op,
+/* 0x0b */ x86emuOp2_illegal_op,
+/* 0x0c */ x86emuOp2_illegal_op,
+/* 0x0d */ x86emuOp2_illegal_op,
+/* 0x0e */ x86emuOp2_illegal_op,
+/* 0x0f */ x86emuOp2_illegal_op,
+
+/* 0x10 */ x86emuOp2_illegal_op,
+/* 0x11 */ x86emuOp2_illegal_op,
+/* 0x12 */ x86emuOp2_illegal_op,
+/* 0x13 */ x86emuOp2_illegal_op,
+/* 0x14 */ x86emuOp2_illegal_op,
+/* 0x15 */ x86emuOp2_illegal_op,
+/* 0x16 */ x86emuOp2_illegal_op,
+/* 0x17 */ x86emuOp2_illegal_op,
+/* 0x18 */ x86emuOp2_illegal_op,
+/* 0x19 */ x86emuOp2_illegal_op,
+/* 0x1a */ x86emuOp2_illegal_op,
+/* 0x1b */ x86emuOp2_illegal_op,
+/* 0x1c */ x86emuOp2_illegal_op,
+/* 0x1d */ x86emuOp2_illegal_op,
+/* 0x1e */ x86emuOp2_illegal_op,
+/* 0x1f */ x86emuOp2_illegal_op,
+
+/* 0x20 */ x86emuOp2_illegal_op, /* mov reg32,creg (ring 0 PM) */
+/* 0x21 */ x86emuOp2_illegal_op, /* mov reg32,dreg (ring 0 PM) */
+/* 0x22 */ x86emuOp2_illegal_op, /* mov creg,reg32 (ring 0 PM) */
+/* 0x23 */ x86emuOp2_illegal_op, /* mov dreg,reg32 (ring 0 PM) */
+/* 0x24 */ x86emuOp2_illegal_op, /* mov reg32,treg (ring 0 PM) */
+/* 0x25 */ x86emuOp2_illegal_op,
+/* 0x26 */ x86emuOp2_illegal_op, /* mov treg,reg32 (ring 0 PM) */
+/* 0x27 */ x86emuOp2_illegal_op,
+/* 0x28 */ x86emuOp2_illegal_op,
+/* 0x29 */ x86emuOp2_illegal_op,
+/* 0x2a */ x86emuOp2_illegal_op,
+/* 0x2b */ x86emuOp2_illegal_op,
+/* 0x2c */ x86emuOp2_illegal_op,
+/* 0x2d */ x86emuOp2_illegal_op,
+/* 0x2e */ x86emuOp2_illegal_op,
+/* 0x2f */ x86emuOp2_illegal_op,
+
+/* 0x30 */ x86emuOp2_illegal_op,
+/* 0x31 */ x86emuOp2_illegal_op,
+/* 0x32 */ x86emuOp2_illegal_op,
+/* 0x33 */ x86emuOp2_illegal_op,
+/* 0x34 */ x86emuOp2_illegal_op,
+/* 0x35 */ x86emuOp2_illegal_op,
+/* 0x36 */ x86emuOp2_illegal_op,
+/* 0x37 */ x86emuOp2_illegal_op,
+/* 0x38 */ x86emuOp2_illegal_op,
+/* 0x39 */ x86emuOp2_illegal_op,
+/* 0x3a */ x86emuOp2_illegal_op,
+/* 0x3b */ x86emuOp2_illegal_op,
+/* 0x3c */ x86emuOp2_illegal_op,
+/* 0x3d */ x86emuOp2_illegal_op,
+/* 0x3e */ x86emuOp2_illegal_op,
+/* 0x3f */ x86emuOp2_illegal_op,
+
+/* 0x40 */ x86emuOp2_illegal_op,
+/* 0x41 */ x86emuOp2_illegal_op,
+/* 0x42 */ x86emuOp2_illegal_op,
+/* 0x43 */ x86emuOp2_illegal_op,
+/* 0x44 */ x86emuOp2_illegal_op,
+/* 0x45 */ x86emuOp2_illegal_op,
+/* 0x46 */ x86emuOp2_illegal_op,
+/* 0x47 */ x86emuOp2_illegal_op,
+/* 0x48 */ x86emuOp2_illegal_op,
+/* 0x49 */ x86emuOp2_illegal_op,
+/* 0x4a */ x86emuOp2_illegal_op,
+/* 0x4b */ x86emuOp2_illegal_op,
+/* 0x4c */ x86emuOp2_illegal_op,
+/* 0x4d */ x86emuOp2_illegal_op,
+/* 0x4e */ x86emuOp2_illegal_op,
+/* 0x4f */ x86emuOp2_illegal_op,
+
+/* 0x50 */ x86emuOp2_illegal_op,
+/* 0x51 */ x86emuOp2_illegal_op,
+/* 0x52 */ x86emuOp2_illegal_op,
+/* 0x53 */ x86emuOp2_illegal_op,
+/* 0x54 */ x86emuOp2_illegal_op,
+/* 0x55 */ x86emuOp2_illegal_op,
+/* 0x56 */ x86emuOp2_illegal_op,
+/* 0x57 */ x86emuOp2_illegal_op,
+/* 0x58 */ x86emuOp2_illegal_op,
+/* 0x59 */ x86emuOp2_illegal_op,
+/* 0x5a */ x86emuOp2_illegal_op,
+/* 0x5b */ x86emuOp2_illegal_op,
+/* 0x5c */ x86emuOp2_illegal_op,
+/* 0x5d */ x86emuOp2_illegal_op,
+/* 0x5e */ x86emuOp2_illegal_op,
+/* 0x5f */ x86emuOp2_illegal_op,
+
+/* 0x60 */ x86emuOp2_illegal_op,
+/* 0x61 */ x86emuOp2_illegal_op,
+/* 0x62 */ x86emuOp2_illegal_op,
+/* 0x63 */ x86emuOp2_illegal_op,
+/* 0x64 */ x86emuOp2_illegal_op,
+/* 0x65 */ x86emuOp2_illegal_op,
+/* 0x66 */ x86emuOp2_illegal_op,
+/* 0x67 */ x86emuOp2_illegal_op,
+/* 0x68 */ x86emuOp2_illegal_op,
+/* 0x69 */ x86emuOp2_illegal_op,
+/* 0x6a */ x86emuOp2_illegal_op,
+/* 0x6b */ x86emuOp2_illegal_op,
+/* 0x6c */ x86emuOp2_illegal_op,
+/* 0x6d */ x86emuOp2_illegal_op,
+/* 0x6e */ x86emuOp2_illegal_op,
+/* 0x6f */ x86emuOp2_illegal_op,
+
+/* 0x70 */ x86emuOp2_illegal_op,
+/* 0x71 */ x86emuOp2_illegal_op,
+/* 0x72 */ x86emuOp2_illegal_op,
+/* 0x73 */ x86emuOp2_illegal_op,
+/* 0x74 */ x86emuOp2_illegal_op,
+/* 0x75 */ x86emuOp2_illegal_op,
+/* 0x76 */ x86emuOp2_illegal_op,
+/* 0x77 */ x86emuOp2_illegal_op,
+/* 0x78 */ x86emuOp2_illegal_op,
+/* 0x79 */ x86emuOp2_illegal_op,
+/* 0x7a */ x86emuOp2_illegal_op,
+/* 0x7b */ x86emuOp2_illegal_op,
+/* 0x7c */ x86emuOp2_illegal_op,
+/* 0x7d */ x86emuOp2_illegal_op,
+/* 0x7e */ x86emuOp2_illegal_op,
+/* 0x7f */ x86emuOp2_illegal_op,
+
+/* 0x80 */ x86emuOp2_long_jump,
+/* 0x81 */ x86emuOp2_long_jump,
+/* 0x82 */ x86emuOp2_long_jump,
+/* 0x83 */ x86emuOp2_long_jump,
+/* 0x84 */ x86emuOp2_long_jump,
+/* 0x85 */ x86emuOp2_long_jump,
+/* 0x86 */ x86emuOp2_long_jump,
+/* 0x87 */ x86emuOp2_long_jump,
+/* 0x88 */ x86emuOp2_long_jump,
+/* 0x89 */ x86emuOp2_long_jump,
+/* 0x8a */ x86emuOp2_long_jump,
+/* 0x8b */ x86emuOp2_long_jump,
+/* 0x8c */ x86emuOp2_long_jump,
+/* 0x8d */ x86emuOp2_long_jump,
+/* 0x8e */ x86emuOp2_long_jump,
+/* 0x8f */ x86emuOp2_long_jump,
+
+/* 0x90 */ x86emuOp2_set_byte,
+/* 0x91 */ x86emuOp2_set_byte,
+/* 0x92 */ x86emuOp2_set_byte,
+/* 0x93 */ x86emuOp2_set_byte,
+/* 0x94 */ x86emuOp2_set_byte,
+/* 0x95 */ x86emuOp2_set_byte,
+/* 0x96 */ x86emuOp2_set_byte,
+/* 0x97 */ x86emuOp2_set_byte,
+/* 0x98 */ x86emuOp2_set_byte,
+/* 0x99 */ x86emuOp2_set_byte,
+/* 0x9a */ x86emuOp2_set_byte,
+/* 0x9b */ x86emuOp2_set_byte,
+/* 0x9c */ x86emuOp2_set_byte,
+/* 0x9d */ x86emuOp2_set_byte,
+/* 0x9e */ x86emuOp2_set_byte,
+/* 0x9f */ x86emuOp2_set_byte,
+
+/* 0xa0 */ x86emuOp2_push_FS,
+/* 0xa1 */ x86emuOp2_pop_FS,
+/* 0xa2 */ x86emuOp2_illegal_op,
+/* 0xa3 */ x86emuOp2_bt_R,
+/* 0xa4 */ x86emuOp2_shld_IMM,
+/* 0xa5 */ x86emuOp2_shld_CL,
+/* 0xa6 */ x86emuOp2_illegal_op,
+/* 0xa7 */ x86emuOp2_illegal_op,
+/* 0xa8 */ x86emuOp2_push_GS,
+/* 0xa9 */ x86emuOp2_pop_GS,
+/* 0xaa */ x86emuOp2_illegal_op,
+/* 0xab */ x86emuOp2_bt_R,
+/* 0xac */ x86emuOp2_shrd_IMM,
+/* 0xad */ x86emuOp2_shrd_CL,
+/* 0xae */ x86emuOp2_illegal_op,
+/* 0xaf */ x86emuOp2_imul_R_RM,
+
+/* 0xb0 */ x86emuOp2_illegal_op, /* TODO: cmpxchg */
+/* 0xb1 */ x86emuOp2_illegal_op, /* TODO: cmpxchg */
+/* 0xb2 */ x86emuOp2_lss_R_IMM,
+/* 0xb3 */ x86emuOp2_btr_R,
+/* 0xb4 */ x86emuOp2_lfs_R_IMM,
+/* 0xb5 */ x86emuOp2_lgs_R_IMM,
+/* 0xb6 */ x86emuOp2_movzx_byte_R_RM,
+/* 0xb7 */ x86emuOp2_movzx_word_R_RM,
+/* 0xb8 */ x86emuOp2_illegal_op,
+/* 0xb9 */ x86emuOp2_illegal_op,
+/* 0xba */ x86emuOp2_btX_I,
+/* 0xbb */ x86emuOp2_btc_R,
+/* 0xbc */ x86emuOp2_bsf,
+/* 0xbd */ x86emuOp2_bsr,
+/* 0xbe */ x86emuOp2_movsx_byte_R_RM,
+/* 0xbf */ x86emuOp2_movsx_word_R_RM,
+
+/* 0xc0 */ x86emuOp2_illegal_op, /* TODO: xadd */
+/* 0xc1 */ x86emuOp2_illegal_op, /* TODO: xadd */
+/* 0xc2 */ x86emuOp2_illegal_op,
+/* 0xc3 */ x86emuOp2_illegal_op,
+/* 0xc4 */ x86emuOp2_illegal_op,
+/* 0xc5 */ x86emuOp2_illegal_op,
+/* 0xc6 */ x86emuOp2_illegal_op,
+/* 0xc7 */ x86emuOp2_illegal_op,
+/* 0xc8 */ x86emuOp2_illegal_op, /* TODO: bswap */
+/* 0xc9 */ x86emuOp2_illegal_op, /* TODO: bswap */
+/* 0xca */ x86emuOp2_illegal_op, /* TODO: bswap */
+/* 0xcb */ x86emuOp2_illegal_op, /* TODO: bswap */
+/* 0xcc */ x86emuOp2_illegal_op, /* TODO: bswap */
+/* 0xcd */ x86emuOp2_illegal_op, /* TODO: bswap */
+/* 0xce */ x86emuOp2_illegal_op, /* TODO: bswap */
+/* 0xcf */ x86emuOp2_illegal_op, /* TODO: bswap */
+
+/* 0xd0 */ x86emuOp2_illegal_op,
+/* 0xd1 */ x86emuOp2_illegal_op,
+/* 0xd2 */ x86emuOp2_illegal_op,
+/* 0xd3 */ x86emuOp2_illegal_op,
+/* 0xd4 */ x86emuOp2_illegal_op,
+/* 0xd5 */ x86emuOp2_illegal_op,
+/* 0xd6 */ x86emuOp2_illegal_op,
+/* 0xd7 */ x86emuOp2_illegal_op,
+/* 0xd8 */ x86emuOp2_illegal_op,
+/* 0xd9 */ x86emuOp2_illegal_op,
+/* 0xda */ x86emuOp2_illegal_op,
+/* 0xdb */ x86emuOp2_illegal_op,
+/* 0xdc */ x86emuOp2_illegal_op,
+/* 0xdd */ x86emuOp2_illegal_op,
+/* 0xde */ x86emuOp2_illegal_op,
+/* 0xdf */ x86emuOp2_illegal_op,
+
+/* 0xe0 */ x86emuOp2_illegal_op,
+/* 0xe1 */ x86emuOp2_illegal_op,
+/* 0xe2 */ x86emuOp2_illegal_op,
+/* 0xe3 */ x86emuOp2_illegal_op,
+/* 0xe4 */ x86emuOp2_illegal_op,
+/* 0xe5 */ x86emuOp2_illegal_op,
+/* 0xe6 */ x86emuOp2_illegal_op,
+/* 0xe7 */ x86emuOp2_illegal_op,
+/* 0xe8 */ x86emuOp2_illegal_op,
+/* 0xe9 */ x86emuOp2_illegal_op,
+/* 0xea */ x86emuOp2_illegal_op,
+/* 0xeb */ x86emuOp2_illegal_op,
+/* 0xec */ x86emuOp2_illegal_op,
+/* 0xed */ x86emuOp2_illegal_op,
+/* 0xee */ x86emuOp2_illegal_op,
+/* 0xef */ x86emuOp2_illegal_op,
+
+/* 0xf0 */ x86emuOp2_illegal_op,
+/* 0xf1 */ x86emuOp2_illegal_op,
+/* 0xf2 */ x86emuOp2_illegal_op,
+/* 0xf3 */ x86emuOp2_illegal_op,
+/* 0xf4 */ x86emuOp2_illegal_op,
+/* 0xf5 */ x86emuOp2_illegal_op,
+/* 0xf6 */ x86emuOp2_illegal_op,
+/* 0xf7 */ x86emuOp2_illegal_op,
+/* 0xf8 */ x86emuOp2_illegal_op,
+/* 0xf9 */ x86emuOp2_illegal_op,
+/* 0xfa */ x86emuOp2_illegal_op,
+/* 0xfb */ x86emuOp2_illegal_op,
+/* 0xfc */ x86emuOp2_illegal_op,
+/* 0xfd */ x86emuOp2_illegal_op,
+/* 0xfe */ x86emuOp2_illegal_op,
+/* 0xff */ x86emuOp2_illegal_op,
+};
diff --git a/board/MAI/bios_emulator/scitech/src/x86emu/prim_ops.c b/board/MAI/bios_emulator/scitech/src/x86emu/prim_ops.c
new file mode 100644
index 00000000000..ba4ffdeda35
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/x86emu/prim_ops.c
@@ -0,0 +1,2914 @@
+/****************************************************************************
+*
+* Realmode X86 Emulator Library
+*
+* Copyright (C) 1996-1999 SciTech Software, Inc.
+* Copyright (C) David Mosberger-Tang
+* Copyright (C) 1999 Egbert Eich
+*
+* ========================================================================
+*
+* Permission to use, copy, modify, distribute, and sell this software and
+* its documentation for any purpose is hereby granted without fee,
+* provided that the above copyright notice appear in all copies and that
+* both that copyright notice and this permission notice appear in
+* supporting documentation, and that the name of the authors not be used
+* in advertising or publicity pertaining to distribution of the software
+* without specific, written prior permission. The authors makes no
+* representations about the suitability of this software for any purpose.
+* It is provided "as is" without express or implied warranty.
+*
+* THE AUTHORS DISCLAIMS ALL WARRANTIES WITH REGARD TO THIS SOFTWARE,
+* INCLUDING ALL IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS, IN NO
+* EVENT SHALL THE AUTHORS BE LIABLE FOR ANY SPECIAL, INDIRECT OR
+* CONSEQUENTIAL DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF
+* USE, DATA OR PROFITS, WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE OR
+* OTHER TORTIOUS ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE OR
+* PERFORMANCE OF THIS SOFTWARE.
+*
+* ========================================================================
+*
+* Language: ANSI C
+* Environment: Any
+* Developer: Kendall Bennett
+*
+* Description: This file contains the code to implement the primitive
+* machine operations used by the emulation code in ops.c
+*
+* Carry Chain Calculation
+*
+* This represents a somewhat expensive calculation which is
+* apparently required to emulate the setting of the OF and AF flag.
+* The latter is not so important, but the former is. The overflow
+* flag is the XOR of the top two bits of the carry chain for an
+* addition (similar for subtraction). Since we do not want to
+* simulate the addition in a bitwise manner, we try to calculate the
+* carry chain given the two operands and the result.
+*
+* So, given the following table, which represents the addition of two
+* bits, we can derive a formula for the carry chain.
+*
+* a b cin r cout
+* 0 0 0 0 0
+* 0 0 1 1 0
+* 0 1 0 1 0
+* 0 1 1 0 1
+* 1 0 0 1 0
+* 1 0 1 0 1
+* 1 1 0 0 1
+* 1 1 1 1 1
+*
+* Construction of table for cout:
+*
+* ab
+* r \ 00 01 11 10
+* |------------------
+* 0 | 0 1 1 1
+* 1 | 0 0 1 0
+*
+* By inspection, one gets: cc = ab + r'(a + b)
+*
+* That represents alot of operations, but NO CHOICE....
+*
+* Borrow Chain Calculation.
+*
+* The following table represents the subtraction of two bits, from
+* which we can derive a formula for the borrow chain.
+*
+* a b bin r bout
+* 0 0 0 0 0
+* 0 0 1 1 1
+* 0 1 0 1 1
+* 0 1 1 0 1
+* 1 0 0 1 0
+* 1 0 1 0 0
+* 1 1 0 0 0
+* 1 1 1 1 1
+*
+* Construction of table for cout:
+*
+* ab
+* r \ 00 01 11 10
+* |------------------
+* 0 | 0 1 0 0
+* 1 | 1 1 1 0
+*
+* By inspection, one gets: bc = a'b + r(a' + b)
+*
+****************************************************************************/
+
+#define PRIM_OPS_NO_REDEFINE_ASM
+#include "x86emu/x86emui.h"
+
+/*------------------------- Global Variables ------------------------------*/
+
+#ifndef __HAVE_INLINE_ASSEMBLER__
+
+static u32 x86emu_parity_tab[8] =
+{
+ 0x96696996,
+ 0x69969669,
+ 0x69969669,
+ 0x96696996,
+ 0x69969669,
+ 0x96696996,
+ 0x96696996,
+ 0x69969669,
+};
+
+#endif
+
+#define PARITY(x) (((x86emu_parity_tab[(x) / 32] >> ((x) % 32)) & 1) == 0)
+#define XOR2(x) (((x) ^ ((x)>>1)) & 0x1)
+
+/*----------------------------- Implementation ----------------------------*/
+
+#ifndef __HAVE_INLINE_ASSEMBLER__
+
+/****************************************************************************
+REMARKS:
+Implements the AAA instruction and side effects.
+****************************************************************************/
+u16 aaa_word(u16 d)
+{
+ u16 res;
+ if ((d & 0xf) > 0x9 || ACCESS_FLAG(F_AF)) {
+ d += 0x6;
+ d += 0x100;
+ SET_FLAG(F_AF);
+ SET_FLAG(F_CF);
+ } else {
+ CLEAR_FLAG(F_CF);
+ CLEAR_FLAG(F_AF);
+ }
+ res = (u16)(d & 0xFF0F);
+ CLEAR_FLAG(F_SF);
+ CONDITIONAL_SET_FLAG(res == 0, F_ZF);
+ CONDITIONAL_SET_FLAG(PARITY(res & 0xff), F_PF);
+ return res;
+}
+
+/****************************************************************************
+REMARKS:
+Implements the AAA instruction and side effects.
+****************************************************************************/
+u16 aas_word(u16 d)
+{
+ u16 res;
+ if ((d & 0xf) > 0x9 || ACCESS_FLAG(F_AF)) {
+ d -= 0x6;
+ d -= 0x100;
+ SET_FLAG(F_AF);
+ SET_FLAG(F_CF);
+ } else {
+ CLEAR_FLAG(F_CF);
+ CLEAR_FLAG(F_AF);
+ }
+ res = (u16)(d & 0xFF0F);
+ CLEAR_FLAG(F_SF);
+ CONDITIONAL_SET_FLAG(res == 0, F_ZF);
+ CONDITIONAL_SET_FLAG(PARITY(res & 0xff), F_PF);
+ return res;
+}
+
+/****************************************************************************
+REMARKS:
+Implements the AAD instruction and side effects.
+****************************************************************************/
+u16 aad_word(u16 d)
+{
+ u16 l;
+ u8 hb, lb;
+
+ hb = (u8)((d >> 8) & 0xff);
+ lb = (u8)((d & 0xff));
+ l = (u16)((lb + 10 * hb) & 0xFF);
+
+ CLEAR_FLAG(F_CF);
+ CLEAR_FLAG(F_AF);
+ CLEAR_FLAG(F_OF);
+ CONDITIONAL_SET_FLAG(l & 0x80, F_SF);
+ CONDITIONAL_SET_FLAG(l == 0, F_ZF);
+ CONDITIONAL_SET_FLAG(PARITY(l & 0xff), F_PF);
+ return l;
+}
+
+/****************************************************************************
+REMARKS:
+Implements the AAM instruction and side effects.
+****************************************************************************/
+u16 aam_word(u8 d)
+{
+ u16 h, l;
+
+ h = (u16)(d / 10);
+ l = (u16)(d % 10);
+ l |= (u16)(h << 8);
+
+ CLEAR_FLAG(F_CF);
+ CLEAR_FLAG(F_AF);
+ CLEAR_FLAG(F_OF);
+ CONDITIONAL_SET_FLAG(l & 0x80, F_SF);
+ CONDITIONAL_SET_FLAG(l == 0, F_ZF);
+ CONDITIONAL_SET_FLAG(PARITY(l & 0xff), F_PF);
+ return l;
+}
+
+/****************************************************************************
+REMARKS:
+Implements the ADC instruction and side effects.
+****************************************************************************/
+u8 adc_byte(u8 d, u8 s)
+{
+ register u32 res; /* all operands in native machine order */
+ register u32 cc;
+
+ if (ACCESS_FLAG(F_CF))
+ res = 1 + d + s;
+ else
+ res = d + s;
+
+ CONDITIONAL_SET_FLAG(res & 0x100, F_CF);
+ CONDITIONAL_SET_FLAG((res & 0xff) == 0, F_ZF);
+ CONDITIONAL_SET_FLAG(res & 0x80, F_SF);
+ CONDITIONAL_SET_FLAG(PARITY(res & 0xff), F_PF);
+
+ /* calculate the carry chain SEE NOTE AT TOP. */
+ cc = (s & d) | ((~res) & (s | d));
+ CONDITIONAL_SET_FLAG(XOR2(cc >> 6), F_OF);
+ CONDITIONAL_SET_FLAG(cc & 0x8, F_AF);
+ return (u8)res;
+}
+
+/****************************************************************************
+REMARKS:
+Implements the ADC instruction and side effects.
+****************************************************************************/
+u16 adc_word(u16 d, u16 s)
+{
+ register u32 res; /* all operands in native machine order */
+ register u32 cc;
+
+ if (ACCESS_FLAG(F_CF))
+ res = 1 + d + s;
+ else
+ res = d + s;
+
+ CONDITIONAL_SET_FLAG(res & 0x10000, F_CF);
+ CONDITIONAL_SET_FLAG((res & 0xffff) == 0, F_ZF);
+ CONDITIONAL_SET_FLAG(res & 0x8000, F_SF);
+ CONDITIONAL_SET_FLAG(PARITY(res & 0xff), F_PF);
+
+ /* calculate the carry chain SEE NOTE AT TOP. */
+ cc = (s & d) | ((~res) & (s | d));
+ CONDITIONAL_SET_FLAG(XOR2(cc >> 14), F_OF);
+ CONDITIONAL_SET_FLAG(cc & 0x8, F_AF);
+ return (u16)res;
+}
+
+/****************************************************************************
+REMARKS:
+Implements the ADC instruction and side effects.
+****************************************************************************/
+u32 adc_long(u32 d, u32 s)
+{
+ register u32 lo; /* all operands in native machine order */
+ register u32 hi;
+ register u32 res;
+ register u32 cc;
+
+ if (ACCESS_FLAG(F_CF)) {
+ lo = 1 + (d & 0xFFFF) + (s & 0xFFFF);
+ res = 1 + d + s;
+ }
+ else {
+ lo = (d & 0xFFFF) + (s & 0xFFFF);
+ res = d + s;
+ }
+ hi = (lo >> 16) + (d >> 16) + (s >> 16);
+
+ CONDITIONAL_SET_FLAG(hi & 0x10000, F_CF);
+ CONDITIONAL_SET_FLAG((res & 0xffffffff) == 0, F_ZF);
+ CONDITIONAL_SET_FLAG(res & 0x80000000, F_SF);
+ CONDITIONAL_SET_FLAG(PARITY(res & 0xff), F_PF);
+
+ /* calculate the carry chain SEE NOTE AT TOP. */
+ cc = (s & d) | ((~res) & (s | d));
+ CONDITIONAL_SET_FLAG(XOR2(cc >> 30), F_OF);
+ CONDITIONAL_SET_FLAG(cc & 0x8, F_AF);
+ return res;
+}
+
+/****************************************************************************
+REMARKS:
+Implements the ADD instruction and side effects.
+****************************************************************************/
+u8 add_byte(u8 d, u8 s)
+{
+ register u32 res; /* all operands in native machine order */
+ register u32 cc;
+
+ res = d + s;
+ CONDITIONAL_SET_FLAG(res & 0x100, F_CF);
+ CONDITIONAL_SET_FLAG((res & 0xff) == 0, F_ZF);
+ CONDITIONAL_SET_FLAG(res & 0x80, F_SF);
+ CONDITIONAL_SET_FLAG(PARITY(res & 0xff), F_PF);
+
+ /* calculate the carry chain SEE NOTE AT TOP. */
+ cc = (s & d) | ((~res) & (s | d));
+ CONDITIONAL_SET_FLAG(XOR2(cc >> 6), F_OF);
+ CONDITIONAL_SET_FLAG(cc & 0x8, F_AF);
+ return (u8)res;
+}
+
+/****************************************************************************
+REMARKS:
+Implements the ADD instruction and side effects.
+****************************************************************************/
+u16 add_word(u16 d, u16 s)
+{
+ register u32 res; /* all operands in native machine order */
+ register u32 cc;
+
+ res = d + s;
+ CONDITIONAL_SET_FLAG(res & 0x10000, F_CF);
+ CONDITIONAL_SET_FLAG((res & 0xffff) == 0, F_ZF);
+ CONDITIONAL_SET_FLAG(res & 0x8000, F_SF);
+ CONDITIONAL_SET_FLAG(PARITY(res & 0xff), F_PF);
+
+ /* calculate the carry chain SEE NOTE AT TOP. */
+ cc = (s & d) | ((~res) & (s | d));
+ CONDITIONAL_SET_FLAG(XOR2(cc >> 14), F_OF);
+ CONDITIONAL_SET_FLAG(cc & 0x8, F_AF);
+ return (u16)res;
+}
+
+/****************************************************************************
+REMARKS:
+Implements the ADD instruction and side effects.
+****************************************************************************/
+u32 add_long(u32 d, u32 s)
+{
+ register u32 lo; /* all operands in native machine order */
+ register u32 hi;
+ register u32 res;
+ register u32 cc;
+
+ lo = (d & 0xFFFF) + (s & 0xFFFF);
+ res = d + s;
+ hi = (lo >> 16) + (d >> 16) + (s >> 16);
+
+ CONDITIONAL_SET_FLAG(hi & 0x10000, F_CF);
+ CONDITIONAL_SET_FLAG((res & 0xffffffff) == 0, F_ZF);
+ CONDITIONAL_SET_FLAG(res & 0x80000000, F_SF);
+ CONDITIONAL_SET_FLAG(PARITY(res & 0xff), F_PF);
+
+ /* calculate the carry chain SEE NOTE AT TOP. */
+ cc = (s & d) | ((~res) & (s | d));
+ CONDITIONAL_SET_FLAG(XOR2(cc >> 30), F_OF);
+ CONDITIONAL_SET_FLAG(cc & 0x8, F_AF);
+
+ return res;
+}
+
+/****************************************************************************
+REMARKS:
+Implements the AND instruction and side effects.
+****************************************************************************/
+u8 and_byte(u8 d, u8 s)
+{
+ register u8 res; /* all operands in native machine order */
+
+ res = d & s;
+
+ /* set the flags */
+ CLEAR_FLAG(F_OF);
+ CLEAR_FLAG(F_CF);
+ CLEAR_FLAG(F_AF);
+ CONDITIONAL_SET_FLAG(res & 0x80, F_SF);
+ CONDITIONAL_SET_FLAG(res == 0, F_ZF);
+ CONDITIONAL_SET_FLAG(PARITY(res), F_PF);
+ return res;
+}
+
+/****************************************************************************
+REMARKS:
+Implements the AND instruction and side effects.
+****************************************************************************/
+u16 and_word(u16 d, u16 s)
+{
+ register u16 res; /* all operands in native machine order */
+
+ res = d & s;
+
+ /* set the flags */
+ CLEAR_FLAG(F_OF);
+ CLEAR_FLAG(F_CF);
+ CLEAR_FLAG(F_AF);
+ CONDITIONAL_SET_FLAG(res & 0x8000, F_SF);
+ CONDITIONAL_SET_FLAG(res == 0, F_ZF);
+ CONDITIONAL_SET_FLAG(PARITY(res & 0xff), F_PF);
+ return res;
+}
+
+/****************************************************************************
+REMARKS:
+Implements the AND instruction and side effects.
+****************************************************************************/
+u32 and_long(u32 d, u32 s)
+{
+ register u32 res; /* all operands in native machine order */
+
+ res = d & s;
+
+ /* set the flags */
+ CLEAR_FLAG(F_OF);
+ CLEAR_FLAG(F_CF);
+ CLEAR_FLAG(F_AF);
+ CONDITIONAL_SET_FLAG(res & 0x80000000, F_SF);
+ CONDITIONAL_SET_FLAG(res == 0, F_ZF);
+ CONDITIONAL_SET_FLAG(PARITY(res & 0xff), F_PF);
+ return res;
+}
+
+/****************************************************************************
+REMARKS:
+Implements the CMP instruction and side effects.
+****************************************************************************/
+u8 cmp_byte(u8 d, u8 s)
+{
+ register u32 res; /* all operands in native machine order */
+ register u32 bc;
+
+ res = d - s;
+ CLEAR_FLAG(F_CF);
+ CONDITIONAL_SET_FLAG(res & 0x80, F_SF);
+ CONDITIONAL_SET_FLAG((res & 0xff) == 0, F_ZF);
+ CONDITIONAL_SET_FLAG(PARITY(res & 0xff), F_PF);
+
+ /* calculate the borrow chain. See note at top */
+ bc = (res & (~d | s)) | (~d & s);
+ CONDITIONAL_SET_FLAG(bc & 0x80, F_CF);
+ CONDITIONAL_SET_FLAG(XOR2(bc >> 6), F_OF);
+ CONDITIONAL_SET_FLAG(bc & 0x8, F_AF);
+ return d;
+}
+
+/****************************************************************************
+REMARKS:
+Implements the CMP instruction and side effects.
+****************************************************************************/
+u16 cmp_word(u16 d, u16 s)
+{
+ register u32 res; /* all operands in native machine order */
+ register u32 bc;
+
+ res = d - s;
+ CONDITIONAL_SET_FLAG(res & 0x8000, F_SF);
+ CONDITIONAL_SET_FLAG((res & 0xffff) == 0, F_ZF);
+ CONDITIONAL_SET_FLAG(PARITY(res & 0xff), F_PF);
+
+ /* calculate the borrow chain. See note at top */
+ bc = (res & (~d | s)) | (~d & s);
+ CONDITIONAL_SET_FLAG(bc & 0x8000, F_CF);
+ CONDITIONAL_SET_FLAG(XOR2(bc >> 14), F_OF);
+ CONDITIONAL_SET_FLAG(bc & 0x8, F_AF);
+ return d;
+}
+
+/****************************************************************************
+REMARKS:
+Implements the CMP instruction and side effects.
+****************************************************************************/
+u32 cmp_long(u32 d, u32 s)
+{
+ register u32 res; /* all operands in native machine order */
+ register u32 bc;
+
+ res = d - s;
+ CONDITIONAL_SET_FLAG(res & 0x80000000, F_SF);
+ CONDITIONAL_SET_FLAG((res & 0xffffffff) == 0, F_ZF);
+ CONDITIONAL_SET_FLAG(PARITY(res & 0xff), F_PF);
+
+ /* calculate the borrow chain. See note at top */
+ bc = (res & (~d | s)) | (~d & s);
+ CONDITIONAL_SET_FLAG(bc & 0x80000000, F_CF);
+ CONDITIONAL_SET_FLAG(XOR2(bc >> 30), F_OF);
+ CONDITIONAL_SET_FLAG(bc & 0x8, F_AF);
+ return d;
+}
+
+/****************************************************************************
+REMARKS:
+Implements the DAA instruction and side effects.
+****************************************************************************/
+u8 daa_byte(u8 d)
+{
+ u32 res = d;
+ if ((d & 0xf) > 9 || ACCESS_FLAG(F_AF)) {
+ res += 6;
+ SET_FLAG(F_AF);
+ }
+ if (res > 0x9F || ACCESS_FLAG(F_CF)) {
+ res += 0x60;
+ SET_FLAG(F_CF);
+ }
+ CONDITIONAL_SET_FLAG(res & 0x80, F_SF);
+ CONDITIONAL_SET_FLAG((res & 0xFF) == 0, F_ZF);
+ CONDITIONAL_SET_FLAG(PARITY(res & 0xff), F_PF);
+ return (u8)res;
+}
+
+/****************************************************************************
+REMARKS:
+Implements the DAS instruction and side effects.
+****************************************************************************/
+u8 das_byte(u8 d)
+{
+ if ((d & 0xf) > 9 || ACCESS_FLAG(F_AF)) {
+ d -= 6;
+ SET_FLAG(F_AF);
+ }
+ if (d > 0x9F || ACCESS_FLAG(F_CF)) {
+ d -= 0x60;
+ SET_FLAG(F_CF);
+ }
+ CONDITIONAL_SET_FLAG(d & 0x80, F_SF);
+ CONDITIONAL_SET_FLAG(d == 0, F_ZF);
+ CONDITIONAL_SET_FLAG(PARITY(d & 0xff), F_PF);
+ return d;
+}
+
+/****************************************************************************
+REMARKS:
+Implements the DEC instruction and side effects.
+****************************************************************************/
+u8 dec_byte(u8 d)
+{
+ register u32 res; /* all operands in native machine order */
+ register u32 bc;
+
+ res = d - 1;
+ CONDITIONAL_SET_FLAG(res & 0x80, F_SF);
+ CONDITIONAL_SET_FLAG((res & 0xff) == 0, F_ZF);
+ CONDITIONAL_SET_FLAG(PARITY(res & 0xff), F_PF);
+
+ /* calculate the borrow chain. See note at top */
+ /* based on sub_byte, uses s==1. */
+ bc = (res & (~d | 1)) | (~d & 1);
+ /* carry flag unchanged */
+ CONDITIONAL_SET_FLAG(XOR2(bc >> 6), F_OF);
+ CONDITIONAL_SET_FLAG(bc & 0x8, F_AF);
+ return (u8)res;
+}
+
+/****************************************************************************
+REMARKS:
+Implements the DEC instruction and side effects.
+****************************************************************************/
+u16 dec_word(u16 d)
+{
+ register u32 res; /* all operands in native machine order */
+ register u32 bc;
+
+ res = d - 1;
+ CONDITIONAL_SET_FLAG(res & 0x8000, F_SF);
+ CONDITIONAL_SET_FLAG((res & 0xffff) == 0, F_ZF);
+ CONDITIONAL_SET_FLAG(PARITY(res & 0xff), F_PF);
+
+ /* calculate the borrow chain. See note at top */
+ /* based on the sub_byte routine, with s==1 */
+ bc = (res & (~d | 1)) | (~d & 1);
+ /* carry flag unchanged */
+ CONDITIONAL_SET_FLAG(XOR2(bc >> 14), F_OF);
+ CONDITIONAL_SET_FLAG(bc & 0x8, F_AF);
+ return (u16)res;
+}
+
+/****************************************************************************
+REMARKS:
+Implements the DEC instruction and side effects.
+****************************************************************************/
+u32 dec_long(u32 d)
+{
+ register u32 res; /* all operands in native machine order */
+ register u32 bc;
+
+ res = d - 1;
+
+ CONDITIONAL_SET_FLAG(res & 0x80000000, F_SF);
+ CONDITIONAL_SET_FLAG((res & 0xffffffff) == 0, F_ZF);
+ CONDITIONAL_SET_FLAG(PARITY(res & 0xff), F_PF);
+
+ /* calculate the borrow chain. See note at top */
+ bc = (res & (~d | 1)) | (~d & 1);
+ /* carry flag unchanged */
+ CONDITIONAL_SET_FLAG(XOR2(bc >> 30), F_OF);
+ CONDITIONAL_SET_FLAG(bc & 0x8, F_AF);
+ return res;
+}
+
+/****************************************************************************
+REMARKS:
+Implements the INC instruction and side effects.
+****************************************************************************/
+u8 inc_byte(u8 d)
+{
+ register u32 res; /* all operands in native machine order */
+ register u32 cc;
+
+ res = d + 1;
+ CONDITIONAL_SET_FLAG((res & 0xff) == 0, F_ZF);
+ CONDITIONAL_SET_FLAG(res & 0x80, F_SF);
+ CONDITIONAL_SET_FLAG(PARITY(res & 0xff), F_PF);
+
+ /* calculate the carry chain SEE NOTE AT TOP. */
+ cc = ((1 & d) | (~res)) & (1 | d);
+ CONDITIONAL_SET_FLAG(XOR2(cc >> 6), F_OF);
+ CONDITIONAL_SET_FLAG(cc & 0x8, F_AF);
+ return (u8)res;
+}
+
+/****************************************************************************
+REMARKS:
+Implements the INC instruction and side effects.
+****************************************************************************/
+u16 inc_word(u16 d)
+{
+ register u32 res; /* all operands in native machine order */
+ register u32 cc;
+
+ res = d + 1;
+ CONDITIONAL_SET_FLAG((res & 0xffff) == 0, F_ZF);
+ CONDITIONAL_SET_FLAG(res & 0x8000, F_SF);
+ CONDITIONAL_SET_FLAG(PARITY(res & 0xff), F_PF);
+
+ /* calculate the carry chain SEE NOTE AT TOP. */
+ cc = (1 & d) | ((~res) & (1 | d));
+ CONDITIONAL_SET_FLAG(XOR2(cc >> 14), F_OF);
+ CONDITIONAL_SET_FLAG(cc & 0x8, F_AF);
+ return (u16)res;
+}
+
+/****************************************************************************
+REMARKS:
+Implements the INC instruction and side effects.
+****************************************************************************/
+u32 inc_long(u32 d)
+{
+ register u32 res; /* all operands in native machine order */
+ register u32 cc;
+
+ res = d + 1;
+ CONDITIONAL_SET_FLAG((res & 0xffffffff) == 0, F_ZF);
+ CONDITIONAL_SET_FLAG(res & 0x80000000, F_SF);
+ CONDITIONAL_SET_FLAG(PARITY(res & 0xff), F_PF);
+
+ /* calculate the carry chain SEE NOTE AT TOP. */
+ cc = (1 & d) | ((~res) & (1 | d));
+ CONDITIONAL_SET_FLAG(XOR2(cc >> 30), F_OF);
+ CONDITIONAL_SET_FLAG(cc & 0x8, F_AF);
+ return res;
+}
+
+/****************************************************************************
+REMARKS:
+Implements the OR instruction and side effects.
+****************************************************************************/
+u8 or_byte(u8 d, u8 s)
+{
+ register u8 res; /* all operands in native machine order */
+
+ res = d | s;
+ CLEAR_FLAG(F_OF);
+ CLEAR_FLAG(F_CF);
+ CLEAR_FLAG(F_AF);
+ CONDITIONAL_SET_FLAG(res & 0x80, F_SF);
+ CONDITIONAL_SET_FLAG(res == 0, F_ZF);
+ CONDITIONAL_SET_FLAG(PARITY(res), F_PF);
+ return res;
+}
+
+/****************************************************************************
+REMARKS:
+Implements the OR instruction and side effects.
+****************************************************************************/
+u16 or_word(u16 d, u16 s)
+{
+ register u16 res; /* all operands in native machine order */
+
+ res = d | s;
+ /* set the carry flag to be bit 8 */
+ CLEAR_FLAG(F_OF);
+ CLEAR_FLAG(F_CF);
+ CLEAR_FLAG(F_AF);
+ CONDITIONAL_SET_FLAG(res & 0x8000, F_SF);
+ CONDITIONAL_SET_FLAG(res == 0, F_ZF);
+ CONDITIONAL_SET_FLAG(PARITY(res & 0xff), F_PF);
+ return res;
+}
+
+/****************************************************************************
+REMARKS:
+Implements the OR instruction and side effects.
+****************************************************************************/
+u32 or_long(u32 d, u32 s)
+{
+ register u32 res; /* all operands in native machine order */
+
+ res = d | s;
+
+ /* set the carry flag to be bit 8 */
+ CLEAR_FLAG(F_OF);
+ CLEAR_FLAG(F_CF);
+ CLEAR_FLAG(F_AF);
+ CONDITIONAL_SET_FLAG(res & 0x80000000, F_SF);
+ CONDITIONAL_SET_FLAG(res == 0, F_ZF);
+ CONDITIONAL_SET_FLAG(PARITY(res & 0xff), F_PF);
+ return res;
+}
+
+/****************************************************************************
+REMARKS:
+Implements the OR instruction and side effects.
+****************************************************************************/
+u8 neg_byte(u8 s)
+{
+ register u8 res;
+ register u8 bc;
+
+ CONDITIONAL_SET_FLAG(s != 0, F_CF);
+ res = (u8)-s;
+ CONDITIONAL_SET_FLAG((res & 0xff) == 0, F_ZF);
+ CONDITIONAL_SET_FLAG(res & 0x80, F_SF);
+ CONDITIONAL_SET_FLAG(PARITY(res), F_PF);
+ /* calculate the borrow chain --- modified such that d=0.
+ substitutiing d=0 into bc= res&(~d|s)|(~d&s);
+ (the one used for sub) and simplifying, since ~d=0xff...,
+ ~d|s == 0xffff..., and res&0xfff... == res. Similarly
+ ~d&s == s. So the simplified result is: */
+ bc = res | s;
+ CONDITIONAL_SET_FLAG(XOR2(bc >> 6), F_OF);
+ CONDITIONAL_SET_FLAG(bc & 0x8, F_AF);
+ return res;
+}
+
+/****************************************************************************
+REMARKS:
+Implements the OR instruction and side effects.
+****************************************************************************/
+u16 neg_word(u16 s)
+{
+ register u16 res;
+ register u16 bc;
+
+ CONDITIONAL_SET_FLAG(s != 0, F_CF);
+ res = (u16)-s;
+ CONDITIONAL_SET_FLAG((res & 0xffff) == 0, F_ZF);
+ CONDITIONAL_SET_FLAG(res & 0x8000, F_SF);
+ CONDITIONAL_SET_FLAG(PARITY(res & 0xff), F_PF);
+
+ /* calculate the borrow chain --- modified such that d=0.
+ substitutiing d=0 into bc= res&(~d|s)|(~d&s);
+ (the one used for sub) and simplifying, since ~d=0xff...,
+ ~d|s == 0xffff..., and res&0xfff... == res. Similarly
+ ~d&s == s. So the simplified result is: */
+ bc = res | s;
+ CONDITIONAL_SET_FLAG(XOR2(bc >> 14), F_OF);
+ CONDITIONAL_SET_FLAG(bc & 0x8, F_AF);
+ return res;
+}
+
+/****************************************************************************
+REMARKS:
+Implements the OR instruction and side effects.
+****************************************************************************/
+u32 neg_long(u32 s)
+{
+ register u32 res;
+ register u32 bc;
+
+ CONDITIONAL_SET_FLAG(s != 0, F_CF);
+ res = (u32)-s;
+ CONDITIONAL_SET_FLAG((res & 0xffffffff) == 0, F_ZF);
+ CONDITIONAL_SET_FLAG(res & 0x80000000, F_SF);
+ CONDITIONAL_SET_FLAG(PARITY(res & 0xff), F_PF);
+
+ /* calculate the borrow chain --- modified such that d=0.
+ substitutiing d=0 into bc= res&(~d|s)|(~d&s);
+ (the one used for sub) and simplifying, since ~d=0xff...,
+ ~d|s == 0xffff..., and res&0xfff... == res. Similarly
+ ~d&s == s. So the simplified result is: */
+ bc = res | s;
+ CONDITIONAL_SET_FLAG(XOR2(bc >> 30), F_OF);
+ CONDITIONAL_SET_FLAG(bc & 0x8, F_AF);
+ return res;
+}
+
+/****************************************************************************
+REMARKS:
+Implements the NOT instruction and side effects.
+****************************************************************************/
+u8 not_byte(u8 s)
+{
+ return ~s;
+}
+
+/****************************************************************************
+REMARKS:
+Implements the NOT instruction and side effects.
+****************************************************************************/
+u16 not_word(u16 s)
+{
+ return ~s;
+}
+
+/****************************************************************************
+REMARKS:
+Implements the NOT instruction and side effects.
+****************************************************************************/
+u32 not_long(u32 s)
+{
+ return ~s;
+}
+
+/****************************************************************************
+REMARKS:
+Implements the RCL instruction and side effects.
+****************************************************************************/
+u8 rcl_byte(u8 d, u8 s)
+{
+ register unsigned int res, cnt, mask, cf;
+
+ /* s is the rotate distance. It varies from 0 - 8. */
+ /* have
+
+ CF B_7 B_6 B_5 B_4 B_3 B_2 B_1 B_0
+
+ want to rotate through the carry by "s" bits. We could
+ loop, but that's inefficient. So the width is 9,
+ and we split into three parts:
+
+ The new carry flag (was B_n)
+ the stuff in B_n-1 .. B_0
+ the stuff in B_7 .. B_n+1
+
+ The new rotate is done mod 9, and given this,
+ for a rotation of n bits (mod 9) the new carry flag is
+ then located n bits from the MSB. The low part is
+ then shifted up cnt bits, and the high part is or'd
+ in. Using CAPS for new values, and lowercase for the
+ original values, this can be expressed as:
+
+ IF n > 0
+ 1) CF <- b_(8-n)
+ 2) B_(7) .. B_(n) <- b_(8-(n+1)) .. b_0
+ 3) B_(n-1) <- cf
+ 4) B_(n-2) .. B_0 <- b_7 .. b_(8-(n-1))
+ */
+ res = d;
+ if ((cnt = s % 9) != 0) {
+ /* extract the new CARRY FLAG. */
+ /* CF <- b_(8-n) */
+ cf = (d >> (8 - cnt)) & 0x1;
+
+ /* get the low stuff which rotated
+ into the range B_7 .. B_cnt */
+ /* B_(7) .. B_(n) <- b_(8-(n+1)) .. b_0 */
+ /* note that the right hand side done by the mask */
+ res = (d << cnt) & 0xff;
+
+ /* now the high stuff which rotated around
+ into the positions B_cnt-2 .. B_0 */
+ /* B_(n-2) .. B_0 <- b_7 .. b_(8-(n-1)) */
+ /* shift it downward, 7-(n-2) = 9-n positions.
+ and mask off the result before or'ing in.
+ */
+ mask = (1 << (cnt - 1)) - 1;
+ res |= (d >> (9 - cnt)) & mask;
+
+ /* if the carry flag was set, or it in. */
+ if (ACCESS_FLAG(F_CF)) { /* carry flag is set */
+ /* B_(n-1) <- cf */
+ res |= 1 << (cnt - 1);
+ }
+ /* set the new carry flag, based on the variable "cf" */
+ CONDITIONAL_SET_FLAG(cf, F_CF);
+ /* OVERFLOW is set *IFF* cnt==1, then it is the
+ xor of CF and the most significant bit. Blecck. */
+ /* parenthesized this expression since it appears to
+ be causing OF to be misset */
+ CONDITIONAL_SET_FLAG(cnt == 1 && XOR2(cf + ((res >> 6) & 0x2)),
+ F_OF);
+
+ }
+ return (u8)res;
+}
+
+/****************************************************************************
+REMARKS:
+Implements the RCL instruction and side effects.
+****************************************************************************/
+u16 rcl_word(u16 d, u8 s)
+{
+ register unsigned int res, cnt, mask, cf;
+
+ res = d;
+ if ((cnt = s % 17) != 0) {
+ cf = (d >> (16 - cnt)) & 0x1;
+ res = (d << cnt) & 0xffff;
+ mask = (1 << (cnt - 1)) - 1;
+ res |= (d >> (17 - cnt)) & mask;
+ if (ACCESS_FLAG(F_CF)) {
+ res |= 1 << (cnt - 1);
+ }
+ CONDITIONAL_SET_FLAG(cf, F_CF);
+ CONDITIONAL_SET_FLAG(cnt == 1 && XOR2(cf + ((res >> 14) & 0x2)),
+ F_OF);
+ }
+ return (u16)res;
+}
+
+/****************************************************************************
+REMARKS:
+Implements the RCL instruction and side effects.
+****************************************************************************/
+u32 rcl_long(u32 d, u8 s)
+{
+ register u32 res, cnt, mask, cf;
+
+ res = d;
+ if ((cnt = s % 33) != 0) {
+ cf = (d >> (32 - cnt)) & 0x1;
+ res = (d << cnt) & 0xffffffff;
+ mask = (1 << (cnt - 1)) - 1;
+ res |= (d >> (33 - cnt)) & mask;
+ if (ACCESS_FLAG(F_CF)) { /* carry flag is set */
+ res |= 1 << (cnt - 1);
+ }
+ CONDITIONAL_SET_FLAG(cf, F_CF);
+ CONDITIONAL_SET_FLAG(cnt == 1 && XOR2(cf + ((res >> 30) & 0x2)),
+ F_OF);
+ }
+ return res;
+}
+
+/****************************************************************************
+REMARKS:
+Implements the RCR instruction and side effects.
+****************************************************************************/
+u8 rcr_byte(u8 d, u8 s)
+{
+ u32 res, cnt;
+ u32 mask, cf, ocf = 0;
+
+ /* rotate right through carry */
+ /*
+ s is the rotate distance. It varies from 0 - 8.
+ d is the byte object rotated.
+
+ have
+
+ CF B_7 B_6 B_5 B_4 B_3 B_2 B_1 B_0
+
+ The new rotate is done mod 9, and given this,
+ for a rotation of n bits (mod 9) the new carry flag is
+ then located n bits from the LSB. The low part is
+ then shifted up cnt bits, and the high part is or'd
+ in. Using CAPS for new values, and lowercase for the
+ original values, this can be expressed as:
+
+ IF n > 0
+ 1) CF <- b_(n-1)
+ 2) B_(8-(n+1)) .. B_(0) <- b_(7) .. b_(n)
+ 3) B_(8-n) <- cf
+ 4) B_(7) .. B_(8-(n-1)) <- b_(n-2) .. b_(0)
+ */
+ res = d;
+ if ((cnt = s % 9) != 0) {
+ /* extract the new CARRY FLAG. */
+ /* CF <- b_(n-1) */
+ if (cnt == 1) {
+ cf = d & 0x1;
+ /* note hackery here. Access_flag(..) evaluates to either
+ 0 if flag not set
+ non-zero if flag is set.
+ doing access_flag(..) != 0 casts that into either
+ 0..1 in any representation of the flags register
+ (i.e. packed bit array or unpacked.)
+ */
+ ocf = ACCESS_FLAG(F_CF) != 0;
+ } else
+ cf = (d >> (cnt - 1)) & 0x1;
+
+ /* B_(8-(n+1)) .. B_(0) <- b_(7) .. b_n */
+ /* note that the right hand side done by the mask
+ This is effectively done by shifting the
+ object to the right. The result must be masked,
+ in case the object came in and was treated
+ as a negative number. Needed??? */
+
+ mask = (1 << (8 - cnt)) - 1;
+ res = (d >> cnt) & mask;
+
+ /* now the high stuff which rotated around
+ into the positions B_cnt-2 .. B_0 */
+ /* B_(7) .. B_(8-(n-1)) <- b_(n-2) .. b_(0) */
+ /* shift it downward, 7-(n-2) = 9-n positions.
+ and mask off the result before or'ing in.
+ */
+ res |= (d << (9 - cnt));
+
+ /* if the carry flag was set, or it in. */
+ if (ACCESS_FLAG(F_CF)) { /* carry flag is set */
+ /* B_(8-n) <- cf */
+ res |= 1 << (8 - cnt);
+ }
+ /* set the new carry flag, based on the variable "cf" */
+ CONDITIONAL_SET_FLAG(cf, F_CF);
+ /* OVERFLOW is set *IFF* cnt==1, then it is the
+ xor of CF and the most significant bit. Blecck. */
+ /* parenthesized... */
+ if (cnt == 1) {
+ CONDITIONAL_SET_FLAG(XOR2(ocf + ((d >> 6) & 0x2)),
+ F_OF);
+ }
+ }
+ return (u8)res;
+}
+
+/****************************************************************************
+REMARKS:
+Implements the RCR instruction and side effects.
+****************************************************************************/
+u16 rcr_word(u16 d, u8 s)
+{
+ u32 res, cnt;
+ u32 mask, cf, ocf = 0;
+
+ /* rotate right through carry */
+ res = d;
+ if ((cnt = s % 17) != 0) {
+ if (cnt == 1) {
+ cf = d & 0x1;
+ ocf = ACCESS_FLAG(F_CF) != 0;
+ } else
+ cf = (d >> (cnt - 1)) & 0x1;
+ mask = (1 << (16 - cnt)) - 1;
+ res = (d >> cnt) & mask;
+ res |= (d << (17 - cnt));
+ if (ACCESS_FLAG(F_CF)) {
+ res |= 1 << (16 - cnt);
+ }
+ CONDITIONAL_SET_FLAG(cf, F_CF);
+ if (cnt == 1) {
+ CONDITIONAL_SET_FLAG(XOR2(ocf + ((d >> 14) & 0x2)),
+ F_OF);
+ }
+ }
+ return (u16)res;
+}
+
+/****************************************************************************
+REMARKS:
+Implements the RCR instruction and side effects.
+****************************************************************************/
+u32 rcr_long(u32 d, u8 s)
+{
+ u32 res, cnt;
+ u32 mask, cf, ocf = 0;
+
+ /* rotate right through carry */
+ res = d;
+ if ((cnt = s % 33) != 0) {
+ if (cnt == 1) {
+ cf = d & 0x1;
+ ocf = ACCESS_FLAG(F_CF) != 0;
+ } else
+ cf = (d >> (cnt - 1)) & 0x1;
+ mask = (1 << (32 - cnt)) - 1;
+ res = (d >> cnt) & mask;
+ if (cnt != 1)
+ res |= (d << (33 - cnt));
+ if (ACCESS_FLAG(F_CF)) { /* carry flag is set */
+ res |= 1 << (32 - cnt);
+ }
+ CONDITIONAL_SET_FLAG(cf, F_CF);
+ if (cnt == 1) {
+ CONDITIONAL_SET_FLAG(XOR2(ocf + ((d >> 30) & 0x2)),
+ F_OF);
+ }
+ }
+ return res;
+}
+
+/****************************************************************************
+REMARKS:
+Implements the ROL instruction and side effects.
+****************************************************************************/
+u8 rol_byte(u8 d, u8 s)
+{
+ register unsigned int res, cnt, mask;
+
+ /* rotate left */
+ /*
+ s is the rotate distance. It varies from 0 - 8.
+ d is the byte object rotated.
+
+ have
+
+ CF B_7 ... B_0
+
+ The new rotate is done mod 8.
+ Much simpler than the "rcl" or "rcr" operations.
+
+ IF n > 0
+ 1) B_(7) .. B_(n) <- b_(8-(n+1)) .. b_(0)
+ 2) B_(n-1) .. B_(0) <- b_(7) .. b_(8-n)
+ */
+ res = d;
+ if ((cnt = s % 8) != 0) {
+ /* B_(7) .. B_(n) <- b_(8-(n+1)) .. b_(0) */
+ res = (d << cnt);
+
+ /* B_(n-1) .. B_(0) <- b_(7) .. b_(8-n) */
+ mask = (1 << cnt) - 1;
+ res |= (d >> (8 - cnt)) & mask;
+
+ /* set the new carry flag, Note that it is the low order
+ bit of the result!!! */
+ CONDITIONAL_SET_FLAG(res & 0x1, F_CF);
+ /* OVERFLOW is set *IFF* s==1, then it is the
+ xor of CF and the most significant bit. Blecck. */
+ CONDITIONAL_SET_FLAG(s == 1 &&
+ XOR2((res & 0x1) + ((res >> 6) & 0x2)),
+ F_OF);
+ } if (s != 0) {
+ /* set the new carry flag, Note that it is the low order
+ bit of the result!!! */
+ CONDITIONAL_SET_FLAG(res & 0x1, F_CF);
+ }
+ return (u8)res;
+}
+
+/****************************************************************************
+REMARKS:
+Implements the ROL instruction and side effects.
+****************************************************************************/
+u16 rol_word(u16 d, u8 s)
+{
+ register unsigned int res, cnt, mask;
+
+ res = d;
+ if ((cnt = s % 16) != 0) {
+ res = (d << cnt);
+ mask = (1 << cnt) - 1;
+ res |= (d >> (16 - cnt)) & mask;
+ CONDITIONAL_SET_FLAG(res & 0x1, F_CF);
+ CONDITIONAL_SET_FLAG(s == 1 &&
+ XOR2((res & 0x1) + ((res >> 14) & 0x2)),
+ F_OF);
+ } if (s != 0) {
+ /* set the new carry flag, Note that it is the low order
+ bit of the result!!! */
+ CONDITIONAL_SET_FLAG(res & 0x1, F_CF);
+ }
+ return (u16)res;
+}
+
+/****************************************************************************
+REMARKS:
+Implements the ROL instruction and side effects.
+****************************************************************************/
+u32 rol_long(u32 d, u8 s)
+{
+ register u32 res, cnt, mask;
+
+ res = d;
+ if ((cnt = s % 32) != 0) {
+ res = (d << cnt);
+ mask = (1 << cnt) - 1;
+ res |= (d >> (32 - cnt)) & mask;
+ CONDITIONAL_SET_FLAG(res & 0x1, F_CF);
+ CONDITIONAL_SET_FLAG(s == 1 &&
+ XOR2((res & 0x1) + ((res >> 30) & 0x2)),
+ F_OF);
+ } if (s != 0) {
+ /* set the new carry flag, Note that it is the low order
+ bit of the result!!! */
+ CONDITIONAL_SET_FLAG(res & 0x1, F_CF);
+ }
+ return res;
+}
+
+/****************************************************************************
+REMARKS:
+Implements the ROR instruction and side effects.
+****************************************************************************/
+u8 ror_byte(u8 d, u8 s)
+{
+ register unsigned int res, cnt, mask;
+
+ /* rotate right */
+ /*
+ s is the rotate distance. It varies from 0 - 8.
+ d is the byte object rotated.
+
+ have
+
+ B_7 ... B_0
+
+ The rotate is done mod 8.
+
+ IF n > 0
+ 1) B_(8-(n+1)) .. B_(0) <- b_(7) .. b_(n)
+ 2) B_(7) .. B_(8-n) <- b_(n-1) .. b_(0)
+ */
+ res = d;
+ if ((cnt = s % 8) != 0) { /* not a typo, do nada if cnt==0 */
+ /* B_(7) .. B_(8-n) <- b_(n-1) .. b_(0) */
+ res = (d << (8 - cnt));
+
+ /* B_(8-(n+1)) .. B_(0) <- b_(7) .. b_(n) */
+ mask = (1 << (8 - cnt)) - 1;
+ res |= (d >> (cnt)) & mask;
+
+ /* set the new carry flag, Note that it is the low order
+ bit of the result!!! */
+ CONDITIONAL_SET_FLAG(res & 0x80, F_CF);
+ /* OVERFLOW is set *IFF* s==1, then it is the
+ xor of the two most significant bits. Blecck. */
+ CONDITIONAL_SET_FLAG(s == 1 && XOR2(res >> 6), F_OF);
+ } else if (s != 0) {
+ /* set the new carry flag, Note that it is the low order
+ bit of the result!!! */
+ CONDITIONAL_SET_FLAG(res & 0x80, F_CF);
+ }
+ return (u8)res;
+}
+
+/****************************************************************************
+REMARKS:
+Implements the ROR instruction and side effects.
+****************************************************************************/
+u16 ror_word(u16 d, u8 s)
+{
+ register unsigned int res, cnt, mask;
+
+ res = d;
+ if ((cnt = s % 16) != 0) {
+ res = (d << (16 - cnt));
+ mask = (1 << (16 - cnt)) - 1;
+ res |= (d >> (cnt)) & mask;
+ CONDITIONAL_SET_FLAG(res & 0x8000, F_CF);
+ CONDITIONAL_SET_FLAG(s == 1 && XOR2(res >> 14), F_OF);
+ } else if (s != 0) {
+ /* set the new carry flag, Note that it is the low order
+ bit of the result!!! */
+ CONDITIONAL_SET_FLAG(res & 0x8000, F_CF);
+ }
+ return (u16)res;
+}
+
+/****************************************************************************
+REMARKS:
+Implements the ROR instruction and side effects.
+****************************************************************************/
+u32 ror_long(u32 d, u8 s)
+{
+ register u32 res, cnt, mask;
+
+ res = d;
+ if ((cnt = s % 32) != 0) {
+ res = (d << (32 - cnt));
+ mask = (1 << (32 - cnt)) - 1;
+ res |= (d >> (cnt)) & mask;
+ CONDITIONAL_SET_FLAG(res & 0x80000000, F_CF);
+ CONDITIONAL_SET_FLAG(s == 1 && XOR2(res >> 30), F_OF);
+ } else if (s != 0) {
+ /* set the new carry flag, Note that it is the low order
+ bit of the result!!! */
+ CONDITIONAL_SET_FLAG(res & 0x80000000, F_CF);
+ }
+ return res;
+}
+
+/****************************************************************************
+REMARKS:
+Implements the SHL instruction and side effects.
+****************************************************************************/
+u8 shl_byte(u8 d, u8 s)
+{
+ unsigned int cnt, res, cf;
+
+ if (s < 8) {
+ cnt = s % 8;
+
+ /* last bit shifted out goes into carry flag */
+ if (cnt > 0) {
+ res = d << cnt;
+ cf = d & (1 << (8 - cnt));
+ CONDITIONAL_SET_FLAG(cf, F_CF);
+ CONDITIONAL_SET_FLAG((res & 0xff) == 0, F_ZF);
+ CONDITIONAL_SET_FLAG(res & 0x80, F_SF);
+ CONDITIONAL_SET_FLAG(PARITY(res & 0xff), F_PF);
+ } else {
+ res = (u8) d;
+ }
+
+ if (cnt == 1) {
+ /* Needs simplification. */
+ CONDITIONAL_SET_FLAG(
+ (((res & 0x80) == 0x80) ^
+ (ACCESS_FLAG(F_CF) != 0)),
+ /* was (M.x86.R_FLG&F_CF)==F_CF)), */
+ F_OF);
+ } else {
+ CLEAR_FLAG(F_OF);
+ }
+ } else {
+ res = 0;
+ CONDITIONAL_SET_FLAG((d << (s-1)) & 0x80, F_CF);
+ CLEAR_FLAG(F_OF);
+ CLEAR_FLAG(F_SF);
+ SET_FLAG(F_PF);
+ SET_FLAG(F_ZF);
+ }
+ return (u8)res;
+}
+
+/****************************************************************************
+REMARKS:
+Implements the SHL instruction and side effects.
+****************************************************************************/
+u16 shl_word(u16 d, u8 s)
+{
+ unsigned int cnt, res, cf;
+
+ if (s < 16) {
+ cnt = s % 16;
+ if (cnt > 0) {
+ res = d << cnt;
+ cf = d & (1 << (16 - cnt));
+ CONDITIONAL_SET_FLAG(cf, F_CF);
+ CONDITIONAL_SET_FLAG((res & 0xffff) == 0, F_ZF);
+ CONDITIONAL_SET_FLAG(res & 0x8000, F_SF);
+ CONDITIONAL_SET_FLAG(PARITY(res & 0xff), F_PF);
+ } else {
+ res = (u16) d;
+ }
+
+ if (cnt == 1) {
+ CONDITIONAL_SET_FLAG(
+ (((res & 0x8000) == 0x8000) ^
+ (ACCESS_FLAG(F_CF) != 0)),
+ F_OF);
+ } else {
+ CLEAR_FLAG(F_OF);
+ }
+ } else {
+ res = 0;
+ CONDITIONAL_SET_FLAG((d << (s-1)) & 0x8000, F_CF);
+ CLEAR_FLAG(F_OF);
+ CLEAR_FLAG(F_SF);
+ SET_FLAG(F_PF);
+ SET_FLAG(F_ZF);
+ }
+ return (u16)res;
+}
+
+/****************************************************************************
+REMARKS:
+Implements the SHL instruction and side effects.
+****************************************************************************/
+u32 shl_long(u32 d, u8 s)
+{
+ unsigned int cnt, res, cf;
+
+ if (s < 32) {
+ cnt = s % 32;
+ if (cnt > 0) {
+ res = d << cnt;
+ cf = d & (1 << (32 - cnt));
+ CONDITIONAL_SET_FLAG(cf, F_CF);
+ CONDITIONAL_SET_FLAG((res & 0xffffffff) == 0, F_ZF);
+ CONDITIONAL_SET_FLAG(res & 0x80000000, F_SF);
+ CONDITIONAL_SET_FLAG(PARITY(res & 0xff), F_PF);
+ } else {
+ res = d;
+ }
+ if (cnt == 1) {
+ CONDITIONAL_SET_FLAG((((res & 0x80000000) == 0x80000000) ^
+ (ACCESS_FLAG(F_CF) != 0)), F_OF);
+ } else {
+ CLEAR_FLAG(F_OF);
+ }
+ } else {
+ res = 0;
+ CONDITIONAL_SET_FLAG((d << (s-1)) & 0x80000000, F_CF);
+ CLEAR_FLAG(F_OF);
+ CLEAR_FLAG(F_SF);
+ SET_FLAG(F_PF);
+ SET_FLAG(F_ZF);
+ }
+ return res;
+}
+
+/****************************************************************************
+REMARKS:
+Implements the SHR instruction and side effects.
+****************************************************************************/
+u8 shr_byte(u8 d, u8 s)
+{
+ unsigned int cnt, res, cf;
+
+ if (s < 8) {
+ cnt = s % 8;
+ if (cnt > 0) {
+ cf = d & (1 << (cnt - 1));
+ res = d >> cnt;
+ CONDITIONAL_SET_FLAG(cf, F_CF);
+ CONDITIONAL_SET_FLAG((res & 0xff) == 0, F_ZF);
+ CONDITIONAL_SET_FLAG(res & 0x80, F_SF);
+ CONDITIONAL_SET_FLAG(PARITY(res & 0xff), F_PF);
+ } else {
+ res = (u8) d;
+ }
+
+ if (cnt == 1) {
+ CONDITIONAL_SET_FLAG(XOR2(res >> 6), F_OF);
+ } else {
+ CLEAR_FLAG(F_OF);
+ }
+ } else {
+ res = 0;
+ CONDITIONAL_SET_FLAG((d >> (s-1)) & 0x1, F_CF);
+ CLEAR_FLAG(F_OF);
+ CLEAR_FLAG(F_SF);
+ SET_FLAG(F_PF);
+ SET_FLAG(F_ZF);
+ }
+ return (u8)res;
+}
+
+/****************************************************************************
+REMARKS:
+Implements the SHR instruction and side effects.
+****************************************************************************/
+u16 shr_word(u16 d, u8 s)
+{
+ unsigned int cnt, res, cf;
+
+ if (s < 16) {
+ cnt = s % 16;
+ if (cnt > 0) {
+ cf = d & (1 << (cnt - 1));
+ res = d >> cnt;
+ CONDITIONAL_SET_FLAG(cf, F_CF);
+ CONDITIONAL_SET_FLAG((res & 0xffff) == 0, F_ZF);
+ CONDITIONAL_SET_FLAG(res & 0x8000, F_SF);
+ CONDITIONAL_SET_FLAG(PARITY(res & 0xff), F_PF);
+ } else {
+ res = d;
+ }
+
+ if (cnt == 1) {
+ CONDITIONAL_SET_FLAG(XOR2(res >> 14), F_OF);
+ } else {
+ CLEAR_FLAG(F_OF);
+ }
+ } else {
+ res = 0;
+ CLEAR_FLAG(F_CF);
+ CLEAR_FLAG(F_OF);
+ SET_FLAG(F_ZF);
+ CLEAR_FLAG(F_SF);
+ CLEAR_FLAG(F_PF);
+ }
+ return (u16)res;
+}
+
+/****************************************************************************
+REMARKS:
+Implements the SHR instruction and side effects.
+****************************************************************************/
+u32 shr_long(u32 d, u8 s)
+{
+ unsigned int cnt, res, cf;
+
+ if (s < 32) {
+ cnt = s % 32;
+ if (cnt > 0) {
+ cf = d & (1 << (cnt - 1));
+ res = d >> cnt;
+ CONDITIONAL_SET_FLAG(cf, F_CF);
+ CONDITIONAL_SET_FLAG((res & 0xffffffff) == 0, F_ZF);
+ CONDITIONAL_SET_FLAG(res & 0x80000000, F_SF);
+ CONDITIONAL_SET_FLAG(PARITY(res & 0xff), F_PF);
+ } else {
+ res = d;
+ }
+ if (cnt == 1) {
+ CONDITIONAL_SET_FLAG(XOR2(res >> 30), F_OF);
+ } else {
+ CLEAR_FLAG(F_OF);
+ }
+ } else {
+ res = 0;
+ CLEAR_FLAG(F_CF);
+ CLEAR_FLAG(F_OF);
+ SET_FLAG(F_ZF);
+ CLEAR_FLAG(F_SF);
+ CLEAR_FLAG(F_PF);
+ }
+ return res;
+}
+
+/****************************************************************************
+REMARKS:
+Implements the SAR instruction and side effects.
+****************************************************************************/
+u8 sar_byte(u8 d, u8 s)
+{
+ unsigned int cnt, res, cf, mask, sf;
+
+ res = d;
+ sf = d & 0x80;
+ cnt = s % 8;
+ if (cnt > 0 && cnt < 8) {
+ mask = (1 << (8 - cnt)) - 1;
+ cf = d & (1 << (cnt - 1));
+ res = (d >> cnt) & mask;
+ CONDITIONAL_SET_FLAG(cf, F_CF);
+ if (sf) {
+ res |= ~mask;
+ }
+ CONDITIONAL_SET_FLAG((res & 0xff) == 0, F_ZF);
+ CONDITIONAL_SET_FLAG(PARITY(res & 0xff), F_PF);
+ CONDITIONAL_SET_FLAG(res & 0x80, F_SF);
+ } else if (cnt >= 8) {
+ if (sf) {
+ res = 0xff;
+ SET_FLAG(F_CF);
+ CLEAR_FLAG(F_ZF);
+ SET_FLAG(F_SF);
+ SET_FLAG(F_PF);
+ } else {
+ res = 0;
+ CLEAR_FLAG(F_CF);
+ SET_FLAG(F_ZF);
+ CLEAR_FLAG(F_SF);
+ CLEAR_FLAG(F_PF);
+ }
+ }
+ return (u8)res;
+}
+
+/****************************************************************************
+REMARKS:
+Implements the SAR instruction and side effects.
+****************************************************************************/
+u16 sar_word(u16 d, u8 s)
+{
+ unsigned int cnt, res, cf, mask, sf;
+
+ sf = d & 0x8000;
+ cnt = s % 16;
+ res = d;
+ if (cnt > 0 && cnt < 16) {
+ mask = (1 << (16 - cnt)) - 1;
+ cf = d & (1 << (cnt - 1));
+ res = (d >> cnt) & mask;
+ CONDITIONAL_SET_FLAG(cf, F_CF);
+ if (sf) {
+ res |= ~mask;
+ }
+ CONDITIONAL_SET_FLAG((res & 0xffff) == 0, F_ZF);
+ CONDITIONAL_SET_FLAG(res & 0x8000, F_SF);
+ CONDITIONAL_SET_FLAG(PARITY(res & 0xff), F_PF);
+ } else if (cnt >= 16) {
+ if (sf) {
+ res = 0xffff;
+ SET_FLAG(F_CF);
+ CLEAR_FLAG(F_ZF);
+ SET_FLAG(F_SF);
+ SET_FLAG(F_PF);
+ } else {
+ res = 0;
+ CLEAR_FLAG(F_CF);
+ SET_FLAG(F_ZF);
+ CLEAR_FLAG(F_SF);
+ CLEAR_FLAG(F_PF);
+ }
+ }
+ return (u16)res;
+}
+
+/****************************************************************************
+REMARKS:
+Implements the SAR instruction and side effects.
+****************************************************************************/
+u32 sar_long(u32 d, u8 s)
+{
+ u32 cnt, res, cf, mask, sf;
+
+ sf = d & 0x80000000;
+ cnt = s % 32;
+ res = d;
+ if (cnt > 0 && cnt < 32) {
+ mask = (1 << (32 - cnt)) - 1;
+ cf = d & (1 << (cnt - 1));
+ res = (d >> cnt) & mask;
+ CONDITIONAL_SET_FLAG(cf, F_CF);
+ if (sf) {
+ res |= ~mask;
+ }
+ CONDITIONAL_SET_FLAG((res & 0xffffffff) == 0, F_ZF);
+ CONDITIONAL_SET_FLAG(res & 0x80000000, F_SF);
+ CONDITIONAL_SET_FLAG(PARITY(res & 0xff), F_PF);
+ } else if (cnt >= 32) {
+ if (sf) {
+ res = 0xffffffff;
+ SET_FLAG(F_CF);
+ CLEAR_FLAG(F_ZF);
+ SET_FLAG(F_SF);
+ SET_FLAG(F_PF);
+ } else {
+ res = 0;
+ CLEAR_FLAG(F_CF);
+ SET_FLAG(F_ZF);
+ CLEAR_FLAG(F_SF);
+ CLEAR_FLAG(F_PF);
+ }
+ }
+ return res;
+}
+
+/****************************************************************************
+REMARKS:
+Implements the SHLD instruction and side effects.
+****************************************************************************/
+u16 shld_word (u16 d, u16 fill, u8 s)
+{
+ unsigned int cnt, res, cf;
+
+ if (s < 16) {
+ cnt = s % 16;
+ if (cnt > 0) {
+ res = (d << cnt) | (fill >> (16-cnt));
+ cf = d & (1 << (16 - cnt));
+ CONDITIONAL_SET_FLAG(cf, F_CF);
+ CONDITIONAL_SET_FLAG((res & 0xffff) == 0, F_ZF);
+ CONDITIONAL_SET_FLAG(res & 0x8000, F_SF);
+ CONDITIONAL_SET_FLAG(PARITY(res & 0xff), F_PF);
+ } else {
+ res = d;
+ }
+ if (cnt == 1) {
+ CONDITIONAL_SET_FLAG((((res & 0x8000) == 0x8000) ^
+ (ACCESS_FLAG(F_CF) != 0)), F_OF);
+ } else {
+ CLEAR_FLAG(F_OF);
+ }
+ } else {
+ res = 0;
+ CONDITIONAL_SET_FLAG((d << (s-1)) & 0x8000, F_CF);
+ CLEAR_FLAG(F_OF);
+ CLEAR_FLAG(F_SF);
+ SET_FLAG(F_PF);
+ SET_FLAG(F_ZF);
+ }
+ return (u16)res;
+}
+
+/****************************************************************************
+REMARKS:
+Implements the SHLD instruction and side effects.
+****************************************************************************/
+u32 shld_long (u32 d, u32 fill, u8 s)
+{
+ unsigned int cnt, res, cf;
+
+ if (s < 32) {
+ cnt = s % 32;
+ if (cnt > 0) {
+ res = (d << cnt) | (fill >> (32-cnt));
+ cf = d & (1 << (32 - cnt));
+ CONDITIONAL_SET_FLAG(cf, F_CF);
+ CONDITIONAL_SET_FLAG((res & 0xffffffff) == 0, F_ZF);
+ CONDITIONAL_SET_FLAG(res & 0x80000000, F_SF);
+ CONDITIONAL_SET_FLAG(PARITY(res & 0xff), F_PF);
+ } else {
+ res = d;
+ }
+ if (cnt == 1) {
+ CONDITIONAL_SET_FLAG((((res & 0x80000000) == 0x80000000) ^
+ (ACCESS_FLAG(F_CF) != 0)), F_OF);
+ } else {
+ CLEAR_FLAG(F_OF);
+ }
+ } else {
+ res = 0;
+ CONDITIONAL_SET_FLAG((d << (s-1)) & 0x80000000, F_CF);
+ CLEAR_FLAG(F_OF);
+ CLEAR_FLAG(F_SF);
+ SET_FLAG(F_PF);
+ SET_FLAG(F_ZF);
+ }
+ return res;
+}
+
+/****************************************************************************
+REMARKS:
+Implements the SHRD instruction and side effects.
+****************************************************************************/
+u16 shrd_word (u16 d, u16 fill, u8 s)
+{
+ unsigned int cnt, res, cf;
+
+ if (s < 16) {
+ cnt = s % 16;
+ if (cnt > 0) {
+ cf = d & (1 << (cnt - 1));
+ res = (d >> cnt) | (fill << (16 - cnt));
+ CONDITIONAL_SET_FLAG(cf, F_CF);
+ CONDITIONAL_SET_FLAG((res & 0xffff) == 0, F_ZF);
+ CONDITIONAL_SET_FLAG(res & 0x8000, F_SF);
+ CONDITIONAL_SET_FLAG(PARITY(res & 0xff), F_PF);
+ } else {
+ res = d;
+ }
+
+ if (cnt == 1) {
+ CONDITIONAL_SET_FLAG(XOR2(res >> 14), F_OF);
+ } else {
+ CLEAR_FLAG(F_OF);
+ }
+ } else {
+ res = 0;
+ CLEAR_FLAG(F_CF);
+ CLEAR_FLAG(F_OF);
+ SET_FLAG(F_ZF);
+ CLEAR_FLAG(F_SF);
+ CLEAR_FLAG(F_PF);
+ }
+ return (u16)res;
+}
+
+/****************************************************************************
+REMARKS:
+Implements the SHRD instruction and side effects.
+****************************************************************************/
+u32 shrd_long (u32 d, u32 fill, u8 s)
+{
+ unsigned int cnt, res, cf;
+
+ if (s < 32) {
+ cnt = s % 32;
+ if (cnt > 0) {
+ cf = d & (1 << (cnt - 1));
+ res = (d >> cnt) | (fill << (32 - cnt));
+ CONDITIONAL_SET_FLAG(cf, F_CF);
+ CONDITIONAL_SET_FLAG((res & 0xffffffff) == 0, F_ZF);
+ CONDITIONAL_SET_FLAG(res & 0x80000000, F_SF);
+ CONDITIONAL_SET_FLAG(PARITY(res & 0xff), F_PF);
+ } else {
+ res = d;
+ }
+ if (cnt == 1) {
+ CONDITIONAL_SET_FLAG(XOR2(res >> 30), F_OF);
+ } else {
+ CLEAR_FLAG(F_OF);
+ }
+ } else {
+ res = 0;
+ CLEAR_FLAG(F_CF);
+ CLEAR_FLAG(F_OF);
+ SET_FLAG(F_ZF);
+ CLEAR_FLAG(F_SF);
+ CLEAR_FLAG(F_PF);
+ }
+ return res;
+}
+
+/****************************************************************************
+REMARKS:
+Implements the SBB instruction and side effects.
+****************************************************************************/
+u8 sbb_byte(u8 d, u8 s)
+{
+ register u32 res; /* all operands in native machine order */
+ register u32 bc;
+
+ if (ACCESS_FLAG(F_CF))
+ res = d - s - 1;
+ else
+ res = d - s;
+ CONDITIONAL_SET_FLAG(res & 0x80, F_SF);
+ CONDITIONAL_SET_FLAG((res & 0xff) == 0, F_ZF);
+ CONDITIONAL_SET_FLAG(PARITY(res & 0xff), F_PF);
+
+ /* calculate the borrow chain. See note at top */
+ bc = (res & (~d | s)) | (~d & s);
+ CONDITIONAL_SET_FLAG(bc & 0x80, F_CF);
+ CONDITIONAL_SET_FLAG(XOR2(bc >> 6), F_OF);
+ CONDITIONAL_SET_FLAG(bc & 0x8, F_AF);
+ return (u8)res;
+}
+
+/****************************************************************************
+REMARKS:
+Implements the SBB instruction and side effects.
+****************************************************************************/
+u16 sbb_word(u16 d, u16 s)
+{
+ register u32 res; /* all operands in native machine order */
+ register u32 bc;
+
+ if (ACCESS_FLAG(F_CF))
+ res = d - s - 1;
+ else
+ res = d - s;
+ CONDITIONAL_SET_FLAG(res & 0x8000, F_SF);
+ CONDITIONAL_SET_FLAG((res & 0xffff) == 0, F_ZF);
+ CONDITIONAL_SET_FLAG(PARITY(res & 0xff), F_PF);
+
+ /* calculate the borrow chain. See note at top */
+ bc = (res & (~d | s)) | (~d & s);
+ CONDITIONAL_SET_FLAG(bc & 0x8000, F_CF);
+ CONDITIONAL_SET_FLAG(XOR2(bc >> 14), F_OF);
+ CONDITIONAL_SET_FLAG(bc & 0x8, F_AF);
+ return (u16)res;
+}
+
+/****************************************************************************
+REMARKS:
+Implements the SBB instruction and side effects.
+****************************************************************************/
+u32 sbb_long(u32 d, u32 s)
+{
+ register u32 res; /* all operands in native machine order */
+ register u32 bc;
+
+ if (ACCESS_FLAG(F_CF))
+ res = d - s - 1;
+ else
+ res = d - s;
+ CONDITIONAL_SET_FLAG(res & 0x80000000, F_SF);
+ CONDITIONAL_SET_FLAG((res & 0xffffffff) == 0, F_ZF);
+ CONDITIONAL_SET_FLAG(PARITY(res & 0xff), F_PF);
+
+ /* calculate the borrow chain. See note at top */
+ bc = (res & (~d | s)) | (~d & s);
+ CONDITIONAL_SET_FLAG(bc & 0x80000000, F_CF);
+ CONDITIONAL_SET_FLAG(XOR2(bc >> 30), F_OF);
+ CONDITIONAL_SET_FLAG(bc & 0x8, F_AF);
+ return res;
+}
+
+/****************************************************************************
+REMARKS:
+Implements the SUB instruction and side effects.
+****************************************************************************/
+u8 sub_byte(u8 d, u8 s)
+{
+ register u32 res; /* all operands in native machine order */
+ register u32 bc;
+
+ res = d - s;
+ CONDITIONAL_SET_FLAG(res & 0x80, F_SF);
+ CONDITIONAL_SET_FLAG((res & 0xff) == 0, F_ZF);
+ CONDITIONAL_SET_FLAG(PARITY(res & 0xff), F_PF);
+
+ /* calculate the borrow chain. See note at top */
+ bc = (res & (~d | s)) | (~d & s);
+ CONDITIONAL_SET_FLAG(bc & 0x80, F_CF);
+ CONDITIONAL_SET_FLAG(XOR2(bc >> 6), F_OF);
+ CONDITIONAL_SET_FLAG(bc & 0x8, F_AF);
+ return (u8)res;
+}
+
+/****************************************************************************
+REMARKS:
+Implements the SUB instruction and side effects.
+****************************************************************************/
+u16 sub_word(u16 d, u16 s)
+{
+ register u32 res; /* all operands in native machine order */
+ register u32 bc;
+
+ res = d - s;
+ CONDITIONAL_SET_FLAG(res & 0x8000, F_SF);
+ CONDITIONAL_SET_FLAG((res & 0xffff) == 0, F_ZF);
+ CONDITIONAL_SET_FLAG(PARITY(res & 0xff), F_PF);
+
+ /* calculate the borrow chain. See note at top */
+ bc = (res & (~d | s)) | (~d & s);
+ CONDITIONAL_SET_FLAG(bc & 0x8000, F_CF);
+ CONDITIONAL_SET_FLAG(XOR2(bc >> 14), F_OF);
+ CONDITIONAL_SET_FLAG(bc & 0x8, F_AF);
+ return (u16)res;
+}
+
+/****************************************************************************
+REMARKS:
+Implements the SUB instruction and side effects.
+****************************************************************************/
+u32 sub_long(u32 d, u32 s)
+{
+ register u32 res; /* all operands in native machine order */
+ register u32 bc;
+
+ res = d - s;
+ CONDITIONAL_SET_FLAG(res & 0x80000000, F_SF);
+ CONDITIONAL_SET_FLAG((res & 0xffffffff) == 0, F_ZF);
+ CONDITIONAL_SET_FLAG(PARITY(res & 0xff), F_PF);
+
+ /* calculate the borrow chain. See note at top */
+ bc = (res & (~d | s)) | (~d & s);
+ CONDITIONAL_SET_FLAG(bc & 0x80000000, F_CF);
+ CONDITIONAL_SET_FLAG(XOR2(bc >> 30), F_OF);
+ CONDITIONAL_SET_FLAG(bc & 0x8, F_AF);
+ return res;
+}
+
+/****************************************************************************
+REMARKS:
+Implements the TEST instruction and side effects.
+****************************************************************************/
+void test_byte(u8 d, u8 s)
+{
+ register u32 res; /* all operands in native machine order */
+
+ res = d & s;
+
+ CLEAR_FLAG(F_OF);
+ CONDITIONAL_SET_FLAG(res & 0x80, F_SF);
+ CONDITIONAL_SET_FLAG(res == 0, F_ZF);
+ CONDITIONAL_SET_FLAG(PARITY(res & 0xff), F_PF);
+ /* AF == dont care */
+ CLEAR_FLAG(F_CF);
+}
+
+/****************************************************************************
+REMARKS:
+Implements the TEST instruction and side effects.
+****************************************************************************/
+void test_word(u16 d, u16 s)
+{
+ register u32 res; /* all operands in native machine order */
+
+ res = d & s;
+
+ CLEAR_FLAG(F_OF);
+ CONDITIONAL_SET_FLAG(res & 0x8000, F_SF);
+ CONDITIONAL_SET_FLAG(res == 0, F_ZF);
+ CONDITIONAL_SET_FLAG(PARITY(res & 0xff), F_PF);
+ /* AF == dont care */
+ CLEAR_FLAG(F_CF);
+}
+
+/****************************************************************************
+REMARKS:
+Implements the TEST instruction and side effects.
+****************************************************************************/
+void test_long(u32 d, u32 s)
+{
+ register u32 res; /* all operands in native machine order */
+
+ res = d & s;
+
+ CLEAR_FLAG(F_OF);
+ CONDITIONAL_SET_FLAG(res & 0x80000000, F_SF);
+ CONDITIONAL_SET_FLAG(res == 0, F_ZF);
+ CONDITIONAL_SET_FLAG(PARITY(res & 0xff), F_PF);
+ /* AF == dont care */
+ CLEAR_FLAG(F_CF);
+}
+
+/****************************************************************************
+REMARKS:
+Implements the XOR instruction and side effects.
+****************************************************************************/
+u8 xor_byte(u8 d, u8 s)
+{
+ register u8 res; /* all operands in native machine order */
+
+ res = d ^ s;
+ CLEAR_FLAG(F_OF);
+ CONDITIONAL_SET_FLAG(res & 0x80, F_SF);
+ CONDITIONAL_SET_FLAG(res == 0, F_ZF);
+ CONDITIONAL_SET_FLAG(PARITY(res), F_PF);
+ CLEAR_FLAG(F_CF);
+ CLEAR_FLAG(F_AF);
+ return res;
+}
+
+/****************************************************************************
+REMARKS:
+Implements the XOR instruction and side effects.
+****************************************************************************/
+u16 xor_word(u16 d, u16 s)
+{
+ register u16 res; /* all operands in native machine order */
+
+ res = d ^ s;
+ CLEAR_FLAG(F_OF);
+ CONDITIONAL_SET_FLAG(res & 0x8000, F_SF);
+ CONDITIONAL_SET_FLAG(res == 0, F_ZF);
+ CONDITIONAL_SET_FLAG(PARITY(res & 0xff), F_PF);
+ CLEAR_FLAG(F_CF);
+ CLEAR_FLAG(F_AF);
+ return res;
+}
+
+/****************************************************************************
+REMARKS:
+Implements the XOR instruction and side effects.
+****************************************************************************/
+u32 xor_long(u32 d, u32 s)
+{
+ register u32 res; /* all operands in native machine order */
+
+ res = d ^ s;
+ CLEAR_FLAG(F_OF);
+ CONDITIONAL_SET_FLAG(res & 0x80000000, F_SF);
+ CONDITIONAL_SET_FLAG(res == 0, F_ZF);
+ CONDITIONAL_SET_FLAG(PARITY(res & 0xff), F_PF);
+ CLEAR_FLAG(F_CF);
+ CLEAR_FLAG(F_AF);
+ return res;
+}
+
+/****************************************************************************
+REMARKS:
+Implements the IMUL instruction and side effects.
+****************************************************************************/
+void imul_byte(u8 s)
+{
+ s16 res = (s16)((s8)M.x86.R_AL * (s8)s);
+
+ M.x86.R_AX = res;
+ if (((M.x86.R_AL & 0x80) == 0 && M.x86.R_AH == 0x00) ||
+ ((M.x86.R_AL & 0x80) != 0 && M.x86.R_AH == 0xFF)) {
+ CLEAR_FLAG(F_CF);
+ CLEAR_FLAG(F_OF);
+ } else {
+ SET_FLAG(F_CF);
+ SET_FLAG(F_OF);
+ }
+}
+
+/****************************************************************************
+REMARKS:
+Implements the IMUL instruction and side effects.
+****************************************************************************/
+void imul_word(u16 s)
+{
+ s32 res = (s16)M.x86.R_AX * (s16)s;
+
+ M.x86.R_AX = (u16)res;
+ M.x86.R_DX = (u16)(res >> 16);
+ if (((M.x86.R_AX & 0x8000) == 0 && M.x86.R_DX == 0x00) ||
+ ((M.x86.R_AX & 0x8000) != 0 && M.x86.R_DX == 0xFF)) {
+ CLEAR_FLAG(F_CF);
+ CLEAR_FLAG(F_OF);
+ } else {
+ SET_FLAG(F_CF);
+ SET_FLAG(F_OF);
+ }
+}
+
+/****************************************************************************
+REMARKS:
+Implements the IMUL instruction and side effects.
+****************************************************************************/
+void imul_long_direct(u32 *res_lo, u32* res_hi,u32 d, u32 s)
+{
+#ifdef __HAS_LONG_LONG__
+ s64 res = (s32)d * (s32)s;
+
+ *res_lo = (u32)res;
+ *res_hi = (u32)(res >> 32);
+#else
+ u32 d_lo,d_hi,d_sign;
+ u32 s_lo,s_hi,s_sign;
+ u32 rlo_lo,rlo_hi,rhi_lo;
+
+ if ((d_sign = d & 0x80000000) != 0)
+ d = -d;
+ d_lo = d & 0xFFFF;
+ d_hi = d >> 16;
+ if ((s_sign = s & 0x80000000) != 0)
+ s = -s;
+ s_lo = s & 0xFFFF;
+ s_hi = s >> 16;
+ rlo_lo = d_lo * s_lo;
+ rlo_hi = (d_hi * s_lo + d_lo * s_hi) + (rlo_lo >> 16);
+ rhi_lo = d_hi * s_hi + (rlo_hi >> 16);
+ *res_lo = (rlo_hi << 16) | (rlo_lo & 0xFFFF);
+ *res_hi = rhi_lo;
+ if (d_sign != s_sign) {
+ d = ~*res_lo;
+ s = (((d & 0xFFFF) + 1) >> 16) + (d >> 16);
+ *res_lo = ~*res_lo+1;
+ *res_hi = ~*res_hi+(s >> 16);
+ }
+#endif
+}
+
+/****************************************************************************
+REMARKS:
+Implements the IMUL instruction and side effects.
+****************************************************************************/
+void imul_long(u32 s)
+{
+ imul_long_direct(&M.x86.R_EAX,&M.x86.R_EDX,M.x86.R_EAX,s);
+ if (((M.x86.R_EAX & 0x80000000) == 0 && M.x86.R_EDX == 0x00) ||
+ ((M.x86.R_EAX & 0x80000000) != 0 && M.x86.R_EDX == 0xFF)) {
+ CLEAR_FLAG(F_CF);
+ CLEAR_FLAG(F_OF);
+ } else {
+ SET_FLAG(F_CF);
+ SET_FLAG(F_OF);
+ }
+}
+
+/****************************************************************************
+REMARKS:
+Implements the MUL instruction and side effects.
+****************************************************************************/
+void mul_byte(u8 s)
+{
+ u16 res = (u16)(M.x86.R_AL * s);
+
+ M.x86.R_AX = res;
+ if (M.x86.R_AH == 0) {
+ CLEAR_FLAG(F_CF);
+ CLEAR_FLAG(F_OF);
+ } else {
+ SET_FLAG(F_CF);
+ SET_FLAG(F_OF);
+ }
+}
+
+/****************************************************************************
+REMARKS:
+Implements the MUL instruction and side effects.
+****************************************************************************/
+void mul_word(u16 s)
+{
+ u32 res = M.x86.R_AX * s;
+
+ M.x86.R_AX = (u16)res;
+ M.x86.R_DX = (u16)(res >> 16);
+ if (M.x86.R_DX == 0) {
+ CLEAR_FLAG(F_CF);
+ CLEAR_FLAG(F_OF);
+ } else {
+ SET_FLAG(F_CF);
+ SET_FLAG(F_OF);
+ }
+}
+
+/****************************************************************************
+REMARKS:
+Implements the MUL instruction and side effects.
+****************************************************************************/
+void mul_long(u32 s)
+{
+#ifdef __HAS_LONG_LONG__
+ u64 res = (u32)M.x86.R_EAX * (u32)s;
+
+ M.x86.R_EAX = (u32)res;
+ M.x86.R_EDX = (u32)(res >> 32);
+#else
+ u32 a,a_lo,a_hi;
+ u32 s_lo,s_hi;
+ u32 rlo_lo,rlo_hi,rhi_lo;
+
+ a = M.x86.R_EAX;
+ a_lo = a & 0xFFFF;
+ a_hi = a >> 16;
+ s_lo = s & 0xFFFF;
+ s_hi = s >> 16;
+ rlo_lo = a_lo * s_lo;
+ rlo_hi = (a_hi * s_lo + a_lo * s_hi) + (rlo_lo >> 16);
+ rhi_lo = a_hi * s_hi + (rlo_hi >> 16);
+ M.x86.R_EAX = (rlo_hi << 16) | (rlo_lo & 0xFFFF);
+ M.x86.R_EDX = rhi_lo;
+#endif
+
+ if (M.x86.R_EDX == 0) {
+ CLEAR_FLAG(F_CF);
+ CLEAR_FLAG(F_OF);
+ } else {
+ SET_FLAG(F_CF);
+ SET_FLAG(F_OF);
+ }
+}
+
+/****************************************************************************
+REMARKS:
+Implements the IDIV instruction and side effects.
+****************************************************************************/
+void idiv_byte(u8 s)
+{
+ s32 dvd, div, mod;
+
+ dvd = (s16)M.x86.R_AX;
+ if (s == 0) {
+ x86emu_intr_raise(0);
+ return;
+ }
+ div = dvd / (s8)s;
+ mod = dvd % (s8)s;
+ if (abs(div) > 0x7f) {
+ x86emu_intr_raise(0);
+ return;
+ }
+ M.x86.R_AL = (s8) div;
+ M.x86.R_AH = (s8) mod;
+}
+
+/****************************************************************************
+REMARKS:
+Implements the IDIV instruction and side effects.
+****************************************************************************/
+void idiv_word(u16 s)
+{
+ s32 dvd, div, mod;
+
+ dvd = (((s32)M.x86.R_DX) << 16) | M.x86.R_AX;
+ if (s == 0) {
+ x86emu_intr_raise(0);
+ return;
+ }
+ div = dvd / (s16)s;
+ mod = dvd % (s16)s;
+ if (abs(div) > 0x7fff) {
+ x86emu_intr_raise(0);
+ return;
+ }
+ CLEAR_FLAG(F_CF);
+ CLEAR_FLAG(F_SF);
+ CONDITIONAL_SET_FLAG(div == 0, F_ZF);
+ CONDITIONAL_SET_FLAG(PARITY(mod & 0xff), F_PF);
+
+ M.x86.R_AX = (u16)div;
+ M.x86.R_DX = (u16)mod;
+}
+
+/****************************************************************************
+REMARKS:
+Implements the IDIV instruction and side effects.
+****************************************************************************/
+void idiv_long(u32 s)
+{
+#ifdef __HAS_LONG_LONG__
+ s64 dvd, div, mod;
+
+ dvd = (((s64)M.x86.R_EDX) << 32) | M.x86.R_EAX;
+ if (s == 0) {
+ x86emu_intr_raise(0);
+ return;
+ }
+ div = dvd / (s32)s;
+ mod = dvd % (s32)s;
+ if (abs(div) > 0x7fffffff) {
+ x86emu_intr_raise(0);
+ return;
+ }
+#else
+ s32 div = 0, mod;
+ s32 h_dvd = M.x86.R_EDX;
+ u32 l_dvd = M.x86.R_EAX;
+ u32 abs_s = s & 0x7FFFFFFF;
+ u32 abs_h_dvd = h_dvd & 0x7FFFFFFF;
+ u32 h_s = abs_s >> 1;
+ u32 l_s = abs_s << 31;
+ int counter = 31;
+ int carry;
+
+ if (s == 0) {
+ x86emu_intr_raise(0);
+ return;
+ }
+ do {
+ div <<= 1;
+ carry = (l_dvd >= l_s) ? 0 : 1;
+
+ if (abs_h_dvd < (h_s + carry)) {
+ h_s >>= 1;
+ l_s = abs_s << (--counter);
+ continue;
+ } else {
+ abs_h_dvd -= (h_s + carry);
+ l_dvd = carry ? ((0xFFFFFFFF - l_s) + l_dvd + 1)
+ : (l_dvd - l_s);
+ h_s >>= 1;
+ l_s = abs_s << (--counter);
+ div |= 1;
+ continue;
+ }
+
+ } while (counter > -1);
+ /* overflow */
+ if (abs_h_dvd || (l_dvd > abs_s)) {
+ x86emu_intr_raise(0);
+ return;
+ }
+ /* sign */
+ div |= ((h_dvd & 0x10000000) ^ (s & 0x10000000));
+ mod = l_dvd;
+
+#endif
+ CLEAR_FLAG(F_CF);
+ CLEAR_FLAG(F_AF);
+ CLEAR_FLAG(F_SF);
+ SET_FLAG(F_ZF);
+ CONDITIONAL_SET_FLAG(PARITY(mod & 0xff), F_PF);
+
+ M.x86.R_EAX = (u32)div;
+ M.x86.R_EDX = (u32)mod;
+}
+
+/****************************************************************************
+REMARKS:
+Implements the DIV instruction and side effects.
+****************************************************************************/
+void div_byte(u8 s)
+{
+ u32 dvd, div, mod;
+
+ dvd = M.x86.R_AX;
+ if (s == 0) {
+ x86emu_intr_raise(0);
+ return;
+ }
+ div = dvd / (u8)s;
+ mod = dvd % (u8)s;
+ if (abs(div) > 0xff) {
+ x86emu_intr_raise(0);
+ return;
+ }
+ M.x86.R_AL = (u8)div;
+ M.x86.R_AH = (u8)mod;
+}
+
+/****************************************************************************
+REMARKS:
+Implements the DIV instruction and side effects.
+****************************************************************************/
+void div_word(u16 s)
+{
+ u32 dvd, div, mod;
+
+ dvd = (((u32)M.x86.R_DX) << 16) | M.x86.R_AX;
+ if (s == 0) {
+ x86emu_intr_raise(0);
+ return;
+ }
+ div = dvd / (u16)s;
+ mod = dvd % (u16)s;
+ if (abs(div) > 0xffff) {
+ x86emu_intr_raise(0);
+ return;
+ }
+ CLEAR_FLAG(F_CF);
+ CLEAR_FLAG(F_SF);
+ CONDITIONAL_SET_FLAG(div == 0, F_ZF);
+ CONDITIONAL_SET_FLAG(PARITY(mod & 0xff), F_PF);
+
+ M.x86.R_AX = (u16)div;
+ M.x86.R_DX = (u16)mod;
+}
+
+/****************************************************************************
+REMARKS:
+Implements the DIV instruction and side effects.
+****************************************************************************/
+void div_long(u32 s)
+{
+#ifdef __HAS_LONG_LONG__
+ u64 dvd, div, mod;
+
+ dvd = (((u64)M.x86.R_EDX) << 32) | M.x86.R_EAX;
+ if (s == 0) {
+ x86emu_intr_raise(0);
+ return;
+ }
+ div = dvd / (u32)s;
+ mod = dvd % (u32)s;
+ if (abs(div) > 0xffffffff) {
+ x86emu_intr_raise(0);
+ return;
+ }
+#else
+ s32 div = 0, mod;
+ s32 h_dvd = M.x86.R_EDX;
+ u32 l_dvd = M.x86.R_EAX;
+
+ u32 h_s = s;
+ u32 l_s = 0;
+ int counter = 32;
+ int carry;
+
+ if (s == 0) {
+ x86emu_intr_raise(0);
+ return;
+ }
+ do {
+ div <<= 1;
+ carry = (l_dvd >= l_s) ? 0 : 1;
+
+ if (h_dvd < (h_s + carry)) {
+ h_s >>= 1;
+ l_s = s << (--counter);
+ continue;
+ } else {
+ h_dvd -= (h_s + carry);
+ l_dvd = carry ? ((0xFFFFFFFF - l_s) + l_dvd + 1)
+ : (l_dvd - l_s);
+ h_s >>= 1;
+ l_s = s << (--counter);
+ div |= 1;
+ continue;
+ }
+
+ } while (counter > -1);
+ /* overflow */
+ if (h_dvd || (l_dvd > s)) {
+ x86emu_intr_raise(0);
+ return;
+ }
+ mod = l_dvd;
+#endif
+ CLEAR_FLAG(F_CF);
+ CLEAR_FLAG(F_AF);
+ CLEAR_FLAG(F_SF);
+ SET_FLAG(F_ZF);
+ CONDITIONAL_SET_FLAG(PARITY(mod & 0xff), F_PF);
+
+ M.x86.R_EAX = (u32)div;
+ M.x86.R_EDX = (u32)mod;
+}
+
+#endif /* __HAVE_INLINE_ASSEMBLER__ */
+
+/****************************************************************************
+REMARKS:
+Implements the IN string instruction and side effects.
+****************************************************************************/
+void ins(int size)
+{
+ int inc = size;
+
+ if (ACCESS_FLAG(F_DF)) {
+ inc = -size;
+ }
+ if (M.x86.mode & (SYSMODE_PREFIX_REPE | SYSMODE_PREFIX_REPNE)) {
+ /* dont care whether REPE or REPNE */
+ /* in until CX is ZERO. */
+ u32 count = ((M.x86.mode & SYSMODE_PREFIX_DATA) ?
+ M.x86.R_ECX : M.x86.R_CX);
+ switch (size) {
+ case 1:
+ while (count--) {
+ store_data_byte_abs(M.x86.R_ES, M.x86.R_DI,
+ (*sys_inb)(M.x86.R_DX));
+ M.x86.R_DI += inc;
+ }
+ break;
+
+ case 2:
+ while (count--) {
+ store_data_word_abs(M.x86.R_ES, M.x86.R_DI,
+ (*sys_inw)(M.x86.R_DX));
+ M.x86.R_DI += inc;
+ }
+ break;
+ case 4:
+ while (count--) {
+ store_data_long_abs(M.x86.R_ES, M.x86.R_DI,
+ (*sys_inl)(M.x86.R_DX));
+ M.x86.R_DI += inc;
+ break;
+ }
+ }
+ M.x86.R_CX = 0;
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ M.x86.R_ECX = 0;
+ }
+ M.x86.mode &= ~(SYSMODE_PREFIX_REPE | SYSMODE_PREFIX_REPNE);
+ } else {
+ switch (size) {
+ case 1:
+ store_data_byte_abs(M.x86.R_ES, M.x86.R_DI,
+ (*sys_inb)(M.x86.R_DX));
+ break;
+ case 2:
+ store_data_word_abs(M.x86.R_ES, M.x86.R_DI,
+ (*sys_inw)(M.x86.R_DX));
+ break;
+ case 4:
+ store_data_long_abs(M.x86.R_ES, M.x86.R_DI,
+ (*sys_inl)(M.x86.R_DX));
+ break;
+ }
+ M.x86.R_DI += inc;
+ }
+}
+
+/****************************************************************************
+REMARKS:
+Implements the OUT string instruction and side effects.
+****************************************************************************/
+void outs(int size)
+{
+ int inc = size;
+
+ if (ACCESS_FLAG(F_DF)) {
+ inc = -size;
+ }
+ if (M.x86.mode & (SYSMODE_PREFIX_REPE | SYSMODE_PREFIX_REPNE)) {
+ /* dont care whether REPE or REPNE */
+ /* out until CX is ZERO. */
+ u32 count = ((M.x86.mode & SYSMODE_PREFIX_DATA) ?
+ M.x86.R_ECX : M.x86.R_CX);
+ switch (size) {
+ case 1:
+ while (count--) {
+ (*sys_outb)(M.x86.R_DX,
+ fetch_data_byte_abs(M.x86.R_ES, M.x86.R_SI));
+ M.x86.R_SI += inc;
+ }
+ break;
+
+ case 2:
+ while (count--) {
+ (*sys_outw)(M.x86.R_DX,
+ fetch_data_word_abs(M.x86.R_ES, M.x86.R_SI));
+ M.x86.R_SI += inc;
+ }
+ break;
+ case 4:
+ while (count--) {
+ (*sys_outl)(M.x86.R_DX,
+ fetch_data_long_abs(M.x86.R_ES, M.x86.R_SI));
+ M.x86.R_SI += inc;
+ break;
+ }
+ }
+ M.x86.R_CX = 0;
+ if (M.x86.mode & SYSMODE_PREFIX_DATA) {
+ M.x86.R_ECX = 0;
+ }
+ M.x86.mode &= ~(SYSMODE_PREFIX_REPE | SYSMODE_PREFIX_REPNE);
+ } else {
+ switch (size) {
+ case 1:
+ (*sys_outb)(M.x86.R_DX,
+ fetch_data_byte_abs(M.x86.R_ES, M.x86.R_SI));
+ break;
+ case 2:
+ (*sys_outw)(M.x86.R_DX,
+ fetch_data_word_abs(M.x86.R_ES, M.x86.R_SI));
+ break;
+ case 4:
+ (*sys_outl)(M.x86.R_DX,
+ fetch_data_long_abs(M.x86.R_ES, M.x86.R_SI));
+ break;
+ }
+ M.x86.R_SI += inc;
+ }
+}
+
+/****************************************************************************
+PARAMETERS:
+addr - Address to fetch word from
+
+REMARKS:
+Fetches a word from emulator memory using an absolute address.
+****************************************************************************/
+u16 mem_access_word(int addr)
+{
+DB( if (CHECK_MEM_ACCESS())
+ x86emu_check_mem_access(addr);)
+ return (*sys_rdw)(addr);
+}
+
+/****************************************************************************
+REMARKS:
+Pushes a word onto the stack.
+
+NOTE: Do not inline this, as (*sys_wrX) is already inline!
+****************************************************************************/
+void push_word(u16 w)
+{
+DB( if (CHECK_SP_ACCESS())
+ x86emu_check_sp_access();)
+ M.x86.R_SP -= 2;
+ (*sys_wrw)(((u32)M.x86.R_SS << 4) + M.x86.R_SP, w);
+}
+
+/****************************************************************************
+REMARKS:
+Pushes a long onto the stack.
+
+NOTE: Do not inline this, as (*sys_wrX) is already inline!
+****************************************************************************/
+void push_long(u32 w)
+{
+DB( if (CHECK_SP_ACCESS())
+ x86emu_check_sp_access();)
+ M.x86.R_SP -= 4;
+ (*sys_wrl)(((u32)M.x86.R_SS << 4) + M.x86.R_SP, w);
+}
+
+/****************************************************************************
+REMARKS:
+Pops a word from the stack.
+
+NOTE: Do not inline this, as (*sys_rdX) is already inline!
+****************************************************************************/
+u16 pop_word(void)
+{
+ register u16 res;
+
+DB( if (CHECK_SP_ACCESS())
+ x86emu_check_sp_access();)
+ res = (*sys_rdw)(((u32)M.x86.R_SS << 4) + M.x86.R_SP);
+ M.x86.R_SP += 2;
+ return res;
+}
+
+/****************************************************************************
+REMARKS:
+Pops a long from the stack.
+
+NOTE: Do not inline this, as (*sys_rdX) is already inline!
+****************************************************************************/
+u32 pop_long(void)
+{
+ register u32 res;
+
+DB( if (CHECK_SP_ACCESS())
+ x86emu_check_sp_access();)
+ res = (*sys_rdl)(((u32)M.x86.R_SS << 4) + M.x86.R_SP);
+ M.x86.R_SP += 4;
+ return res;
+}
+
+#ifdef __HAVE_INLINE_ASSEMBLER__
+
+u16 aaa_word (u16 d)
+{ return aaa_word_asm(&M.x86.R_EFLG,d); }
+
+u16 aas_word (u16 d)
+{ return aas_word_asm(&M.x86.R_EFLG,d); }
+
+u16 aad_word (u16 d)
+{ return aad_word_asm(&M.x86.R_EFLG,d); }
+
+u16 aam_word (u8 d)
+{ return aam_word_asm(&M.x86.R_EFLG,d); }
+
+u8 adc_byte (u8 d, u8 s)
+{ return adc_byte_asm(&M.x86.R_EFLG,d,s); }
+
+u16 adc_word (u16 d, u16 s)
+{ return adc_word_asm(&M.x86.R_EFLG,d,s); }
+
+u32 adc_long (u32 d, u32 s)
+{ return adc_long_asm(&M.x86.R_EFLG,d,s); }
+
+u8 add_byte (u8 d, u8 s)
+{ return add_byte_asm(&M.x86.R_EFLG,d,s); }
+
+u16 add_word (u16 d, u16 s)
+{ return add_word_asm(&M.x86.R_EFLG,d,s); }
+
+u32 add_long (u32 d, u32 s)
+{ return add_long_asm(&M.x86.R_EFLG,d,s); }
+
+u8 and_byte (u8 d, u8 s)
+{ return and_byte_asm(&M.x86.R_EFLG,d,s); }
+
+u16 and_word (u16 d, u16 s)
+{ return and_word_asm(&M.x86.R_EFLG,d,s); }
+
+u32 and_long (u32 d, u32 s)
+{ return and_long_asm(&M.x86.R_EFLG,d,s); }
+
+u8 cmp_byte (u8 d, u8 s)
+{ return cmp_byte_asm(&M.x86.R_EFLG,d,s); }
+
+u16 cmp_word (u16 d, u16 s)
+{ return cmp_word_asm(&M.x86.R_EFLG,d,s); }
+
+u32 cmp_long (u32 d, u32 s)
+{ return cmp_long_asm(&M.x86.R_EFLG,d,s); }
+
+u8 daa_byte (u8 d)
+{ return daa_byte_asm(&M.x86.R_EFLG,d); }
+
+u8 das_byte (u8 d)
+{ return das_byte_asm(&M.x86.R_EFLG,d); }
+
+u8 dec_byte (u8 d)
+{ return dec_byte_asm(&M.x86.R_EFLG,d); }
+
+u16 dec_word (u16 d)
+{ return dec_word_asm(&M.x86.R_EFLG,d); }
+
+u32 dec_long (u32 d)
+{ return dec_long_asm(&M.x86.R_EFLG,d); }
+
+u8 inc_byte (u8 d)
+{ return inc_byte_asm(&M.x86.R_EFLG,d); }
+
+u16 inc_word (u16 d)
+{ return inc_word_asm(&M.x86.R_EFLG,d); }
+
+u32 inc_long (u32 d)
+{ return inc_long_asm(&M.x86.R_EFLG,d); }
+
+u8 or_byte (u8 d, u8 s)
+{ return or_byte_asm(&M.x86.R_EFLG,d,s); }
+
+u16 or_word (u16 d, u16 s)
+{ return or_word_asm(&M.x86.R_EFLG,d,s); }
+
+u32 or_long (u32 d, u32 s)
+{ return or_long_asm(&M.x86.R_EFLG,d,s); }
+
+u8 neg_byte (u8 s)
+{ return neg_byte_asm(&M.x86.R_EFLG,s); }
+
+u16 neg_word (u16 s)
+{ return neg_word_asm(&M.x86.R_EFLG,s); }
+
+u32 neg_long (u32 s)
+{ return neg_long_asm(&M.x86.R_EFLG,s); }
+
+u8 not_byte (u8 s)
+{ return not_byte_asm(&M.x86.R_EFLG,s); }
+
+u16 not_word (u16 s)
+{ return not_word_asm(&M.x86.R_EFLG,s); }
+
+u32 not_long (u32 s)
+{ return not_long_asm(&M.x86.R_EFLG,s); }
+
+u8 rcl_byte (u8 d, u8 s)
+{ return rcl_byte_asm(&M.x86.R_EFLG,d,s); }
+
+u16 rcl_word (u16 d, u8 s)
+{ return rcl_word_asm(&M.x86.R_EFLG,d,s); }
+
+u32 rcl_long (u32 d, u8 s)
+{ return rcl_long_asm(&M.x86.R_EFLG,d,s); }
+
+u8 rcr_byte (u8 d, u8 s)
+{ return rcr_byte_asm(&M.x86.R_EFLG,d,s); }
+
+u16 rcr_word (u16 d, u8 s)
+{ return rcr_word_asm(&M.x86.R_EFLG,d,s); }
+
+u32 rcr_long (u32 d, u8 s)
+{ return rcr_long_asm(&M.x86.R_EFLG,d,s); }
+
+u8 rol_byte (u8 d, u8 s)
+{ return rol_byte_asm(&M.x86.R_EFLG,d,s); }
+
+u16 rol_word (u16 d, u8 s)
+{ return rol_word_asm(&M.x86.R_EFLG,d,s); }
+
+u32 rol_long (u32 d, u8 s)
+{ return rol_long_asm(&M.x86.R_EFLG,d,s); }
+
+u8 ror_byte (u8 d, u8 s)
+{ return ror_byte_asm(&M.x86.R_EFLG,d,s); }
+
+u16 ror_word (u16 d, u8 s)
+{ return ror_word_asm(&M.x86.R_EFLG,d,s); }
+
+u32 ror_long (u32 d, u8 s)
+{ return ror_long_asm(&M.x86.R_EFLG,d,s); }
+
+u8 shl_byte (u8 d, u8 s)
+{ return shl_byte_asm(&M.x86.R_EFLG,d,s); }
+
+u16 shl_word (u16 d, u8 s)
+{ return shl_word_asm(&M.x86.R_EFLG,d,s); }
+
+u32 shl_long (u32 d, u8 s)
+{ return shl_long_asm(&M.x86.R_EFLG,d,s); }
+
+u8 shr_byte (u8 d, u8 s)
+{ return shr_byte_asm(&M.x86.R_EFLG,d,s); }
+
+u16 shr_word (u16 d, u8 s)
+{ return shr_word_asm(&M.x86.R_EFLG,d,s); }
+
+u32 shr_long (u32 d, u8 s)
+{ return shr_long_asm(&M.x86.R_EFLG,d,s); }
+
+u8 sar_byte (u8 d, u8 s)
+{ return sar_byte_asm(&M.x86.R_EFLG,d,s); }
+
+u16 sar_word (u16 d, u8 s)
+{ return sar_word_asm(&M.x86.R_EFLG,d,s); }
+
+u32 sar_long (u32 d, u8 s)
+{ return sar_long_asm(&M.x86.R_EFLG,d,s); }
+
+u16 shld_word (u16 d, u16 fill, u8 s)
+{ return shld_word_asm(&M.x86.R_EFLG,d,fill,s); }
+
+u32 shld_long (u32 d, u32 fill, u8 s)
+{ return shld_long_asm(&M.x86.R_EFLG,d,fill,s); }
+
+u16 shrd_word (u16 d, u16 fill, u8 s)
+{ return shrd_word_asm(&M.x86.R_EFLG,d,fill,s); }
+
+u32 shrd_long (u32 d, u32 fill, u8 s)
+{ return shrd_long_asm(&M.x86.R_EFLG,d,fill,s); }
+
+u8 sbb_byte (u8 d, u8 s)
+{ return sbb_byte_asm(&M.x86.R_EFLG,d,s); }
+
+u16 sbb_word (u16 d, u16 s)
+{ return sbb_word_asm(&M.x86.R_EFLG,d,s); }
+
+u32 sbb_long (u32 d, u32 s)
+{ return sbb_long_asm(&M.x86.R_EFLG,d,s); }
+
+u8 sub_byte (u8 d, u8 s)
+{ return sub_byte_asm(&M.x86.R_EFLG,d,s); }
+
+u16 sub_word (u16 d, u16 s)
+{ return sub_word_asm(&M.x86.R_EFLG,d,s); }
+
+u32 sub_long (u32 d, u32 s)
+{ return sub_long_asm(&M.x86.R_EFLG,d,s); }
+
+void test_byte (u8 d, u8 s)
+{ test_byte_asm(&M.x86.R_EFLG,d,s); }
+
+void test_word (u16 d, u16 s)
+{ test_word_asm(&M.x86.R_EFLG,d,s); }
+
+void test_long (u32 d, u32 s)
+{ test_long_asm(&M.x86.R_EFLG,d,s); }
+
+u8 xor_byte (u8 d, u8 s)
+{ return xor_byte_asm(&M.x86.R_EFLG,d,s); }
+
+u16 xor_word (u16 d, u16 s)
+{ return xor_word_asm(&M.x86.R_EFLG,d,s); }
+
+u32 xor_long (u32 d, u32 s)
+{ return xor_long_asm(&M.x86.R_EFLG,d,s); }
+
+void imul_byte (u8 s)
+{ imul_byte_asm(&M.x86.R_EFLG,&M.x86.R_AX,M.x86.R_AL,s); }
+
+void imul_word (u16 s)
+{ imul_word_asm(&M.x86.R_EFLG,&M.x86.R_AX,&M.x86.R_DX,M.x86.R_AX,s); }
+
+void imul_long (u32 s)
+{ imul_long_asm(&M.x86.R_EFLG,&M.x86.R_EAX,&M.x86.R_EDX,M.x86.R_EAX,s); }
+
+void imul_long_direct(u32 *res_lo, u32* res_hi,u32 d, u32 s)
+{ imul_long_asm(&M.x86.R_EFLG,res_lo,res_hi,d,s); }
+
+void mul_byte (u8 s)
+{ mul_byte_asm(&M.x86.R_EFLG,&M.x86.R_AX,M.x86.R_AL,s); }
+
+void mul_word (u16 s)
+{ mul_word_asm(&M.x86.R_EFLG,&M.x86.R_AX,&M.x86.R_DX,M.x86.R_AX,s); }
+
+void mul_long (u32 s)
+{ mul_long_asm(&M.x86.R_EFLG,&M.x86.R_EAX,&M.x86.R_EDX,M.x86.R_EAX,s); }
+
+void idiv_byte (u8 s)
+{ idiv_byte_asm(&M.x86.R_EFLG,&M.x86.R_AL,&M.x86.R_AH,M.x86.R_AX,s); }
+
+void idiv_word (u16 s)
+{ idiv_word_asm(&M.x86.R_EFLG,&M.x86.R_AX,&M.x86.R_DX,M.x86.R_AX,M.x86.R_DX,s); }
+
+void idiv_long (u32 s)
+{ idiv_long_asm(&M.x86.R_EFLG,&M.x86.R_EAX,&M.x86.R_EDX,M.x86.R_EAX,M.x86.R_EDX,s); }
+
+void div_byte (u8 s)
+{ div_byte_asm(&M.x86.R_EFLG,&M.x86.R_AL,&M.x86.R_AH,M.x86.R_AX,s); }
+
+void div_word (u16 s)
+{ div_word_asm(&M.x86.R_EFLG,&M.x86.R_AX,&M.x86.R_DX,M.x86.R_AX,M.x86.R_DX,s); }
+
+void div_long (u32 s)
+{ div_long_asm(&M.x86.R_EFLG,&M.x86.R_EAX,&M.x86.R_EDX,M.x86.R_EAX,M.x86.R_EDX,s); }
+
+#endif
diff --git a/board/MAI/bios_emulator/scitech/src/x86emu/sys.c b/board/MAI/bios_emulator/scitech/src/x86emu/sys.c
new file mode 100644
index 00000000000..d54ca79c0a3
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/x86emu/sys.c
@@ -0,0 +1,658 @@
+/****************************************************************************
+*
+* Realmode X86 Emulator Library
+*
+* Copyright (C) 1996-1999 SciTech Software, Inc.
+* Copyright (C) David Mosberger-Tang
+* Copyright (C) 1999 Egbert Eich
+*
+* ========================================================================
+*
+* Permission to use, copy, modify, distribute, and sell this software and
+* its documentation for any purpose is hereby granted without fee,
+* provided that the above copyright notice appear in all copies and that
+* both that copyright notice and this permission notice appear in
+* supporting documentation, and that the name of the authors not be used
+* in advertising or publicity pertaining to distribution of the software
+* without specific, written prior permission. The authors makes no
+* representations about the suitability of this software for any purpose.
+* It is provided "as is" without express or implied warranty.
+*
+* THE AUTHORS DISCLAIMS ALL WARRANTIES WITH REGARD TO THIS SOFTWARE,
+* INCLUDING ALL IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS, IN NO
+* EVENT SHALL THE AUTHORS BE LIABLE FOR ANY SPECIAL, INDIRECT OR
+* CONSEQUENTIAL DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF
+* USE, DATA OR PROFITS, WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE OR
+* OTHER TORTIOUS ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE OR
+* PERFORMANCE OF THIS SOFTWARE.
+*
+* ========================================================================
+*
+* Language: ANSI C
+* Environment: Any
+* Developer: Kendall Bennett
+*
+* Description: This file includes subroutines which are related to
+* programmed I/O and memory access. Included in this module
+* are default functions with limited usefulness. For real
+* uses these functions will most likely be overriden by the
+* user library.
+*
+****************************************************************************/
+
+#include "x86emu.h"
+#include "x86emu/regs.h"
+#include "x86emu/debug.h"
+#include "x86emu/prim_ops.h"
+#include <string.h>
+
+/*------------------------- Global Variables ------------------------------*/
+
+X86EMU_sysEnv _X86EMU_env; /* Global emulator machine state */
+X86EMU_intrFuncs _X86EMU_intrTab[256];
+
+/*----------------------------- Implementation ----------------------------*/
+#ifdef __alpha__
+/* to cope with broken egcs-1.1.2 :-(((( */
+
+/*
+ * inline functions to do unaligned accesses
+ * from linux/include/asm-alpha/unaligned.h
+ */
+
+/*
+ * EGCS 1.1 knows about arbitrary unaligned loads. Define some
+ * packed structures to talk about such things with.
+ */
+
+#if __GNUC__ > 2 || __GNUC_MINOR__ >= 91
+struct __una_u64 { unsigned long x __attribute__((packed)); };
+struct __una_u32 { unsigned int x __attribute__((packed)); };
+struct __una_u16 { unsigned short x __attribute__((packed)); };
+#endif
+
+static __inline__ unsigned long ldq_u(unsigned long * r11)
+{
+#if __GNUC__ > 2 || __GNUC_MINOR__ >= 91
+ const struct __una_u64 *ptr = (const struct __una_u64 *) r11;
+ return ptr->x;
+#else
+ unsigned long r1,r2;
+ __asm__("ldq_u %0,%3\n\t"
+ "ldq_u %1,%4\n\t"
+ "extql %0,%2,%0\n\t"
+ "extqh %1,%2,%1"
+ :"=&r" (r1), "=&r" (r2)
+ :"r" (r11),
+ "m" (*r11),
+ "m" (*(const unsigned long *)(7+(char *) r11)));
+ return r1 | r2;
+#endif
+}
+
+static __inline__ unsigned long ldl_u(unsigned int * r11)
+{
+#if __GNUC__ > 2 || __GNUC_MINOR__ >= 91
+ const struct __una_u32 *ptr = (const struct __una_u32 *) r11;
+ return ptr->x;
+#else
+ unsigned long r1,r2;
+ __asm__("ldq_u %0,%3\n\t"
+ "ldq_u %1,%4\n\t"
+ "extll %0,%2,%0\n\t"
+ "extlh %1,%2,%1"
+ :"=&r" (r1), "=&r" (r2)
+ :"r" (r11),
+ "m" (*r11),
+ "m" (*(const unsigned long *)(3+(char *) r11)));
+ return r1 | r2;
+#endif
+}
+
+static __inline__ unsigned long ldw_u(unsigned short * r11)
+{
+#if __GNUC__ > 2 || __GNUC_MINOR__ >= 91
+ const struct __una_u16 *ptr = (const struct __una_u16 *) r11;
+ return ptr->x;
+#else
+ unsigned long r1,r2;
+ __asm__("ldq_u %0,%3\n\t"
+ "ldq_u %1,%4\n\t"
+ "extwl %0,%2,%0\n\t"
+ "extwh %1,%2,%1"
+ :"=&r" (r1), "=&r" (r2)
+ :"r" (r11),
+ "m" (*r11),
+ "m" (*(const unsigned long *)(1+(char *) r11)));
+ return r1 | r2;
+#endif
+}
+
+/*
+ * Elemental unaligned stores
+ */
+
+static __inline__ void stq_u(unsigned long r5, unsigned long * r11)
+{
+#if __GNUC__ > 2 || __GNUC_MINOR__ >= 91
+ struct __una_u64 *ptr = (struct __una_u64 *) r11;
+ ptr->x = r5;
+#else
+ unsigned long r1,r2,r3,r4;
+
+ __asm__("ldq_u %3,%1\n\t"
+ "ldq_u %2,%0\n\t"
+ "insqh %6,%7,%5\n\t"
+ "insql %6,%7,%4\n\t"
+ "mskqh %3,%7,%3\n\t"
+ "mskql %2,%7,%2\n\t"
+ "bis %3,%5,%3\n\t"
+ "bis %2,%4,%2\n\t"
+ "stq_u %3,%1\n\t"
+ "stq_u %2,%0"
+ :"=m" (*r11),
+ "=m" (*(unsigned long *)(7+(char *) r11)),
+ "=&r" (r1), "=&r" (r2), "=&r" (r3), "=&r" (r4)
+ :"r" (r5), "r" (r11));
+#endif
+}
+
+static __inline__ void stl_u(unsigned long r5, unsigned int * r11)
+{
+#if __GNUC__ > 2 || __GNUC_MINOR__ >= 91
+ struct __una_u32 *ptr = (struct __una_u32 *) r11;
+ ptr->x = r5;
+#else
+ unsigned long r1,r2,r3,r4;
+
+ __asm__("ldq_u %3,%1\n\t"
+ "ldq_u %2,%0\n\t"
+ "inslh %6,%7,%5\n\t"
+ "insll %6,%7,%4\n\t"
+ "msklh %3,%7,%3\n\t"
+ "mskll %2,%7,%2\n\t"
+ "bis %3,%5,%3\n\t"
+ "bis %2,%4,%2\n\t"
+ "stq_u %3,%1\n\t"
+ "stq_u %2,%0"
+ :"=m" (*r11),
+ "=m" (*(unsigned long *)(3+(char *) r11)),
+ "=&r" (r1), "=&r" (r2), "=&r" (r3), "=&r" (r4)
+ :"r" (r5), "r" (r11));
+#endif
+}
+
+static __inline__ void stw_u(unsigned long r5, unsigned short * r11)
+{
+#if __GNUC__ > 2 || __GNUC_MINOR__ >= 91
+ struct __una_u16 *ptr = (struct __una_u16 *) r11;
+ ptr->x = r5;
+#else
+ unsigned long r1,r2,r3,r4;
+
+ __asm__("ldq_u %3,%1\n\t"
+ "ldq_u %2,%0\n\t"
+ "inswh %6,%7,%5\n\t"
+ "inswl %6,%7,%4\n\t"
+ "mskwh %3,%7,%3\n\t"
+ "mskwl %2,%7,%2\n\t"
+ "bis %3,%5,%3\n\t"
+ "bis %2,%4,%2\n\t"
+ "stq_u %3,%1\n\t"
+ "stq_u %2,%0"
+ :"=m" (*r11),
+ "=m" (*(unsigned long *)(1+(char *) r11)),
+ "=&r" (r1), "=&r" (r2), "=&r" (r3), "=&r" (r4)
+ :"r" (r5), "r" (r11));
+#endif
+}
+
+#elif defined (__ia64__)
+/*
+ * EGCS 1.1 knows about arbitrary unaligned loads. Define some
+ * packed structures to talk about such things with.
+ */
+struct __una_u64 { unsigned long x __attribute__((packed)); };
+struct __una_u32 { unsigned int x __attribute__((packed)); };
+struct __una_u16 { unsigned short x __attribute__((packed)); };
+
+static __inline__ unsigned long
+__uldq (const unsigned long * r11)
+{
+ const struct __una_u64 *ptr = (const struct __una_u64 *) r11;
+ return ptr->x;
+}
+
+static __inline__ unsigned long
+uldl (const unsigned int * r11)
+{
+ const struct __una_u32 *ptr = (const struct __una_u32 *) r11;
+ return ptr->x;
+}
+
+static __inline__ unsigned long
+uldw (const unsigned short * r11)
+{
+ const struct __una_u16 *ptr = (const struct __una_u16 *) r11;
+ return ptr->x;
+}
+
+static __inline__ void
+ustq (unsigned long r5, unsigned long * r11)
+{
+ struct __una_u64 *ptr = (struct __una_u64 *) r11;
+ ptr->x = r5;
+}
+
+static __inline__ void
+ustl (unsigned long r5, unsigned int * r11)
+{
+ struct __una_u32 *ptr = (struct __una_u32 *) r11;
+ ptr->x = r5;
+}
+
+static __inline__ void
+ustw (unsigned long r5, unsigned short * r11)
+{
+ struct __una_u16 *ptr = (struct __una_u16 *) r11;
+ ptr->x = r5;
+}
+
+#endif
+
+/****************************************************************************
+PARAMETERS:
+addr - Emulator memory address to read
+
+RETURNS:
+Byte value read from emulator memory.
+
+REMARKS:
+Reads a byte value from the emulator memory.
+****************************************************************************/
+u8 X86API rdb(
+ u32 addr)
+{
+ u8 val;
+
+ if (addr > M.mem_size - 1) {
+ DB(printk("mem_read: address %#lx out of range!\n", addr);)
+ HALT_SYS();
+ }
+ val = *(u8*)(M.mem_base + addr);
+DB( if (DEBUG_MEM_TRACE())
+ printk("%#08x 1 -> %#x\n", addr, val);)
+ return val;
+}
+
+/****************************************************************************
+PARAMETERS:
+addr - Emulator memory address to read
+
+RETURNS:
+Word value read from emulator memory.
+
+REMARKS:
+Reads a word value from the emulator memory.
+****************************************************************************/
+u16 X86API rdw(
+ u32 addr)
+{
+ u16 val = 0;
+
+ if (addr > M.mem_size - 2) {
+ DB(printk("mem_read: address %#lx out of range!\n", addr);)
+ HALT_SYS();
+ }
+#ifdef __BIG_ENDIAN__
+ if (addr & 0x1) {
+ val = (*(u8*)(M.mem_base + addr) |
+ (*(u8*)(M.mem_base + addr + 1) << 8));
+ }
+ else
+#endif
+#ifdef __alpha__
+ val = ldw_u((u16*)(M.mem_base + addr));
+#elif defined (__ia64__)
+ val = uldw((u16*)(M.mem_base + addr));
+#else
+ val = *(u16*)(M.mem_base + addr);
+#endif
+ DB( if (DEBUG_MEM_TRACE())
+ printk("%#08x 2 -> %#x\n", addr, val);)
+ return val;
+}
+
+/****************************************************************************
+PARAMETERS:
+addr - Emulator memory address to read
+
+RETURNS:
+Long value read from emulator memory.
+REMARKS:
+Reads a long value from the emulator memory.
+****************************************************************************/
+u32 X86API rdl(
+ u32 addr)
+{
+ u32 val = 0;
+
+ if (addr > M.mem_size - 4) {
+ DB(printk("mem_read: address %#lx out of range!\n", addr);)
+ HALT_SYS();
+ }
+#ifdef __BIG_ENDIAN__
+ if (addr & 0x3) {
+ val = (*(u8*)(M.mem_base + addr + 0) |
+ (*(u8*)(M.mem_base + addr + 1) << 8) |
+ (*(u8*)(M.mem_base + addr + 2) << 16) |
+ (*(u8*)(M.mem_base + addr + 3) << 24));
+ }
+ else
+#endif
+#ifdef __alpha__
+ val = ldl_u((u32*)(M.mem_base + addr));
+#elif defined (__ia64__)
+ val = uldl((u32*)(M.mem_base + addr));
+#else
+ val = *(u32*)(M.mem_base + addr);
+#endif
+DB( if (DEBUG_MEM_TRACE())
+ printk("%#08x 4 -> %#x\n", addr, val);)
+ return val;
+}
+
+/****************************************************************************
+PARAMETERS:
+addr - Emulator memory address to read
+val - Value to store
+
+REMARKS:
+Writes a byte value to emulator memory.
+****************************************************************************/
+void X86API wrb(
+ u32 addr,
+ u8 val)
+{
+DB( if (DEBUG_MEM_TRACE())
+ printk("%#08x 1 <- %#x\n", addr, val);)
+ if (addr > M.mem_size - 1) {
+ DB(printk("mem_write: address %#lx out of range!\n", addr);)
+ HALT_SYS();
+ }
+ *(u8*)(M.mem_base + addr) = val;
+}
+
+/****************************************************************************
+PARAMETERS:
+addr - Emulator memory address to read
+val - Value to store
+
+REMARKS:
+Writes a word value to emulator memory.
+****************************************************************************/
+void X86API wrw(
+ u32 addr,
+ u16 val)
+{
+DB( if (DEBUG_MEM_TRACE())
+ printk("%#08x 2 <- %#x\n", addr, val);)
+ if (addr > M.mem_size - 2) {
+ DB(printk("mem_write: address %#lx out of range!\n", addr);)
+ HALT_SYS();
+ }
+#ifdef __BIG_ENDIAN__
+ if (addr & 0x1) {
+ *(u8*)(M.mem_base + addr + 0) = (val >> 0) & 0xff;
+ *(u8*)(M.mem_base + addr + 1) = (val >> 8) & 0xff;
+ }
+ else
+#endif
+#ifdef __alpha__
+ stw_u(val,(u16*)(M.mem_base + addr));
+#elif defined (__ia64__)
+ ustw(val,(u16*)(M.mem_base + addr));
+#else
+ *(u16*)(M.mem_base + addr) = val;
+#endif
+}
+
+/****************************************************************************
+PARAMETERS:
+addr - Emulator memory address to read
+val - Value to store
+
+REMARKS:
+Writes a long value to emulator memory.
+****************************************************************************/
+void X86API wrl(
+ u32 addr,
+ u32 val)
+{
+DB( if (DEBUG_MEM_TRACE())
+ printk("%#08x 4 <- %#x\n", addr, val);)
+ if (addr > M.mem_size - 4) {
+ DB(printk("mem_write: address %#lx out of range!\n", addr);)
+ HALT_SYS();
+ }
+#ifdef __BIG_ENDIAN__
+ if (addr & 0x1) {
+ *(u8*)(M.mem_base + addr + 0) = (val >> 0) & 0xff;
+ *(u8*)(M.mem_base + addr + 1) = (val >> 8) & 0xff;
+ *(u8*)(M.mem_base + addr + 2) = (val >> 16) & 0xff;
+ *(u8*)(M.mem_base + addr + 3) = (val >> 24) & 0xff;
+ }
+ else
+#endif
+#ifdef __alpha__
+ stl_u(val,(u32*)(M.mem_base + addr));
+#elif defined (__ia64__)
+ ustl(val,(u32*)(M.mem_base + addr));
+#else
+ *(u32*)(M.mem_base + addr) = val;
+#endif
+}
+
+/****************************************************************************
+PARAMETERS:
+addr - PIO address to read
+RETURN:
+0
+REMARKS:
+Default PIO byte read function. Doesn't perform real inb.
+****************************************************************************/
+static u8 X86API p_inb(
+ X86EMU_pioAddr addr)
+{
+DB( if (DEBUG_IO_TRACE())
+ printk("inb %#04x \n", addr);)
+ return 0;
+}
+
+/****************************************************************************
+PARAMETERS:
+addr - PIO address to read
+RETURN:
+0
+REMARKS:
+Default PIO word read function. Doesn't perform real inw.
+****************************************************************************/
+static u16 X86API p_inw(
+ X86EMU_pioAddr addr)
+{
+DB( if (DEBUG_IO_TRACE())
+ printk("inw %#04x \n", addr);)
+ return 0;
+}
+
+/****************************************************************************
+PARAMETERS:
+addr - PIO address to read
+RETURN:
+0
+REMARKS:
+Default PIO long read function. Doesn't perform real inl.
+****************************************************************************/
+static u32 X86API p_inl(
+ X86EMU_pioAddr addr)
+{
+DB( if (DEBUG_IO_TRACE())
+ printk("inl %#04x \n", addr);)
+ return 0;
+}
+
+/****************************************************************************
+PARAMETERS:
+addr - PIO address to write
+val - Value to store
+REMARKS:
+Default PIO byte write function. Doesn't perform real outb.
+****************************************************************************/
+static void X86API p_outb(
+ X86EMU_pioAddr addr,
+ u8 val)
+{
+DB( if (DEBUG_IO_TRACE())
+ printk("outb %#02x -> %#04x \n", val, addr);)
+ return;
+}
+
+/****************************************************************************
+PARAMETERS:
+addr - PIO address to write
+val - Value to store
+REMARKS:
+Default PIO word write function. Doesn't perform real outw.
+****************************************************************************/
+static void X86API p_outw(
+ X86EMU_pioAddr addr,
+ u16 val)
+{
+DB( if (DEBUG_IO_TRACE())
+ printk("outw %#04x -> %#04x \n", val, addr);)
+ return;
+}
+
+/****************************************************************************
+PARAMETERS:
+addr - PIO address to write
+val - Value to store
+REMARKS:
+Default PIO ;ong write function. Doesn't perform real outl.
+****************************************************************************/
+static void X86API p_outl(
+ X86EMU_pioAddr addr,
+ u32 val)
+{
+DB( if (DEBUG_IO_TRACE())
+ printk("outl %#08x -> %#04x \n", val, addr);)
+ return;
+}
+
+/*------------------------- Global Variables ------------------------------*/
+
+u8 (X86APIP sys_rdb)(u32 addr) = rdb;
+u16 (X86APIP sys_rdw)(u32 addr) = rdw;
+u32 (X86APIP sys_rdl)(u32 addr) = rdl;
+void (X86APIP sys_wrb)(u32 addr,u8 val) = wrb;
+void (X86APIP sys_wrw)(u32 addr,u16 val) = wrw;
+void (X86APIP sys_wrl)(u32 addr,u32 val) = wrl;
+u8 (X86APIP sys_inb)(X86EMU_pioAddr addr) = p_inb;
+u16 (X86APIP sys_inw)(X86EMU_pioAddr addr) = p_inw;
+u32 (X86APIP sys_inl)(X86EMU_pioAddr addr) = p_inl;
+void (X86APIP sys_outb)(X86EMU_pioAddr addr, u8 val) = p_outb;
+void (X86APIP sys_outw)(X86EMU_pioAddr addr, u16 val) = p_outw;
+void (X86APIP sys_outl)(X86EMU_pioAddr addr, u32 val) = p_outl;
+
+/*----------------------------- Setup -------------------------------------*/
+
+/****************************************************************************
+PARAMETERS:
+funcs - New memory function pointers to make active
+
+REMARKS:
+This function is used to set the pointers to functions which access
+memory space, allowing the user application to override these functions
+and hook them out as necessary for their application.
+****************************************************************************/
+void X86EMU_setupMemFuncs(
+ X86EMU_memFuncs *funcs)
+{
+ sys_rdb = funcs->rdb;
+ sys_rdw = funcs->rdw;
+ sys_rdl = funcs->rdl;
+ sys_wrb = funcs->wrb;
+ sys_wrw = funcs->wrw;
+ sys_wrl = funcs->wrl;
+}
+
+/****************************************************************************
+PARAMETERS:
+funcs - New programmed I/O function pointers to make active
+
+REMARKS:
+This function is used to set the pointers to functions which access
+I/O space, allowing the user application to override these functions
+and hook them out as necessary for their application.
+****************************************************************************/
+void X86EMU_setupPioFuncs(
+ X86EMU_pioFuncs *funcs)
+{
+ sys_inb = funcs->inb;
+ sys_inw = funcs->inw;
+ sys_inl = funcs->inl;
+ sys_outb = funcs->outb;
+ sys_outw = funcs->outw;
+ sys_outl = funcs->outl;
+}
+
+/****************************************************************************
+PARAMETERS:
+funcs - New interrupt vector table to make active
+
+REMARKS:
+This function is used to set the pointers to functions which handle
+interrupt processing in the emulator, allowing the user application to
+hook interrupts as necessary for their application. Any interrupts that
+are not hooked by the user application, and reflected and handled internally
+in the emulator via the interrupt vector table. This allows the application
+to get control when the code being emulated executes specific software
+interrupts.
+****************************************************************************/
+void X86EMU_setupIntrFuncs(
+ X86EMU_intrFuncs funcs[])
+{
+ int i;
+
+ for (i=0; i < 256; i++)
+ _X86EMU_intrTab[i] = NULL;
+ if (funcs) {
+ for (i = 0; i < 256; i++)
+ _X86EMU_intrTab[i] = funcs[i];
+ }
+}
+
+/****************************************************************************
+PARAMETERS:
+int - New software interrupt to prepare for
+
+REMARKS:
+This function is used to set up the emulator state to exceute a software
+interrupt. This can be used by the user application code to allow an
+interrupt to be hooked, examined and then reflected back to the emulator
+so that the code in the emulator will continue processing the software
+interrupt as per normal. This essentially allows system code to actively
+hook and handle certain software interrupts as necessary.
+****************************************************************************/
+void X86EMU_prepareForInt(
+ int num)
+{
+ push_word((u16)M.x86.R_FLG);
+ CLEAR_FLAG(F_IF);
+ CLEAR_FLAG(F_TF);
+ push_word(M.x86.R_CS);
+ M.x86.R_CS = mem_access_word(num * 4 + 2);
+ push_word(M.x86.R_IP);
+ M.x86.R_IP = mem_access_word(num * 4);
+ M.x86.intr = 0;
+}
diff --git a/board/MAI/bios_emulator/scitech/src/x86emu/validate.c b/board/MAI/bios_emulator/scitech/src/x86emu/validate.c
new file mode 100644
index 00000000000..239f6c1f340
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/x86emu/validate.c
@@ -0,0 +1,765 @@
+/****************************************************************************
+*
+* Realmode X86 Emulator Library
+*
+* Copyright (C) 1996-1999 SciTech Software, Inc.
+* Copyright (C) David Mosberger-Tang
+* Copyright (C) 1999 Egbert Eich
+*
+* ========================================================================
+*
+* Permission to use, copy, modify, distribute, and sell this software and
+* its documentation for any purpose is hereby granted without fee,
+* provided that the above copyright notice appear in all copies and that
+* both that copyright notice and this permission notice appear in
+* supporting documentation, and that the name of the authors not be used
+* in advertising or publicity pertaining to distribution of the software
+* without specific, written prior permission. The authors makes no
+* representations about the suitability of this software for any purpose.
+* It is provided "as is" without express or implied warranty.
+*
+* THE AUTHORS DISCLAIMS ALL WARRANTIES WITH REGARD TO THIS SOFTWARE,
+* INCLUDING ALL IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS, IN NO
+* EVENT SHALL THE AUTHORS BE LIABLE FOR ANY SPECIAL, INDIRECT OR
+* CONSEQUENTIAL DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF
+* USE, DATA OR PROFITS, WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE OR
+* OTHER TORTIOUS ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE OR
+* PERFORMANCE OF THIS SOFTWARE.
+*
+* ========================================================================
+*
+* Language: Watcom C 10.6 or later
+* Environment: 32-bit DOS
+* Developer: Kendall Bennett
+*
+* Description: Program to validate the x86 emulator library for
+* correctness. We run the emulator primitive operations
+* functions against the real x86 CPU, and compare the result
+* and flags to ensure correctness.
+*
+* We use inline assembler to compile and build this program.
+*
+****************************************************************************/
+
+#include <stdio.h>
+#include <stdlib.h>
+#include <string.h>
+#include <stdarg.h>
+#include "x86emu.h"
+#include "x86emu/prim_asm.h"
+
+/*-------------------------- Implementation -------------------------------*/
+
+#define true 1
+#define false 0
+
+#define ALL_FLAGS (F_CF | F_PF | F_AF | F_ZF | F_SF | F_OF)
+
+#define VAL_START_BINARY(parm_type,res_type,dmax,smax,dincr,sincr) \
+{ \
+ parm_type d,s; \
+ res_type r,r_asm; \
+ ulong flags,inflags; \
+ int f,failed = false; \
+ char buf1[80],buf2[80]; \
+ for (d = 0; d < dmax; d += dincr) { \
+ for (s = 0; s < smax; s += sincr) { \
+ M.x86.R_EFLG = inflags = flags = def_flags; \
+ for (f = 0; f < 2; f++) {
+
+#define VAL_TEST_BINARY(name) \
+ r_asm = name##_asm(&flags,d,s); \
+ r = name(d,s); \
+ if (r != r_asm || M.x86.R_EFLG != flags) \
+ failed = true; \
+ if (failed || trace) {
+
+#define VAL_TEST_BINARY_VOID(name) \
+ name##_asm(&flags,d,s); \
+ name(d,s); \
+ r = r_asm = 0; \
+ if (M.x86.R_EFLG != flags) \
+ failed = true; \
+ if (failed || trace) {
+
+#define VAL_FAIL_BYTE_BYTE_BINARY(name) \
+ if (failed) \
+ printk("fail\n"); \
+ printk("0x%02X = %-15s(0x%02X,0x%02X), flags = %s -> %s\n", \
+ r, #name, d, s, print_flags(buf1,inflags), print_flags(buf2,M.x86.R_EFLG)); \
+ printk("0x%02X = %-15s(0x%02X,0x%02X), flags = %s -> %s\n", \
+ r_asm, #name"_asm", d, s, print_flags(buf1,inflags), print_flags(buf2,flags));
+
+#define VAL_FAIL_WORD_WORD_BINARY(name) \
+ if (failed) \
+ printk("fail\n"); \
+ printk("0x%04X = %-15s(0x%04X,0x%04X), flags = %s -> %s\n", \
+ r, #name, d, s, print_flags(buf1,inflags), print_flags(buf2,M.x86.R_EFLG)); \
+ printk("0x%04X = %-15s(0x%04X,0x%04X), flags = %s -> %s\n", \
+ r_asm, #name"_asm", d, s, print_flags(buf1,inflags), print_flags(buf2,flags));
+
+#define VAL_FAIL_LONG_LONG_BINARY(name) \
+ if (failed) \
+ printk("fail\n"); \
+ printk("0x%08X = %-15s(0x%08X,0x%08X), flags = %s -> %s\n", \
+ r, #name, d, s, print_flags(buf1,inflags), print_flags(buf2,M.x86.R_EFLG)); \
+ printk("0x%08X = %-15s(0x%08X,0x%08X), flags = %s -> %s\n", \
+ r_asm, #name"_asm", d, s, print_flags(buf1,inflags), print_flags(buf2,flags));
+
+#define VAL_END_BINARY() \
+ } \
+ M.x86.R_EFLG = inflags = flags = def_flags | (ALL_FLAGS & ~F_OF); \
+ if (failed) \
+ break; \
+ } \
+ if (failed) \
+ break; \
+ } \
+ if (failed) \
+ break; \
+ } \
+ if (!failed) \
+ printk("passed\n"); \
+}
+
+#define VAL_BYTE_BYTE_BINARY(name) \
+ printk("Validating %s ... ", #name); \
+ VAL_START_BINARY(u8,u8,0xFF,0xFF,1,1) \
+ VAL_TEST_BINARY(name) \
+ VAL_FAIL_BYTE_BYTE_BINARY(name) \
+ VAL_END_BINARY()
+
+#define VAL_WORD_WORD_BINARY(name) \
+ printk("Validating %s ... ", #name); \
+ VAL_START_BINARY(u16,u16,0xFF00,0xFF00,0x100,0x100) \
+ VAL_TEST_BINARY(name) \
+ VAL_FAIL_WORD_WORD_BINARY(name) \
+ VAL_END_BINARY()
+
+#define VAL_LONG_LONG_BINARY(name) \
+ printk("Validating %s ... ", #name); \
+ VAL_START_BINARY(u32,u32,0xFF000000,0xFF000000,0x1000000,0x1000000) \
+ VAL_TEST_BINARY(name) \
+ VAL_FAIL_LONG_LONG_BINARY(name) \
+ VAL_END_BINARY()
+
+#define VAL_VOID_BYTE_BINARY(name) \
+ printk("Validating %s ... ", #name); \
+ VAL_START_BINARY(u8,u8,0xFF,0xFF,1,1) \
+ VAL_TEST_BINARY_VOID(name) \
+ VAL_FAIL_BYTE_BYTE_BINARY(name) \
+ VAL_END_BINARY()
+
+#define VAL_VOID_WORD_BINARY(name) \
+ printk("Validating %s ... ", #name); \
+ VAL_START_BINARY(u16,u16,0xFF00,0xFF00,0x100,0x100) \
+ VAL_TEST_BINARY_VOID(name) \
+ VAL_FAIL_WORD_WORD_BINARY(name) \
+ VAL_END_BINARY()
+
+#define VAL_VOID_LONG_BINARY(name) \
+ printk("Validating %s ... ", #name); \
+ VAL_START_BINARY(u32,u32,0xFF000000,0xFF000000,0x1000000,0x1000000) \
+ VAL_TEST_BINARY_VOID(name) \
+ VAL_FAIL_LONG_LONG_BINARY(name) \
+ VAL_END_BINARY()
+
+#define VAL_BYTE_ROTATE(name) \
+ printk("Validating %s ... ", #name); \
+ VAL_START_BINARY(u8,u8,0xFF,8,1,1) \
+ VAL_TEST_BINARY(name) \
+ VAL_FAIL_BYTE_BYTE_BINARY(name) \
+ VAL_END_BINARY()
+
+#define VAL_WORD_ROTATE(name) \
+ printk("Validating %s ... ", #name); \
+ VAL_START_BINARY(u16,u16,0xFF00,16,0x100,1) \
+ VAL_TEST_BINARY(name) \
+ VAL_FAIL_WORD_WORD_BINARY(name) \
+ VAL_END_BINARY()
+
+#define VAL_LONG_ROTATE(name) \
+ printk("Validating %s ... ", #name); \
+ VAL_START_BINARY(u32,u32,0xFF000000,32,0x1000000,1) \
+ VAL_TEST_BINARY(name) \
+ VAL_FAIL_LONG_LONG_BINARY(name) \
+ VAL_END_BINARY()
+
+#define VAL_START_TERNARY(parm_type,res_type,dmax,smax,dincr,sincr,maxshift)\
+{ \
+ parm_type d,s; \
+ res_type r,r_asm; \
+ u8 shift; \
+ u32 flags,inflags; \
+ int f,failed = false; \
+ char buf1[80],buf2[80]; \
+ for (d = 0; d < dmax; d += dincr) { \
+ for (s = 0; s < smax; s += sincr) { \
+ for (shift = 0; shift < maxshift; shift += 1) { \
+ M.x86.R_EFLG = inflags = flags = def_flags; \
+ for (f = 0; f < 2; f++) {
+
+#define VAL_TEST_TERNARY(name) \
+ r_asm = name##_asm(&flags,d,s,shift); \
+ r = name(d,s,shift); \
+ if (r != r_asm || M.x86.R_EFLG != flags) \
+ failed = true; \
+ if (failed || trace) {
+
+#define VAL_FAIL_WORD_WORD_TERNARY(name) \
+ if (failed) \
+ printk("fail\n"); \
+ printk("0x%04X = %-15s(0x%04X,0x%04X,%d), flags = %s -> %s\n", \
+ r, #name, d, s, shift, print_flags(buf1,inflags), print_flags(buf2,M.x86.R_EFLG)); \
+ printk("0x%04X = %-15s(0x%04X,0x%04X,%d), flags = %s -> %s\n", \
+ r_asm, #name"_asm", d, s, shift, print_flags(buf1,inflags), print_flags(buf2,flags));
+
+#define VAL_FAIL_LONG_LONG_TERNARY(name) \
+ if (failed) \
+ printk("fail\n"); \
+ printk("0x%08X = %-15s(0x%08X,0x%08X,%d), flags = %s -> %s\n", \
+ r, #name, d, s, shift, print_flags(buf1,inflags), print_flags(buf2,M.x86.R_EFLG)); \
+ printk("0x%08X = %-15s(0x%08X,0x%08X,%d), flags = %s -> %s\n", \
+ r_asm, #name"_asm", d, s, shift, print_flags(buf1,inflags), print_flags(buf2,flags));
+
+#define VAL_END_TERNARY() \
+ } \
+ M.x86.R_EFLG = inflags = flags = def_flags | (ALL_FLAGS & ~F_OF); \
+ if (failed) \
+ break; \
+ } \
+ if (failed) \
+ break; \
+ } \
+ if (failed) \
+ break; \
+ } \
+ if (failed) \
+ break; \
+ } \
+ if (!failed) \
+ printk("passed\n"); \
+}
+
+#define VAL_WORD_ROTATE_DBL(name) \
+ printk("Validating %s ... ", #name); \
+ VAL_START_TERNARY(u16,u16,0xFF00,0xFF00,0x100,0x100,16) \
+ VAL_TEST_TERNARY(name) \
+ VAL_FAIL_WORD_WORD_TERNARY(name) \
+ VAL_END_TERNARY()
+
+#define VAL_LONG_ROTATE_DBL(name) \
+ printk("Validating %s ... ", #name); \
+ VAL_START_TERNARY(u32,u32,0xFF000000,0xFF000000,0x1000000,0x1000000,32) \
+ VAL_TEST_TERNARY(name) \
+ VAL_FAIL_LONG_LONG_TERNARY(name) \
+ VAL_END_TERNARY()
+
+#define VAL_START_UNARY(parm_type,max,incr) \
+{ \
+ parm_type d,r,r_asm; \
+ u32 flags,inflags; \
+ int f,failed = false; \
+ char buf1[80],buf2[80]; \
+ for (d = 0; d < max; d += incr) { \
+ M.x86.R_EFLG = inflags = flags = def_flags; \
+ for (f = 0; f < 2; f++) {
+
+#define VAL_TEST_UNARY(name) \
+ r_asm = name##_asm(&flags,d); \
+ r = name(d); \
+ if (r != r_asm || M.x86.R_EFLG != flags) { \
+ failed = true;
+
+#define VAL_FAIL_BYTE_UNARY(name) \
+ printk("fail\n"); \
+ printk("0x%02X = %-15s(0x%02X), flags = %s -> %s\n", \
+ r, #name, d, print_flags(buf1,inflags), print_flags(buf2,M.x86.R_EFLG)); \
+ printk("0x%02X = %-15s(0x%02X), flags = %s -> %s\n", \
+ r_asm, #name"_asm", d, print_flags(buf1,inflags), print_flags(buf2,flags));
+
+#define VAL_FAIL_WORD_UNARY(name) \
+ printk("fail\n"); \
+ printk("0x%04X = %-15s(0x%04X), flags = %s -> %s\n", \
+ r, #name, d, print_flags(buf1,inflags), print_flags(buf2,M.x86.R_EFLG)); \
+ printk("0x%04X = %-15s(0x%04X), flags = %s -> %s\n", \
+ r_asm, #name"_asm", d, print_flags(buf1,inflags), print_flags(buf2,flags));
+
+#define VAL_FAIL_LONG_UNARY(name) \
+ printk("fail\n"); \
+ printk("0x%08X = %-15s(0x%08X), flags = %s -> %s\n", \
+ r, #name, d, print_flags(buf1,inflags), print_flags(buf2,M.x86.R_EFLG)); \
+ printk("0x%08X = %-15s(0x%08X), flags = %s -> %s\n", \
+ r_asm, #name"_asm", d, print_flags(buf1,inflags), print_flags(buf2,flags));
+
+#define VAL_END_UNARY() \
+ } \
+ M.x86.R_EFLG = inflags = flags = def_flags | ALL_FLAGS; \
+ if (failed) \
+ break; \
+ } \
+ if (failed) \
+ break; \
+ } \
+ if (!failed) \
+ printk("passed\n"); \
+}
+
+#define VAL_BYTE_UNARY(name) \
+ printk("Validating %s ... ", #name); \
+ VAL_START_UNARY(u8,0xFF,0x1) \
+ VAL_TEST_UNARY(name) \
+ VAL_FAIL_BYTE_UNARY(name) \
+ VAL_END_UNARY()
+
+#define VAL_WORD_UNARY(name) \
+ printk("Validating %s ... ", #name); \
+ VAL_START_UNARY(u16,0xFF00,0x100) \
+ VAL_TEST_UNARY(name) \
+ VAL_FAIL_WORD_UNARY(name) \
+ VAL_END_UNARY()
+
+#define VAL_WORD_BYTE_UNARY(name) \
+ printk("Validating %s ... ", #name); \
+ VAL_START_UNARY(u16,0xFF,0x1) \
+ VAL_TEST_UNARY(name) \
+ VAL_FAIL_WORD_UNARY(name) \
+ VAL_END_UNARY()
+
+#define VAL_LONG_UNARY(name) \
+ printk("Validating %s ... ", #name); \
+ VAL_START_UNARY(u32,0xFF000000,0x1000000) \
+ VAL_TEST_UNARY(name) \
+ VAL_FAIL_LONG_UNARY(name) \
+ VAL_END_UNARY()
+
+#define VAL_BYTE_MUL(name) \
+ printk("Validating %s ... ", #name); \
+{ \
+ u8 d,s; \
+ u16 r,r_asm; \
+ u32 flags,inflags; \
+ int f,failed = false; \
+ char buf1[80],buf2[80]; \
+ for (d = 0; d < 0xFF; d += 1) { \
+ for (s = 0; s < 0xFF; s += 1) { \
+ M.x86.R_EFLG = inflags = flags = def_flags; \
+ for (f = 0; f < 2; f++) { \
+ name##_asm(&flags,&r_asm,d,s); \
+ M.x86.R_AL = d; \
+ name(s); \
+ r = M.x86.R_AX; \
+ if (r != r_asm || M.x86.R_EFLG != flags) \
+ failed = true; \
+ if (failed || trace) { \
+ if (failed) \
+ printk("fail\n"); \
+ printk("0x%04X = %-15s(0x%02X,0x%02X), flags = %s -> %s\n", \
+ r, #name, d, s, print_flags(buf1,inflags), print_flags(buf2,M.x86.R_EFLG)); \
+ printk("0x%04X = %-15s(0x%02X,0x%02X), flags = %s -> %s\n", \
+ r_asm, #name"_asm", d, s, print_flags(buf1,inflags), print_flags(buf2,flags)); \
+ } \
+ M.x86.R_EFLG = inflags = flags = def_flags | (ALL_FLAGS & ~F_OF); \
+ if (failed) \
+ break; \
+ } \
+ if (failed) \
+ break; \
+ } \
+ if (failed) \
+ break; \
+ } \
+ if (!failed) \
+ printk("passed\n"); \
+}
+
+#define VAL_WORD_MUL(name) \
+ printk("Validating %s ... ", #name); \
+{ \
+ u16 d,s; \
+ u16 r_lo,r_asm_lo; \
+ u16 r_hi,r_asm_hi; \
+ u32 flags,inflags; \
+ int f,failed = false; \
+ char buf1[80],buf2[80]; \
+ for (d = 0; d < 0xFF00; d += 0x100) { \
+ for (s = 0; s < 0xFF00; s += 0x100) { \
+ M.x86.R_EFLG = inflags = flags = def_flags; \
+ for (f = 0; f < 2; f++) { \
+ name##_asm(&flags,&r_asm_lo,&r_asm_hi,d,s); \
+ M.x86.R_AX = d; \
+ name(s); \
+ r_lo = M.x86.R_AX; \
+ r_hi = M.x86.R_DX; \
+ if (r_lo != r_asm_lo || r_hi != r_asm_hi || M.x86.R_EFLG != flags)\
+ failed = true; \
+ if (failed || trace) { \
+ if (failed) \
+ printk("fail\n"); \
+ printk("0x%04X:0x%04X = %-15s(0x%04X,0x%04X), flags = %s -> %s\n", \
+ r_hi,r_lo, #name, d, s, print_flags(buf1,inflags), print_flags(buf2,M.x86.R_EFLG)); \
+ printk("0x%04X:0x%04X = %-15s(0x%04X,0x%04X), flags = %s -> %s\n", \
+ r_asm_hi,r_asm_lo, #name"_asm", d, s, print_flags(buf1,inflags), print_flags(buf2,flags)); \
+ } \
+ M.x86.R_EFLG = inflags = flags = def_flags | (ALL_FLAGS & ~F_OF); \
+ if (failed) \
+ break; \
+ } \
+ if (failed) \
+ break; \
+ } \
+ if (failed) \
+ break; \
+ } \
+ if (!failed) \
+ printk("passed\n"); \
+}
+
+#define VAL_LONG_MUL(name) \
+ printk("Validating %s ... ", #name); \
+{ \
+ u32 d,s; \
+ u32 r_lo,r_asm_lo; \
+ u32 r_hi,r_asm_hi; \
+ u32 flags,inflags; \
+ int f,failed = false; \
+ char buf1[80],buf2[80]; \
+ for (d = 0; d < 0xFF000000; d += 0x1000000) { \
+ for (s = 0; s < 0xFF000000; s += 0x1000000) { \
+ M.x86.R_EFLG = inflags = flags = def_flags; \
+ for (f = 0; f < 2; f++) { \
+ name##_asm(&flags,&r_asm_lo,&r_asm_hi,d,s); \
+ M.x86.R_EAX = d; \
+ name(s); \
+ r_lo = M.x86.R_EAX; \
+ r_hi = M.x86.R_EDX; \
+ if (r_lo != r_asm_lo || r_hi != r_asm_hi || M.x86.R_EFLG != flags)\
+ failed = true; \
+ if (failed || trace) { \
+ if (failed) \
+ printk("fail\n"); \
+ printk("0x%08X:0x%08X = %-15s(0x%08X,0x%08X), flags = %s -> %s\n", \
+ r_hi,r_lo, #name, d, s, print_flags(buf1,inflags), print_flags(buf2,M.x86.R_EFLG)); \
+ printk("0x%08X:0x%08X = %-15s(0x%08X,0x%08X), flags = %s -> %s\n", \
+ r_asm_hi,r_asm_lo, #name"_asm", d, s, print_flags(buf1,inflags), print_flags(buf2,flags)); \
+ } \
+ M.x86.R_EFLG = inflags = flags = def_flags | (ALL_FLAGS & ~F_OF); \
+ if (failed) \
+ break; \
+ } \
+ if (failed) \
+ break; \
+ } \
+ if (failed) \
+ break; \
+ } \
+ if (!failed) \
+ printk("passed\n"); \
+}
+
+#define VAL_BYTE_DIV(name) \
+ printk("Validating %s ... ", #name); \
+{ \
+ u16 d,s; \
+ u8 r_quot,r_rem,r_asm_quot,r_asm_rem; \
+ u32 flags,inflags; \
+ int f,failed = false; \
+ char buf1[80],buf2[80]; \
+ for (d = 0; d < 0xFF00; d += 0x100) { \
+ for (s = 1; s < 0xFF; s += 1) { \
+ M.x86.R_EFLG = inflags = flags = def_flags; \
+ for (f = 0; f < 2; f++) { \
+ M.x86.intr = 0; \
+ M.x86.R_AX = d; \
+ name(s); \
+ r_quot = M.x86.R_AL; \
+ r_rem = M.x86.R_AH; \
+ if (M.x86.intr & INTR_SYNCH) \
+ continue; \
+ name##_asm(&flags,&r_asm_quot,&r_asm_rem,d,s); \
+ if (r_quot != r_asm_quot || r_rem != r_asm_rem || M.x86.R_EFLG != flags) \
+ failed = true; \
+ if (failed || trace) { \
+ if (failed) \
+ printk("fail\n"); \
+ printk("0x%02X:0x%02X = %-15s(0x%04X,0x%02X), flags = %s -> %s\n", \
+ r_quot, r_rem, #name, d, s, print_flags(buf1,inflags), print_flags(buf2,M.x86.R_EFLG)); \
+ printk("0x%02X:0x%02X = %-15s(0x%04X,0x%02X), flags = %s -> %s\n", \
+ r_asm_quot, r_asm_rem, #name"_asm", d, s, print_flags(buf1,inflags), print_flags(buf2,flags)); \
+ } \
+ M.x86.R_EFLG = inflags = flags = def_flags | (ALL_FLAGS & ~F_OF); \
+ if (failed) \
+ break; \
+ } \
+ if (failed) \
+ break; \
+ } \
+ if (failed) \
+ break; \
+ } \
+ if (!failed) \
+ printk("passed\n"); \
+}
+
+#define VAL_WORD_DIV(name) \
+ printk("Validating %s ... ", #name); \
+{ \
+ u32 d,s; \
+ u16 r_quot,r_rem,r_asm_quot,r_asm_rem; \
+ u32 flags,inflags; \
+ int f,failed = false; \
+ char buf1[80],buf2[80]; \
+ for (d = 0; d < 0xFF000000; d += 0x1000000) { \
+ for (s = 0x100; s < 0xFF00; s += 0x100) { \
+ M.x86.R_EFLG = inflags = flags = def_flags; \
+ for (f = 0; f < 2; f++) { \
+ M.x86.intr = 0; \
+ M.x86.R_AX = d & 0xFFFF; \
+ M.x86.R_DX = d >> 16; \
+ name(s); \
+ r_quot = M.x86.R_AX; \
+ r_rem = M.x86.R_DX; \
+ if (M.x86.intr & INTR_SYNCH) \
+ continue; \
+ name##_asm(&flags,&r_asm_quot,&r_asm_rem,d & 0xFFFF,d >> 16,s);\
+ if (r_quot != r_asm_quot || r_rem != r_asm_rem || M.x86.R_EFLG != flags) \
+ failed = true; \
+ if (failed || trace) { \
+ if (failed) \
+ printk("fail\n"); \
+ printk("0x%04X:0x%04X = %-15s(0x%08X,0x%04X), flags = %s -> %s\n", \
+ r_quot, r_rem, #name, d, s, print_flags(buf1,inflags), print_flags(buf2,M.x86.R_EFLG)); \
+ printk("0x%04X:0x%04X = %-15s(0x%08X,0x%04X), flags = %s -> %s\n", \
+ r_asm_quot, r_asm_rem, #name"_asm", d, s, print_flags(buf1,inflags), print_flags(buf2,flags)); \
+ } \
+ M.x86.R_EFLG = inflags = flags = def_flags | (ALL_FLAGS & ~F_OF); \
+ if (failed) \
+ break; \
+ } \
+ if (failed) \
+ break; \
+ } \
+ if (failed) \
+ break; \
+ } \
+ if (!failed) \
+ printk("passed\n"); \
+}
+
+#define VAL_LONG_DIV(name) \
+ printk("Validating %s ... ", #name); \
+{ \
+ u32 d,s; \
+ u32 r_quot,r_rem,r_asm_quot,r_asm_rem; \
+ u32 flags,inflags; \
+ int f,failed = false; \
+ char buf1[80],buf2[80]; \
+ for (d = 0; d < 0xFF000000; d += 0x1000000) { \
+ for (s = 0x100; s < 0xFF00; s += 0x100) { \
+ M.x86.R_EFLG = inflags = flags = def_flags; \
+ for (f = 0; f < 2; f++) { \
+ M.x86.intr = 0; \
+ M.x86.R_EAX = d; \
+ M.x86.R_EDX = 0; \
+ name(s); \
+ r_quot = M.x86.R_EAX; \
+ r_rem = M.x86.R_EDX; \
+ if (M.x86.intr & INTR_SYNCH) \
+ continue; \
+ name##_asm(&flags,&r_asm_quot,&r_asm_rem,d,0,s); \
+ if (r_quot != r_asm_quot || r_rem != r_asm_rem || M.x86.R_EFLG != flags) \
+ failed = true; \
+ if (failed || trace) { \
+ if (failed) \
+ printk("fail\n"); \
+ printk("0x%08X:0x%08X = %-15s(0x%08X:0x%08X,0x%08X), flags = %s -> %s\n", \
+ r_quot, r_rem, #name, 0, d, s, print_flags(buf1,inflags), print_flags(buf2,M.x86.R_EFLG)); \
+ printk("0x%08X:0x%08X = %-15s(0x%08X:0x%08X,0x%08X), flags = %s -> %s\n", \
+ r_asm_quot, r_asm_rem, #name"_asm", 0, d, s, print_flags(buf1,inflags), print_flags(buf2,flags)); \
+ } \
+ M.x86.R_EFLG = inflags = flags = def_flags | (ALL_FLAGS & ~F_OF); \
+ if (failed) \
+ break; \
+ } \
+ if (failed) \
+ break; \
+ } \
+ if (failed) \
+ break; \
+ } \
+ if (!failed) \
+ printk("passed\n"); \
+}
+
+void printk(const char *fmt, ...)
+{
+ va_list argptr;
+ va_start(argptr, fmt);
+ vfprintf(stdout, fmt, argptr);
+ fflush(stdout);
+ va_end(argptr);
+}
+
+char * print_flags(char *buf,ulong flags)
+{
+ char *separator = "";
+
+ buf[0] = 0;
+ if (flags & F_CF) {
+ strcat(buf,separator);
+ strcat(buf,"CF");
+ separator = ",";
+ }
+ if (flags & F_PF) {
+ strcat(buf,separator);
+ strcat(buf,"PF");
+ separator = ",";
+ }
+ if (flags & F_AF) {
+ strcat(buf,separator);
+ strcat(buf,"AF");
+ separator = ",";
+ }
+ if (flags & F_ZF) {
+ strcat(buf,separator);
+ strcat(buf,"ZF");
+ separator = ",";
+ }
+ if (flags & F_SF) {
+ strcat(buf,separator);
+ strcat(buf,"SF");
+ separator = ",";
+ }
+ if (flags & F_OF) {
+ strcat(buf,separator);
+ strcat(buf,"OF");
+ separator = ",";
+ }
+ if (separator[0] == 0)
+ strcpy(buf,"None");
+ return buf;
+}
+
+int main(int argc)
+{
+ ulong def_flags;
+ int trace = false;
+
+ if (argc > 1)
+ trace = true;
+ memset(&M, 0, sizeof(M));
+ def_flags = get_flags_asm() & ~ALL_FLAGS;
+
+ VAL_WORD_UNARY(aaa_word);
+ VAL_WORD_UNARY(aas_word);
+
+ VAL_WORD_UNARY(aad_word);
+ VAL_WORD_UNARY(aam_word);
+
+ VAL_BYTE_BYTE_BINARY(adc_byte);
+ VAL_WORD_WORD_BINARY(adc_word);
+ VAL_LONG_LONG_BINARY(adc_long);
+
+ VAL_BYTE_BYTE_BINARY(add_byte);
+ VAL_WORD_WORD_BINARY(add_word);
+ VAL_LONG_LONG_BINARY(add_long);
+
+ VAL_BYTE_BYTE_BINARY(and_byte);
+ VAL_WORD_WORD_BINARY(and_word);
+ VAL_LONG_LONG_BINARY(and_long);
+
+ VAL_BYTE_BYTE_BINARY(cmp_byte);
+ VAL_WORD_WORD_BINARY(cmp_word);
+ VAL_LONG_LONG_BINARY(cmp_long);
+
+ VAL_BYTE_UNARY(daa_byte);
+ VAL_BYTE_UNARY(das_byte); // Fails for 0x9A (out of range anyway)
+
+ VAL_BYTE_UNARY(dec_byte);
+ VAL_WORD_UNARY(dec_word);
+ VAL_LONG_UNARY(dec_long);
+
+ VAL_BYTE_UNARY(inc_byte);
+ VAL_WORD_UNARY(inc_word);
+ VAL_LONG_UNARY(inc_long);
+
+ VAL_BYTE_BYTE_BINARY(or_byte);
+ VAL_WORD_WORD_BINARY(or_word);
+ VAL_LONG_LONG_BINARY(or_long);
+
+ VAL_BYTE_UNARY(neg_byte);
+ VAL_WORD_UNARY(neg_word);
+ VAL_LONG_UNARY(neg_long);
+
+ VAL_BYTE_UNARY(not_byte);
+ VAL_WORD_UNARY(not_word);
+ VAL_LONG_UNARY(not_long);
+
+ VAL_BYTE_ROTATE(rcl_byte);
+ VAL_WORD_ROTATE(rcl_word);
+ VAL_LONG_ROTATE(rcl_long);
+
+ VAL_BYTE_ROTATE(rcr_byte);
+ VAL_WORD_ROTATE(rcr_word);
+ VAL_LONG_ROTATE(rcr_long);
+
+ VAL_BYTE_ROTATE(rol_byte);
+ VAL_WORD_ROTATE(rol_word);
+ VAL_LONG_ROTATE(rol_long);
+
+ VAL_BYTE_ROTATE(ror_byte);
+ VAL_WORD_ROTATE(ror_word);
+ VAL_LONG_ROTATE(ror_long);
+
+ VAL_BYTE_ROTATE(shl_byte);
+ VAL_WORD_ROTATE(shl_word);
+ VAL_LONG_ROTATE(shl_long);
+
+ VAL_BYTE_ROTATE(shr_byte);
+ VAL_WORD_ROTATE(shr_word);
+ VAL_LONG_ROTATE(shr_long);
+
+ VAL_BYTE_ROTATE(sar_byte);
+ VAL_WORD_ROTATE(sar_word);
+ VAL_LONG_ROTATE(sar_long);
+
+ VAL_WORD_ROTATE_DBL(shld_word);
+ VAL_LONG_ROTATE_DBL(shld_long);
+
+ VAL_WORD_ROTATE_DBL(shrd_word);
+ VAL_LONG_ROTATE_DBL(shrd_long);
+
+ VAL_BYTE_BYTE_BINARY(sbb_byte);
+ VAL_WORD_WORD_BINARY(sbb_word);
+ VAL_LONG_LONG_BINARY(sbb_long);
+
+ VAL_BYTE_BYTE_BINARY(sub_byte);
+ VAL_WORD_WORD_BINARY(sub_word);
+ VAL_LONG_LONG_BINARY(sub_long);
+
+ VAL_BYTE_BYTE_BINARY(xor_byte);
+ VAL_WORD_WORD_BINARY(xor_word);
+ VAL_LONG_LONG_BINARY(xor_long);
+
+ VAL_VOID_BYTE_BINARY(test_byte);
+ VAL_VOID_WORD_BINARY(test_word);
+ VAL_VOID_LONG_BINARY(test_long);
+
+ VAL_BYTE_MUL(imul_byte);
+ VAL_WORD_MUL(imul_word);
+ VAL_LONG_MUL(imul_long);
+
+ VAL_BYTE_MUL(mul_byte);
+ VAL_WORD_MUL(mul_word);
+ VAL_LONG_MUL(mul_long);
+
+ VAL_BYTE_DIV(idiv_byte);
+ VAL_WORD_DIV(idiv_word);
+ VAL_LONG_DIV(idiv_long);
+
+ VAL_BYTE_DIV(div_byte);
+ VAL_WORD_DIV(div_word);
+ VAL_LONG_DIV(div_long);
+
+ return 0;
+}
diff --git a/board/MAI/bios_emulator/scitech/src/x86emu/x86emu/debug.h b/board/MAI/bios_emulator/scitech/src/x86emu/x86emu/debug.h
new file mode 100644
index 00000000000..b4a3ed50009
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/x86emu/x86emu/debug.h
@@ -0,0 +1,210 @@
+/****************************************************************************
+*
+* Realmode X86 Emulator Library
+*
+* Copyright (C) 1996-1999 SciTech Software, Inc.
+* Copyright (C) David Mosberger-Tang
+* Copyright (C) 1999 Egbert Eich
+*
+* ========================================================================
+*
+* Permission to use, copy, modify, distribute, and sell this software and
+* its documentation for any purpose is hereby granted without fee,
+* provided that the above copyright notice appear in all copies and that
+* both that copyright notice and this permission notice appear in
+* supporting documentation, and that the name of the authors not be used
+* in advertising or publicity pertaining to distribution of the software
+* without specific, written prior permission. The authors makes no
+* representations about the suitability of this software for any purpose.
+* It is provided "as is" without express or implied warranty.
+*
+* THE AUTHORS DISCLAIMS ALL WARRANTIES WITH REGARD TO THIS SOFTWARE,
+* INCLUDING ALL IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS, IN NO
+* EVENT SHALL THE AUTHORS BE LIABLE FOR ANY SPECIAL, INDIRECT OR
+* CONSEQUENTIAL DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF
+* USE, DATA OR PROFITS, WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE OR
+* OTHER TORTIOUS ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE OR
+* PERFORMANCE OF THIS SOFTWARE.
+*
+* ========================================================================
+*
+* Language: ANSI C
+* Environment: Any
+* Developer: Kendall Bennett
+*
+* Description: Header file for debug definitions.
+*
+****************************************************************************/
+
+#ifndef __X86EMU_DEBUG_H
+#define __X86EMU_DEBUG_H
+
+/*---------------------- Macros and type definitions ----------------------*/
+
+/* checks to be enabled for "runtime" */
+
+#define CHECK_IP_FETCH_F 0x1
+#define CHECK_SP_ACCESS_F 0x2
+#define CHECK_MEM_ACCESS_F 0x4 /*using regular linear pointer */
+#define CHECK_DATA_ACCESS_F 0x8 /*using segment:offset*/
+
+#ifdef DEBUG
+# define CHECK_IP_FETCH() (M.x86.check & CHECK_IP_FETCH_F)
+# define CHECK_SP_ACCESS() (M.x86.check & CHECK_SP_ACCESS_F)
+# define CHECK_MEM_ACCESS() (M.x86.check & CHECK_MEM_ACCESS_F)
+# define CHECK_DATA_ACCESS() (M.x86.check & CHECK_DATA_ACCESS_F)
+#else
+# define CHECK_IP_FETCH()
+# define CHECK_SP_ACCESS()
+# define CHECK_MEM_ACCESS()
+# define CHECK_DATA_ACCESS()
+#endif
+
+#ifdef DEBUG
+# define DEBUG_INSTRUMENT() (M.x86.debug & DEBUG_INSTRUMENT_F)
+# define DEBUG_DECODE() (M.x86.debug & DEBUG_DECODE_F)
+# define DEBUG_TRACE() (M.x86.debug & DEBUG_TRACE_F)
+# define DEBUG_STEP() (M.x86.debug & DEBUG_STEP_F)
+# define DEBUG_DISASSEMBLE() (M.x86.debug & DEBUG_DISASSEMBLE_F)
+# define DEBUG_BREAK() (M.x86.debug & DEBUG_BREAK_F)
+# define DEBUG_SVC() (M.x86.debug & DEBUG_SVC_F)
+# define DEBUG_SAVE_IP_CS() (M.x86.debug & DEBUG_SAVE_CS_IP)
+
+# define DEBUG_FS() (M.x86.debug & DEBUG_FS_F)
+# define DEBUG_PROC() (M.x86.debug & DEBUG_PROC_F)
+# define DEBUG_SYSINT() (M.x86.debug & DEBUG_SYSINT_F)
+# define DEBUG_TRACECALL() (M.x86.debug & DEBUG_TRACECALL_F)
+# define DEBUG_TRACECALLREGS() (M.x86.debug & DEBUG_TRACECALL_REGS_F)
+# define DEBUG_SYS() (M.x86.debug & DEBUG_SYS_F)
+# define DEBUG_MEM_TRACE() (M.x86.debug & DEBUG_MEM_TRACE_F)
+# define DEBUG_IO_TRACE() (M.x86.debug & DEBUG_IO_TRACE_F)
+# define DEBUG_DECODE_NOPRINT() (M.x86.debug & DEBUG_DECODE_NOPRINT_F)
+#else
+# define DEBUG_INSTRUMENT() 0
+# define DEBUG_DECODE() 0
+# define DEBUG_TRACE() 0
+# define DEBUG_STEP() 0
+# define DEBUG_DISASSEMBLE() 0
+# define DEBUG_BREAK() 0
+# define DEBUG_SVC() 0
+# define DEBUG_SAVE_IP_CS() 0
+# define DEBUG_FS() 0
+# define DEBUG_PROC() 0
+# define DEBUG_SYSINT() 0
+# define DEBUG_TRACECALL() 0
+# define DEBUG_TRACECALLREGS() 0
+# define DEBUG_SYS() 0
+# define DEBUG_MEM_TRACE() 0
+# define DEBUG_IO_TRACE() 0
+# define DEBUG_DECODE_NOPRINT() 0
+#endif
+
+#ifdef DEBUG
+
+# define DECODE_PRINTF(x) if (DEBUG_DECODE()) \
+ x86emu_decode_printf(x)
+# define DECODE_PRINTF2(x,y) if (DEBUG_DECODE()) \
+ x86emu_decode_printf2(x,y)
+
+/*
+ * The following allow us to look at the bytes of an instruction. The
+ * first INCR_INSTRN_LEN, is called everytime bytes are consumed in
+ * the decoding process. The SAVE_IP_CS is called initially when the
+ * major opcode of the instruction is accessed.
+ */
+#define INC_DECODED_INST_LEN(x) \
+ if (DEBUG_DECODE()) \
+ x86emu_inc_decoded_inst_len(x)
+
+#define SAVE_IP_CS(x,y) \
+ if (DEBUG_DECODE() | DEBUG_TRACECALL() | DEBUG_BREAK() \
+ | DEBUG_IO_TRACE() | DEBUG_SAVE_IP_CS()) { \
+ M.x86.saved_cs = x; \
+ M.x86.saved_ip = y; \
+ }
+#else
+# define INC_DECODED_INST_LEN(x)
+# define DECODE_PRINTF(x)
+# define DECODE_PRINTF2(x,y)
+# define SAVE_IP_CS(x,y)
+#endif
+
+#ifdef DEBUG
+#define TRACE_REGS() \
+ if (DEBUG_DISASSEMBLE()) { \
+ x86emu_just_disassemble(); \
+ goto EndOfTheInstructionProcedure; \
+ } \
+ if (DEBUG_TRACE() || DEBUG_DECODE()) X86EMU_trace_regs()
+#else
+# define TRACE_REGS()
+#endif
+
+#ifdef DEBUG
+# define SINGLE_STEP() if (DEBUG_STEP()) x86emu_single_step()
+#else
+# define SINGLE_STEP()
+#endif
+
+#define TRACE_AND_STEP() \
+ TRACE_REGS(); \
+ SINGLE_STEP()
+
+#ifdef DEBUG
+# define START_OF_INSTR()
+# define END_OF_INSTR() EndOfTheInstructionProcedure: x86emu_end_instr();
+# define END_OF_INSTR_NO_TRACE() x86emu_end_instr();
+#else
+# define START_OF_INSTR()
+# define END_OF_INSTR()
+# define END_OF_INSTR_NO_TRACE()
+#endif
+
+#ifdef DEBUG
+# define CALL_TRACE(u,v,w,x,s) \
+ if (DEBUG_TRACECALLREGS()) \
+ x86emu_dump_regs(); \
+ if (DEBUG_TRACECALL()) \
+ printk("%04x:%04x: CALL %s%04x:%04x\n", u , v, s, w, x);
+# define RETURN_TRACE(n,u,v) \
+ if (DEBUG_TRACECALLREGS()) \
+ x86emu_dump_regs(); \
+ if (DEBUG_TRACECALL()) \
+ printk("%04x:%04x: %s\n",u,v,n);
+#else
+# define CALL_TRACE(u,v,w,x,s)
+# define RETURN_TRACE(n,u,v)
+#endif
+
+#ifdef DEBUG
+#define DB(x) x
+#else
+#define DB(x)
+#endif
+
+/*-------------------------- Function Prototypes --------------------------*/
+
+#ifdef __cplusplus
+extern "C" { /* Use "C" linkage when in C++ mode */
+#endif
+
+extern void x86emu_inc_decoded_inst_len (int x);
+extern void x86emu_decode_printf (char *x);
+extern void x86emu_decode_printf2 (char *x, int y);
+extern void x86emu_just_disassemble (void);
+extern void x86emu_single_step (void);
+extern void x86emu_end_instr (void);
+extern void x86emu_dump_regs (void);
+extern void x86emu_dump_xregs (void);
+extern void x86emu_print_int_vect (u16 iv);
+extern void x86emu_instrument_instruction (void);
+extern void x86emu_check_ip_access (void);
+extern void x86emu_check_sp_access (void);
+extern void x86emu_check_mem_access (u32 p);
+extern void x86emu_check_data_access (uint s, uint o);
+
+#ifdef __cplusplus
+} /* End of "C" linkage for C++ */
+#endif
+
+#endif /* __X86EMU_DEBUG_H */
diff --git a/board/MAI/bios_emulator/scitech/src/x86emu/x86emu/decode.h b/board/MAI/bios_emulator/scitech/src/x86emu/x86emu/decode.h
new file mode 100644
index 00000000000..321a345399f
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/x86emu/x86emu/decode.h
@@ -0,0 +1,87 @@
+/****************************************************************************
+*
+* Realmode X86 Emulator Library
+*
+* Copyright (C) 1996-1999 SciTech Software, Inc.
+* Copyright (C) David Mosberger-Tang
+* Copyright (C) 1999 Egbert Eich
+*
+* ========================================================================
+*
+* Permission to use, copy, modify, distribute, and sell this software and
+* its documentation for any purpose is hereby granted without fee,
+* provided that the above copyright notice appear in all copies and that
+* both that copyright notice and this permission notice appear in
+* supporting documentation, and that the name of the authors not be used
+* in advertising or publicity pertaining to distribution of the software
+* without specific, written prior permission. The authors makes no
+* representations about the suitability of this software for any purpose.
+* It is provided "as is" without express or implied warranty.
+*
+* THE AUTHORS DISCLAIMS ALL WARRANTIES WITH REGARD TO THIS SOFTWARE,
+* INCLUDING ALL IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS, IN NO
+* EVENT SHALL THE AUTHORS BE LIABLE FOR ANY SPECIAL, INDIRECT OR
+* CONSEQUENTIAL DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF
+* USE, DATA OR PROFITS, WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE OR
+* OTHER TORTIOUS ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE OR
+* PERFORMANCE OF THIS SOFTWARE.
+*
+* ========================================================================
+*
+* Language: ANSI C
+* Environment: Any
+* Developer: Kendall Bennett
+*
+* Description: Header file for instruction decoding logic.
+*
+****************************************************************************/
+
+#ifndef __X86EMU_DECODE_H
+#define __X86EMU_DECODE_H
+
+/*---------------------- Macros and type definitions ----------------------*/
+
+/* Instruction Decoding Stuff */
+
+#define FETCH_DECODE_MODRM(mod,rh,rl) fetch_decode_modrm(&mod,&rh,&rl)
+#define DECODE_RM_BYTE_REGISTER(r) decode_rm_byte_register(r)
+#define DECODE_RM_WORD_REGISTER(r) decode_rm_word_register(r)
+#define DECODE_RM_LONG_REGISTER(r) decode_rm_long_register(r)
+#define DECODE_CLEAR_SEGOVR() M.x86.mode &= ~SYSMODE_CLRMASK
+
+/*-------------------------- Function Prototypes --------------------------*/
+
+#ifdef __cplusplus
+extern "C" { /* Use "C" linkage when in C++ mode */
+#endif
+
+void x86emu_intr_raise (u8 type);
+void fetch_decode_modrm (int *mod,int *regh,int *regl);
+u8 fetch_byte_imm (void);
+u16 fetch_word_imm (void);
+u32 fetch_long_imm (void);
+u8 fetch_data_byte (uint offset);
+u8 fetch_data_byte_abs (uint segment, uint offset);
+u16 fetch_data_word (uint offset);
+u16 fetch_data_word_abs (uint segment, uint offset);
+u32 fetch_data_long (uint offset);
+u32 fetch_data_long_abs (uint segment, uint offset);
+void store_data_byte (uint offset, u8 val);
+void store_data_byte_abs (uint segment, uint offset, u8 val);
+void store_data_word (uint offset, u16 val);
+void store_data_word_abs (uint segment, uint offset, u16 val);
+void store_data_long (uint offset, u32 val);
+void store_data_long_abs (uint segment, uint offset, u32 val);
+u8* decode_rm_byte_register(int reg);
+u16* decode_rm_word_register(int reg);
+u32* decode_rm_long_register(int reg);
+u16* decode_rm_seg_register(int reg);
+unsigned decode_rm00_address(int rm);
+unsigned decode_rm01_address(int rm);
+unsigned decode_rm10_address(int rm);
+
+#ifdef __cplusplus
+} /* End of "C" linkage for C++ */
+#endif
+
+#endif /* __X86EMU_DECODE_H */
diff --git a/board/MAI/bios_emulator/scitech/src/x86emu/x86emu/fpu.h b/board/MAI/bios_emulator/scitech/src/x86emu/x86emu/fpu.h
new file mode 100644
index 00000000000..5fb271463b6
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/x86emu/x86emu/fpu.h
@@ -0,0 +1,61 @@
+/****************************************************************************
+*
+* Realmode X86 Emulator Library
+*
+* Copyright (C) 1996-1999 SciTech Software, Inc.
+* Copyright (C) David Mosberger-Tang
+* Copyright (C) 1999 Egbert Eich
+*
+* ========================================================================
+*
+* Permission to use, copy, modify, distribute, and sell this software and
+* its documentation for any purpose is hereby granted without fee,
+* provided that the above copyright notice appear in all copies and that
+* both that copyright notice and this permission notice appear in
+* supporting documentation, and that the name of the authors not be used
+* in advertising or publicity pertaining to distribution of the software
+* without specific, written prior permission. The authors makes no
+* representations about the suitability of this software for any purpose.
+* It is provided "as is" without express or implied warranty.
+*
+* THE AUTHORS DISCLAIMS ALL WARRANTIES WITH REGARD TO THIS SOFTWARE,
+* INCLUDING ALL IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS, IN NO
+* EVENT SHALL THE AUTHORS BE LIABLE FOR ANY SPECIAL, INDIRECT OR
+* CONSEQUENTIAL DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF
+* USE, DATA OR PROFITS, WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE OR
+* OTHER TORTIOUS ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE OR
+* PERFORMANCE OF THIS SOFTWARE.
+*
+* ========================================================================
+*
+* Language: ANSI C
+* Environment: Any
+* Developer: Kendall Bennett
+*
+* Description: Header file for FPU instruction decoding.
+*
+****************************************************************************/
+
+#ifndef __X86EMU_FPU_H
+#define __X86EMU_FPU_H
+
+#ifdef __cplusplus
+extern "C" { /* Use "C" linkage when in C++ mode */
+#endif
+
+/* these have to be defined, whether 8087 support compiled in or not. */
+
+extern void x86emuOp_esc_coprocess_d8 (u8 op1);
+extern void x86emuOp_esc_coprocess_d9 (u8 op1);
+extern void x86emuOp_esc_coprocess_da (u8 op1);
+extern void x86emuOp_esc_coprocess_db (u8 op1);
+extern void x86emuOp_esc_coprocess_dc (u8 op1);
+extern void x86emuOp_esc_coprocess_dd (u8 op1);
+extern void x86emuOp_esc_coprocess_de (u8 op1);
+extern void x86emuOp_esc_coprocess_df (u8 op1);
+
+#ifdef __cplusplus
+} /* End of "C" linkage for C++ */
+#endif
+
+#endif /* __X86EMU_FPU_H */
diff --git a/board/MAI/bios_emulator/scitech/src/x86emu/x86emu/ops.h b/board/MAI/bios_emulator/scitech/src/x86emu/x86emu/ops.h
new file mode 100644
index 00000000000..65ea6765439
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/x86emu/x86emu/ops.h
@@ -0,0 +1,45 @@
+/****************************************************************************
+*
+* Realmode X86 Emulator Library
+*
+* Copyright (C) 1996-1999 SciTech Software, Inc.
+* Copyright (C) David Mosberger-Tang
+* Copyright (C) 1999 Egbert Eich
+*
+* ========================================================================
+*
+* Permission to use, copy, modify, distribute, and sell this software and
+* its documentation for any purpose is hereby granted without fee,
+* provided that the above copyright notice appear in all copies and that
+* both that copyright notice and this permission notice appear in
+* supporting documentation, and that the name of the authors not be used
+* in advertising or publicity pertaining to distribution of the software
+* without specific, written prior permission. The authors makes no
+* representations about the suitability of this software for any purpose.
+* It is provided "as is" without express or implied warranty.
+*
+* THE AUTHORS DISCLAIMS ALL WARRANTIES WITH REGARD TO THIS SOFTWARE,
+* INCLUDING ALL IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS, IN NO
+* EVENT SHALL THE AUTHORS BE LIABLE FOR ANY SPECIAL, INDIRECT OR
+* CONSEQUENTIAL DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF
+* USE, DATA OR PROFITS, WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE OR
+* OTHER TORTIOUS ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE OR
+* PERFORMANCE OF THIS SOFTWARE.
+*
+* ========================================================================
+*
+* Language: ANSI C
+* Environment: Any
+* Developer: Kendall Bennett
+*
+* Description: Header file for operand decoding functions.
+*
+****************************************************************************/
+
+#ifndef __X86EMU_OPS_H
+#define __X86EMU_OPS_H
+
+extern void (*x86emu_optab[0x100])(u8 op1);
+extern void (*x86emu_optab2[0x100])(u8 op2);
+
+#endif /* __X86EMU_OPS_H */
diff --git a/board/MAI/bios_emulator/scitech/src/x86emu/x86emu/prim_asm.h b/board/MAI/bios_emulator/scitech/src/x86emu/x86emu/prim_asm.h
new file mode 100644
index 00000000000..e023cf88daa
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/x86emu/x86emu/prim_asm.h
@@ -0,0 +1,970 @@
+/****************************************************************************
+*
+* Realmode X86 Emulator Library
+*
+* Copyright (C) 1996-1999 SciTech Software, Inc.
+* Copyright (C) David Mosberger-Tang
+* Copyright (C) 1999 Egbert Eich
+*
+* ========================================================================
+*
+* Permission to use, copy, modify, distribute, and sell this software and
+* its documentation for any purpose is hereby granted without fee,
+* provided that the above copyright notice appear in all copies and that
+* both that copyright notice and this permission notice appear in
+* supporting documentation, and that the name of the authors not be used
+* in advertising or publicity pertaining to distribution of the software
+* without specific, written prior permission. The authors makes no
+* representations about the suitability of this software for any purpose.
+* It is provided "as is" without express or implied warranty.
+*
+* THE AUTHORS DISCLAIMS ALL WARRANTIES WITH REGARD TO THIS SOFTWARE,
+* INCLUDING ALL IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS, IN NO
+* EVENT SHALL THE AUTHORS BE LIABLE FOR ANY SPECIAL, INDIRECT OR
+* CONSEQUENTIAL DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF
+* USE, DATA OR PROFITS, WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE OR
+* OTHER TORTIOUS ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE OR
+* PERFORMANCE OF THIS SOFTWARE.
+*
+* ========================================================================
+*
+* Language: Watcom C++ 10.6 or later
+* Environment: Any
+* Developer: Kendall Bennett
+*
+* Description: Inline assembler versions of the primitive operand
+* functions for faster performance. At the moment this is
+* x86 inline assembler, but these functions could be replaced
+* with native inline assembler for each supported processor
+* platform.
+*
+****************************************************************************/
+
+#ifndef __X86EMU_PRIM_ASM_H
+#define __X86EMU_PRIM_ASM_H
+
+#ifdef __WATCOMC__
+
+#ifndef VALIDATE
+#define __HAVE_INLINE_ASSEMBLER__
+#endif
+
+u32 get_flags_asm(void);
+#pragma aux get_flags_asm = \
+ "pushf" \
+ "pop eax" \
+ value [eax] \
+ modify exact [eax];
+
+u16 aaa_word_asm(u32 *flags,u16 d);
+#pragma aux aaa_word_asm = \
+ "push [edi]" \
+ "popf" \
+ "aaa" \
+ "pushf" \
+ "pop [edi]" \
+ parm [edi] [ax] \
+ value [ax] \
+ modify exact [ax];
+
+u16 aas_word_asm(u32 *flags,u16 d);
+#pragma aux aas_word_asm = \
+ "push [edi]" \
+ "popf" \
+ "aas" \
+ "pushf" \
+ "pop [edi]" \
+ parm [edi] [ax] \
+ value [ax] \
+ modify exact [ax];
+
+u16 aad_word_asm(u32 *flags,u16 d);
+#pragma aux aad_word_asm = \
+ "push [edi]" \
+ "popf" \
+ "aad" \
+ "pushf" \
+ "pop [edi]" \
+ parm [edi] [ax] \
+ value [ax] \
+ modify exact [ax];
+
+u16 aam_word_asm(u32 *flags,u8 d);
+#pragma aux aam_word_asm = \
+ "push [edi]" \
+ "popf" \
+ "aam" \
+ "pushf" \
+ "pop [edi]" \
+ parm [edi] [al] \
+ value [ax] \
+ modify exact [ax];
+
+u8 adc_byte_asm(u32 *flags,u8 d, u8 s);
+#pragma aux adc_byte_asm = \
+ "push [edi]" \
+ "popf" \
+ "adc al,bl" \
+ "pushf" \
+ "pop [edi]" \
+ parm [edi] [al] [bl] \
+ value [al] \
+ modify exact [al bl];
+
+u16 adc_word_asm(u32 *flags,u16 d, u16 s);
+#pragma aux adc_word_asm = \
+ "push [edi]" \
+ "popf" \
+ "adc ax,bx" \
+ "pushf" \
+ "pop [edi]" \
+ parm [edi] [ax] [bx] \
+ value [ax] \
+ modify exact [ax bx];
+
+u32 adc_long_asm(u32 *flags,u32 d, u32 s);
+#pragma aux adc_long_asm = \
+ "push [edi]" \
+ "popf" \
+ "adc eax,ebx" \
+ "pushf" \
+ "pop [edi]" \
+ parm [edi] [eax] [ebx] \
+ value [eax] \
+ modify exact [eax ebx];
+
+u8 add_byte_asm(u32 *flags,u8 d, u8 s);
+#pragma aux add_byte_asm = \
+ "push [edi]" \
+ "popf" \
+ "add al,bl" \
+ "pushf" \
+ "pop [edi]" \
+ parm [edi] [al] [bl] \
+ value [al] \
+ modify exact [al bl];
+
+u16 add_word_asm(u32 *flags,u16 d, u16 s);
+#pragma aux add_word_asm = \
+ "push [edi]" \
+ "popf" \
+ "add ax,bx" \
+ "pushf" \
+ "pop [edi]" \
+ parm [edi] [ax] [bx] \
+ value [ax] \
+ modify exact [ax bx];
+
+u32 add_long_asm(u32 *flags,u32 d, u32 s);
+#pragma aux add_long_asm = \
+ "push [edi]" \
+ "popf" \
+ "add eax,ebx" \
+ "pushf" \
+ "pop [edi]" \
+ parm [edi] [eax] [ebx] \
+ value [eax] \
+ modify exact [eax ebx];
+
+u8 and_byte_asm(u32 *flags,u8 d, u8 s);
+#pragma aux and_byte_asm = \
+ "push [edi]" \
+ "popf" \
+ "and al,bl" \
+ "pushf" \
+ "pop [edi]" \
+ parm [edi] [al] [bl] \
+ value [al] \
+ modify exact [al bl];
+
+u16 and_word_asm(u32 *flags,u16 d, u16 s);
+#pragma aux and_word_asm = \
+ "push [edi]" \
+ "popf" \
+ "and ax,bx" \
+ "pushf" \
+ "pop [edi]" \
+ parm [edi] [ax] [bx] \
+ value [ax] \
+ modify exact [ax bx];
+
+u32 and_long_asm(u32 *flags,u32 d, u32 s);
+#pragma aux and_long_asm = \
+ "push [edi]" \
+ "popf" \
+ "and eax,ebx" \
+ "pushf" \
+ "pop [edi]" \
+ parm [edi] [eax] [ebx] \
+ value [eax] \
+ modify exact [eax ebx];
+
+u8 cmp_byte_asm(u32 *flags,u8 d, u8 s);
+#pragma aux cmp_byte_asm = \
+ "push [edi]" \
+ "popf" \
+ "cmp al,bl" \
+ "pushf" \
+ "pop [edi]" \
+ parm [edi] [al] [bl] \
+ value [al] \
+ modify exact [al bl];
+
+u16 cmp_word_asm(u32 *flags,u16 d, u16 s);
+#pragma aux cmp_word_asm = \
+ "push [edi]" \
+ "popf" \
+ "cmp ax,bx" \
+ "pushf" \
+ "pop [edi]" \
+ parm [edi] [ax] [bx] \
+ value [ax] \
+ modify exact [ax bx];
+
+u32 cmp_long_asm(u32 *flags,u32 d, u32 s);
+#pragma aux cmp_long_asm = \
+ "push [edi]" \
+ "popf" \
+ "cmp eax,ebx" \
+ "pushf" \
+ "pop [edi]" \
+ parm [edi] [eax] [ebx] \
+ value [eax] \
+ modify exact [eax ebx];
+
+u8 daa_byte_asm(u32 *flags,u8 d);
+#pragma aux daa_byte_asm = \
+ "push [edi]" \
+ "popf" \
+ "daa" \
+ "pushf" \
+ "pop [edi]" \
+ parm [edi] [al] \
+ value [al] \
+ modify exact [al];
+
+u8 das_byte_asm(u32 *flags,u8 d);
+#pragma aux das_byte_asm = \
+ "push [edi]" \
+ "popf" \
+ "das" \
+ "pushf" \
+ "pop [edi]" \
+ parm [edi] [al] \
+ value [al] \
+ modify exact [al];
+
+u8 dec_byte_asm(u32 *flags,u8 d);
+#pragma aux dec_byte_asm = \
+ "push [edi]" \
+ "popf" \
+ "dec al" \
+ "pushf" \
+ "pop [edi]" \
+ parm [edi] [al] \
+ value [al] \
+ modify exact [al];
+
+u16 dec_word_asm(u32 *flags,u16 d);
+#pragma aux dec_word_asm = \
+ "push [edi]" \
+ "popf" \
+ "dec ax" \
+ "pushf" \
+ "pop [edi]" \
+ parm [edi] [ax] \
+ value [ax] \
+ modify exact [ax];
+
+u32 dec_long_asm(u32 *flags,u32 d);
+#pragma aux dec_long_asm = \
+ "push [edi]" \
+ "popf" \
+ "dec eax" \
+ "pushf" \
+ "pop [edi]" \
+ parm [edi] [eax] \
+ value [eax] \
+ modify exact [eax];
+
+u8 inc_byte_asm(u32 *flags,u8 d);
+#pragma aux inc_byte_asm = \
+ "push [edi]" \
+ "popf" \
+ "inc al" \
+ "pushf" \
+ "pop [edi]" \
+ parm [edi] [al] \
+ value [al] \
+ modify exact [al];
+
+u16 inc_word_asm(u32 *flags,u16 d);
+#pragma aux inc_word_asm = \
+ "push [edi]" \
+ "popf" \
+ "inc ax" \
+ "pushf" \
+ "pop [edi]" \
+ parm [edi] [ax] \
+ value [ax] \
+ modify exact [ax];
+
+u32 inc_long_asm(u32 *flags,u32 d);
+#pragma aux inc_long_asm = \
+ "push [edi]" \
+ "popf" \
+ "inc eax" \
+ "pushf" \
+ "pop [edi]" \
+ parm [edi] [eax] \
+ value [eax] \
+ modify exact [eax];
+
+u8 or_byte_asm(u32 *flags,u8 d, u8 s);
+#pragma aux or_byte_asm = \
+ "push [edi]" \
+ "popf" \
+ "or al,bl" \
+ "pushf" \
+ "pop [edi]" \
+ parm [edi] [al] [bl] \
+ value [al] \
+ modify exact [al bl];
+
+u16 or_word_asm(u32 *flags,u16 d, u16 s);
+#pragma aux or_word_asm = \
+ "push [edi]" \
+ "popf" \
+ "or ax,bx" \
+ "pushf" \
+ "pop [edi]" \
+ parm [edi] [ax] [bx] \
+ value [ax] \
+ modify exact [ax bx];
+
+u32 or_long_asm(u32 *flags,u32 d, u32 s);
+#pragma aux or_long_asm = \
+ "push [edi]" \
+ "popf" \
+ "or eax,ebx" \
+ "pushf" \
+ "pop [edi]" \
+ parm [edi] [eax] [ebx] \
+ value [eax] \
+ modify exact [eax ebx];
+
+u8 neg_byte_asm(u32 *flags,u8 d);
+#pragma aux neg_byte_asm = \
+ "push [edi]" \
+ "popf" \
+ "neg al" \
+ "pushf" \
+ "pop [edi]" \
+ parm [edi] [al] \
+ value [al] \
+ modify exact [al];
+
+u16 neg_word_asm(u32 *flags,u16 d);
+#pragma aux neg_word_asm = \
+ "push [edi]" \
+ "popf" \
+ "neg ax" \
+ "pushf" \
+ "pop [edi]" \
+ parm [edi] [ax] \
+ value [ax] \
+ modify exact [ax];
+
+u32 neg_long_asm(u32 *flags,u32 d);
+#pragma aux neg_long_asm = \
+ "push [edi]" \
+ "popf" \
+ "neg eax" \
+ "pushf" \
+ "pop [edi]" \
+ parm [edi] [eax] \
+ value [eax] \
+ modify exact [eax];
+
+u8 not_byte_asm(u32 *flags,u8 d);
+#pragma aux not_byte_asm = \
+ "push [edi]" \
+ "popf" \
+ "not al" \
+ "pushf" \
+ "pop [edi]" \
+ parm [edi] [al] \
+ value [al] \
+ modify exact [al];
+
+u16 not_word_asm(u32 *flags,u16 d);
+#pragma aux not_word_asm = \
+ "push [edi]" \
+ "popf" \
+ "not ax" \
+ "pushf" \
+ "pop [edi]" \
+ parm [edi] [ax] \
+ value [ax] \
+ modify exact [ax];
+
+u32 not_long_asm(u32 *flags,u32 d);
+#pragma aux not_long_asm = \
+ "push [edi]" \
+ "popf" \
+ "not eax" \
+ "pushf" \
+ "pop [edi]" \
+ parm [edi] [eax] \
+ value [eax] \
+ modify exact [eax];
+
+u8 rcl_byte_asm(u32 *flags,u8 d, u8 s);
+#pragma aux rcl_byte_asm = \
+ "push [edi]" \
+ "popf" \
+ "rcl al,cl" \
+ "pushf" \
+ "pop [edi]" \
+ parm [edi] [al] [cl] \
+ value [al] \
+ modify exact [al cl];
+
+u16 rcl_word_asm(u32 *flags,u16 d, u8 s);
+#pragma aux rcl_word_asm = \
+ "push [edi]" \
+ "popf" \
+ "rcl ax,cl" \
+ "pushf" \
+ "pop [edi]" \
+ parm [edi] [ax] [cl] \
+ value [ax] \
+ modify exact [ax cl];
+
+u32 rcl_long_asm(u32 *flags,u32 d, u8 s);
+#pragma aux rcl_long_asm = \
+ "push [edi]" \
+ "popf" \
+ "rcl eax,cl" \
+ "pushf" \
+ "pop [edi]" \
+ parm [edi] [eax] [cl] \
+ value [eax] \
+ modify exact [eax cl];
+
+u8 rcr_byte_asm(u32 *flags,u8 d, u8 s);
+#pragma aux rcr_byte_asm = \
+ "push [edi]" \
+ "popf" \
+ "rcr al,cl" \
+ "pushf" \
+ "pop [edi]" \
+ parm [edi] [al] [cl] \
+ value [al] \
+ modify exact [al cl];
+
+u16 rcr_word_asm(u32 *flags,u16 d, u8 s);
+#pragma aux rcr_word_asm = \
+ "push [edi]" \
+ "popf" \
+ "rcr ax,cl" \
+ "pushf" \
+ "pop [edi]" \
+ parm [edi] [ax] [cl] \
+ value [ax] \
+ modify exact [ax cl];
+
+u32 rcr_long_asm(u32 *flags,u32 d, u8 s);
+#pragma aux rcr_long_asm = \
+ "push [edi]" \
+ "popf" \
+ "rcr eax,cl" \
+ "pushf" \
+ "pop [edi]" \
+ parm [edi] [eax] [cl] \
+ value [eax] \
+ modify exact [eax cl];
+
+u8 rol_byte_asm(u32 *flags,u8 d, u8 s);
+#pragma aux rol_byte_asm = \
+ "push [edi]" \
+ "popf" \
+ "rol al,cl" \
+ "pushf" \
+ "pop [edi]" \
+ parm [edi] [al] [cl] \
+ value [al] \
+ modify exact [al cl];
+
+u16 rol_word_asm(u32 *flags,u16 d, u8 s);
+#pragma aux rol_word_asm = \
+ "push [edi]" \
+ "popf" \
+ "rol ax,cl" \
+ "pushf" \
+ "pop [edi]" \
+ parm [edi] [ax] [cl] \
+ value [ax] \
+ modify exact [ax cl];
+
+u32 rol_long_asm(u32 *flags,u32 d, u8 s);
+#pragma aux rol_long_asm = \
+ "push [edi]" \
+ "popf" \
+ "rol eax,cl" \
+ "pushf" \
+ "pop [edi]" \
+ parm [edi] [eax] [cl] \
+ value [eax] \
+ modify exact [eax cl];
+
+u8 ror_byte_asm(u32 *flags,u8 d, u8 s);
+#pragma aux ror_byte_asm = \
+ "push [edi]" \
+ "popf" \
+ "ror al,cl" \
+ "pushf" \
+ "pop [edi]" \
+ parm [edi] [al] [cl] \
+ value [al] \
+ modify exact [al cl];
+
+u16 ror_word_asm(u32 *flags,u16 d, u8 s);
+#pragma aux ror_word_asm = \
+ "push [edi]" \
+ "popf" \
+ "ror ax,cl" \
+ "pushf" \
+ "pop [edi]" \
+ parm [edi] [ax] [cl] \
+ value [ax] \
+ modify exact [ax cl];
+
+u32 ror_long_asm(u32 *flags,u32 d, u8 s);
+#pragma aux ror_long_asm = \
+ "push [edi]" \
+ "popf" \
+ "ror eax,cl" \
+ "pushf" \
+ "pop [edi]" \
+ parm [edi] [eax] [cl] \
+ value [eax] \
+ modify exact [eax cl];
+
+u8 shl_byte_asm(u32 *flags,u8 d, u8 s);
+#pragma aux shl_byte_asm = \
+ "push [edi]" \
+ "popf" \
+ "shl al,cl" \
+ "pushf" \
+ "pop [edi]" \
+ parm [edi] [al] [cl] \
+ value [al] \
+ modify exact [al cl];
+
+u16 shl_word_asm(u32 *flags,u16 d, u8 s);
+#pragma aux shl_word_asm = \
+ "push [edi]" \
+ "popf" \
+ "shl ax,cl" \
+ "pushf" \
+ "pop [edi]" \
+ parm [edi] [ax] [cl] \
+ value [ax] \
+ modify exact [ax cl];
+
+u32 shl_long_asm(u32 *flags,u32 d, u8 s);
+#pragma aux shl_long_asm = \
+ "push [edi]" \
+ "popf" \
+ "shl eax,cl" \
+ "pushf" \
+ "pop [edi]" \
+ parm [edi] [eax] [cl] \
+ value [eax] \
+ modify exact [eax cl];
+
+u8 shr_byte_asm(u32 *flags,u8 d, u8 s);
+#pragma aux shr_byte_asm = \
+ "push [edi]" \
+ "popf" \
+ "shr al,cl" \
+ "pushf" \
+ "pop [edi]" \
+ parm [edi] [al] [cl] \
+ value [al] \
+ modify exact [al cl];
+
+u16 shr_word_asm(u32 *flags,u16 d, u8 s);
+#pragma aux shr_word_asm = \
+ "push [edi]" \
+ "popf" \
+ "shr ax,cl" \
+ "pushf" \
+ "pop [edi]" \
+ parm [edi] [ax] [cl] \
+ value [ax] \
+ modify exact [ax cl];
+
+u32 shr_long_asm(u32 *flags,u32 d, u8 s);
+#pragma aux shr_long_asm = \
+ "push [edi]" \
+ "popf" \
+ "shr eax,cl" \
+ "pushf" \
+ "pop [edi]" \
+ parm [edi] [eax] [cl] \
+ value [eax] \
+ modify exact [eax cl];
+
+u8 sar_byte_asm(u32 *flags,u8 d, u8 s);
+#pragma aux sar_byte_asm = \
+ "push [edi]" \
+ "popf" \
+ "sar al,cl" \
+ "pushf" \
+ "pop [edi]" \
+ parm [edi] [al] [cl] \
+ value [al] \
+ modify exact [al cl];
+
+u16 sar_word_asm(u32 *flags,u16 d, u8 s);
+#pragma aux sar_word_asm = \
+ "push [edi]" \
+ "popf" \
+ "sar ax,cl" \
+ "pushf" \
+ "pop [edi]" \
+ parm [edi] [ax] [cl] \
+ value [ax] \
+ modify exact [ax cl];
+
+u32 sar_long_asm(u32 *flags,u32 d, u8 s);
+#pragma aux sar_long_asm = \
+ "push [edi]" \
+ "popf" \
+ "sar eax,cl" \
+ "pushf" \
+ "pop [edi]" \
+ parm [edi] [eax] [cl] \
+ value [eax] \
+ modify exact [eax cl];
+
+u16 shld_word_asm(u32 *flags,u16 d, u16 fill, u8 s);
+#pragma aux shld_word_asm = \
+ "push [edi]" \
+ "popf" \
+ "shld ax,dx,cl" \
+ "pushf" \
+ "pop [edi]" \
+ parm [edi] [ax] [dx] [cl] \
+ value [ax] \
+ modify exact [ax dx cl];
+
+u32 shld_long_asm(u32 *flags,u32 d, u32 fill, u8 s);
+#pragma aux shld_long_asm = \
+ "push [edi]" \
+ "popf" \
+ "shld eax,edx,cl" \
+ "pushf" \
+ "pop [edi]" \
+ parm [edi] [eax] [edx] [cl] \
+ value [eax] \
+ modify exact [eax edx cl];
+
+u16 shrd_word_asm(u32 *flags,u16 d, u16 fill, u8 s);
+#pragma aux shrd_word_asm = \
+ "push [edi]" \
+ "popf" \
+ "shrd ax,dx,cl" \
+ "pushf" \
+ "pop [edi]" \
+ parm [edi] [ax] [dx] [cl] \
+ value [ax] \
+ modify exact [ax dx cl];
+
+u32 shrd_long_asm(u32 *flags,u32 d, u32 fill, u8 s);
+#pragma aux shrd_long_asm = \
+ "push [edi]" \
+ "popf" \
+ "shrd eax,edx,cl" \
+ "pushf" \
+ "pop [edi]" \
+ parm [edi] [eax] [edx] [cl] \
+ value [eax] \
+ modify exact [eax edx cl];
+
+u8 sbb_byte_asm(u32 *flags,u8 d, u8 s);
+#pragma aux sbb_byte_asm = \
+ "push [edi]" \
+ "popf" \
+ "sbb al,bl" \
+ "pushf" \
+ "pop [edi]" \
+ parm [edi] [al] [bl] \
+ value [al] \
+ modify exact [al bl];
+
+u16 sbb_word_asm(u32 *flags,u16 d, u16 s);
+#pragma aux sbb_word_asm = \
+ "push [edi]" \
+ "popf" \
+ "sbb ax,bx" \
+ "pushf" \
+ "pop [edi]" \
+ parm [edi] [ax] [bx] \
+ value [ax] \
+ modify exact [ax bx];
+
+u32 sbb_long_asm(u32 *flags,u32 d, u32 s);
+#pragma aux sbb_long_asm = \
+ "push [edi]" \
+ "popf" \
+ "sbb eax,ebx" \
+ "pushf" \
+ "pop [edi]" \
+ parm [edi] [eax] [ebx] \
+ value [eax] \
+ modify exact [eax ebx];
+
+u8 sub_byte_asm(u32 *flags,u8 d, u8 s);
+#pragma aux sub_byte_asm = \
+ "push [edi]" \
+ "popf" \
+ "sub al,bl" \
+ "pushf" \
+ "pop [edi]" \
+ parm [edi] [al] [bl] \
+ value [al] \
+ modify exact [al bl];
+
+u16 sub_word_asm(u32 *flags,u16 d, u16 s);
+#pragma aux sub_word_asm = \
+ "push [edi]" \
+ "popf" \
+ "sub ax,bx" \
+ "pushf" \
+ "pop [edi]" \
+ parm [edi] [ax] [bx] \
+ value [ax] \
+ modify exact [ax bx];
+
+u32 sub_long_asm(u32 *flags,u32 d, u32 s);
+#pragma aux sub_long_asm = \
+ "push [edi]" \
+ "popf" \
+ "sub eax,ebx" \
+ "pushf" \
+ "pop [edi]" \
+ parm [edi] [eax] [ebx] \
+ value [eax] \
+ modify exact [eax ebx];
+
+void test_byte_asm(u32 *flags,u8 d, u8 s);
+#pragma aux test_byte_asm = \
+ "push [edi]" \
+ "popf" \
+ "test al,bl" \
+ "pushf" \
+ "pop [edi]" \
+ parm [edi] [al] [bl] \
+ modify exact [al bl];
+
+void test_word_asm(u32 *flags,u16 d, u16 s);
+#pragma aux test_word_asm = \
+ "push [edi]" \
+ "popf" \
+ "test ax,bx" \
+ "pushf" \
+ "pop [edi]" \
+ parm [edi] [ax] [bx] \
+ modify exact [ax bx];
+
+void test_long_asm(u32 *flags,u32 d, u32 s);
+#pragma aux test_long_asm = \
+ "push [edi]" \
+ "popf" \
+ "test eax,ebx" \
+ "pushf" \
+ "pop [edi]" \
+ parm [edi] [eax] [ebx] \
+ modify exact [eax ebx];
+
+u8 xor_byte_asm(u32 *flags,u8 d, u8 s);
+#pragma aux xor_byte_asm = \
+ "push [edi]" \
+ "popf" \
+ "xor al,bl" \
+ "pushf" \
+ "pop [edi]" \
+ parm [edi] [al] [bl] \
+ value [al] \
+ modify exact [al bl];
+
+u16 xor_word_asm(u32 *flags,u16 d, u16 s);
+#pragma aux xor_word_asm = \
+ "push [edi]" \
+ "popf" \
+ "xor ax,bx" \
+ "pushf" \
+ "pop [edi]" \
+ parm [edi] [ax] [bx] \
+ value [ax] \
+ modify exact [ax bx];
+
+u32 xor_long_asm(u32 *flags,u32 d, u32 s);
+#pragma aux xor_long_asm = \
+ "push [edi]" \
+ "popf" \
+ "xor eax,ebx" \
+ "pushf" \
+ "pop [edi]" \
+ parm [edi] [eax] [ebx] \
+ value [eax] \
+ modify exact [eax ebx];
+
+void imul_byte_asm(u32 *flags,u16 *ax,u8 d,u8 s);
+#pragma aux imul_byte_asm = \
+ "push [edi]" \
+ "popf" \
+ "imul bl" \
+ "pushf" \
+ "pop [edi]" \
+ "mov [esi],ax" \
+ parm [edi] [esi] [al] [bl] \
+ modify exact [esi ax bl];
+
+void imul_word_asm(u32 *flags,u16 *ax,u16 *dx,u16 d,u16 s);
+#pragma aux imul_word_asm = \
+ "push [edi]" \
+ "popf" \
+ "imul bx" \
+ "pushf" \
+ "pop [edi]" \
+ "mov [esi],ax" \
+ "mov [ecx],dx" \
+ parm [edi] [esi] [ecx] [ax] [bx]\
+ modify exact [esi edi ax bx dx];
+
+void imul_long_asm(u32 *flags,u32 *eax,u32 *edx,u32 d,u32 s);
+#pragma aux imul_long_asm = \
+ "push [edi]" \
+ "popf" \
+ "imul ebx" \
+ "pushf" \
+ "pop [edi]" \
+ "mov [esi],eax" \
+ "mov [ecx],edx" \
+ parm [edi] [esi] [ecx] [eax] [ebx] \
+ modify exact [esi edi eax ebx edx];
+
+void mul_byte_asm(u32 *flags,u16 *ax,u8 d,u8 s);
+#pragma aux mul_byte_asm = \
+ "push [edi]" \
+ "popf" \
+ "mul bl" \
+ "pushf" \
+ "pop [edi]" \
+ "mov [esi],ax" \
+ parm [edi] [esi] [al] [bl] \
+ modify exact [esi ax bl];
+
+void mul_word_asm(u32 *flags,u16 *ax,u16 *dx,u16 d,u16 s);
+#pragma aux mul_word_asm = \
+ "push [edi]" \
+ "popf" \
+ "mul bx" \
+ "pushf" \
+ "pop [edi]" \
+ "mov [esi],ax" \
+ "mov [ecx],dx" \
+ parm [edi] [esi] [ecx] [ax] [bx]\
+ modify exact [esi edi ax bx dx];
+
+void mul_long_asm(u32 *flags,u32 *eax,u32 *edx,u32 d,u32 s);
+#pragma aux mul_long_asm = \
+ "push [edi]" \
+ "popf" \
+ "mul ebx" \
+ "pushf" \
+ "pop [edi]" \
+ "mov [esi],eax" \
+ "mov [ecx],edx" \
+ parm [edi] [esi] [ecx] [eax] [ebx] \
+ modify exact [esi edi eax ebx edx];
+
+void idiv_byte_asm(u32 *flags,u8 *al,u8 *ah,u16 d,u8 s);
+#pragma aux idiv_byte_asm = \
+ "push [edi]" \
+ "popf" \
+ "idiv bl" \
+ "pushf" \
+ "pop [edi]" \
+ "mov [esi],al" \
+ "mov [ecx],ah" \
+ parm [edi] [esi] [ecx] [ax] [bl]\
+ modify exact [esi edi ax bl];
+
+void idiv_word_asm(u32 *flags,u16 *ax,u16 *dx,u16 dlo,u16 dhi,u16 s);
+#pragma aux idiv_word_asm = \
+ "push [edi]" \
+ "popf" \
+ "idiv bx" \
+ "pushf" \
+ "pop [edi]" \
+ "mov [esi],ax" \
+ "mov [ecx],dx" \
+ parm [edi] [esi] [ecx] [ax] [dx] [bx]\
+ modify exact [esi edi ax dx bx];
+
+void idiv_long_asm(u32 *flags,u32 *eax,u32 *edx,u32 dlo,u32 dhi,u32 s);
+#pragma aux idiv_long_asm = \
+ "push [edi]" \
+ "popf" \
+ "idiv ebx" \
+ "pushf" \
+ "pop [edi]" \
+ "mov [esi],eax" \
+ "mov [ecx],edx" \
+ parm [edi] [esi] [ecx] [eax] [edx] [ebx]\
+ modify exact [esi edi eax edx ebx];
+
+void div_byte_asm(u32 *flags,u8 *al,u8 *ah,u16 d,u8 s);
+#pragma aux div_byte_asm = \
+ "push [edi]" \
+ "popf" \
+ "div bl" \
+ "pushf" \
+ "pop [edi]" \
+ "mov [esi],al" \
+ "mov [ecx],ah" \
+ parm [edi] [esi] [ecx] [ax] [bl]\
+ modify exact [esi edi ax bl];
+
+void div_word_asm(u32 *flags,u16 *ax,u16 *dx,u16 dlo,u16 dhi,u16 s);
+#pragma aux div_word_asm = \
+ "push [edi]" \
+ "popf" \
+ "div bx" \
+ "pushf" \
+ "pop [edi]" \
+ "mov [esi],ax" \
+ "mov [ecx],dx" \
+ parm [edi] [esi] [ecx] [ax] [dx] [bx]\
+ modify exact [esi edi ax dx bx];
+
+void div_long_asm(u32 *flags,u32 *eax,u32 *edx,u32 dlo,u32 dhi,u32 s);
+#pragma aux div_long_asm = \
+ "push [edi]" \
+ "popf" \
+ "div ebx" \
+ "pushf" \
+ "pop [edi]" \
+ "mov [esi],eax" \
+ "mov [ecx],edx" \
+ parm [edi] [esi] [ecx] [eax] [edx] [ebx]\
+ modify exact [esi edi eax edx ebx];
+
+#endif
+
+#endif /* __X86EMU_PRIM_ASM_H */
diff --git a/board/MAI/bios_emulator/scitech/src/x86emu/x86emu/prim_ops.h b/board/MAI/bios_emulator/scitech/src/x86emu/x86emu/prim_ops.h
new file mode 100644
index 00000000000..1633fe1fae5
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/x86emu/x86emu/prim_ops.h
@@ -0,0 +1,231 @@
+/****************************************************************************
+*
+* Realmode X86 Emulator Library
+*
+* Copyright (C) 1996-1999 SciTech Software, Inc.
+* Copyright (C) David Mosberger-Tang
+* Copyright (C) 1999 Egbert Eich
+*
+* ========================================================================
+*
+* Permission to use, copy, modify, distribute, and sell this software and
+* its documentation for any purpose is hereby granted without fee,
+* provided that the above copyright notice appear in all copies and that
+* both that copyright notice and this permission notice appear in
+* supporting documentation, and that the name of the authors not be used
+* in advertising or publicity pertaining to distribution of the software
+* without specific, written prior permission. The authors makes no
+* representations about the suitability of this software for any purpose.
+* It is provided "as is" without express or implied warranty.
+*
+* THE AUTHORS DISCLAIMS ALL WARRANTIES WITH REGARD TO THIS SOFTWARE,
+* INCLUDING ALL IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS, IN NO
+* EVENT SHALL THE AUTHORS BE LIABLE FOR ANY SPECIAL, INDIRECT OR
+* CONSEQUENTIAL DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF
+* USE, DATA OR PROFITS, WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE OR
+* OTHER TORTIOUS ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE OR
+* PERFORMANCE OF THIS SOFTWARE.
+*
+* ========================================================================
+*
+* Language: ANSI C
+* Environment: Any
+* Developer: Kendall Bennett
+*
+* Description: Header file for primitive operation functions.
+*
+****************************************************************************/
+
+#ifndef __X86EMU_PRIM_OPS_H
+#define __X86EMU_PRIM_OPS_H
+
+#include "x86emu/prim_asm.h"
+
+#ifdef __cplusplus
+extern "C" { /* Use "C" linkage when in C++ mode */
+#endif
+
+u16 aaa_word (u16 d);
+u16 aas_word (u16 d);
+u16 aad_word (u16 d);
+u16 aam_word (u8 d);
+u8 adc_byte (u8 d, u8 s);
+u16 adc_word (u16 d, u16 s);
+u32 adc_long (u32 d, u32 s);
+u8 add_byte (u8 d, u8 s);
+u16 add_word (u16 d, u16 s);
+u32 add_long (u32 d, u32 s);
+u8 and_byte (u8 d, u8 s);
+u16 and_word (u16 d, u16 s);
+u32 and_long (u32 d, u32 s);
+u8 cmp_byte (u8 d, u8 s);
+u16 cmp_word (u16 d, u16 s);
+u32 cmp_long (u32 d, u32 s);
+u8 daa_byte (u8 d);
+u8 das_byte (u8 d);
+u8 dec_byte (u8 d);
+u16 dec_word (u16 d);
+u32 dec_long (u32 d);
+u8 inc_byte (u8 d);
+u16 inc_word (u16 d);
+u32 inc_long (u32 d);
+u8 or_byte (u8 d, u8 s);
+u16 or_word (u16 d, u16 s);
+u32 or_long (u32 d, u32 s);
+u8 neg_byte (u8 s);
+u16 neg_word (u16 s);
+u32 neg_long (u32 s);
+u8 not_byte (u8 s);
+u16 not_word (u16 s);
+u32 not_long (u32 s);
+u8 rcl_byte (u8 d, u8 s);
+u16 rcl_word (u16 d, u8 s);
+u32 rcl_long (u32 d, u8 s);
+u8 rcr_byte (u8 d, u8 s);
+u16 rcr_word (u16 d, u8 s);
+u32 rcr_long (u32 d, u8 s);
+u8 rol_byte (u8 d, u8 s);
+u16 rol_word (u16 d, u8 s);
+u32 rol_long (u32 d, u8 s);
+u8 ror_byte (u8 d, u8 s);
+u16 ror_word (u16 d, u8 s);
+u32 ror_long (u32 d, u8 s);
+u8 shl_byte (u8 d, u8 s);
+u16 shl_word (u16 d, u8 s);
+u32 shl_long (u32 d, u8 s);
+u8 shr_byte (u8 d, u8 s);
+u16 shr_word (u16 d, u8 s);
+u32 shr_long (u32 d, u8 s);
+u8 sar_byte (u8 d, u8 s);
+u16 sar_word (u16 d, u8 s);
+u32 sar_long (u32 d, u8 s);
+u16 shld_word (u16 d, u16 fill, u8 s);
+u32 shld_long (u32 d, u32 fill, u8 s);
+u16 shrd_word (u16 d, u16 fill, u8 s);
+u32 shrd_long (u32 d, u32 fill, u8 s);
+u8 sbb_byte (u8 d, u8 s);
+u16 sbb_word (u16 d, u16 s);
+u32 sbb_long (u32 d, u32 s);
+u8 sub_byte (u8 d, u8 s);
+u16 sub_word (u16 d, u16 s);
+u32 sub_long (u32 d, u32 s);
+void test_byte (u8 d, u8 s);
+void test_word (u16 d, u16 s);
+void test_long (u32 d, u32 s);
+u8 xor_byte (u8 d, u8 s);
+u16 xor_word (u16 d, u16 s);
+u32 xor_long (u32 d, u32 s);
+void imul_byte (u8 s);
+void imul_word (u16 s);
+void imul_long (u32 s);
+void imul_long_direct(u32 *res_lo, u32* res_hi,u32 d, u32 s);
+void mul_byte (u8 s);
+void mul_word (u16 s);
+void mul_long (u32 s);
+void idiv_byte (u8 s);
+void idiv_word (u16 s);
+void idiv_long (u32 s);
+void div_byte (u8 s);
+void div_word (u16 s);
+void div_long (u32 s);
+void ins (int size);
+void outs (int size);
+u16 mem_access_word (int addr);
+void push_word (u16 w);
+void push_long (u32 w);
+u16 pop_word (void);
+u32 pop_long (void);
+
+#if defined(__HAVE_INLINE_ASSEMBLER__) && !defined(PRIM_OPS_NO_REDEFINE_ASM)
+
+#define aaa_word(d) aaa_word_asm(&M.x86.R_EFLG,d)
+#define aas_word(d) aas_word_asm(&M.x86.R_EFLG,d)
+#define aad_word(d) aad_word_asm(&M.x86.R_EFLG,d)
+#define aam_word(d) aam_word_asm(&M.x86.R_EFLG,d)
+#define adc_byte(d,s) adc_byte_asm(&M.x86.R_EFLG,d,s)
+#define adc_word(d,s) adc_word_asm(&M.x86.R_EFLG,d,s)
+#define adc_long(d,s) adc_long_asm(&M.x86.R_EFLG,d,s)
+#define add_byte(d,s) add_byte_asm(&M.x86.R_EFLG,d,s)
+#define add_word(d,s) add_word_asm(&M.x86.R_EFLG,d,s)
+#define add_long(d,s) add_long_asm(&M.x86.R_EFLG,d,s)
+#define and_byte(d,s) and_byte_asm(&M.x86.R_EFLG,d,s)
+#define and_word(d,s) and_word_asm(&M.x86.R_EFLG,d,s)
+#define and_long(d,s) and_long_asm(&M.x86.R_EFLG,d,s)
+#define cmp_byte(d,s) cmp_byte_asm(&M.x86.R_EFLG,d,s)
+#define cmp_word(d,s) cmp_word_asm(&M.x86.R_EFLG,d,s)
+#define cmp_long(d,s) cmp_long_asm(&M.x86.R_EFLG,d,s)
+#define daa_byte(d) daa_byte_asm(&M.x86.R_EFLG,d)
+#define das_byte(d) das_byte_asm(&M.x86.R_EFLG,d)
+#define dec_byte(d) dec_byte_asm(&M.x86.R_EFLG,d)
+#define dec_word(d) dec_word_asm(&M.x86.R_EFLG,d)
+#define dec_long(d) dec_long_asm(&M.x86.R_EFLG,d)
+#define inc_byte(d) inc_byte_asm(&M.x86.R_EFLG,d)
+#define inc_word(d) inc_word_asm(&M.x86.R_EFLG,d)
+#define inc_long(d) inc_long_asm(&M.x86.R_EFLG,d)
+#define or_byte(d,s) or_byte_asm(&M.x86.R_EFLG,d,s)
+#define or_word(d,s) or_word_asm(&M.x86.R_EFLG,d,s)
+#define or_long(d,s) or_long_asm(&M.x86.R_EFLG,d,s)
+#define neg_byte(s) neg_byte_asm(&M.x86.R_EFLG,s)
+#define neg_word(s) neg_word_asm(&M.x86.R_EFLG,s)
+#define neg_long(s) neg_long_asm(&M.x86.R_EFLG,s)
+#define not_byte(s) not_byte_asm(&M.x86.R_EFLG,s)
+#define not_word(s) not_word_asm(&M.x86.R_EFLG,s)
+#define not_long(s) not_long_asm(&M.x86.R_EFLG,s)
+#define rcl_byte(d,s) rcl_byte_asm(&M.x86.R_EFLG,d,s)
+#define rcl_word(d,s) rcl_word_asm(&M.x86.R_EFLG,d,s)
+#define rcl_long(d,s) rcl_long_asm(&M.x86.R_EFLG,d,s)
+#define rcr_byte(d,s) rcr_byte_asm(&M.x86.R_EFLG,d,s)
+#define rcr_word(d,s) rcr_word_asm(&M.x86.R_EFLG,d,s)
+#define rcr_long(d,s) rcr_long_asm(&M.x86.R_EFLG,d,s)
+#define rol_byte(d,s) rol_byte_asm(&M.x86.R_EFLG,d,s)
+#define rol_word(d,s) rol_word_asm(&M.x86.R_EFLG,d,s)
+#define rol_long(d,s) rol_long_asm(&M.x86.R_EFLG,d,s)
+#define ror_byte(d,s) ror_byte_asm(&M.x86.R_EFLG,d,s)
+#define ror_word(d,s) ror_word_asm(&M.x86.R_EFLG,d,s)
+#define ror_long(d,s) ror_long_asm(&M.x86.R_EFLG,d,s)
+#define shl_byte(d,s) shl_byte_asm(&M.x86.R_EFLG,d,s)
+#define shl_word(d,s) shl_word_asm(&M.x86.R_EFLG,d,s)
+#define shl_long(d,s) shl_long_asm(&M.x86.R_EFLG,d,s)
+#define shr_byte(d,s) shr_byte_asm(&M.x86.R_EFLG,d,s)
+#define shr_word(d,s) shr_word_asm(&M.x86.R_EFLG,d,s)
+#define shr_long(d,s) shr_long_asm(&M.x86.R_EFLG,d,s)
+#define sar_byte(d,s) sar_byte_asm(&M.x86.R_EFLG,d,s)
+#define sar_word(d,s) sar_word_asm(&M.x86.R_EFLG,d,s)
+#define sar_long(d,s) sar_long_asm(&M.x86.R_EFLG,d,s)
+#define shld_word(d,fill,s) shld_word_asm(&M.x86.R_EFLG,d,fill,s)
+#define shld_long(d,fill,s) shld_long_asm(&M.x86.R_EFLG,d,fill,s)
+#define shrd_word(d,fill,s) shrd_word_asm(&M.x86.R_EFLG,d,fill,s)
+#define shrd_long(d,fill,s) shrd_long_asm(&M.x86.R_EFLG,d,fill,s)
+#define sbb_byte(d,s) sbb_byte_asm(&M.x86.R_EFLG,d,s)
+#define sbb_word(d,s) sbb_word_asm(&M.x86.R_EFLG,d,s)
+#define sbb_long(d,s) sbb_long_asm(&M.x86.R_EFLG,d,s)
+#define sub_byte(d,s) sub_byte_asm(&M.x86.R_EFLG,d,s)
+#define sub_word(d,s) sub_word_asm(&M.x86.R_EFLG,d,s)
+#define sub_long(d,s) sub_long_asm(&M.x86.R_EFLG,d,s)
+#define test_byte(d,s) test_byte_asm(&M.x86.R_EFLG,d,s)
+#define test_word(d,s) test_word_asm(&M.x86.R_EFLG,d,s)
+#define test_long(d,s) test_long_asm(&M.x86.R_EFLG,d,s)
+#define xor_byte(d,s) xor_byte_asm(&M.x86.R_EFLG,d,s)
+#define xor_word(d,s) xor_word_asm(&M.x86.R_EFLG,d,s)
+#define xor_long(d,s) xor_long_asm(&M.x86.R_EFLG,d,s)
+#define imul_byte(s) imul_byte_asm(&M.x86.R_EFLG,&M.x86.R_AX,M.x86.R_AL,s)
+#define imul_word(s) imul_word_asm(&M.x86.R_EFLG,&M.x86.R_AX,&M.x86.R_DX,M.x86.R_AX,s)
+#define imul_long(s) imul_long_asm(&M.x86.R_EFLG,&M.x86.R_EAX,&M.x86.R_EDX,M.x86.R_EAX,s)
+#define imul_long_direct(res_lo,res_hi,d,s) imul_long_asm(&M.x86.R_EFLG,res_lo,res_hi,d,s)
+#define mul_byte(s) mul_byte_asm(&M.x86.R_EFLG,&M.x86.R_AX,M.x86.R_AL,s)
+#define mul_word(s) mul_word_asm(&M.x86.R_EFLG,&M.x86.R_AX,&M.x86.R_DX,M.x86.R_AX,s)
+#define mul_long(s) mul_long_asm(&M.x86.R_EFLG,&M.x86.R_EAX,&M.x86.R_EDX,M.x86.R_EAX,s)
+#define idiv_byte(s) idiv_byte_asm(&M.x86.R_EFLG,&M.x86.R_AL,&M.x86.R_AH,M.x86.R_AX,s)
+#define idiv_word(s) idiv_word_asm(&M.x86.R_EFLG,&M.x86.R_AX,&M.x86.R_DX,M.x86.R_AX,M.x86.R_DX,s)
+#define idiv_long(s) idiv_long_asm(&M.x86.R_EFLG,&M.x86.R_EAX,&M.x86.R_EDX,M.x86.R_EAX,M.x86.R_EDX,s)
+#define div_byte(s) div_byte_asm(&M.x86.R_EFLG,&M.x86.R_AL,&M.x86.R_AH,M.x86.R_AX,s)
+#define div_word(s) div_word_asm(&M.x86.R_EFLG,&M.x86.R_AX,&M.x86.R_DX,M.x86.R_AX,M.x86.R_DX,s)
+#define div_long(s) div_long_asm(&M.x86.R_EFLG,&M.x86.R_EAX,&M.x86.R_EDX,M.x86.R_EAX,M.x86.R_EDX,s)
+
+#endif
+
+#ifdef __cplusplus
+} /* End of "C" linkage for C++ */
+#endif
+
+#endif /* __X86EMU_PRIM_OPS_H */
diff --git a/board/MAI/bios_emulator/scitech/src/x86emu/x86emu/x86emui.h b/board/MAI/bios_emulator/scitech/src/x86emu/x86emu/x86emui.h
new file mode 100644
index 00000000000..bff49039e01
--- /dev/null
+++ b/board/MAI/bios_emulator/scitech/src/x86emu/x86emu/x86emui.h
@@ -0,0 +1,98 @@
+/****************************************************************************
+*
+* Realmode X86 Emulator Library
+*
+* Copyright (C) 1996-1999 SciTech Software, Inc.
+* Copyright (C) David Mosberger-Tang
+* Copyright (C) 1999 Egbert Eich
+*
+* ========================================================================
+*
+* Permission to use, copy, modify, distribute, and sell this software and
+* its documentation for any purpose is hereby granted without fee,
+* provided that the above copyright notice appear in all copies and that
+* both that copyright notice and this permission notice appear in
+* supporting documentation, and that the name of the authors not be used
+* in advertising or publicity pertaining to distribution of the software
+* without specific, written prior permission. The authors makes no
+* representations about the suitability of this software for any purpose.
+* It is provided "as is" without express or implied warranty.
+*
+* THE AUTHORS DISCLAIMS ALL WARRANTIES WITH REGARD TO THIS SOFTWARE,
+* INCLUDING ALL IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS, IN NO
+* EVENT SHALL THE AUTHORS BE LIABLE FOR ANY SPECIAL, INDIRECT OR
+* CONSEQUENTIAL DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF
+* USE, DATA OR PROFITS, WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE OR
+* OTHER TORTIOUS ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE OR
+* PERFORMANCE OF THIS SOFTWARE.
+*
+* ========================================================================
+*
+* Language: ANSI C
+* Environment: Any
+* Developer: Kendall Bennett
+*
+* Description: Header file for system specific functions. These functions
+* are always compiled and linked in the OS depedent libraries,
+* and never in a binary portable driver.
+*
+****************************************************************************/
+
+#ifndef __X86EMU_X86EMUI_H
+#define __X86EMU_X86EMUI_H
+
+/* If we are compiling in C++ mode, we can compile some functions as
+ * inline to increase performance (however the code size increases quite
+ * dramatically in this case).
+ */
+
+#if defined(__cplusplus) && !defined(_NO_INLINE)
+#define _INLINE inline
+#else
+#define _INLINE static
+#endif
+
+/* Get rid of unused parameters in C++ compilation mode */
+
+#ifdef __cplusplus
+#define X86EMU_UNUSED(v)
+#else
+#define X86EMU_UNUSED(v) v
+#endif
+
+#include "x86emu.h"
+#include "x86emu/regs.h"
+#include "x86emu/debug.h"
+#include "x86emu/decode.h"
+#include "x86emu/ops.h"
+#include "x86emu/prim_ops.h"
+#include "x86emu/fpu.h"
+#include "x86emu/fpu_regs.h"
+#include <stdio.h>
+#include <string.h>
+
+/*--------------------------- Inline Functions ----------------------------*/
+
+#ifdef __cplusplus
+extern "C" { /* Use "C" linkage when in C++ mode */
+#endif
+
+extern u8 (X86APIP sys_rdb)(u32 addr);
+extern u16 (X86APIP sys_rdw)(u32 addr);
+extern u32 (X86APIP sys_rdl)(u32 addr);
+extern void (X86APIP sys_wrb)(u32 addr,u8 val);
+extern void (X86APIP sys_wrw)(u32 addr,u16 val);
+extern void (X86APIP sys_wrl)(u32 addr,u32 val);
+
+extern u8 (X86APIP sys_inb)(X86EMU_pioAddr addr);
+extern u16 (X86APIP sys_inw)(X86EMU_pioAddr addr);
+extern u32 (X86APIP sys_inl)(X86EMU_pioAddr addr);
+extern void (X86APIP sys_outb)(X86EMU_pioAddr addr,u8 val);
+extern void (X86APIP sys_outw)(X86EMU_pioAddr addr,u16 val);
+extern void (X86APIP sys_outl)(X86EMU_pioAddr addr,u32 val);
+
+#ifdef __cplusplus
+} /* End of "C" linkage for C++ */
+#endif
+
+#endif /* __X86EMU_X86EMUI_H */
diff --git a/board/MAI/bios_emulator/x86interface.c b/board/MAI/bios_emulator/x86interface.c
new file mode 100644
index 00000000000..b1ad61a6a04
--- /dev/null
+++ b/board/MAI/bios_emulator/x86interface.c
@@ -0,0 +1,815 @@
+#include "x86emu.h"
+#include "glue.h"
+
+
+/*
+ * This isn't nice, but there are a lot of incompatibilities in the U-Boot and scitech include
+ * files that this is the only really workable solution.
+ * Might be cleaned out later.
+ */
+
+#ifdef DEBUG
+#undef DEBUG
+#endif
+
+#undef IO_LOGGING
+#undef MEM_LOGGING
+
+#ifdef IO_LOGGING
+#define LOGIO(port, format, args...) if (dolog(port)) _printf(format , ## args)
+#else
+#define LOGIO(port, format, args...)
+#endif
+
+#ifdef MEM_LOGGIN
+#define LOGMEM(format, args...) _printf(format , ## args)
+#else
+#define LOGMEM(format, args...)
+#endif
+
+#ifdef DEBUG
+#define PRINTF(format, args...) _printf(format , ## args)
+#else
+#define PRINTF(format, argc...)
+#endif
+
+typedef unsigned char UBYTE;
+typedef unsigned short UWORD;
+typedef unsigned long ULONG;
+
+typedef char BYTE;
+typedef short WORT;
+typedef long LONG;
+
+#define EMULATOR_MEM_SIZE (1024*1024)
+#define EMULATOR_BIOS_OFFSET 0xC0000
+#define EMULATOR_STRAP_OFFSET 0x30000
+#define EMULATOR_STACK_OFFSET 0x20000
+#define EMULATOR_LOGO_OFFSET 0x40000 // If you change this, change the strap code, too
+#define VIDEO_BASE (void *)0xFD0B8000
+
+extern char *getenv(char *);
+extern int tstc(void);
+extern int getc(void);
+extern unsigned char video_get_attr(void);
+
+int atoi(char *string)
+{
+ int res = 0;
+ while (*string>='0' && *string <='9')
+ {
+ res *= 10;
+ res += *string-'0';
+ string++;
+ }
+
+ return res;
+}
+
+void cons_gets(char *buffer)
+{
+ int i = 0;
+ char c = 0;
+
+ buffer[0] = 0;
+ if (getenv("x86_runthru")) return; //FIXME:
+ while (c != 0x0D && c != 0x0A)
+ {
+ while (!tstc());
+ c = getc();
+ if (c>=32 && c < 127)
+ {
+ buffer[i] = c;
+ i++;
+ buffer[i] = 0;
+ putc(c);
+ }
+ else
+ {
+ if (c == 0x08)
+ {
+ if (i>0) i--;
+ buffer[i] = 0;
+ }
+ }
+ }
+ buffer[i] = '\n';
+ buffer[i+1] = 0;
+}
+
+char *bios_date = "08/14/02";
+UBYTE model = 0xFC;
+UBYTE submodel = 0x00;
+
+static inline UBYTE read_byte(volatile UBYTE* from)
+{
+ int x;
+ asm volatile ("lbz %0,%1\n eieio" : "=r" (x) : "m" (*from));
+ return (UBYTE)x;
+}
+
+static inline void write_byte(volatile UBYTE *to, int x)
+{
+ asm volatile ("stb %1,%0\n eieio" : "=m" (*to) : "r" (x));
+}
+
+static inline UWORD read_word_little(volatile UWORD *from)
+{
+ int x;
+ asm volatile ("lhbrx %0,0,%1\n eieio" : "=r" (x) : "r" (from), "m" (*from));
+ return (UWORD)x;
+}
+
+static inline UWORD read_word_big(volatile UWORD *from)
+{
+ int x;
+ asm volatile ("lhz %0,%1\n eieio" : "=r" (x) : "m" (*from));
+ return (UWORD)x;
+}
+
+static inline void write_word_little(volatile UWORD *to, int x)
+{
+ asm volatile ("sthbrx %1,0,%2\n eieio" : "=m" (*to) : "r" (x), "r" (to));
+}
+
+static inline void write_word_big(volatile UWORD *to, int x)
+{
+ asm volatile ("sth %1,%0\n eieio" : "=m" (*to) : "r" (x));
+}
+
+static inline ULONG read_long_little(volatile ULONG *from)
+{
+ unsigned long x;
+ asm volatile ("lwbrx %0,0,%1\n eieio" : "=r" (x) : "r" (from), "m"(*from));
+ return (ULONG)x;
+}
+
+static inline ULONG read_long_big(volatile ULONG *from)
+{
+ unsigned long x;
+ asm volatile ("lwz %0,%1\n eieio" : "=r" (x) : "m" (*from));
+ return (ULONG)x;
+}
+
+static inline void write_long_little(volatile ULONG *to, ULONG x)
+{
+ asm volatile ("stwbrx %1,0,%2\n eieio" : "=m" (*to) : "r" (x), "r" (to));
+}
+
+static inline void write_long_big(volatile ULONG *to, ULONG x)
+{
+ asm volatile ("stw %1,%0\n eieio" : "=m" (*to) : "r" (x));
+}
+
+static int log_init = 0;
+static int log_do = 0;
+static int log_low = 0;
+
+int dolog(int port)
+{
+ if (log_init && log_do)
+ {
+ if (log_low && port > 0x400) return 0;
+ return 1;
+ }
+
+ if (!log_init)
+ {
+ log_init = 1;
+ log_do = (getenv("x86_logio") != (char *)0);
+ log_low = (getenv("x86_loglow") != (char *)0);
+ if (log_do)
+ {
+ if (log_low && port > 0x400) return 0;
+ return 1;
+ }
+ }
+ return 0;
+}
+
+// Converts an emulator address to a physical address.
+// Handles all special cases (bios date, model etc), and might need work
+u32 memaddr(u32 addr)
+{
+// if (addr >= 0xF0000 && addr < 0xFFFFF) printf("WARNING: Segment F access (0x%x)\n", addr);
+// printf("MemAddr=%p\n", addr);
+ if (addr >= 0xA0000 && addr < 0xC0000)
+ return 0xFD000000 + addr;
+ else if (addr >= 0xFFFF5 && addr < 0xFFFFE)
+ {
+ return (u32)bios_date+addr-0xFFFF5;
+ }
+ else if (addr == 0xFFFFE)
+ return (u32)&model;
+ else if (addr == 0xFFFFF)
+ return (u32)&submodel;
+ else if (addr >= 0x80000000)
+ {
+ //printf("Warning: High memory access at 0x%x\n", addr);
+ return addr;
+ }
+ else
+ return (u32)M.mem_base+addr;
+}
+
+u8 A1_rdb(u32 addr)
+{
+ u8 a = read_byte((UBYTE *)memaddr(addr));
+ LOGMEM("rdb: %x -> %x\n", addr, a);
+ return a;
+}
+
+u16 A1_rdw(u32 addr)
+{
+ u16 a = read_word_little((UWORD *)memaddr(addr));
+ LOGMEM("rdw: %x -> %x\n", addr, a);
+ return a;
+}
+
+u32 A1_rdl(u32 addr)
+{
+ u32 a = read_long_little((ULONG *)memaddr(addr));
+ LOGMEM("rdl: %x -> %x\n", addr, a);
+ return a;
+}
+
+void A1_wrb(u32 addr, u8 val)
+{
+ LOGMEM("wrb: %x <- %x\n", addr, val);
+ write_byte((UBYTE *)memaddr(addr), val);
+}
+
+void A1_wrw(u32 addr, u16 val)
+{
+ LOGMEM("wrw: %x <- %x\n", addr, val);
+ write_word_little((UWORD *)memaddr(addr), val);
+}
+
+void A1_wrl(u32 addr, u32 val)
+{
+ LOGMEM("wrl: %x <- %x\n", addr, val);
+ write_long_little((ULONG *)memaddr(addr), val);
+}
+
+X86EMU_memFuncs _A1_mem =
+{
+ A1_rdb,
+ A1_rdw,
+ A1_rdl,
+ A1_wrb,
+ A1_wrw,
+ A1_wrl,
+};
+
+#define ARTICIAS_PCI_CFGADDR 0xfec00cf8
+#define ARTICIAS_PCI_CFGDATA 0xfee00cfc
+#define IOBASE 0xFE000000
+
+#define in_byte(from) read_byte( (UBYTE *)port_to_mem(from))
+#define in_word(from) read_word_little((UWORD *)port_to_mem(from))
+#define in_long(from) read_long_little((ULONG *)port_to_mem(from))
+#define out_byte(to, val) write_byte((UBYTE *)port_to_mem(to), val)
+#define out_word(to, val) write_word_little((UWORD *)port_to_mem(to), val)
+#define out_long(to, val) write_long_little((ULONG *)port_to_mem(to), val)
+
+u32 port_to_mem(int port)
+{
+ if (port >= 0xCFC && port <= 0xCFF) return 0xFEE00000+port;
+ else if (port >= 0xCF8 && port <= 0xCFB) return 0xFEC00000+port;
+ else return IOBASE + port;
+}
+
+u8 A1_inb(int port)
+{
+ u8 a;
+ //if (port == 0x3BA) return 0;
+ a = in_byte(port);
+ LOGIO(port, "inb: %Xh -> %d (%Xh)\n", port, a, a);
+ return a;
+}
+
+u16 A1_inw(int port)
+{
+ u16 a = in_word(port);
+ LOGIO(port, "inw: %Xh -> %d (%Xh)\n", port, a, a);
+ return a;
+}
+
+u32 A1_inl(int port)
+{
+ u32 a = in_long(port);
+ LOGIO(port, "inl: %Xh -> %d (%Xh)\n", port, a, a);
+ return a;
+}
+
+void A1_outb(int port, u8 val)
+{
+ LOGIO(port, "outb: %Xh <- %d (%Xh)\n", port, val, val);
+/* if (port == 0xCF8) port = 0xCFB;
+ else if (port == 0xCF9) port = 0xCFA;
+ else if (port == 0xCFA) port = 0xCF9;
+ else if (port == 0xCFB) port = 0xCF8;*/
+ out_byte(port, val);
+}
+
+void A1_outw(int port, u16 val)
+{
+ LOGIO(port, "outw: %Xh <- %d (%Xh)\n", port, val, val);
+ out_word(port, val);
+}
+
+void A1_outl(int port, u32 val)
+{
+ LOGIO(port, "outl: %Xh <- %d (%Xh)\n", port, val, val);
+ out_long(port, val);
+}
+
+X86EMU_pioFuncs _A1_pio =
+{
+ A1_inb,
+ A1_inw,
+ A1_inl,
+ A1_outb,
+ A1_outw,
+ A1_outl,
+};
+
+static int reloced_ops = 0;
+
+void reloc_ops(void *reloc_addr)
+{
+ extern void (*x86emu_optab[256])(u8);
+ extern void (*x86emu_optab2[256])(u8);
+ extern void tables_relocate(unsigned int offset);
+ int i;
+ unsigned long delta;
+ if (reloced_ops == 1) return;
+ reloced_ops = 1;
+
+ delta = TEXT_BASE - (unsigned long)reloc_addr;
+
+ for (i=0; i<256; i++)
+ {
+ x86emu_optab[i] -= delta;
+ x86emu_optab2[i] -= delta;
+ }
+
+ _A1_mem.rdb = A1_rdb;
+ _A1_mem.rdw = A1_rdw;
+ _A1_mem.rdl = A1_rdl;
+ _A1_mem.wrb = A1_wrb;
+ _A1_mem.wrw = A1_wrw;
+ _A1_mem.wrl = A1_wrl;
+
+ _A1_pio.inb = A1_inb;
+ _A1_pio.inw = A1_inw;
+ _A1_pio.inl = A1_inl;
+ _A1_pio.outb = A1_outb;
+ _A1_pio.outw = A1_outw;
+ _A1_pio.outl = A1_outl;
+
+ tables_relocate(delta);
+
+}
+
+
+#define ANY_KEY(text) \
+ printf(text); \
+ while (!tstc());
+
+
+unsigned char more_strap[] = {
+ 0xb4, 0x0, 0xb0, 0x2, 0xcd, 0x10,
+};
+#define MORE_STRAP_BYTES 6 // Additional bytes of strap code
+
+
+unsigned char *done_msg="VGA Initialized\0";
+
+int execute_bios(pci_dev_t gr_dev, void *reloc_addr)
+{
+ extern void bios_init(void);
+ extern void remove_init_data(void);
+ extern int video_rows(void);
+ extern int video_cols(void);
+ extern int video_size(int, int);
+ u8 *strap;
+ unsigned char *logo;
+ u8 cfg;
+ int i;
+ char c;
+#ifdef DEBUG
+ char *s;
+#endif
+#ifdef EASTEREGG
+ int easteregg_active = 0;
+#endif
+ char *pal_reset;
+ u8 *fb;
+ unsigned char *msg;
+ unsigned char current_attr;
+
+ remove_init_data();
+ PRINTF("Removed init data from cache, now in RAM\n");
+
+ reloc_ops(reloc_addr);
+ PRINTF("Attempting to run emulator on %02x:%02x:%02x\n",
+ PCI_BUS(gr_dev), PCI_DEV(gr_dev), PCI_FUNC(gr_dev));
+
+ // Enable compatibility hole for emulator access to frame buffer
+ PRINTF("Enabling compatibility hole\n");
+ enable_compatibility_hole();
+
+ // Allocate memory
+ // FIXME: We shouldn't use this much memory really.
+ memset(&M, 0, sizeof(X86EMU_sysEnv));
+ M.mem_base = malloc(EMULATOR_MEM_SIZE);
+ M.mem_size = EMULATOR_MEM_SIZE;
+
+ if (!M.mem_base)
+ {
+ PRINTF("Unable to allocate one megabyte for emulator\n");
+ return 0;
+ }
+
+ if (attempt_map_rom(gr_dev, M.mem_base + EMULATOR_BIOS_OFFSET) == 0)
+ {
+ PRINTF("Error mapping rom. Emulation terminated\n");
+ return 0;
+ }
+
+#ifdef DEBUG
+ s = getenv("x86_ask_start");
+ if (s)
+ {
+ printf("Press 'q' to skip initialization, 'd' for dry init\n'i' for i/o session");
+ while (!tstc());
+ c = getc();
+ if (c == 'q') return 0;
+ if (c == 'd')
+ {
+ extern void bios_set_mode(int mode);
+ bios_set_mode(0x03);
+ return 0;
+ }
+ if (c == 'i') do_inout();
+ }
+
+
+#endif
+
+#ifdef EASTEREGG
+/* if (tstc())
+ {
+ if (getc() == 'c')
+ {
+ easteregg_active = 1;
+ }
+ }
+*/
+ if (getenv("easteregg"))
+ {
+ easteregg_active = 1;
+ }
+
+ if (easteregg_active)
+ {
+ // Yay!
+ setenv("x86_mode", "1");
+ setenv("vga_fg_color", "11");
+ setenv("vga_bg_color", "1");
+ easteregg_active = 1;
+ }
+#endif
+
+ strap = (u8*)M.mem_base + EMULATOR_STRAP_OFFSET;
+
+ {
+ char *m = getenv("x86_mode");
+ if (m)
+ {
+ more_strap[3] = atoi(m);
+ if (more_strap[3] == 1) video_size(40, 25);
+ else video_size(80, 25);
+ }
+ }
+
+ /*
+ * Poke the strap routine. This might need a bit of extending
+ * if there is a mode switch involved, i.e. we want to int10
+ * afterwards to set a different graphics mode, or alternatively
+ * there might be a different start address requirement if the
+ * ROM doesn't have an x86 image in its first image.
+ */
+
+ PRINTF("Poking strap...\n");
+
+ // FAR CALL c000:0003
+ *strap++ = 0x9A; *strap++ = 0x03; *strap++ = 0x00;
+ *strap++ = 0x00; *strap++ = 0xC0;
+
+#if 1
+ // insert additional strap code
+ for (i=0; i < MORE_STRAP_BYTES; i++)
+ {
+ *strap++ = more_strap[i];
+ }
+#endif
+ // HALT
+ *strap++ = 0xF4;
+
+ PRINTF("Setting up logo data\n");
+ logo = (unsigned char *)M.mem_base + EMULATOR_LOGO_OFFSET;
+ for (i=0; i<16; i++)
+ {
+ *logo++ = 0xFF;
+ }
+
+ /*
+ * Setup the init parameters.
+ * Per PCI specs, AH must contain the bus and AL
+ * must contain the devfn, encoded as (dev<<3)|fn
+ */
+
+ // Execution starts here
+ M.x86.R_CS = SEG(EMULATOR_STRAP_OFFSET);
+ M.x86.R_IP = OFF(EMULATOR_STRAP_OFFSET);
+
+ // Stack at top of ram
+ M.x86.R_SS = SEG(EMULATOR_STACK_OFFSET);
+ M.x86.R_SP = OFF(EMULATOR_STACK_OFFSET);
+
+ // Input parameters
+ M.x86.R_AH = PCI_BUS(gr_dev);
+ M.x86.R_AL = (PCI_DEV(gr_dev)<<3) | PCI_FUNC(gr_dev);
+
+ // Set the I/O and memory access functions
+ X86EMU_setupMemFuncs(&_A1_mem);
+ X86EMU_setupPioFuncs(&_A1_pio);
+
+ // Enable timer 2
+ cfg = in_byte(0x61); // Get Misc control
+ cfg |= 0x01; // Enable timer 2
+ out_byte(0x61, cfg); // output again
+
+ // Set up the timers
+ out_byte(0x43, 0x54);
+ out_byte(0x41, 0x18);
+
+ out_byte(0x43, 0x36);
+ out_byte(0x40, 0x00);
+ out_byte(0x40, 0x00);
+
+ out_byte(0x43, 0xb6);
+ out_byte(0x42, 0x31);
+ out_byte(0x42, 0x13);
+
+ // Init the "BIOS".
+ bios_init();
+
+ // Video Card Reset
+ out_byte(0x3D8, 0);
+ out_byte(0x3B8, 1);
+ (void)in_byte(0x3BA);
+ (void)in_byte(0x3DA);
+ out_byte(0x3C0, 0);
+ out_byte(0x61, 0xFC);
+
+#ifdef DEBUG
+ s = _getenv("x86_singlestep");
+ if (s && strcmp(s, "on")==0)
+ {
+ PRINTF("Enabling single stepping for debug\n");
+ X86EMU_trace_on();
+ }
+#endif
+
+ // Ready set go...
+ PRINTF("Running emulator\n");
+ X86EMU_exec();
+ PRINTF("Done running emulator\n");
+
+/* FIXME: Remove me */
+ pal_reset = getenv("x86_palette_reset");
+ if (pal_reset && strcmp(pal_reset, "on") == 0)
+ {
+ PRINTF("Palette reset\n");
+ //(void)in_byte(0x3da);
+ //out_byte(0x3c0, 0);
+
+ out_byte(0x3C8, 0);
+ out_byte(0x3C9, 0);
+ out_byte(0x3C9, 0);
+ out_byte(0x3C9, 0);
+ for (i=0; i<254; i++)
+ {
+ out_byte(0x3C9, 63);
+ out_byte(0x3C9, 63);
+ out_byte(0x3C9, 63);
+ }
+
+ out_byte(0x3c0, 0x20);
+ }
+/* FIXME: remove me */
+#ifdef EASTEREGG
+ if (easteregg_active)
+ {
+ extern void video_easteregg(void);
+ video_easteregg();
+ }
+#endif
+/*
+ current_attr = video_get_attr();
+ fb = (u8 *)VIDEO_BASE;
+ for (i=0; i<video_rows()*video_cols()*2; i+=2)
+ {
+ *(fb+i) = ' ';
+ *(fb+i+1) = current_attr;
+ }
+
+ fb = (u8 *)VIDEO_BASE + (video_rows())-1*(video_cols()*2);
+ for (i=0; i<video_cols(); i++)
+ {
+ *(fb + 2*i) = 32;
+ *(fb + 2*i + 1) = 0x17;
+ }
+
+ msg = done_msg;
+ while (*msg)
+ {
+ *fb = *msg;
+ fb += 2;
+ msg ++;
+ }
+*/
+#ifdef DEBUG
+ if (getenv("x86_do_inout")) do_inout();
+#endif
+
+ dcache_disable();
+ return 1;
+}
+
+// Clean up the x86 mess
+void shutdown_bios(void)
+{
+// disable_compatibility_hole();
+ // Free the memory associated
+ free(M.mem_base);
+
+}
+
+int to_int(char *buffer)
+{
+ int base = 0;
+ int res = 0;
+
+ if (*buffer == '$')
+ {
+ base = 16;
+ buffer++;
+ }
+ else base = 10;
+
+ for (;;)
+ {
+ switch(*buffer)
+ {
+ case '0' ... '9':
+ res *= base;
+ res += *buffer - '0';
+ break;
+ case 'A':
+ case 'a':
+ res *= base;
+ res += 10;
+ break;
+ case 'B':
+ case 'b':
+ res *= base;
+ res += 11;
+ break;
+ case 'C':
+ case 'c':
+ res *= base;
+ res += 12;
+ break;
+ case 'D':
+ case 'd':
+ res *= base;
+ res += 13;
+ break;
+ case 'E':
+ case 'e':
+ res *= base;
+ res += 14;
+ break;
+ case 'F':
+ case 'f':
+ res *= base;
+ res += 15;
+ break;
+ default:
+ return res;
+ }
+ buffer++;
+ }
+ return res;
+}
+
+void one_arg(char *buffer, int *a)
+{
+ while (*buffer && *buffer != '\n')
+ {
+ if (*buffer == ' ') buffer++;
+ else break;
+ }
+
+ *a = to_int(buffer);
+}
+
+void two_args(char *buffer, int *a, int *b)
+{
+ while (*buffer && *buffer != '\n')
+ {
+ if (*buffer == ' ') buffer++;
+ else break;
+ }
+
+ *a = to_int(buffer);
+
+ while (*buffer && *buffer != '\n')
+ {
+ if (*buffer != ' ') buffer++;
+ else break;
+ }
+
+ while (*buffer && *buffer != '\n')
+ {
+ if (*buffer == ' ') buffer++;
+ else break;
+ }
+
+ *b = to_int(buffer);
+}
+
+void do_inout(void)
+{
+ char buffer[256];
+ char *arg1, *arg2;
+ int a,b;
+
+ printf("In/Out Session\nUse 'i[bwl]' for in, 'o[bwl]' for out and 'q' to quit\n");
+
+ do
+ {
+ cons_gets(buffer);
+ printf("\n");
+
+ *arg1 = buffer;
+ while (*arg1 != ' ' ) arg1++;
+ while (*arg1 == ' ') arg1++;
+
+ if (buffer[0] == 'i')
+ {
+ one_arg(buffer+2, &a);
+ switch (buffer[1])
+ {
+ case 'b':
+ printf("in_byte(%xh) = %xh\n", a, A1_inb(a));
+ break;
+ case 'w':
+ printf("in_word(%xh) = %xh\n", a, A1_inw(a));
+ break;
+ case 'l':
+ printf("in_dword(%xh) = %xh\n", a, A1_inl(a));
+ break;
+ default:
+ printf("Invalid length '%c'\n", buffer[1]);
+ break;
+ }
+ }
+ else if (buffer[0] == 'o')
+ {
+ two_args(buffer+2, &a, &b);
+ switch (buffer[1])
+ {
+ case 'b':
+ printf("out_byte(%d, %d)\n", a, b);
+ A1_outb(a,b);
+ break;
+ case 'w':
+ printf("out_word(%d, %d)\n", a, b);
+ A1_outw(a, b);
+ break;
+ case 'l':
+ printf("out_long(%d, %d)\n", a, b);
+ A1_outl(a, b);
+ break;
+ default:
+ printf("Invalid length '%c'\n", buffer[1]);
+ break;
+ }
+ } else if (buffer[0] == 'q') return;
+ } while (1);
+}
diff --git a/board/MAI/menu/cmd_menu.c b/board/MAI/menu/cmd_menu.c
new file mode 100644
index 00000000000..a24ab492679
--- /dev/null
+++ b/board/MAI/menu/cmd_menu.c
@@ -0,0 +1,9 @@
+#include <common.h>
+#include <command.h>
+#include <cmd_menu.h>
+
+int do_menu( cmd_tbl_t *cmdtp, bd_t *bd, int flag, int argc, char *argv[] )
+{
+// printf("<NOT YET IMPLEMENTED>\n");
+ return 0;
+}
diff --git a/board/MAI/menu/menu.c b/board/MAI/menu/menu.c
new file mode 100644
index 00000000000..31301426472
--- /dev/null
+++ b/board/MAI/menu/menu.c
@@ -0,0 +1,66 @@
+#include "menu.h"
+
+#define SINGLE_BOX 0
+#define DOUBLE_BOX 1
+
+void video_draw_box(int style, int attr, char *title, int separate, int x, int y, int w, int h);
+void video_draw_text(int x, int y, int attr, char *text);
+void video_save_rect(int x, int y, int w, int h, void *save_area, int clearchar, int clearattr);
+void video_restore_rect(int x, int y, int w, int h, void *save_area);
+int video_rows(void);
+int video_cols(void);
+
+#define MAX_MENU_OPTIONS 200
+
+typedef struct
+{
+ int used; /* flag if this entry is used */
+ int entry_x; /* Character column of the menu entry */
+ int entry_y; /* Character line of the entry */
+ int option_x; /* Character colum of the option (entry is same) */
+} option_data_t;
+
+option_data_t odata[MAX_MENU_OPTIONS];
+
+int normal_attr = 0x0F;
+int select_attr = 0x2F;
+int disabled_attr = 0x07;
+
+menu_t *root_menu;
+
+int menu_init (menu_t *root)
+{
+ char *s;
+ int i;
+
+ s = getenv("menu_normal");
+ if (s) normal_attr = atoi(s);
+
+ s = getenv("menu_select");
+ if (s) select_attr = atoi(s);
+
+ s = getenv("menu_disabled");
+ if (s) disabled_attr = atoi(s);
+
+ for (i=0; i<MAX_MENU_OPTIONS; i++) odata[i].used = 0;
+
+ root_menu = root;
+}
+
+option_data_t *menu_alloc_odata(void)
+{
+ int i;
+ for (int i=0; i<MAX_MENU_OPTIONS; i++)
+ {
+ if (odata[i].used == 0) return &odata[i];
+ }
+ return NULL;
+}
+
+void menu_free_odata(option_data_t *odata)
+{
+ odata->used = 0;
+}
+
+void menu_layout (menu_t *menu)
+{
diff --git a/board/MAI/menu/menu.h b/board/MAI/menu/menu.h
new file mode 100644
index 00000000000..e5886b83b3e
--- /dev/null
+++ b/board/MAI/menu/menu.h
@@ -0,0 +1,174 @@
+#ifndef MENU_H
+#define MENU_H
+
+/* A single menu */
+typedef void (*menu_finish_callback)(struct menu_s *menu);
+
+typedef struct menu_s
+{
+ char *name; /* Menu name */
+ int num_options; /* Number of options in this menu */
+ int flags; /* Various flags - see below */
+ int option_align; /* Aligns options to a field width of this much characters if != 0 */
+
+ struct menu_option_s **options; /* Pointer to this menu's options */
+ menu_finish_callback callback; /* Called when the menu closes */
+} menu_t;
+
+/*
+ * type: Type of the option (see below)
+ * name: Name to display for this option
+ * help: Optional help string
+ * id : optional id number
+ * sys : pointer for system-specific data, init to NULL and don't touch
+ */
+
+#define OPTION_PREAMBLE \
+ int type; \
+ char *name; \
+ char *help; \
+ int id; \
+ void *sys; \
+
+
+/*
+ * Menu option types.
+ * There are a number of different layouts for menu options depending
+ * on their types. Currently there are the following possibilities:
+ *
+ * Submenu:
+ * This entry links to a new menu.
+ *
+ * Boolean:
+ * A simple on/off toggle entry. Booleans can be either yes/no, 0/1 or on/off.
+ * Optionally, this entry can enable/disable a set of other options. An example would
+ * be to enable/disable on-board USB, and if enabled give access to further options like
+ * irq settings, base address etc.
+ *
+ * Text:
+ * A single line/limited number of characters text entry box. Text can be restricted
+ * to a certain charset (digits/hex digits/all/custom). Result is also available as an
+ * int if numeric.
+ *
+ * Selection:
+ * One-of-many type of selection entry. User may choose on of a set of strings, which
+ * maps to a specific value for the variable.
+ *
+ * Routine:
+ * Selecting this calls an entry-specific routine. This can be used for saving contents etc.
+ *
+ * Custom:
+ * Display and behaviour of this entry is defined by a set of callbacks.
+ */
+
+#define MENU_SUBMENU_TYPE 0
+typedef struct menu_submenu_s
+{
+ OPTION_PREAMBLE
+
+ menu_t * submenu; /* Pointer to the submenu */
+} menu_submenu_t;
+
+#define MENU_BOOLEAN_TYPE 1
+typedef struct menu_boolean_s
+{
+ OPTION_PREAMBLE
+
+ char *variable; /* Name of the variable to getenv()/setenv() */
+ int subtype; /* Subtype (on/off, 0/1, yes/no, enable/disable), see below */
+ int mutex; /* Bit mask of options to enable/disable. Bit 0 is the option
+ immediately following this one, bit 1 is the next one etc.
+ bit 7 = 0 means to disable when this option is off,
+ bit 7 = 1 means to disable when this option is on.
+ An option is disabled when the type field's upper bit is set */
+} menu_boolean_t;
+
+/* BOOLEAN Menu flags */
+#define MENU_BOOLEAN_ONOFF 0x01
+#define MENU_BOOLEAN_01 0x02
+#define MENU_BOOLEAN_YESNO 0x03
+#define MENU_BOOLEAN_ENDIS 0x04
+#define MENU_BOOLEAN_TYPE_MASK 0x07
+
+
+#define MENU_TEXT_TYPE 2
+typedef struct menu_text_s
+{
+ OPTION_PREAMBLE
+
+ char *variable; /* Name of the variable to getenv()/setenv() */
+ int maxchars; /* Max number of characters */
+ char *charset; /* Optional charset to use */
+ int flags; /* Flags - see below */
+} menu_text_t;
+
+/* TEXT entry menu flags */
+#define MENU_TEXT_NUMERIC 0x01
+#define MENU_TEXT_HEXADECIMAL 0x02
+#define MENU_TEXT_FREE 0x03
+#define MENU_TEXT_TYPE_MASK 0x07
+
+
+#define MENU_SELECTION_TYPE 3
+typedef struct menu_select_option_s
+{
+ char *map_from; /* Map this variable contents ... */
+ char *map_to; /* ... to this menu text and vice versa */
+} menu_select_option_t;
+
+typedef struct menu_select_s
+{
+ OPTION_PREAMBLE
+
+ int num_options; /* Number of mappings */
+ menu_select_option_t **options;
+ /* Option list array */
+} menu_select_t;
+
+
+#define MENU_ROUTINE_TYPE 4
+typedef void (*menu_routine_callback)(struct menu_routine_s *);
+
+typedef struct menu_routine_s
+{
+ OPTION_PREAMBLE
+ menu_routine_callback callback;
+ /* routine to be called */
+ void *user_data; /* User data, don't care for system */
+} menu_routine_t;
+
+
+#define MENU_CUSTOM_TYPE 5
+typedef void (*menu_custom_draw)(struct menu_custom_s *);
+typedef void (*menu_custom_key)(struct menu_custom_s *, int);
+
+typedef struct menu_custom_s
+{
+ OPTION_PREAMBLE
+ menu_custom_draw drawfunc;
+ menu_custom_key keyfunc;
+ void *user_data;
+} menu_custom_t;
+
+/*
+ * The menu option superstructure
+ */
+typedef struct menu_option_s
+{
+ union
+ {
+ menu_submenu_t m_sub_menu;
+ menu_boolean_t m_boolean;
+ menu_text_t m_text;
+ menu_select_t m_select;
+ menu_routine_t m_routine;
+ };
+} menu_option_t;
+
+/* Init the menu system. Returns <0 on error */
+int menu_init(menu_t *root);
+
+/* Execute a single menu. Returns <0 on error */
+int menu_do(menu_t *menu);
+
+#endif
diff --git a/common/cmd_bootm.c b/common/cmd_bootm.c
index a0587d019f8..4c0d1f5bde5 100644
--- a/common/cmd_bootm.c
+++ b/common/cmd_bootm.c
@@ -224,6 +224,17 @@ int do_bootm (cmd_tbl_t *cmdtp, int flag, int argc, char *argv[])
iflag = disable_interrupts();
+#ifdef CONFIG_AMIGAONEG3SE
+ /*
+ * We've possible left the caches enabled during
+ * bios emulation, so turn them off again
+ */
+ icache_disable();
+ invalidate_l1_instruction_cache();
+ flush_data_cache();
+ dcache_disable();
+#endif
+
switch (hdr->ih_comp) {
case IH_COMP_NONE:
if(ntohl(hdr->ih_load) == addr) {
diff --git a/common/cmd_fdc.c b/common/cmd_fdc.c
index e45b3361ca1..3ee342fcfc0 100644
--- a/common/cmd_fdc.c
+++ b/common/cmd_fdc.c
@@ -188,6 +188,30 @@ static FDC_COMMAND_STRUCT cmd; /* global command struct */
#endif
+#ifdef CONFIG_AMIGAONEG3SE
+unsigned char INT6_Status;
+
+void fdc_interrupt(void)
+{
+ INT6_Status = 0x80;
+}
+
+/* waits for an interrupt (polling) */
+int wait_for_fdc_int(void)
+{
+ unsigned long timeout;
+ timeout = FDC_TIME_OUT;
+ while(((volatile)INT6_Status & 0x80) == 0) {
+ timeout--;
+ udelay(10);
+ if(timeout == 0) /* timeout occured */
+ return FALSE;
+ }
+ INT6_Status = 0;
+ return TRUE;
+}
+#endif
+
/* Supporting Functions */
/* reads a Register of the FDC */
unsigned char read_fdc_reg(unsigned int addr)
@@ -210,6 +234,7 @@ void write_fdc_reg(unsigned int addr, unsigned char val)
tmp[0]=val;
}
+#ifndef CONFIG_AMIGAONEG3SE
/* waits for an interrupt (polling) */
int wait_for_fdc_int(void)
{
@@ -224,6 +249,7 @@ int wait_for_fdc_int(void)
return TRUE;
}
+#endif
/* reads a byte from the FIFO of the FDC and checks direction and RQM bit
of the MSR. returns -1 if timeout, or byte if ok */
@@ -416,7 +442,7 @@ int fdc_seek(FDC_COMMAND_STRUCT *pCMD,FD_GEO_STRUCT *pFG)
return(fdc_issue_cmd(pCMD,pFG));
}
-
+#ifndef CONFIG_AMIGAONEG3SE
/* terminates current command, by not servicing the FIFO
* waits for interrupt and fills in the result bytes */
int fdc_terminate(FDC_COMMAND_STRUCT *pCMD)
@@ -430,6 +456,27 @@ int fdc_terminate(FDC_COMMAND_STRUCT *pCMD)
}
return TRUE;
}
+#endif
+#ifdef CONFIG_AMIGAONEG3SE
+int fdc_terminate(FDC_COMMAND_STRUCT *pCMD)
+{
+ int i;
+ for(i=0;i<100;i++)
+ udelay(500); /* wait 500usec for fifo overrun */
+ while((INT6_Status&0x80)==0x00); /* wait as long as no int has occured */
+ for(i=0;i<7;i++) {
+ pCMD->result[i]=(unsigned char)read_fdc_byte();
+ }
+ INT6_Status = 0;
+ return TRUE;
+}
+
+#endif
+
+#ifdef CONFIG_AMIGAONEG3SE
+#define disable_interrupts() 0
+#define enable_interrupts() (void)0
+#endif
/* reads data from FDC, seek commands are issued automatic */
int fdc_read_data(unsigned char *buffer, unsigned long blocks,FDC_COMMAND_STRUCT *pCMD, FD_GEO_STRUCT *pFG)
@@ -550,6 +597,11 @@ retrycal:
return TRUE;
}
+#ifdef CONFIG_AMIGAONEG3SE
+#undef disable_interrupts()
+#undef enable_interrupts()
+#endif
+
/* Scan all drives and check if drive is present and disk is inserted */
int fdc_check_drive(FDC_COMMAND_STRUCT *pCMD, FD_GEO_STRUCT *pFG)
{
@@ -590,6 +642,7 @@ int fdc_check_drive(FDC_COMMAND_STRUCT *pCMD, FD_GEO_STRUCT *pFG)
}
+
/**************************************************************************
* int fdc_setup
* setup the fdc according the datasheet
@@ -597,9 +650,13 @@ int fdc_check_drive(FDC_COMMAND_STRUCT *pCMD, FD_GEO_STRUCT *pFG)
*/
int fdc_setup(int drive, FDC_COMMAND_STRUCT *pCMD, FD_GEO_STRUCT *pFG)
{
-
int i;
+#ifdef CONFIG_AMIGAONEG3SE
+ irq_install_handler(6, (interrupt_handler_t *)fdc_interrupt, NULL);
+ i8259_unmask_irq(6);
+#endif
+
#ifdef CFG_FDC_HW_INIT
fdc_hw_init ();
#endif
@@ -648,6 +705,7 @@ int fdc_setup(int drive, FDC_COMMAND_STRUCT *pCMD, FD_GEO_STRUCT *pFG)
/* then, we clear the reset in the DOR */
/* fdc_check_drive(pCMD,pFG); */
/* write_fdc_reg(FDC_DOR,0x04); */
+
return TRUE;
}
#endif /* ((CONFIG_COMMANDS & CFG_CMD_FDC)||(CONFIG_COMMANDS & CFG_CMD_FDOS))*/
diff --git a/common/cmd_ide.c b/common/cmd_ide.c
index e514cf71e3e..7b455086a87 100644
--- a/common/cmd_ide.c
+++ b/common/cmd_ide.c
@@ -58,6 +58,7 @@
#undef IDE_DEBUG
+
#ifdef IDE_DEBUG
#define PRINTF(fmt,args...) printf (fmt ,##args)
#else
@@ -121,7 +122,11 @@ ulong ide_bus_offset[CFG_IDE_MAXBUS] = {
#define ATA_CURR_BASE(dev) (CFG_ATA_BASE_ADDR+ide_bus_offset[IDE_BUS(dev)])
#endif
+#ifndef CONFIG_AMIGAONEG3SE
static int ide_bus_ok[CFG_IDE_MAXBUS];
+#else
+static int ide_bus_ok[CFG_IDE_MAXBUS] = {0,};
+#endif
static block_dev_desc_t ide_dev_desc[CFG_IDE_MAXDEVICE];
/* ------------------------------------------------------------------------- */
@@ -129,7 +134,15 @@ static block_dev_desc_t ide_dev_desc[CFG_IDE_MAXDEVICE];
#ifdef CONFIG_IDE_LED
static void ide_led (uchar led, uchar status);
#else
+#ifndef CONFIG_AMIGAONEG3SE
#define ide_led(a,b) /* dummy */
+#else
+extern void ide_led(uchar led, uchar status);
+#define LED_IDE1 1
+#define LED_IDE2 2
+#define CONFIG_IDE_LED 1
+#define DEVICE_LED(x) 1
+#endif
#endif
#ifdef CONFIG_IDE_RESET
@@ -464,6 +477,11 @@ void ide_init (void)
#endif
unsigned char c;
int i, bus;
+#ifdef CONFIG_AMIGAONEG3SE
+ unsigned int max_bus_scan;
+ unsigned int ata_reset_time;
+ char *s;
+#endif
#ifdef CONFIG_IDE_8xx_PCCARD
extern int pcmcia_on (void);
@@ -514,8 +532,19 @@ void ide_init (void)
* Wait for IDE to get ready.
* According to spec, this can take up to 31 seconds!
*/
+#ifndef CONFIG_AMIGAONEG3SE
for (bus=0; bus<CFG_IDE_MAXBUS; ++bus) {
int dev = bus * (CFG_IDE_MAXDEVICE / CFG_IDE_MAXBUS);
+#else
+ s = getenv("ide_maxbus");
+ if (s)
+ max_bus_scan = simple_strtol(s, NULL, 10);
+ else
+ max_bus_scan = CFG_IDE_MAXBUS;
+
+ for (bus=0; bus<max_bus_scan; ++bus) {
+ int dev = bus * (CFG_IDE_MAXDEVICE / max_bus_scan);
+#endif
printf ("Bus %d: ", bus);
@@ -526,16 +555,32 @@ void ide_init (void)
udelay (100000); /* 100 ms */
ide_outb (dev, ATA_DEV_HD, ATA_LBA | ATA_DEVICE(dev));
udelay (100000); /* 100 ms */
-
+#ifdef CONFIG_AMIGAONEG3SE
+ ata_reset_time = ATA_RESET_TIME;
+ s = getenv("ide_reset_timeout");
+ if (s) ata_reset_time = 2*simple_strtol(s, NULL, 10);
+#endif
i = 0;
do {
udelay (10000); /* 10 ms */
c = ide_inb (dev, ATA_STATUS);
i++;
+#ifdef CONFIG_AMIGAONEG3SE
+ if (i > (ata_reset_time * 100)) {
+#else
if (i > (ATA_RESET_TIME * 100)) {
+#endif
puts ("** Timeout **\n");
ide_led ((LED_IDE1 | LED_IDE2), 0); /* LED's off */
+#ifdef CONFIG_AMIGAONEG3SE
+ /* If this is the second bus, the first one was OK */
+ if (bus != 0)
+ {
+ ide_bus_ok[bus] = 0;
+ goto skip_bus;
+ }
+#endif
return;
}
if ((i >= 100) && ((i%100)==0)) {
@@ -557,6 +602,10 @@ void ide_init (void)
}
WATCHDOG_RESET();
}
+
+#ifdef CONFIG_AMIGAONEG3SE
+ skip_bus:
+#endif
putc ('\n');
ide_led ((LED_IDE1 | LED_IDE2), 0); /* LED's off */
@@ -736,6 +785,26 @@ __inline__ unsigned ld_le16(const volatile unsigned short *addr)
return val;
}
+#ifdef CONFIG_AMIGAONEG3SE
+static void
+output_data_short(int dev, ulong *sect_buf, int words)
+{
+ ushort *dbuf;
+ volatile ushort *pbuf;
+
+ pbuf = (ushort *)(ATA_CURR_BASE(dev)+ATA_DATA_REG);
+ dbuf = (ushort *)sect_buf;
+ while (words--) {
+ __asm__ volatile ("eieio");
+ *pbuf = *dbuf++;
+ __asm__ volatile ("eieio");
+ }
+
+ if (words&1)
+ *pbuf = 0;
+}
+#endif
+
static void
input_swap_data(int dev, ulong *sect_buf, int words)
{
@@ -803,6 +872,29 @@ input_data(int dev, ulong *sect_buf, int words)
#endif /* __PPC__ */
+#ifdef CONFIG_AMIGAONEG3SE
+static void
+input_data_short(int dev, ulong *sect_buf, int words)
+{
+ ushort *dbuf;
+ volatile ushort *pbuf;
+
+ pbuf = (ushort *)(ATA_CURR_BASE(dev)+ATA_DATA_REG);
+ dbuf = (ushort *)sect_buf;
+ while (words--) {
+ __asm__ volatile ("eieio");
+ *dbuf++ = *pbuf;
+ __asm__ volatile ("eieio");
+ }
+
+ if (words&1)
+ {
+ ushort dummy;
+ dummy = *pbuf;
+ }
+}
+#endif
+
/* -------------------------------------------------------------------------
*/
static void ide_ident (block_dev_desc_t *dev_desc)
@@ -811,6 +903,13 @@ static void ide_ident (block_dev_desc_t *dev_desc)
unsigned char c;
hd_driveid_t *iop = (hd_driveid_t *)iobuf;
+#ifdef CONFIG_AMIGAONEG3SE
+ int max_bus_scan;
+ int retries = 0;
+ char *s;
+ int do_retry = 0;
+#endif
+
#if 0
int mode, cycle_time;
#endif
@@ -818,12 +917,35 @@ static void ide_ident (block_dev_desc_t *dev_desc)
device=dev_desc->dev;
printf (" Device %d: ", device);
+#ifdef CONFIG_AMIGAONEG3SE
+ s = getenv("ide_maxbus");
+ if (s) {
+ max_bus_scan = simple_strtol(s, NULL, 10);
+ } else {
+ max_bus_scan = CFG_IDE_MAXBUS;
+ }
+ if (device >= max_bus_scan*2) {
+ dev_desc->type=DEV_TYPE_UNKNOWN;
+ return;
+ }
+#endif
+
ide_led (DEVICE_LED(device), 1); /* LED on */
/* Select device
*/
ide_outb (device, ATA_DEV_HD, ATA_LBA | ATA_DEVICE(device));
dev_desc->if_type=IF_TYPE_IDE;
#ifdef CONFIG_ATAPI
+
+#ifdef CONFIG_AMIGAONEG3SE
+ do_retry = 0;
+ retries = 0;
+
+ /* Warning: This will be tricky to read */
+ while (retries <= 1)
+ {
+#endif /* CONFIG_AMIGAONEG3SE */
+
/* check signature */
if ((ide_inb(device,ATA_SECT_CNT) == 0x01) &&
(ide_inb(device,ATA_SECT_NUM) == 0x01) &&
@@ -855,9 +977,34 @@ static void ide_ident (block_dev_desc_t *dev_desc)
if (((c & ATA_STAT_DRQ) == 0) ||
((c & (ATA_STAT_FAULT|ATA_STAT_ERR)) != 0) ) {
+#ifdef CONFIG_AMIGAONEG3SE
+ if (retries == 0) {
+ do_retry = 1;
+ } else {
+ dev_desc->type=DEV_TYPE_UNKNOWN;
+ return;
+ }
+#else
dev_desc->type=DEV_TYPE_UNKNOWN;
return;
+#endif /* CONFIG_AMIGAONEG3SE */
+ }
+
+#ifdef CONFIG_AMIGAONEG3SE
+ s = getenv("ide_doreset");
+ if (s && strcmp(s, "on") == 0 && 1 == do_retry) {
+ /* Need to soft reset the device in case it's an ATAPI... */
+ PRINTF("Retrying...\n");
+ ide_outb (device, ATA_DEV_HD, ATA_LBA | ATA_DEVICE(device));
+ udelay(100000);
+ ide_outb (device, ATA_COMMAND, 0x08);
+ udelay (100000); /* 100 ms */
+ retries++;
+ } else {
+ retries = 100;
}
+ } /* see above - ugly to read */
+#endif /* CONFIG_AMIGAONEG3SE */
input_swap_data (device, iobuf, ATA_SECTORWORDS);
@@ -1200,7 +1347,7 @@ static void ide_reset (void)
/* ------------------------------------------------------------------------- */
-#ifdef CONFIG_IDE_LED
+#if defined(CONFIG_IDE_LED) && !defined(CONFIG_AMIGAONEG3SE)
static uchar led_buffer = 0; /* Buffer for current LED status */
@@ -1320,6 +1467,9 @@ unsigned char atapi_issue(int device,unsigned char* ccb,int ccblen, unsigned cha
*/
mask = ATA_STAT_BUSY|ATA_STAT_DRQ;
res = 0;
+#ifdef CONFIG_AMIGAONEG3SE
+# warning THF: Removed LBA mode ???
+#endif
ide_outb (device, ATA_DEV_HD, ATA_LBA | ATA_DEVICE(device));
c = atapi_wait_mask(device,ATAPI_TIME_OUT,mask,res);
if ((c & mask) != res) {
@@ -1329,8 +1479,13 @@ unsigned char atapi_issue(int device,unsigned char* ccb,int ccblen, unsigned cha
}
/* write taskfile */
ide_outb (device, ATA_ERROR_REG, 0); /* no DMA, no overlaped */
+ ide_outb (device, ATA_SECT_CNT, 0);
+ ide_outb (device, ATA_SECT_NUM, 0);
ide_outb (device, ATA_CYL_LOW, (unsigned char)(buflen & 0xFF));
- ide_outb (device, ATA_CYL_HIGH, (unsigned char)((buflen<<8) & 0xFF));
+ ide_outb (device, ATA_CYL_HIGH, (unsigned char)((buflen>>8) & 0xFF));
+#ifdef CONFIG_AMIGAONEG3SE
+# warning THF: Removed LBA mode ???
+#endif
ide_outb (device, ATA_DEV_HD, ATA_LBA | ATA_DEVICE(device));
ide_outb (device, ATA_COMMAND, ATAPI_CMD_PACKET);
@@ -1429,6 +1584,16 @@ unsigned char atapi_issue_autoreq (int device,
unsigned char res,key,asc,ascq;
int notready,unitattn;
+#ifdef CONFIG_AMIGAONEG3SE
+ char *s;
+ unsigned int timeout, retrycnt;
+
+ s = getenv("ide_cd_timeout");
+ timeout = s ? (simple_strtol(s, NULL, 10)*1000000)/5 : 0;
+
+ retrycnt = 0;
+#endif
+
unitattn=ATAPI_UNIT_ATTN;
notready=ATAPI_DRIVE_NOT_READY;
@@ -1445,7 +1610,7 @@ retry:
memset(sense_ccb,0,sizeof(sense_ccb));
memset(sense_data,0,sizeof(sense_data));
sense_ccb[0]=ATAPI_CMD_REQ_SENSE;
- sense_ccb[4]=18; /* allocation Legnth */
+ sense_ccb[4]=18; /* allocation Length */
res=atapi_issue(device,sense_ccb,12,sense_data,18);
key=(sense_data[2]&0xF);
@@ -1482,6 +1647,26 @@ retry:
AT_PRINTF("Media not present\n");
goto error;
}
+
+#ifdef CONFIG_AMIGAONEG3SE
+ if ((sense_data[2]&0xF)==0x0B) {
+ AT_PRINTF("ABORTED COMMAND...retry\n");
+ if (retrycnt++ < 4)
+ goto retry;
+ return (0xFF);
+ }
+
+ if ((sense_data[2]&0xf) == 0x02 &&
+ sense_data[12] == 0x04 &&
+ sense_data[13] == 0x01 ) {
+ AT_PRINTF("Waiting for unit to become active\n");
+ udelay(timeout);
+ if (retrycnt++ < 4)
+ goto retry;
+ return 0xFF;
+ }
+#endif /* CONFIG_AMIGAONEG3SE */
+
printf ("ERROR: Unknown Sense key %02X ASC %02X ASCQ %02X\n",key,asc,ascq);
error:
AT_PRINTF ("ERROR Sense key %02X ASC %02X ASCQ %02X\n",key,asc,ascq);
diff --git a/common/cmd_nvedit.c b/common/cmd_nvedit.c
index 0a19ce405b7..9b6d14fe235 100644
--- a/common/cmd_nvedit.c
+++ b/common/cmd_nvedit.c
@@ -353,6 +353,18 @@ int _do_setenv (int flag, int argc, char *argv[])
return 0;
}
#endif /* CFG_CMD_NET */
+
+#ifdef CONFIG_AMIGAONEG3SE
+ if (strcmp(argv[1], "vga_fg_color") == 0 ||
+ strcmp(argv[1], "vga_bg_color") == 0 ) {
+ extern void video_set_color(unsigned char attr);
+ extern unsigned char video_get_attr(void);
+
+ video_set_color(video_get_attr());
+ return 0;
+ }
+#endif /* CONFIG_AMIGAONEG3SE */
+
return 0;
}
diff --git a/common/cmd_pci.c b/common/cmd_pci.c
index 22e4b9a86fe..300ac020046 100644
--- a/common/cmd_pci.c
+++ b/common/cmd_pci.c
@@ -96,7 +96,7 @@ void pciinfo(int BusNum, int ShortPCIListing)
if ((VendorID == 0xFFFF) || (VendorID == 0x0000))
continue;
- pci_read_config_byte(dev, PCI_HEADER_TYPE, &HeaderType);
+ if (!Function) pci_read_config_byte(dev, PCI_HEADER_TYPE, &HeaderType);
if (ShortPCIListing)
{
diff --git a/common/command.c b/common/command.c
index cab68abf8e3..2304d7a9b4d 100644
--- a/common/command.c
+++ b/common/command.c
@@ -72,6 +72,11 @@
#include <cmd_log.h>
#include <cmd_fdos.h>
+#ifdef CONFIG_AMIGAONEG3SE
+#include <cmd_menu.h>
+#include <cmd_boota.h>
+#endif
+
/*
* HELP command
*/
@@ -225,6 +230,9 @@ cmd_tbl_t cmd_tbl[] = {
CMD_TBL_AUTOSCRIPT
CMD_TBL_BASE
CMD_TBL_BDINFO
+#ifdef CONFIG_AMIGAONEG3SE
+ CMD_TBL_BOOTA
+#endif
CMD_TBL_BOOTELF
CMD_TBL_BOOTM
CMD_TBL_BOOTP
@@ -291,6 +299,9 @@ cmd_tbl_t cmd_tbl[] = {
CMD_TBL_MCCINFO
CMD_TBL_MD
CMD_TBL_MEMCINFO
+#ifdef CONFIG_AMIGAONEG3SE
+ CMD_TBL_MENU
+#endif
CMD_TBL_MII
CMD_TBL_MM
CMD_TBL_MTEST
diff --git a/common/console.c b/common/console.c
index f99dfcc64c1..d888d1ddc7e 100644
--- a/common/console.c
+++ b/common/console.c
@@ -29,6 +29,10 @@
void **syscall_tbl;
+#ifdef CONFIG_AMIGAONEG3SE
+int console_changed = 0;
+#endif
+
#ifdef CFG_CONSOLE_IS_IN_ENV
/*
* if overwrite_console returns 1, the stdin, stderr and stdout
diff --git a/common/docecc.c b/common/docecc.c
index 09e8233d81a..74ac7411a4b 100644
--- a/common/docecc.c
+++ b/common/docecc.c
@@ -35,8 +35,6 @@
#if (CONFIG_COMMANDS & CFG_CMD_DOC)
-#define min(x,y) ((x)<(y)?(x):(y))
-
/* need to undef it (from asm/termbits.h) */
#undef B0
diff --git a/common/env_common.c b/common/env_common.c
index f7f268e7b03..bd22e154281 100644
--- a/common/env_common.c
+++ b/common/env_common.c
@@ -38,6 +38,11 @@
# define SHOW_BOOT_PROGRESS(arg)
#endif
+#ifdef CONFIG_AMIGAONEG3SE
+ extern void enable_nvram(void);
+ extern void disable_nvram(void);
+#endif
+
#undef DEBUG_ENV
#ifdef DEBUG_ENV
#define DEBUGF(fmt,args...) printf(fmt ,##args)
@@ -180,6 +185,10 @@ void env_relocate (void)
DEBUGF ("%s[%d] offset = 0x%lx\n", __FUNCTION__,__LINE__,
gd->reloc_off);
+#ifdef CONFIG_AMIGAONEG3SE
+ enable_nvram();
+#endif
+
#ifdef ENV_IS_EMBEDDED
/*
* The environment buffer is embedded with the text segment,
@@ -228,4 +237,8 @@ void env_relocate (void)
env_relocate_spec ();
}
gd->env_addr = (ulong)&(env_ptr->data);
+
+#ifdef CONFIG_AMIGAONEG3SE
+ disable_nvram();
+#endif
}
diff --git a/common/hush.c b/common/hush.c
index 3cb6fc3b1cb..925474332be 100644
--- a/common/hush.c
+++ b/common/hush.c
@@ -356,11 +356,6 @@ struct built_in_command {
};
#endif
-/* belongs in busybox.h */
-static inline int max(int a, int b) {
- return (a>b)?a:b;
-}
-
/* This should be in utility.c */
#ifdef DEBUG_SHELL
#ifndef __U_BOOT__
diff --git a/common/main.c b/common/main.c
index 014804b6ef5..08d54c5c140 100644
--- a/common/main.c
+++ b/common/main.c
@@ -179,11 +179,19 @@ static __inline__ int abortboot(int bootdelay)
# else /* !defined(CONFIG_AUTOBOOT_KEYED) */
+#ifdef CONFIG_MENUKEY
+static int menukey = 0;
+#endif
+
static __inline__ int abortboot(int bootdelay)
{
int abort = 0;
+#ifdef CONFIG_MENUPROMPT
+ printf(CONFIG_MENUPROMPT, bootdelay);
+#else
printf("Hit any key to stop autoboot: %2d ", bootdelay);
+#endif
#if defined CONFIG_ZERO_BOOTDELAY_CHECK
/*
@@ -208,7 +216,11 @@ static __inline__ int abortboot(int bootdelay)
if (tstc()) { /* we got a key press */
abort = 1; /* don't auto boot */
bootdelay = 0; /* no more delay */
+# ifdef CONFIG_MENUKEY
+ menukey = getc();
+# else
(void) getc(); /* consume input */
+# endif
break;
}
udelay (10000);
@@ -323,8 +335,31 @@ void main_loop (void)
disable_ctrlc(prev); /* restore Control C checking */
# endif
}
+
+# ifdef CONFIG_MENUKEY
+ if (menukey == CONFIG_MENUKEY)
+ {
+ s = getenv("menucmd");
+ if (s)
+ {
+# ifndef CFG_HUSH_PARSER
+ run_command (s, bd, 0);
+# else
+ parse_string_outer(s, FLAG_PARSE_SEMICOLON |
+ FLAG_EXIT_FROM_LOOP);
+# endif
+ }
+ }
+#endif /* CONFIG_MENUKEY */
#endif /* CONFIG_BOOTDELAY */
+#ifdef CONFIG_AMIGAONEG3SE
+ {
+ extern void video_banner(void);
+ video_banner();
+ }
+#endif
+
/*
* Main Loop for Monitor Command Processing
*/
diff --git a/cpu/74xx_7xx/cpu.c b/cpu/74xx_7xx/cpu.c
index 8a6915fca7b..c265ce265af 100644
--- a/cpu/74xx_7xx/cpu.c
+++ b/cpu/74xx_7xx/cpu.c
@@ -44,6 +44,11 @@
#include <74xx_7xx.h>
#include <asm/cache.h>
+#ifdef CONFIG_AMIGAONEG3SE
+#include "../board/MAI/AmigaOneG3SE/via686.h"
+#include "../board/MAI/AmigaOneG3SE/memio.h"
+#endif
+
cpu_t
get_cpu_type(void)
{
@@ -218,12 +223,20 @@ do_reset (cmd_tbl_t *cmdtp, bd_t *bd, int flag, int argc, char *argv[])
/*
* For the 7400 the TB clock runs at 1/4 the cpu bus speed.
*/
-unsigned long
-get_tbclk (void)
+#ifdef CONFIG_AMIGAONEG3SE
+unsigned long get_tbclk(void)
{
- return CFG_BUS_HZ / 4;
+ DECLARE_GLOBAL_DATA_PTR;
+
+ return (gd->bus_clk / 4);
}
+#else /* ! CONFIG_AMIGAONEG3SE */
+unsigned long get_tbclk (void)
+{
+ return CFG_BUS_HZ / 4;
+}
+#endif /* CONFIG_AMIGAONEG3SE */
/* ------------------------------------------------------------------------- */
#if defined(CONFIG_WATCHDOG)
diff --git a/cpu/74xx_7xx/interrupts.c b/cpu/74xx_7xx/interrupts.c
index 10450da1c56..2e2e45615db 100644
--- a/cpu/74xx_7xx/interrupts.c
+++ b/cpu/74xx_7xx/interrupts.c
@@ -89,7 +89,7 @@ disable_interrupts(void)
int interrupt_init(void)
{
-#ifdef DEBUG
+#if defined(DEBUG) && !defined(CONFIG_AMIGAONEG3SE)
printf("interrupt_init: GT main cause reg: %08x:%08x\n",
GTREGREAD(LOW_INTERRUPT_CAUSE_REGISTER),
GTREGREAD(HIGH_INTERRUPT_CAUSE_REGISTER));
diff --git a/cpu/74xx_7xx/speed.c b/cpu/74xx_7xx/speed.c
index fe553f125bb..ac99bcd5b35 100644
--- a/cpu/74xx_7xx/speed.c
+++ b/cpu/74xx_7xx/speed.c
@@ -25,6 +25,10 @@
#include <74xx_7xx.h>
#include <asm/processor.h>
+#ifdef CONFIG_AMIGAONEG3SE
+#include "../board/MAI/AmigaOneG3SE/via686.h"
+#endif
+
static const int hid1_multipliers_x_10[] = {
25, /* 0000 - 2.5x */
75, /* 0001 - 7.5x */
diff --git a/cpu/74xx_7xx/traps.c b/cpu/74xx_7xx/traps.c
index 26db0974025..6e94601ccc5 100644
--- a/cpu/74xx_7xx/traps.c
+++ b/cpu/74xx_7xx/traps.c
@@ -45,7 +45,11 @@ extern unsigned long search_exception_table(unsigned long);
/* THIS NEEDS CHANGING to use the board info structure.
*/
+#ifdef CONFIG_AMIGAONEG3SE
+#define END_OF_MEM (gd->bd->bi_memstart + gd->bd->bi_memsize)
+#else
#define END_OF_MEM 0x02000000
+#endif
/*
* Trap & Exception support
@@ -54,6 +58,9 @@ extern unsigned long search_exception_table(unsigned long);
void
print_backtrace(unsigned long *sp)
{
+#ifdef CONFIG_AMIGAONEG3SE
+ DECLARE_GLOBAL_DATA_PTR;
+#endif
int cnt = 0;
unsigned long i;
@@ -171,11 +178,25 @@ AlignmentException(struct pt_regs *regs)
void
ProgramCheckException(struct pt_regs *regs)
{
+ unsigned char *p = regs ? (unsigned char *)(regs->nip) : NULL;
+ int i, j;
+
#if (CONFIG_COMMANDS & CFG_CMD_KGDB)
if (debugger_exception_handler && (*debugger_exception_handler)(regs))
return;
#endif
show_regs(regs);
+
+ p = (unsigned char *) ((unsigned long)p & 0xFFFFFFE0);
+ p -= 32;
+ for (i = 0; i < 256; i+=16) {
+ printf("%08x: ", (unsigned int)p+i);
+ for (j = 0; j < 16; j++) {
+ printf("%02x ", p[i+j]);
+ }
+ printf("\n");
+ }
+
print_backtrace((unsigned long *)regs->gpr[1]);
panic("Program Check Exception");
}
diff --git a/disk/Makefile b/disk/Makefile
index 7b80174f5b3..39677f1e2e0 100644
--- a/disk/Makefile
+++ b/disk/Makefile
@@ -27,7 +27,7 @@ include $(TOPDIR)/config.mk
LIB = libdisk.a
-OBJS = part.o part_mac.o part_dos.o part_iso.o
+OBJS = part.o part_mac.o part_dos.o part_iso.o part_amiga.o
all: $(LIB)
diff --git a/disk/part.c b/disk/part.c
index 99fe0db9fa7..70511ca0654 100644
--- a/disk/part.c
+++ b/disk/part.c
@@ -106,7 +106,8 @@ void dev_print (block_dev_desc_t *dev_desc)
#if defined(CONFIG_MAC_PARTITION) || \
defined(CONFIG_DOS_PARTITION) || \
- defined(CONFIG_ISO_PARTITION)
+ defined(CONFIG_ISO_PARTITION) || \
+ defined(CONFIG_AMIGA_PARTITION)
void init_part (block_dev_desc_t * dev_desc)
{
@@ -130,6 +131,13 @@ void init_part (block_dev_desc_t * dev_desc)
return;
}
#endif
+
+#ifdef CONFIG_AMIGA_PARTITION
+ if (test_part_amiga(dev_desc) == 0) {
+ dev_desc->part_type = PART_TYPE_AMIGA;
+ return;
+ }
+#endif
}
@@ -162,6 +170,16 @@ int get_partition_info (block_dev_desc_t *dev_desc, int part, disk_partition_t *
}
break;
#endif
+
+#ifdef CONFIG_AMIGA_PARTITION
+ case PART_TYPE_AMIGA:
+ if (get_partition_info_amiga(dev_desc, part, info) == 0)
+ {
+ PRINTF ("## Valid Amiga partition found ##\n");
+ return (0);
+ }
+ break;
+#endif
default:
break;
}
@@ -215,6 +233,14 @@ void print_part (block_dev_desc_t * dev_desc)
print_part_iso (dev_desc);
return;
#endif
+
+#ifdef CONFIG_AMIGA_PARTITION
+ case PART_TYPE_AMIGA:
+ PRINTF ("## Testing for a valid Amiga partition ##\n");
+ print_part_header ("AMIGA", dev_desc);
+ print_part_amiga (dev_desc);
+ return;
+#endif
}
puts ("## Unknown partition table\n");
}
diff --git a/disk/part_amiga.c b/disk/part_amiga.c
new file mode 100644
index 00000000000..aafbcd84cc4
--- /dev/null
+++ b/disk/part_amiga.c
@@ -0,0 +1,399 @@
+/*
+ * (C) Copyright 2001
+ * Hans-Joerg Frieden, Hyperion Entertainment
+ * Hans-JoergF@hyperion-entertainment.com
+ *
+ * See file CREDITS for list of people who contributed to this
+ * project.
+ *
+ * This program is free software; you can redistribute it and/or
+ * modify it under the terms of the GNU General Public License as
+ * published by the Free Software Foundation; either version 2 of
+ * the License, or (at your option) any later version.
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with this program; if not, write to the Free Software
+ * Foundation, Inc., 59 Temple Place, Suite 330, Boston,
+ * MA 02111-1307 USA
+ */
+#include <common.h>
+#include <command.h>
+#include <ide.h>
+#include <cmd_disk.h>
+#include "part_amiga.h"
+
+#if ((CONFIG_COMMANDS & CFG_CMD_IDE) || (CONFIG_COMMANDS & CFG_CMD_SCSI)) && defined(CONFIG_AMIGA_PARTITION)
+
+#undef AMIGA_DEBUG
+
+#ifdef AMIGA_DEBUG
+#define PRINTF(fmt, args...) printf(fmt ,##args)
+#else
+#define PRINTF(fmt, args...)
+#endif
+
+struct block_header
+{
+ u32 id;
+ u32 summed_longs;
+ s32 chk_sum;
+};
+
+static unsigned char block_buffer[DEFAULT_SECTOR_SIZE];
+static struct rigid_disk_block rdb = {0};
+static struct bootcode_block bootcode = {0};
+
+/*
+ * Copy a bcpl to a c string
+ */
+static void bcpl_strcpy(char *to, char *from)
+{
+ int len = *from++;
+
+ while (len)
+ {
+ *to++ = *from++;
+ len--;
+ }
+ *to = 0;
+}
+
+/*
+ * Print a BCPL String. BCPL strings start with a byte with the length
+ * of the string, and don't contain a terminating nul character
+ */
+static void bstr_print(char *string)
+{
+ int len = *string++;
+ char buffer[256];
+ int i;
+
+ i = 0;
+ while (len)
+ {
+ buffer[i++] = *string++;
+ len--;
+ }
+
+ buffer[i] = 0;
+ printf("%-10s", buffer);
+}
+
+/*
+ * Sum a block. The checksum of a block must end up at zero
+ * to be valid. The chk_sum field is selected so that adding
+ * it yields zero.
+ */
+int sum_block(struct block_header *header)
+{
+ s32 *block = (s32 *)header;
+ u32 i;
+ s32 sum = 0;
+
+ for (i = 0; i < header->summed_longs; i++)
+ sum += *block++;
+
+ return (sum != 0);
+}
+
+/*
+ * Print an AmigaOS disk type. Disk types are a four-byte identifier
+ * describing the file system. They are usually written as a three-letter
+ * word followed by a backslash and a version number. For example,
+ * DOS\0 would be the original file system. SFS\0 would be SmartFileSystem.
+ * DOS\1 is FFS.
+ */
+static void print_disk_type(u32 disk_type)
+{
+ char buffer[6];
+ buffer[0] = (disk_type & 0xFF000000)>>24;
+ buffer[1] = (disk_type & 0x00FF0000)>>16;
+ buffer[2] = (disk_type & 0x0000FF00)>>8;
+ buffer[3] = '\\';
+ buffer[4] = (disk_type & 0x000000FF) + '0';
+ buffer[5] = 0;
+ printf("%s", buffer);
+}
+
+/*
+ * Print the info contained within the given partition block
+ */
+static void print_part_info(struct partition_block *p)
+{
+ struct amiga_part_geometry *g;
+
+ g = (struct amiga_part_geometry *)&(p->environment);
+
+ bstr_print(p->drive_name);
+ printf("%6d\t%6d\t",
+ g->low_cyl * g->block_per_track * g->surfaces ,
+ (g->high_cyl - g->low_cyl + 1) * g->block_per_track * g->surfaces - 1);
+ print_disk_type(g->dos_type);
+ printf("\t%5d\n", g->boot_priority);
+}
+
+/*
+ * Search for the Rigid Disk Block. The rigid disk block is required
+ * to be within the first 16 blocks of a drive, needs to have
+ * the ID AMIGA_ID_RDISK ('RDSK') and needs to have a valid
+ * sum-to-zero checksum
+ */
+struct rigid_disk_block *get_rdisk(block_dev_desc_t *dev_desc)
+{
+ int i;
+ int limit;
+ char *s;
+
+ s = getenv("amiga_scanlimit");
+ if (s)
+ limit = atoi(s);
+ else
+ limit = AMIGA_BLOCK_LIMIT;
+
+ for (i=0; i<limit; i++)
+ {
+ ulong res = dev_desc->block_read(dev_desc->dev, i, 1,
+ (ulong *)block_buffer);
+ if (res == 1)
+ {
+ struct rigid_disk_block *trdb = (struct rigid_disk_block *)block_buffer;
+ if (trdb->id == AMIGA_ID_RDISK)
+ {
+ PRINTF("Rigid disk block suspect at %d, checking checksum\n",i);
+ if (sum_block((struct block_header *)block_buffer) == 0)
+ {
+ PRINTF("FOUND\n");
+ memcpy(&rdb, trdb, sizeof(struct rigid_disk_block));
+ return (struct rigid_disk_block *)&rdb;
+ }
+ }
+ }
+ }
+ PRINTF("Done scanning, no RDB found\n");
+ return NULL;
+}
+
+/*
+ * Search for boot code
+ * Again, the first boot block must be located somewhere in the first 16 blocks, or rooted in the
+ * Ridgid disk block
+ */
+
+struct bootcode_block *get_bootcode(block_dev_desc_t *dev_desc)
+{
+ int i;
+ int limit;
+ char *s;
+
+ s = getenv("amiga_scanlimit");
+ if (s)
+ limit = atoi(s);
+ else
+ limit = AMIGA_BLOCK_LIMIT;
+
+ PRINTF("Scanning for BOOT from 0 to %d\n", limit);
+
+ for (i = 0; i < limit; i++)
+ {
+ ulong res = dev_desc->block_read(dev_desc->dev, i, 1, (ulong *)block_buffer);
+ if (res == 1)
+ {
+ struct bootcode_block *boot = (struct bootcode_block *)block_buffer;
+ if (boot->id == AMIGA_ID_BOOT)
+ {
+ PRINTF("BOOT block at %d, checking checksum\n", i);
+ if (sum_block((struct block_header *)block_buffer) == 0)
+ {
+ PRINTF("Found valid bootcode block\n");
+ memcpy(&bootcode, boot, sizeof(struct bootcode_block));
+ return &bootcode;
+ }
+ }
+ }
+ }
+
+ PRINTF("No boot code found on disk\n");
+ return 0;
+}
+
+/*
+ * Test if the given partition has an Amiga partition table/Rigid
+ * Disk block
+ */
+int test_part_amiga(block_dev_desc_t *dev_desc)
+{
+ struct rigid_disk_block *rdb;
+ struct bootcode_block *bootcode;
+
+ PRINTF("test_part_amiga: Testing for an Amiga RDB partition\n");
+
+ rdb = get_rdisk(dev_desc);
+ if (rdb)
+ {
+ bootcode = get_bootcode(dev_desc);
+ if (bootcode)
+ PRINTF("test_part_amiga: bootable Amiga disk\n");
+ else
+ PRINTF("test_part_amiga: non-bootable Amiga disk\n");
+
+ return 0;
+ }
+ else
+ {
+ PRINTF("test_part_amiga: no RDB found\n");
+ return -1;
+ }
+
+}
+
+/*
+ * Find partition number partnum on the given drive.
+ */
+static struct partition_block *find_partition(block_dev_desc_t *dev_desc, int partnum)
+{
+ struct rigid_disk_block *rdb;
+ struct partition_block *p;
+ u32 block;
+
+ PRINTF("Trying to find partition block %d\n", partnum);
+ rdb = get_rdisk(dev_desc);
+ if (!rdb)
+ {
+ PRINTF("find_partition: no rdb found\n");
+ return NULL;
+ }
+
+ PRINTF("find_partition: Scanning partition list\n");
+
+ block = rdb->partition_list;
+ PRINTF("find_partition: partition list at 0x%x\n", block);
+
+ while (block != 0xFFFFFFFF)
+ {
+ ulong res = dev_desc->block_read(dev_desc->dev, block, 1,
+ (ulong *)block_buffer);
+ if (res == 1)
+ {
+ p = (struct partition_block *)block_buffer;
+ if (p->id == AMIGA_ID_PART)
+ {
+ PRINTF("PART block suspect at 0x%x, checking checksum\n",block);
+ if (sum_block((struct block_header *)p) == 0)
+ {
+ if (partnum == 0) break;
+ else
+ {
+ partnum--;
+ block = p->next;
+ }
+ }
+ } else block = 0xFFFFFFFF;
+ } else block = 0xFFFFFFFF;
+ }
+
+ if (block == 0xFFFFFFFF)
+ {
+ PRINTF("PART block not found\n");
+ return NULL;
+ }
+
+ return (struct partition_block *)block_buffer;
+}
+
+/*
+ * Get info about a partition
+ */
+int get_partition_info_amiga (block_dev_desc_t *dev_desc, int part, disk_partition_t *info)
+{
+ struct partition_block *p = find_partition(dev_desc, part-1);
+ struct amiga_part_geometry *g;
+ u32 disk_type;
+
+ if (!p) return -1;
+
+ g = (struct amiga_part_geometry *)&(p->environment);
+ info->start = g->low_cyl * g->block_per_track * g->surfaces;
+ info->size = (g->high_cyl - g->low_cyl + 1) * g->block_per_track * g->surfaces - 1;
+ info->blksz = rdb.block_bytes;
+ bcpl_strcpy(info->name, p->drive_name);
+
+
+ disk_type = g->dos_type;
+
+ info->type[0] = (disk_type & 0xFF000000)>>24;
+ info->type[1] = (disk_type & 0x00FF0000)>>16;
+ info->type[2] = (disk_type & 0x0000FF00)>>8;
+ info->type[3] = '\\';
+ info->type[4] = (disk_type & 0x000000FF) + '0';
+ info->type[5] = 0;
+
+ return 0;
+}
+
+void print_part_amiga (block_dev_desc_t *dev_desc)
+{
+ struct rigid_disk_block *rdb;
+ struct bootcode_block *boot;
+ struct partition_block *p;
+ u32 block;
+ int i = 1;
+
+ rdb = get_rdisk(dev_desc);
+ if (!rdb)
+ {
+ PRINTF("print_part_amiga: no rdb found\n");
+ return;
+ }
+
+ PRINTF("print_part_amiga: Scanning partition list\n");
+
+ block = rdb->partition_list;
+ PRINTF("print_part_amiga: partition list at 0x%x\n", block);
+
+ printf("Summary: DiskBlockSize: %d\n"
+ " Cylinders : %d\n"
+ " Sectors/Track: %d\n"
+ " Heads : %d\n\n",
+ rdb->block_bytes, rdb->cylinders, rdb->sectors,
+ rdb->heads);
+
+ printf(" First Num. \n"
+ "Nr. Part. Name Block Block Type Boot Priority\n");
+
+ while (block != 0xFFFFFFFF)
+ {
+ ulong res;
+
+ PRINTF("Trying to load block #0x%X\n", block);
+
+ res = dev_desc->block_read(dev_desc->dev, block, 1,
+ (ulong *)block_buffer);
+ if (res == 1)
+ {
+ p = (struct partition_block *)block_buffer;
+ if (p->id == AMIGA_ID_PART)
+ {
+ PRINTF("PART block suspect at 0x%x, checking checksum\n",block);
+ if (sum_block((struct block_header *)p) == 0)
+ {
+ printf("%-4d ", i); i++;
+ print_part_info(p);
+ block = p->next;
+ }
+ } else block = 0xFFFFFFFF;
+ } else block = 0xFFFFFFFF;
+ }
+
+ boot = get_bootcode(dev_desc);
+ if (boot)
+ {
+ printf("Disk is bootable\n");
+ }
+}
+
+#endif
diff --git a/disk/part_amiga.h b/disk/part_amiga.h
new file mode 100644
index 00000000000..9e59be9faa5
--- /dev/null
+++ b/disk/part_amiga.h
@@ -0,0 +1,157 @@
+/*
+ * (C) Copyright 2000
+ * Hans-Joerg Frieden, Hyperion Entertainment
+ * Hans-JoergF@hyperion-entertainment.com
+ *
+ * See file CREDITS for list of people who contributed to this
+ * project.
+ *
+ * This program is free software; you can redistribute it and/or
+ * modify it under the terms of the GNU General Public License as
+ * published by the Free Software Foundation; either version 2 of
+ * the License, or (at your option) any later version.
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with this program; if not, write to the Free Software
+ * Foundation, Inc., 59 Temple Place, Suite 330, Boston,
+ * MA 02111-1307 USA
+ */
+
+#ifndef _DISK_PART_AMIGA_H
+#define _DISK_PART_AMIGA_H
+#include <common.h>
+
+#ifdef CONFIG_ISO_PARTITION
+/* Make the buffers bigger if ISO partition support is enabled -- CD-ROMS
+ have 2048 byte blocks */
+#define DEFAULT_SECTOR_SIZE 2048
+#else
+#define DEFAULT_SECTOR_SIZE 512
+#endif
+
+
+#define AMIGA_BLOCK_LIMIT 16
+
+/*
+ * Amiga disks have a very open structure. The head for the partition table information
+ * is stored somewhere within the first 16 blocks on disk, and is called the
+ * "RigidDiskBlock".
+ */
+
+struct rigid_disk_block
+{
+ u32 id;
+ u32 summed_longs;
+ s32 chk_sum;
+ u32 host_id;
+ u32 block_bytes;
+ u32 flags;
+ u32 bad_block_list;
+ u32 partition_list;
+ u32 file_sys_header_list;
+ u32 drive_init;
+ u32 bootcode_block;
+ u32 reserved_1[5];
+
+ /* Physical drive geometry */
+ u32 cylinders;
+ u32 sectors;
+ u32 heads;
+ u32 interleave;
+ u32 park;
+ u32 reserved_2[3];
+ u32 write_pre_comp;
+ u32 reduced_write;
+ u32 step_rate;
+ u32 reserved_3[5];
+
+ /* logical drive geometry */
+ u32 rdb_blocks_lo;
+ u32 rdb_blocks_hi;
+ u32 lo_cylinder;
+ u32 hi_cylinder;
+ u32 cyl_blocks;
+ u32 auto_park_seconds;
+ u32 high_rdsk_block;
+ u32 reserved_4;
+
+ char disk_vendor[8];
+ char disk_product[16];
+ char disk_revision[4];
+ char controller_vendor[8];
+ char controller_product[16];
+ char controller_revision[4];
+
+ u32 reserved_5[10];
+};
+
+/*
+ * Each partition on this drive is defined by such a block
+ */
+
+struct partition_block
+{
+ u32 id;
+ u32 summed_longs;
+ s32 chk_sum;
+ u32 host_id;
+ u32 next;
+ u32 flags;
+ u32 reserved_1[2];
+ u32 dev_flags;
+ char drive_name[32];
+ u32 reserved_2[15];
+ u32 environment[17];
+ u32 reserved_3[15];
+};
+
+struct bootcode_block
+{
+ u32 id;
+ u32 summed_longs;
+ s32 chk_sum;
+ u32 host_id;
+ u32 next;
+ u32 load_data[123];
+};
+
+
+#define AMIGA_ID_RDISK 0x5244534B
+#define AMIGA_ID_PART 0x50415254
+#define AMIGA_ID_BOOT 0x424f4f54
+
+/*
+ * The environment array in the partition block
+ * describes the partition
+ */
+
+struct amiga_part_geometry
+{
+ u32 table_size;
+ u32 size_blocks;
+ u32 unused1;
+ u32 surfaces;
+ u32 sector_per_block;
+ u32 block_per_track;
+ u32 reserved;
+ u32 prealloc;
+ u32 interleave;
+ u32 low_cyl;
+ u32 high_cyl;
+ u32 num_buffers;
+ u32 buf_mem_type;
+ u32 max_transfer;
+ u32 mask;
+ s32 boot_priority;
+ u32 dos_type;
+ u32 baud;
+ u32 control;
+ u32 boot_blocks;
+};
+
+#endif /* _DISK_PART_AMIGA_H_ */
diff --git a/disk/part_dos.h b/disk/part_dos.h
index 1a5c3777b5c..cc3fa81d73b 100644
--- a/disk/part_dos.h
+++ b/disk/part_dos.h
@@ -25,7 +25,13 @@
#define _DISK_PART_DOS_H
+#ifdef CONFIG_ISO_PARTITION
+/* Make the buffers bigger if ISO partition support is enabled -- CD-ROMS
+ have 2048 byte blocks */
+#define DEFAULT_SECTOR_SIZE 2048
+#else
#define DEFAULT_SECTOR_SIZE 512
+#endif
#define DOS_PART_TBL_OFFSET 0x1be
#define DOS_PART_MAGIC_OFFSET 0x1fe
diff --git a/disk/part_iso.c b/disk/part_iso.c
index a98539da469..72259274c17 100644
--- a/disk/part_iso.c
+++ b/disk/part_iso.c
@@ -97,6 +97,7 @@ int get_partition_info_iso_verb(block_dev_desc_t * dev_desc, int part_num, disk_
info->blksz=ppr->secsize_BE; /* assuming same block size for all entries */
PRINTF(" Lastsect:%08lx\n",lastsect);
for(i=blkaddr;i<lastsect;i++) {
+ PRINTF("Reading block %d\n", i);
if (dev_desc->block_read (dev_desc->dev, i, 1, (ulong *) tmpbuf) != 1)
return (-1);
if(ppr->desctype==0x00)
diff --git a/disk/part_mac.h b/disk/part_mac.h
index 0340fe8febd..fb1edac561e 100644
--- a/disk/part_mac.h
+++ b/disk/part_mac.h
@@ -89,6 +89,9 @@ typedef struct mac_partition {
__u32 boot_cksum; /* boot code checksum */
uchar processor[16]; /* Type of Processor */
__u16 part_pad[188]; /* reserved */
+#ifdef CONFIG_ISO_PARTITION
+ uchar iso_dummy[2048];/* Reservere enough room for an ISO partition block to fit */
+#endif
} mac_partition_t;
#define MAC_STATUS_BOOTABLE 8 /* partition is bootable */
diff --git a/doc/README.amigaone b/doc/README.amigaone
new file mode 100644
index 00000000000..99759779171
--- /dev/null
+++ b/doc/README.amigaone
@@ -0,0 +1,12 @@
+AmigaOne U-Boot and the SciTech emulator
+
+The directory board/MAI/bios_emulator contains the source code
+of the SciTech x86 emulator. This emulator is normally available
+under a BSD license. However, SciTech kindly gave us permission
+to use their emulator in PPCBoot for the AmigaOne. It's available
+in this form only under GPL.
+
+Thanks to Kendall Bennett and the rest of the team at SciTech.
+See http://www.scitechsoft.com for their web site
+
+The GPL license can be found at http://www.gnu.org/licenses/gpl.html
diff --git a/drivers/pci.c b/drivers/pci.c
index 52584ce62bf..dc58abfe484 100644
--- a/drivers/pci.c
+++ b/drivers/pci.c
@@ -421,8 +421,11 @@ void pci_cfgfunc_do_nothing(struct pci_controller *hose,
*
*/
+/* HJF: Changed this to return int. I think this is required
+ * to get the correct result when scanning bridges
+ */
+extern int pciauto_config_device(struct pci_controller *hose, pci_dev_t dev);
extern void pciauto_config_init(struct pci_controller *hose);
-extern void pciauto_config_device(struct pci_controller *hose, pci_dev_t dev);
int pci_hose_scan_bus(struct pci_controller *hose, int bus)
{
@@ -451,8 +454,7 @@ int pci_hose_scan_bus(struct pci_controller *hose, int bus)
pci_hose_read_config_word(hose, dev, PCI_VENDOR_ID, &vendor);
- if (vendor != 0xffff && vendor != 0x0000)
- {
+ if (vendor != 0xffff && vendor != 0x0000) {
if (!PCI_FUNC(dev))
found_multi = header_type & 0x80;
@@ -465,12 +467,15 @@ int pci_hose_scan_bus(struct pci_controller *hose, int bus)
cfg = pci_find_config(hose, class, vendor, device,
PCI_BUS(dev), PCI_DEV(dev), PCI_FUNC(dev));
- if (cfg)
+ if (cfg) {
cfg->config_device(hose, dev, cfg);
#ifdef CONFIG_PCI_PNP
- else
- pciauto_config_device(hose, dev);
+ } else {
+ int n = pciauto_config_device(hose, dev);
+
+ sub_bus = max(sub_bus, n);
#endif
+ }
if (hose->fixup_irq)
hose->fixup_irq(hose, dev);
diff --git a/drivers/pci_auto.c b/drivers/pci_auto.c
index f665ee6fec6..295f7c848d2 100644
--- a/drivers/pci_auto.c
+++ b/drivers/pci_auto.c
@@ -277,11 +277,15 @@ void pciauto_config_init(struct pci_controller *hose)
}
}
-void pciauto_config_device(struct pci_controller *hose, pci_dev_t dev)
+/* HJF: Changed this to return int. I think this is required
+ * to get the correct result when scanning bridges
+ */
+int pciauto_config_device(struct pci_controller *hose, pci_dev_t dev)
{
- unsigned int sub_bus;
+ unsigned int sub_bus = PCI_BUS(dev);
unsigned short class;
unsigned char prg_iface;
+ int n;
pci_hose_read_config_word(hose, dev, PCI_CLASS_DEVICE, &class);
@@ -290,13 +294,25 @@ void pciauto_config_device(struct pci_controller *hose, pci_dev_t dev)
case PCI_CLASS_BRIDGE_PCI:
pciauto_setup_device(hose, dev, 2, hose->pci_mem, hose->pci_io);
- DEBUGF("PCI Autoconfig: Found P2P bridge, device %d\n", PCI_DEV(dev));
+ DEBUGF("PCI Autoconfig: Found P2P bridge, device %d\n",
+ PCI_DEV(dev));
+
+ /* HJF: Make sure two bridges on the same bus
+ * won't get the same bus number
+ */
+ pciauto_prescan_setup_bridge(hose, dev,
+ max(sub_bus, hose->current_busno));
- pciauto_prescan_setup_bridge(hose, dev, PCI_BUS(dev));
+ n = pci_hose_scan_bus(hose, hose->current_busno+1 /*PCI_BUS(dev)+1*/);
+ sub_bus = max(sub_bus, n);
+ sub_bus = max(sub_bus, hose->current_busno);
- sub_bus = pci_hose_scan_bus(hose, PCI_BUS(dev)+1);
+ DEBUGF("PCI Autoconfig: Got %d from pci_hose_scan_bus\n",
+ sub_bus);
- pciauto_postscan_setup_bridge(hose, dev, sub_bus);
+ pciauto_postscan_setup_bridge(hose, dev,
+ max(sub_bus, hose->current_busno));
+ hose->current_busno++;
break;
case PCI_CLASS_STORAGE_IDE:
@@ -304,7 +320,7 @@ void pciauto_config_device(struct pci_controller *hose, pci_dev_t dev)
if (!(prg_iface & PCIAUTO_IDE_MODE_MASK))
{
DEBUGF("PCI Autoconfig: Skipping legacy mode IDE controller\n");
- return;
+ return sub_bus;
}
pciauto_setup_device(hose, dev, 6, hose->pci_mem, hose->pci_io);
@@ -314,6 +330,8 @@ void pciauto_config_device(struct pci_controller *hose, pci_dev_t dev)
pciauto_setup_device(hose, dev, 6, hose->pci_mem, hose->pci_io);
break;
}
+
+ return sub_bus;
}
#endif /* CONFIG_PCI */
diff --git a/examples/syscall.S b/examples/syscall.S
index 9934490433d..a952fd7744c 100644
--- a/examples/syscall.S
+++ b/examples/syscall.S
@@ -75,4 +75,6 @@ name: ; \
SYSCALL(mon_free_hdlr,SYSCALL_FREE_HDLR)
SYSCALL(mon_malloc,SYSCALL_MALLOC)
SYSCALL(mon_free,SYSCALL_FREE)
+ SYSCALL(mon_udelay,SYSCALL_UDELAY)
+ SYSCALL(mon_get_timer,SYSCALL_GET_TIMER)
#endif /* CONFIG_ARM XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX */
diff --git a/include/asm-ppc/global_data.h b/include/asm-ppc/global_data.h
index 7cf234d1847..34701803ffe 100644
--- a/include/asm-ppc/global_data.h
+++ b/include/asm-ppc/global_data.h
@@ -62,6 +62,9 @@ typedef struct global_data {
#if defined(CONFIG_SANDPOINT) || defined(CONFIG_MUSENKI)
void * console_addr;
#endif
+#ifdef CONFIG_AMIGAONEG3SE
+ unsigned long relocaddr; /* Start address of U-Boot in RAM */
+#endif
#if defined(CONFIG_LCD) || defined(CONFIG_VIDEO)
unsigned long fb_base; /* Base address of framebuffer memory */
#endif
diff --git a/include/cmd_boota.h b/include/cmd_boota.h
new file mode 100644
index 00000000000..3ec31183b4a
--- /dev/null
+++ b/include/cmd_boota.h
@@ -0,0 +1,42 @@
+/*
+ * (C) Copyright 2001
+ * Thomas Frieden, Hyperion Entertainment
+ * ThomasF@hyperion-entertainment.com
+ *
+ * See file CREDITS for list of people who contributed to this
+ * project.
+ *
+ * This program is free software; you can redistribute it and/or
+ * modify it under the terms of the GNU General Public License as
+ * published by the Free Software Foundation; either version 2 of
+ * the License, or (at your option) any later version.
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with this program; if not, write to the Free Software
+ * Foundation, Inc., 59 Temple Place, Suite 330, Boston,
+ * MA 02111-1307 USA
+ */
+#ifndef _CMD_BOOTA_H
+#define _CMD_BOOTA_H
+
+#include <common.h>
+#include <command.h>
+
+#if defined(CONFIG_AMIGAONEG3SE) && (CONFIG_COMMANDS & CFG_CMD_BSP)
+#define CMD_TBL_BOOTA MK_CMD_TBL_ENTRY( \
+ "boota", 5, 3, 1, do_boota, \
+ "boota - boot an Amiga kernel\n", \
+ "address disk" \
+),
+
+int do_boota (cmd_tbl_t *cmdtp, int flag, int argc, char *argv[] );
+#else
+#define CMD_TBL_BOOTA
+#endif
+
+#endif /* _CMD_BOOTA_H */
diff --git a/include/cmd_bsp.h b/include/cmd_bsp.h
index b39d50bd27c..e4b10414b34 100644
--- a/include/cmd_bsp.h
+++ b/include/cmd_bsp.h
@@ -1,5 +1,5 @@
/*
- * (C) Copyright 2001
+ * (C) Copyright 2001, 2002
* Wolfgang Denk, DENX Software Engineering, wd@denx.de.
*
* See file CREDITS for list of people who contributed to this
@@ -29,7 +29,7 @@
#if (CONFIG_COMMANDS & CFG_CMD_BSP)
-/* ----- LWMON -----------------------------------------------------------------
+/* ----- LWMON ---------------------------------------------------------
*/
#if defined(CONFIG_LWMON)
@@ -54,10 +54,9 @@ int do_kbd (cmd_tbl_t *cmdtp, int flag, int argc, char *argv[]);
int do_lsb (cmd_tbl_t *cmdtp, int flag, int argc, char *argv[]);
#endif /* CONFIG_LWMON */
-/* ----------------------------------------------------------------------------*/
+/* -------------------------------------------------------------------- */
-/* ----- PCU E -----------------------------------------------------------------
- */
+/* ----- PCU E -------------------------------------------------------- */
#if defined(CONFIG_PCU_E)
#define CMD_TBL_BSP MK_CMD_TBL_ENTRY( \
@@ -69,10 +68,9 @@ int do_lsb (cmd_tbl_t *cmdtp, int flag, int argc, char *argv[]);
int do_puma (cmd_tbl_t *cmdtp, int flag, int argc, char *argv[]);
#endif /* CONFIG_PCU_E */
-/* ----------------------------------------------------------------------------*/
+/* -------------------------------------------------------------------- */
-/* ----- CCM/SCM ---------------------------------------------------------------
- */
+/* ----- CCM/SCM ------------------------------------------------------ */
#if defined(CONFIG_CCM) || defined(CONFIG_SCM)
#define CMD_TBL_BSP MK_CMD_TBL_ENTRY( \
@@ -85,10 +83,9 @@ int do_puma (cmd_tbl_t *cmdtp, int flag, int argc, char *argv[]);
int do_fpga (cmd_tbl_t *cmdtp, int flag, int argc, char *argv[]);
#endif /* CONFIG_CCM, CONFIG_SCM */
-/* ----------------------------------------------------------------------------*/
+/* -------------------------------------------------------------------- */
-/* ----- PIP405 -----------------------------------------------------------------
- */
+/* ----- PIP405 ------------------------------------------------------- */
#if defined(CONFIG_PIP405)
#define CMD_TBL_BSP MK_CMD_TBL_ENTRY( \
@@ -101,9 +98,9 @@ int do_fpga (cmd_tbl_t *cmdtp, int flag, int argc, char *argv[]);
int do_pip405 (cmd_tbl_t *cmdtp, int flag, int argc, char *argv[]);
#endif /* CONFIG_PIP405 */
-/* ----------------------------------------------------------------------------*/
-/* ----- MIP405 -----------------------------------------------------------------
- */
+/* -------------------------------------------------------------------- */
+
+/* ----- MIP405 ------------------------------------------------------- */
#if defined(CONFIG_MIP405)
#define CMD_TBL_BSP MK_CMD_TBL_ENTRY( \
@@ -115,10 +112,9 @@ int do_pip405 (cmd_tbl_t *cmdtp, int flag, int argc, char *argv[]);
int do_mip405 (cmd_tbl_t *cmdtp, int flag, int argc, char *argv[]);
#endif /* CONFIG_MIP405 */
-/* ----------------------------------------------------------------------------*/
+/* -------------------------------------------------------------------- */
-/* ----- DASA_SIM ---------------------------------------------------------------
- */
+/* ----- DASA_SIM ----------------------------------------------------- */
#if defined(CONFIG_DASA_SIM)
#define CMD_TBL_BSP MK_CMD_TBL_ENTRY( \
@@ -130,10 +126,9 @@ int do_mip405 (cmd_tbl_t *cmdtp, int flag, int argc, char *argv[]);
int do_pci9054 (cmd_tbl_t *cmdtp, int flag, int argc, char *argv[]);
#endif /* CONFIG_DASA_SIM */
-/* ----------------------------------------------------------------------------*/
+/* -------------------------------------------------------------------- */
-/* ----- HYMOD -----------------------------------------------------------------
- */
+/* ----- HYMOD -------------------------------------------------------- */
#if defined(CONFIG_HYMOD)
#define CMD_TBL_BSP MK_CMD_TBL_ENTRY( \
@@ -171,8 +166,9 @@ int do_fpga (cmd_tbl_t *cmdtp, int flag, int argc, char *argv[]);
int do_eecl (cmd_tbl_t *cmdtp, int flag, int argc, char *argv[]);
#endif /* CONFIG_HYMOD */
-/* ----------------------------------------------------------------------------*/
-/* CRAY405 (L1) */
+/* -------------------------------------------------------------------- */
+
+/* ----- CRAY405 (L1) ------------------------------------------------- */
#if defined (CONFIG_CRAYL1)
#define CMD_TBL_BSP MK_CMD_TBL_ENTRY( \
"L1cmd", 5, 4, 1, do_crayL1, \
@@ -182,10 +178,10 @@ int do_eecl (cmd_tbl_t *cmdtp, int flag, int argc, char *argv[]);
),
int do_crayL1 (cmd_tbl_t *cmdtp, int flag, int argc, char *argv[]);
#endif /* CONFIG_CRAY405 */
-/* ----------------------------------------------------------------------------*/
+/* -------------------------------------------------------------------- */
+/* ----- EVB64260 ----------------------------------------------------- */
#if defined (CONFIG_EVB64260)
-/* ----- EVB64260 -------------------------------------------------------------*/
#ifdef CONFIG_ZUMA_V2
#define CMD_TBL_BSP ZUMA_TBL_ENTRY
@@ -218,9 +214,9 @@ int zuma_test_dma(int cmd, int size);
#endif /* ZUMA_NTL */
#endif /* CONFIG_EVB64260 */
-/* ----------------------------------------------------------------------------*/
+/* -------------------------------------------------------------------- */
-/* -----W7O--------------------------------------------------------------------*/
+/* -----W7O------------------------------------------------------------ */
#if defined(CONFIG_W7O)
#define CMD_TBL_BSP MK_CMD_TBL_ENTRY( \
@@ -233,18 +229,18 @@ int zuma_test_dma(int cmd, int size);
extern int do_vpd (cmd_tbl_t *, int, int, char *[]);
#endif /* CONFIG_W7O */
-/* ----------------------------------------------------------------------------*/
+/* -------------------------------------------------------------------- */
-/* ---- PCIPPC2 / PCIPPC6 -----------------------------------------------------*/
+/* ---- PCIPPC2 / PCIPPC6 --------------------------------------------- */
#if defined(CONFIG_PCIPPC2) || defined(CONFIG_PCIPPC6)
#if defined(CONFIG_WATCHDOG)
#define CMD_TBL_BSP MK_CMD_TBL_ENTRY( \
- "wd", 3, 2, 1, do_wd, \
- "wd - check and set watchdog\n", \
- "on - switch watchDog on\n" \
- "wd off - switch watchdog off\n" \
- "wd - print current status\n" \
+ "wd", 3, 2, 1, do_wd, \
+ "wd - check and set watchdog\n", \
+ "on - switch watchDog on\n" \
+ "wd off - switch watchdog off\n" \
+ "wd - print current status\n" \
),
extern int do_wd (cmd_tbl_t *, int, int, char *[]);
@@ -254,9 +250,9 @@ extern int do_wd (cmd_tbl_t *, int, int, char *[]);
#endif /* CONFIG_WATCHDOG */
#endif /* CONFIG_PCIPPC2 , CONFIG_PCIPPC6 */
-/* ----------------------------------------------------------------------------*/
+/* -------------------------------------------------------------------- */
-/* ----- PN62 -----------------------------------------------------------------*/
+/* ----- PN62 --------------------------------------------------------- */
#if defined(CONFIG_PN62)
#define CMD_TBL_BSP MK_CMD_TBL_ENTRY( \
@@ -274,40 +270,46 @@ extern int do_wd (cmd_tbl_t *, int, int, char *[]);
extern int do_loadpci (cmd_tbl_t *, int, int, char *[]);
extern int do_led (cmd_tbl_t *, int, int, char *[]);
#endif /* CONFIG_PN62 */
-/* ----------------------------------------------------------------------------*/
+/* -------------------------------------------------------------------- */
-/* ----- TRAB ------------------------------------------------------------------
- */
+/* ----- TRAB --------------------------------------------------------- */
#if defined(CONFIG_TRAB)
-#define CMD_TBL_BSP MK_CMD_TBL_ENTRY( \
- "kbd", 3, 1, 1, do_kbd, \
- "kbd - read keyboard status\n", \
- NULL \
+#define CMD_TBL_BSP MK_CMD_TBL_ENTRY( \
+ "kbd", 3, 1, 1, do_kbd, \
+ "kbd - read keyboard status\n", \
+ NULL \
),
int do_kbd (cmd_tbl_t *cmdtp, int flag, int argc, char *argv[]);
#endif /* CONFIG_TRAB */
-/* ----------------------------------------------------------------------------*/
+/* -------------------------------------------------------------------- */
-#else
-#define CMD_TBL_BSP
-#endif /* CFG_CMD_BSP */
-
-/* ----- R360MPI ---------------------------------------------------------------
- */
+/* ----- R360MPI ------------------------------------------------------ */
#if defined(CONFIG_R360MPI)
-#define CMD_TBL_BSP MK_CMD_TBL_ENTRY( \
- "kbd", 3, 1, 1, do_kbd, \
- "kbd - read keyboard status\n", \
- NULL \
+#define CMD_TBL_BSP MK_CMD_TBL_ENTRY( \
+ "kbd", 3, 1, 1, do_kbd, \
+ "kbd - read keyboard status\n", \
+ NULL \
),
int do_kbd (cmd_tbl_t *cmdtp, int flag, int argc, char *argv[]);
#endif /* CONFIG_R360MPI */
-/* ----------------------------------------------------------------------------*/
+/* -------------------------------------------------------------------- */
+
+/* ------ AMIGAONEG3SE ------------------------------------------------ */
+#if defined(CONFIG_AMIGAONEG3SE)
+
+#define CMD_TBL_BSP /* dummy */
+
+#endif /* AmigaOneG3SE */
+/* -------------------------------------------------------------------- */
+
+#else
+#define CMD_TBL_BSP
+#endif /* CFG_CMD_BSP */
#endif /* _CMD_BSP_H_ */
diff --git a/include/cmd_confdefs.h b/include/cmd_confdefs.h
index 25f386b95cc..c462c3f425d 100644
--- a/include/cmd_confdefs.h
+++ b/include/cmd_confdefs.h
@@ -12,7 +12,7 @@
*
* This program is distributed in the hope that it will be useful,
* but WITHOUT ANY WARRANTY; without even the implied warranty of
- * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
* GNU General Public License for more details.
*
* You should have received a copy of the GNU General Public License
@@ -24,8 +24,8 @@
/*
* Definitions for Configuring the monitor commands
*/
-#ifndef _CMD_CONFIG_H
-#define _CMD_CONFIG_H
+#ifndef _CMD_CONFIG_H
+#define _CMD_CONFIG_H
/*
* Configurable monitor commands
@@ -42,27 +42,27 @@
#define CFG_CMD_ENV 0x00000100 /* saveenv */
#define CFG_CMD_KGDB 0x00000200 /* kgdb */
#define CFG_CMD_PCMCIA 0x00000400 /* PCMCIA support */
-#define CFG_CMD_IDE 0x00000800 /* IDE harddisk support */
-#define CFG_CMD_PCI 0x00001000 /* pciinfo */
-#define CFG_CMD_IRQ 0x00002000 /* irqinfo */
+#define CFG_CMD_IDE 0x00000800 /* IDE harddisk support */
+#define CFG_CMD_PCI 0x00001000 /* pciinfo */
+#define CFG_CMD_IRQ 0x00002000 /* irqinfo */
#define CFG_CMD_BOOTD 0x00004000 /* bootd */
#define CFG_CMD_CONSOLE 0x00008000 /* coninfo */
#define CFG_CMD_EEPROM 0x00010000 /* EEPROM read/write support */
-#define CFG_CMD_ASKENV 0x00020000 /* ask for env variable */
-#define CFG_CMD_RUN 0x00040000 /* run command in env variable */
-#define CFG_CMD_ECHO 0x00080000 /* echo arguments */
-#define CFG_CMD_I2C 0x00100000 /* I2C serial bus support */
-#define CFG_CMD_REGINFO 0x00200000 /* Register dump */
-#define CFG_CMD_IMMAP 0x00400000 /* IMMR dump support */
-#define CFG_CMD_DATE 0x00800000 /* support for RTC, date/time...*/
+#define CFG_CMD_ASKENV 0x00020000 /* ask for env variable */
+#define CFG_CMD_RUN 0x00040000 /* run command in env variable */
+#define CFG_CMD_ECHO 0x00080000 /* echo arguments */
+#define CFG_CMD_I2C 0x00100000 /* I2C serial bus support */
+#define CFG_CMD_REGINFO 0x00200000 /* Register dump */
+#define CFG_CMD_IMMAP 0x00400000 /* IMMR dump support */
+#define CFG_CMD_DATE 0x00800000 /* support for RTC, date/time...*/
#define CFG_CMD_DHCP 0x01000000 /* DHCP Support */
#define CFG_CMD_BEDBUG 0x02000000 /* Include BedBug Debugger */
-#define CFG_CMD_FDC 0x04000000 /* Floppy Disk Support */
-#define CFG_CMD_SCSI 0x08000000 /* SCSI Support */
-#define CFG_CMD_AUTOSCRIPT 0x10000000 /* Autoscript Support */
-#define CFG_CMD_MII 0x20000000 /* MII support */
+#define CFG_CMD_FDC 0x04000000 /* Floppy Disk Support */
+#define CFG_CMD_SCSI 0x08000000 /* SCSI Support */
+#define CFG_CMD_AUTOSCRIPT 0x10000000 /* Autoscript Support */
+#define CFG_CMD_MII 0x20000000 /* MII support */
#define CFG_CMD_SETGETDCR 0x40000000 /* DCR support on 4xx */
-#define CFG_CMD_BSP 0x80000000 /* Board Specific functions */
+#define CFG_CMD_BSP 0x80000000 /* Board Specific functions */
#define CFG_CMD_ELF 0x0000000100000000 /* ELF (VxWorks) load/boot cmd */
#define CFG_CMD_MISC 0x0000000200000000 /* Misc functions like sleep etc*/
@@ -70,13 +70,14 @@
#define CFG_CMD_DOC 0x0000000800000000 /* Disk-On-Chip Support */
#define CFG_CMD_JFFS2 0x0000001000000000 /* JFFS2 Support */
#define CFG_CMD_DTT 0x0000002000000000 /* Digital Therm and Thermostat */
-#define CFG_CMD_SDRAM 0x0000004000000000 /* SDRAM DIMM SPD info printout */
+#define CFG_CMD_SDRAM 0x0000004000000000 /* SDRAM DIMM SPD info printout */
#define CFG_CMD_DIAG 0x0000008000000000 /* Diagnostics */
-#define CFG_CMD_FPGA 0x0000010000000000 /* FPGA configuration Support */
+#define CFG_CMD_FPGA 0x0000010000000000 /* FPGA configuration Support */
#define CFG_CMD_HWFLOW 0x0000020000000000 /* RTS/CTS hw flow control */
#define CFG_CMD_SAVES 0x0000040000000000 /* save S record dump */
#define CFG_CMD_SPI 0x0000100000000000 /* SPI utility */
-#define CFG_CMD_FDOS 0x0000200000000000 /* Floppy DOS support */
+#define CFG_CMD_FDOS 0x0000200000000000 /* Floppy DOS support */
+#define CFG_CMD_VFD 0x0000400000000000 /* VFD support (TRAB) */
#define CFG_CMD_ALL 0xFFFFFFFFFFFFFFFF /* ALL commands */
@@ -96,7 +97,7 @@
CFG_CMD_EEPROM | \
CFG_CMD_ELF | \
CFG_CMD_FDC | \
- CFG_CMD_FDOS | \
+ CFG_CMD_FDOS | \
CFG_CMD_HWFLOW | \
CFG_CMD_I2C | \
CFG_CMD_IDE | \
@@ -107,7 +108,7 @@
CFG_CMD_MII | \
CFG_CMD_PCI | \
CFG_CMD_PCMCIA | \
- CFG_CMD_REGINFO | \
+ CFG_CMD_REGINFO | \
CFG_CMD_SAVES | \
CFG_CMD_SCSI | \
CFG_CMD_SDRAM | \
@@ -117,10 +118,10 @@
/* Default configuration
*/
-#define CONFIG_CMD_DFL (CFG_CMD_ALL & ~CFG_CMD_NONSTD)
+#define CONFIG_CMD_DFL (CFG_CMD_ALL & ~CFG_CMD_NONSTD)
#ifndef CONFIG_COMMANDS
-#define CONFIG_COMMANDS CONFIG_CMD_DFL
+#define CONFIG_COMMANDS CONFIG_CMD_DFL
#endif
diff --git a/include/cmd_menu.h b/include/cmd_menu.h
new file mode 100644
index 00000000000..ad1bd7fdc18
--- /dev/null
+++ b/include/cmd_menu.h
@@ -0,0 +1,42 @@
+/*
+ * (C) Copyright 2001
+ * Hans-Jörg Frieden, Hyperion Entertainment
+ * Hans-JoergF@hyperion-entertainment.com
+ *
+ * See file CREDITS for list of people who contributed to this
+ * project.
+ *
+ * This program is free software; you can redistribute it and/or
+ * modify it under the terms of the GNU General Public License as
+ * published by the Free Software Foundation; either version 2 of
+ * the License, or (at your option) any later version.
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with this program; if not, write to the Free Software
+ * Foundation, Inc., 59 Temple Place, Suite 330, Boston,
+ * MA 02111-1307 USA
+ */
+#ifndef _CMD_MENU_H
+#define _CMD_MENU_H
+
+#include <common.h>
+#include <command.h>
+
+#if defined(CONFIG_AMIGAONEG3SE) && (CONFIG_COMMANDS & CFG_CMD_BSP)
+#define CMD_TBL_MENU MK_CMD_TBL_ENTRY( \
+ "menu", 3, 1, 1, do_menu, \
+ "menu - display BIOS setup menu\n", \
+ "" \
+),
+
+int do_menu( cmd_tbl_t *cmdtp, int flag, int argc, char *argv[] );
+#else
+#define CMD_TBL_MENU
+#endif
+
+#endif /* _CMD_MENU_H */
diff --git a/include/common.h b/include/common.h
index a950cdcc40c..d9d5702a97c 100644
--- a/include/common.h
+++ b/include/common.h
@@ -80,6 +80,18 @@ typedef void (interrupt_handler_t)(void *);
#endif
+/*
+ * General Purpose Utilities
+ */
+#define min(X, Y) \
+ ({ typeof (X) __x = (X), __y = (Y); \
+ (__x < __y) ? __x : __y; })
+
+#define max(X, Y) \
+ ({ typeof (X) __x = (X), __y = (Y); \
+ (__x > __y) ? __x : __y; })
+
+
/*
* Function Prototypes
*/
diff --git a/include/configs/AmigaOneG3SE.h b/include/configs/AmigaOneG3SE.h
new file mode 100644
index 00000000000..7e40c533482
--- /dev/null
+++ b/include/configs/AmigaOneG3SE.h
@@ -0,0 +1,383 @@
+/*
+ * (C) Copyright 2002
+ * Wolfgang Denk, DENX Software Engineering, wd@denx.de.
+ *
+ * See file CREDITS for list of people who contributed to this
+ * project.
+ *
+ * This program is free software; you can redistribute it and/or
+ * modify it under the terms of the GNU General Public License as
+ * published by the Free Software Foundation; either version 2 of
+ * the License, or (at your option) any later version.
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with this program; if not, write to the Free Software
+ * Foundation, Inc., 59 Temple Place, Suite 330, Boston,
+ * MA 02111-1307 USA
+ */
+
+/*
+ *
+ * Configuration settings for the AmigaOneG3SE board.
+ *
+ */
+
+/* ------------------------------------------------------------------------- */
+
+/*
+ * board/config.h - configuration options, board specific
+ */
+
+#ifndef __CONFIG_H
+#define __CONFIG_H
+
+/*
+ * High Level Configuration Options
+ * (easy to change)
+ */
+
+#define CONFIG_AMIGAONEG3SE 1
+
+#define CONFIG_BOARD_PRE_INIT 1
+#define CONFIG_MISC_INIT_R 1
+
+#define CONFIG_VERY_BIG_RAM 1
+
+#define CONFIG_CONS_INDEX 1
+#define CONFIG_BAUDRATE 9600
+#define CFG_BAUDRATE_TABLE { 9600, 19200, 38400, 57600, 115200 }
+
+#undef CONFIG_CLOCKS_IN_MHZ /* clocks passed to Linux in Hz */
+
+#define CONFIG_BOOTARGS "root=/dev/ram rw ramdisk=4096"
+
+#define CONFIG_BOOTP_MASK (CONFIG_BOOTP_DEFAULT | \
+ CONFIG_BOOTP_BOOTFILESIZE)
+
+#define CONFIG_MAC_PARTITION
+#define CONFIG_DOS_PARTITION
+#define CONFIG_AMIGA_PARTITION
+
+#define CONFIG_COMMANDS (CONFIG_CMD_DFL | \
+ CFG_CMD_ASKENV | \
+ CFG_CMD_BSP | \
+ CFG_CMD_DATE | \
+ CFG_CMD_DHCP | \
+ CFG_CMD_ELF | \
+ CFG_CMD_NET | \
+ CFG_CMD_IDE | \
+ CFG_CMD_FDC | \
+ CFG_CMD_CACHE | \
+ CFG_CMD_CONSOLE| \
+ CFG_CMD_USB | \
+ CFG_CMD_BSP | \
+ CFG_CMD_PCI )
+
+/* CFG_CMD_MII | \ */
+
+#define CONFIG_PCI 1
+/* #define CONFIG_PCI_SCAN_SHOW 1 */
+#define CONFIG_PCI_PNP 1 /* PCI plug-and-play */
+
+/* This must be included AFTER the definition of CONFIG_COMMANDS (if any)
+ */
+#include <cmd_confdefs.h>
+
+
+/*
+ * Miscellaneous configurable options
+ */
+#define CFG_LONGHELP /* undef to save memory */
+#define CFG_PROMPT "=> " /* Monitor Command Prompt */
+
+#define CFG_HUSH_PARSER 1 /* use "hush" command parser */
+/* #undef CFG_HUSH_PARSER */
+#ifdef CFG_HUSH_PARSER
+#define CFG_PROMPT_HUSH_PS2 "> "
+#endif
+#define CFG_CBSIZE 1024 /* Console I/O Buffer Size */
+
+/* Print Buffer Size
+ */
+#define CFG_PBSIZE (CFG_CBSIZE + sizeof(CFG_PROMPT) + 16)
+
+#define CFG_MAXARGS 64 /* max number of command args */
+#define CFG_BARGSIZE CFG_CBSIZE /* Boot Argument Buffer Size */
+#define CFG_LOAD_ADDR 0x00500000 /* Default load address */
+
+/*-----------------------------------------------------------------------
+ * Start addresses for the final memory configuration
+ * (Set up by the startup code)
+ * Please note that CFG_SDRAM_BASE _must_ start at 0
+ */
+#define CFG_SDRAM_BASE 0x00000000
+#define CFG_FLASH_BASE 0xFFF00000
+#define CFG_FLASH_MAX_SIZE 0x00080000
+/* Maximum amount of RAM.
+ */
+#define CFG_MAX_RAM_SIZE 0x80000000 /* 2G */
+
+#define CFG_RESET_ADDRESS 0xFFF00100
+
+#define CFG_MONITOR_BASE TEXT_BASE
+
+#define CFG_MONITOR_LEN (768 << 10) /* Reserve 512 kB for Monitor */
+#define CFG_MALLOC_LEN (2500 << 10) /* Reserve 128 kB for malloc() */
+
+#if CFG_MONITOR_BASE >= CFG_SDRAM_BASE && \
+ CFG_MONITOR_BASE < CFG_SDRAM_BASE + CFG_MAX_RAM_SIZE
+#define CFG_RAMBOOT
+#else
+#undef CFG_RAMBOOT
+#endif
+
+#define CFG_MEMTEST_START 0x00004000 /* memtest works on */
+#define CFG_MEMTEST_END 0x02000000 /* 0 ... 32 MB in DRAM */
+
+/*-----------------------------------------------------------------------
+ * Definitions for initial stack pointer and data area
+ */
+
+/* Size in bytes reserved for initial data
+ */
+#define CFG_INIT_RAM_ADDR 0x400000
+#define CFG_INIT_RAM_END 0x8000
+#define CFG_GBL_DATA_SIZE 128
+#define CFG_GBL_DATA_OFFSET (CFG_INIT_RAM_END - CFG_GBL_DATA_SIZE)
+#define CFG_INIT_SP_OFFSET CFG_GBL_DATA_OFFSET
+
+#define CFG_INIT_RAM_LOCK
+
+/*
+ * Temporary buffer for serial data until the real serial driver
+ * is initialised (memtest will destroy this buffer)
+ */
+#define CFG_SCONSOLE_ADDR CFG_INIT_RAM_ADDR
+#define CFG_SCONSOLE_SIZE 0x0002000
+
+/* SDRAM 0 - 256MB
+ */
+
+#define CFG_IBAT0L (CFG_SDRAM_BASE | BATL_PP_RW | BATL_CACHEINHIBIT)
+#define CFG_IBAT0U (CFG_SDRAM_BASE | BATU_BL_4M | BATU_VS | BATU_VP)
+#define CFG_DBAT0L (CFG_SDRAM_BASE | BATL_PP_RW | BATL_CACHEINHIBIT)
+#define CFG_DBAT0U CFG_IBAT0U
+
+/* SDRAM 1 - 256MB
+ */
+#define CFG_IBAT1L ((CFG_SDRAM_BASE+CFG_INIT_RAM_ADDR) | BATL_PP_RW) /* | BATL_CACHEINHIBIT) */
+#define CFG_IBAT1U ((CFG_SDRAM_BASE+CFG_INIT_RAM_ADDR) | BATU_BL_256M | BATU_VS | BATU_VP)
+#define CFG_DBAT1L ((CFG_SDRAM_BASE+CFG_INIT_RAM_ADDR + 0x20000) | BATL_PP_RW ) /* | BATL_CACHEINHIBIT) */
+#define CFG_DBAT1U ((CFG_SDRAM_BASE+CFG_INIT_RAM_ADDR + 0x20000) | BATU_BL_256M | BATU_VS | BATU_VP)
+
+/* Init RAM in the CPU DCache (no backing memory)
+ */
+#define CFG_DBAT2L (CFG_INIT_RAM_ADDR | BATL_PP_RW | BATL_MEMCOHERENCE)
+#define CFG_DBAT2U (CFG_INIT_RAM_ADDR | BATU_BL_128K | BATU_VS | BATU_VP)
+#define CFG_IBAT2L 0 /* CFG_DBAT2L */
+#define CFG_IBAT2U 0 /* CFG_DBAT2U */
+
+/* I/O and PCI memory at 0xf0000000
+ */
+#define CFG_DBAT3L (0xf0000000 | BATL_PP_RW | BATL_CACHEINHIBIT | BATL_GUARDEDSTORAGE)
+#define CFG_DBAT3U (0xf0000000 | BATU_BL_256M | BATU_VS | BATU_VP)
+
+#define CFG_IBAT3L (0xf0000000 | BATL_PP_RW | BATL_CACHEINHIBIT)
+#define CFG_IBAT3U (0xf0000000 | BATU_BL_256M | BATU_VS | BATU_VP)
+
+/*
+ * Low Level Configuration Settings
+ * (address mappings, register initial values, etc.)
+ */
+#define CFG_HZ 1000
+#define CFG_BUS_HZ 133000000 /* bus speed - 100 mhz */
+#define CFG_CPU_CLK 133000000
+#define CFG_BUS_CLK 133000000
+
+/*
+ * For booting Linux, the board info and command line data
+ * have to be in the first 8 MB of memory, since this is
+ * the maximum mapped by the Linux kernel during initialization.
+ */
+#define CFG_BOOTMAPSZ (8 << 20) /* Initial Memory map for Linux */
+
+/*-----------------------------------------------------------------------
+ * FLASH organization
+ */
+#define CFG_MAX_FLASH_BANKS 1 /* Max number of flash banks */
+#define CFG_MAX_FLASH_SECT 8 /* Max number of sectors in one bank */
+
+#define CFG_FLASH_ERASE_TOUT 120000 /* Timeout for Flash Erase (in ms) */
+#define CFG_FLASH_WRITE_TOUT 1000 /* Timeout for Flash Write (in ms) */
+
+/*
+ * Environment is stored in NVRAM.
+ */
+#define CFG_ENV_IS_IN_NVRAM 1
+#define CFG_ENV_ADDR 0xFD0E0000 /* This should be 0xFD0E0000, but we skip bytes to
+ * protect softex's settings for now.
+ * Original 768 bytes where not enough.
+ */
+#define CFG_ENV_SIZE 0x8000 /* Size of the Environment. See comment above */
+
+#define CFG_CONSOLE_IS_IN_ENV 1 /* stdin/stdout/stderr are in environment */
+#define CFG_CONSOLE_OVERWRITE_ROUTINE 1
+#define CONFIG_ENV_OVERWRITE 1
+
+/*-----------------------------------------------------------------------
+ * Cache Configuration
+ */
+#define CFG_CACHELINE_SIZE 32
+#if (CONFIG_COMMANDS & CFG_CMD_KGDB)
+# define CFG_CACHELINE_SHIFT 5 /* log base 2 of the above value */
+#endif
+
+/*
+ * L2 cache
+ */
+#define CFG_L2
+#define L2_INIT (L2CR_L2SIZ_2M | L2CR_L2CLK_3 | L2CR_L2RAM_BURST | \
+ L2CR_L2OH_5 | L2CR_L2CTL | L2CR_L2WT)
+#define L2_ENABLE (L2_INIT | L2CR_L2E)
+
+/*
+ * Internal Definitions
+ *
+ * Boot Flags
+ */
+#define BOOTFLAG_COLD 0x01 /* Normal Power-On: Boot from FLASH */
+#define BOOTFLAG_WARM 0x02 /* Software reboot */
+
+
+/*-----------------------------------------------------------------------
+ * IDE ATAPI Configuration
+ */
+
+#define CONFIG_ATAPI 1
+#define CFG_IDE_MAXBUS 2
+#define CFG_IDE_MAXDEVICE 4
+#define CONFIG_ISO_PARTITION 1
+
+#define CFG_ATA_BASE_ADDR 0xFE000000 /* was: via_get_base_addr() */
+#define CFG_ATA_IDE0_OFFSET 0x1F0
+#define CFG_ATA_IDE1_OFFSET 0x170
+
+#define CFG_ATA_REG_OFFSET 0
+#define CFG_ATA_DATA_OFFSET 0
+#define CFG_ATA_ALT_OFFSET 0x0200
+
+/*-----------------------------------------------------------------------
+ * Disk-On-Chip configuration
+ */
+
+#define CFG_MAX_DOC_DEVICE 1 /* Max number of DOC devices */
+
+#define CFG_DOC_SUPPORT_2000
+#undef CFG_DOC_SUPPORT_MILLENNIUM
+
+/*-----------------------------------------------------------------------
+ RTC
+*/
+#define CONFIG_RTC_MC146818
+
+/*-----------------------------------------------------------------------
+ * NS16550 Configuration
+ */
+
+#define CFG_NS16550
+
+#define CFG_NS16550_COM1 0xFE0003F8
+#define CFG_NS16550_COM2 0xFE0002F8
+
+#define CFG_NS16550_REG_SIZE 1
+
+/* base address for ISA I/O
+ */
+#define CFG_ISA_IO_BASE_ADDRESS 0xFE000000
+
+/* ISA Interrupt stuff (taken from JWL) */
+
+#define ISA_INT1_OCW1 0x21
+#define ISA_INT2_OCW1 0xA1
+#define ISA_INT1_OCW2 0x20
+#define ISA_INT2_OCW2 0xA0
+#define ISA_INT1_OCW3 0x20
+#define ISA_INT2_OCW3 0xA0
+
+#define ISA_INT1_ICW1 0x20
+#define ISA_INT2_ICW1 0xA0
+#define ISA_INT1_ICW2 0x21
+#define ISA_INT2_ICW2 0xA1
+#define ISA_INT1_ICW3 0x21
+#define ISA_INT2_ICW3 0xA1
+#define ISA_INT1_ICW4 0x21
+#define ISA_INT2_ICW4 0xA1
+
+
+/*
+ * misc
+ */
+
+#define CONFIG_NET_MULTI
+#define CFG_BOARD_ASM_INIT
+#define CONFIG_LAST_STAGE_INIT
+
+/* #define CONFIG_ETHADDR 00:09:D2:10:00:76 */
+/* #define CONFIG_IPADDR 192.168.0.2 */
+/* #define CONFIG_NETMASK 255.255.255.240 */
+/* #define CONFIG_GATEWAYIP 192.168.0.3 */
+
+#define CONFIG_3COM
+/* #define CONFIG_BOOTP_RANDOM_DELAY */
+#define CONFIG_BOOTP_MASK (CONFIG_BOOTP_DEFAULT | \
+ CONFIG_BOOTP_BOOTFILESIZE)
+
+/*
+ * USB configuration
+ */
+#define CONFIG_USB_UHCI 1
+#define CONFIG_USB_STORAGE 1
+#define CONFIG_USB_KEYBOARD 1
+#define CFG_DEVICE_DEREGISTER 1 /* needed by CONFIG_USB_KEYBOARD */
+
+/*
+ * Autoboot stuff
+ */
+#define CONFIG_BOOTDELAY 5 /* Boot automatically after five seconds */
+#define CONFIG_PREBOOT ""
+#define CONFIG_BOOTCOMMAND "fdcboot; diskboot"
+#define CONFIG_MENUPROMPT "Press any key to interrupt autoboot: %2d "
+#define CONFIG_MENUKEY ' '
+#define CONFIG_MENUCOMMAND "menu"
+/* #define CONFIG_AUTOBOOT_KEYED */
+
+/*
+ * Extra ENV stuff
+ */
+#define CONFIG_EXTRA_ENV_SETTINGS \
+ "stdout=vga\0" \
+ "stdin=ps2kbd\0" \
+ "ide_doreset=on\0" \
+ "ide_maxbus=2\0" \
+ "ide_cd_timeout=30\0" \
+ "menucmd=menu\0" \
+ "pci_irqa=9\0" \
+ "pci_irqa_select=edge\0" \
+ "pci_irqb=10\0" \
+ "pci_irqb_select=edge\0" \
+ "pci_irqc=11\0" \
+ "pci_irqc_select=edge\0" \
+ "pci_irqd=12\0" \
+ "pci_irqd_select=edge\0"
+
+
+/* #define CONFIG_MII 1 */
+/* #define CONFIG_BITBANGMII 1 */
+
+
+#endif /* __CONFIG_H */
diff --git a/include/configs/sbc8260.h b/include/configs/sbc8260.h
index ec6017938d7..d47c208f163 100644
--- a/include/configs/sbc8260.h
+++ b/include/configs/sbc8260.h
@@ -239,12 +239,12 @@
#endif /* CONFIG_ETHER_ON_FCC, CONFIG_ETHER_INDEX */
/*
- * select SPI support configuration
+ * Select SPI support configuration
*/
-#undef CONFIG_SPI /* enable SPI driver */
+#undef CONFIG_SPI /* Disable SPI driver */
/*
- * select i2c support configuration
+ * Select i2c support configuration
*
* Supported configurations are {none, software, hardware} drivers.
* If the software driver is chosen, there are some additional
@@ -284,7 +284,10 @@
/* What should the console's baud rate be? */
#define CONFIG_BAUDRATE 9600
-/* Ethernet MAC address */
+/* Ethernet MAC address
+ * Note: We are using the EST Corporation OUI (00:a0:1e:xx:xx:xx)
+ * http://standards.ieee.org/regauth/oui/index.shtml
+ */
#define CONFIG_ETHADDR 00:a0:1e:a8:7b:cb
/*
@@ -299,19 +302,53 @@
/* Set to a positive value to delay for running BOOTCOMMAND */
#define CONFIG_BOOTDELAY 5 /* autoboot after 5 seconds */
-#if 0
/* Be selective on what keys can delay or stop the autoboot process
* To stop use: " "
*/
-# define CONFIG_AUTOBOOT_KEYED
-# define CONFIG_AUTOBOOT_PROMPT "Autobooting in %d seconds, press \" \" to stop\n"
-# define CONFIG_AUTOBOOT_STOP_STR " "
-# undef CONFIG_AUTOBOOT_DELAY_STR
-# define DEBUG_BOOTKEYS 0
+#undef CONFIG_AUTOBOOT_KEYED
+#ifdef CONFIG_AUTOBOOT_KEYED
+# define CONFIG_AUTOBOOT_PROMPT "Autobooting in %d seconds, press \" \" to stop\n"
+# define CONFIG_AUTOBOOT_STOP_STR " "
+# undef CONFIG_AUTOBOOT_DELAY_STR
+# define DEBUG_BOOTKEYS 0
#endif
/* Define this to contain any number of null terminated strings that
* will be part of the default enviroment compiled into the boot image.
+ *
+ * Variable Usage
+ * -------------- -------------------------------------------------------
+ * serverip server IP address
+ * ipaddr my IP address
+ * reprog Reload flash with a new copy of U-Boot
+ * zapenv Erase the environment area in flash
+ * root-on-initrd Set the bootcmd variable to allow booting of an initial
+ * ram disk.
+ * root-on-nfs Set the bootcmd variable to allow booting of a NFS
+ * mounted root filesystem.
+ * boot-hook Convenient stub to do something useful before the
+ * bootm command is executed.
+ *
+ * Example usage of root-on-initrd and root-on-nfs :
+ *
+ * Note: The lines have been wrapped to improved its readability.
+ *
+ * => printenv bootcmd
+ * bootcmd=version;echo;bootp;setenv bootargs root=/dev/nfs rw
+ * nfsroot=$(serverip):$(rootpath)
+ * ip=$(ipaddr):$(serverip):$(gatewayip):$(netmask):$(hostname)::off;run boot-hook;bootm
+ *
+ * => run root-on-initrd
+ * => printenv bootcmd
+ * bootcmd=version;echo;bootp;setenv bootargs root=/dev/ram0 rw
+ * ip=$(ipaddr):$(serverip):$(gatewayip):$(netmask):$(hostname)::off;run boot-hook;bootm
+ *
+ * => run root-on-nfs
+ * => printenv bootcmd
+ * bootcmd=version;echo;bootp;setenv bootargs root=/dev/nfs rw
+ * nfsroot=$(serverip):$(rootpath)
+ * ip=$(ipaddr):$(serverip):$(gatewayip):$(netmask):$(hostname)::off;run boot-hook;bootm
+ *
*/
#define CONFIG_EXTRA_ENV_SETTINGS \
"serverip=192.168.123.201\0" \
@@ -328,22 +365,22 @@
"protect on 1:1\0" \
"root-on-initrd="\
"setenv bootcmd "\
- "version;" \
- "echo;" \
- "bootp;" \
+ "version\\;" \
+ "echo\\;" \
+ "bootp\\;" \
"setenv bootargs root=/dev/ram0 rw " \
- "ip=$(ipaddr):$(serverip):$(gatewayip):$(netmask):$(hostname)::off;" \
- "run boot-hook;" \
+ "ip=\\$(ipaddr):\\$(serverip):\\$(gatewayip):\\$(netmask):\\$(hostname)::off\\;" \
+ "run boot-hook\\;" \
"bootm\0" \
"root-on-nfs="\
"setenv bootcmd "\
- "version;" \
- "echo;" \
- "bootp;" \
+ "version\\;" \
+ "echo\\;" \
+ "bootp\\;" \
"setenv bootargs root=/dev/nfs rw " \
- "nfsroot=$(serverip):$(rootpath) " \
- "ip=$(ipaddr):$(serverip):$(gatewayip):$(netmask):$(hostname)::off\\;" \
- "run boot-hook;" \
+ "nfsroot=\\$(serverip):\\$(rootpath) " \
+ "ip=\\$(ipaddr):\\$(serverip):\\$(gatewayip):\\$(netmask):\\$(hostname)::off\\;" \
+ "run boot-hook\\;" \
"bootm\0" \
"boot-hook=echo boot-hook\0"
diff --git a/include/part.h b/include/part.h
index e43978c658d..9aa9f5ab455 100644
--- a/include/part.h
+++ b/include/part.h
@@ -51,6 +51,8 @@ typedef struct block_dev_desc {
#define PART_TYPE_MAC 0x01
#define PART_TYPE_DOS 0x02
#define PART_TYPE_ISO 0x03
+#define PART_TYPE_AMIGA 0x04
+
/* device types */
#define DEV_TYPE_UNKNOWN 0xff /* not connected */
#define DEV_TYPE_HARDDISK 0x00 /* harddisk */
@@ -94,6 +96,13 @@ void print_part_iso (block_dev_desc_t *dev_desc);
int test_part_iso (block_dev_desc_t *dev_desc);
#endif
+#ifdef CONFIG_AMIGA_PARTITION
+/* disk/part_amiga.c */
+int get_partition_info_amiga (block_dev_desc_t * dev_desc, int part, disk_partition_t *info);
+void print_part_amiga (block_dev_desc_t *dev_desc);
+int test_part_amiga (block_dev_desc_t *dev_desc);
+#endif
+
#endif /* _PART_H */
diff --git a/include/pci.h b/include/pci.h
index 48753752674..e5055b17534 100644
--- a/include/pci.h
+++ b/include/pci.h
@@ -375,6 +375,7 @@ struct pci_controller {
/* Used by ppc405 autoconfig*/
struct pci_region *pci_fb;
+ int current_busno;
};
extern __inline__ void pci_set_ops(struct pci_controller *hose,
@@ -457,7 +458,7 @@ extern void pciauto_setup_device(struct pci_controller *hose,
pci_dev_t dev, int bars_num,
struct pci_region *mem,
struct pci_region *io);
-void pciauto_config_device(struct pci_controller *hose, pci_dev_t dev);
+int pciauto_config_device(struct pci_controller *hose, pci_dev_t dev);
extern pci_dev_t pci_find_device (unsigned int vendor, unsigned int device, int index);
extern pci_dev_t pci_find_devices (struct pci_device_id *ids, int index);
diff --git a/include/syscall.h b/include/syscall.h
index f80d550ee8d..9b9be0dd517 100644
--- a/include/syscall.h
+++ b/include/syscall.h
@@ -15,10 +15,13 @@ void mon_install_hdlr(int, interrupt_handler_t*, void*);
void mon_free_hdlr(int);
void *mon_malloc(size_t);
void mon_free(void*);
+void mon_udelay(unsigned long);
+unsigned long mon_get_timer(unsigned long);
#endif /* ifndef __ASSEMBLY__ */
-#define NR_SYSCALLS 9 /* number of syscalls */
+#define NR_SYSCALLS 11 /* number of syscalls */
+
/*
* Make sure these functions are in the same order as they
@@ -33,5 +36,7 @@ void mon_free(void*);
#define SYSCALL_FREE_HDLR 6
#define SYSCALL_MALLOC 7
#define SYSCALL_FREE 8
+#define SYSCALL_UDELAY 9
+#define SYSCALL_GET_TIMER 10
#endif
diff --git a/lib_ppc/board.c b/lib_ppc/board.c
index bfc494ef8e2..2541a54e3aa 100644
--- a/lib_ppc/board.c
+++ b/lib_ppc/board.c
@@ -149,6 +149,8 @@ static void syscalls_init (void)
syscall_tbl[SYSCALL_INSTALL_HDLR] = (void *) irq_install_handler;
syscall_tbl[SYSCALL_FREE_HDLR] = (void *) irq_free_handler;
+ syscall_tbl[SYSCALL_GET_TIMER] = (void *)get_timer;
+ syscall_tbl[SYSCALL_UDELAY] = (void *)udelay;
addr = (ulong *) 0xc00; /* syscall ISR addr */
@@ -420,6 +422,10 @@ void board_init_f (ulong bootflag)
printf ("Reserving %ldk for U-Boot at: %08lx\n", len >> 10, addr);
#endif
+#ifdef CONFIG_AMIGAONEG3SE
+ gd->relocaddr = addr;
+#endif
+
/*
* reserve memory for malloc() arena
*/
diff --git a/net/eth.c b/net/eth.c
index c2dbb934279..cb394337c8c 100644
--- a/net/eth.c
+++ b/net/eth.c
@@ -35,6 +35,7 @@ extern int eepro100_initialize(bd_t*);
extern int natsemi_initialize(bd_t*);
extern int ns8382x_initialize(bd_t*);
extern int dc21x4x_initialize(bd_t*);
+extern int eth_3com_initialize(bd_t*);
extern int pcnet_initialize(bd_t*);
extern int fec_initialize(bd_t*);
extern int scc_initialize(bd_t*);
@@ -100,6 +101,9 @@ int eth_initialize(bd_t *bis)
#ifdef CONFIG_TULIP
dc21x4x_initialize(bis);
#endif
+#ifdef CONFIG_3COM
+ eth_3com_initialize(bis);
+#endif
#ifdef CONFIG_PCNET
pcnet_initialize(bis);
#endif
diff --git a/rtc/mc146818.c b/rtc/mc146818.c
index 1d65808f79d..20b1b3e7702 100644
--- a/rtc/mc146818.c
+++ b/rtc/mc146818.c
@@ -69,10 +69,13 @@ void rtc_get (struct rtc_time *tmp)
wday = rtc_read (RTC_DAY_OF_WEEK);
mon = rtc_read (RTC_MONTH);
year = rtc_read (RTC_YEAR);
+#ifdef CONFIG_AMIGAONEG3SE
+ wday -= 1; /* VIA 686 stores Sunday = 1, Monday = 2, ... */
+#endif
#ifdef RTC_DEBUG
printf ( "Get RTC year: %02x mon/cent: %02x mday: %02x wday: %02x "
"hr: %02x min: %02x sec: %02x\n",
- year, mon_cent, mday, wday,
+ year, mon, mday, wday,
hour, min, sec );
printf ( "Alarms: month: %02x hour: %02x min: %02x sec: %02x\n",
rtc_read (RTC_CONFIG_D) & 0x3F,
@@ -111,8 +114,11 @@ void rtc_set (struct rtc_time *tmp)
rtc_write (RTC_YEAR, bin2bcd(tmp->tm_year % 100));
rtc_write (RTC_MONTH, bin2bcd(tmp->tm_mon));
-
+#ifdef CONFIG_AMIGAONEG3SE
+ rtc_write (RTC_DAY_OF_WEEK, bin2bcd(tmp->tm_wday)+1);
+#else
rtc_write (RTC_DAY_OF_WEEK, bin2bcd(tmp->tm_wday));
+#endif
rtc_write (RTC_DATE_OF_MONTH, bin2bcd(tmp->tm_mday));
rtc_write (RTC_HOURS, bin2bcd(tmp->tm_hour));
rtc_write (RTC_MINUTES, bin2bcd(tmp->tm_min ));
diff --git a/rtc/mk48t59.c b/rtc/mk48t59.c
index 2d3c278e6e0..664d310d43d 100644
--- a/rtc/mk48t59.c
+++ b/rtc/mk48t59.c
@@ -65,6 +65,24 @@ static void rtc_write (short reg, uchar val)
out8(RTC(reg),val);
}
+#elif defined(CONFIG_AMIGAONEG3SE)
+
+#include "../board/MAI/AmigaOneG3SE/via686.h"
+#include "../board/MAI/AmigaOneG3SE/memio.h"
+
+
+static uchar rtc_read (short reg)
+{
+ out_byte(CMOS_ADDR, (uint8)reg);
+ return in_byte(CMOS_DATA);
+}
+
+static void rtc_write (short reg, uchar val)
+{
+ out_byte(CMOS_ADDR, (uint8)reg);
+ out_byte(CMOS_DATA, (uint8)val);
+}
+
#else
# error Board specific rtc access functions should be supplied
#endif
diff --git a/tools/updater/Makefile b/tools/updater/Makefile
new file mode 100644
index 00000000000..a8fb4ced3d2
--- /dev/null
+++ b/tools/updater/Makefile
@@ -0,0 +1,86 @@
+#
+# (C) Copyright 2000
+# Wolfgang Denk, DENX Software Engineering, wd@denx.de.
+#
+# See file CREDITS for list of people who contributed to this
+# project.
+#
+# This program is free software; you can redistribute it and/or
+# modify it under the terms of the GNU General Public License as
+# published by the Free Software Foundation; either version 2 of
+# the License, or (at your option) any later version.
+#
+# This program is distributed in the hope that it will be useful,
+# but WITHOUT ANY WARRANTY; without even the implied warranty of
+# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
+# GNU General Public License for more details.
+#
+# You should have received a copy of the GNU General Public License
+# along with this program; if not, write to the Free Software
+# Foundation, Inc., 59 Temple Place, Suite 330, Boston,
+# MA 02111-1307 USA
+#
+
+LOAD_ADDR = 0x40000
+
+include $(TOPDIR)/config.mk
+
+PROG = updater
+IMAGE = updater.image
+SRC = update.c flash.c flash_hw.c utils.c cmd_flash.c string.c ctype.c dummy.c
+ASRC = ppcstring.S
+OBJS = $(SRC:.c=.o) $(ASRC:.S=.o)
+
+LIB = $(TOPDIR)/examples/libsyscall.a
+LIBAOBJS= $(TOPDIR)/examples/syscall.o
+LIBCOBJS=
+LIBOBJS = $(LIBAOBJS) $(LIBCOBJS)
+
+CPPFLAGS += -I$(TOPDIR) -I$(TOPDIR)/board/MAI/AmigaOneG3SE
+CFLAGS += -I$(TOPDIR)/board/MAI/AmigaOneG3SE
+
+all: .depend $(LIB) $(PROG)
+
+#########################################################################
+$(LIB): .depend $(LIBOBJS)
+ $(AR) crv $@ $(LIBOBJS)
+
+%.srec: %.o $(LIB)
+ $(LD) -g -Ttext $(LOAD_ADDR) -o $(<:.o=) -e $(<:.o=) $< $(LIB)
+ $(OBJCOPY) -O srec $(<:.o=) $@
+
+%.o: %.c
+ $(CC) $(CPPFLAGS) -c $<
+
+%.o: %.S
+ $(CC) $(CPPFLAGS) -c $<
+
+#########################################################################
+
+updater: $(OBJS) $(LIB) $(TOPDIR)/board/MAI/AmigaOneG3SE/memio.o
+ $(LD) -g -Ttext $(LOAD_ADDR) -o updater -e _main $(OBJS) $(LIB) \
+ $(TOPDIR)/board/MAI/AmigaOneG3SE/memio.o
+ $(OBJCOPY) -O binary updater updater.bin
+
+updater.image: updater $(TOPDIR)/u-boot.bin
+ cat >/tmp/tempimage updater.bin junk $(TOPDIR)/u-boot.bin
+ $(TOPDIR)/tools/mkimage -A ppc -O u-boot -T standalone -C none -a $(LOAD_ADDR) \
+ -e `ppc-elf32-nm updater | grep _main | cut --bytes=0-8` \
+ -n "Firmware Updater" -d /tmp/tempimage updater.image
+ rm /tmp/tempimage
+ cp updater.image /tftpboot
+
+updater.image2: updater $(TOPDIR)/u-boot.bin
+ cat >/tmp/tempimage updater.bin junk ../../create_image/image
+ $(TOPDIR)/tools/mkimage -A ppc -O u-boot -T standalone -C none -a $(LOAD_ADDR) \
+ -e `ppc-elf32-nm updater | grep _main | cut --bytes=0-8` \
+ -n "Firmware Updater" -d /tmp/tempimage updater.image
+ rm /tmp/tempimage
+ cp updater.image /tftpboot
+
+.depend: Makefile $(SRC) $(ASRC) $(LIBCOBJS:.o=.c) $(LIBAOBJS:.o=.S)
+ $(CC) -M $(CFLAGS) $(SRC) $(ASRC) $(LIBCOBJS:.o=.c) $(LIBAOBJS:.o=.S) > $@
+
+sinclude .depend
+
+#########################################################################
diff --git a/tools/updater/cmd_flash.c b/tools/updater/cmd_flash.c
new file mode 100644
index 00000000000..f3465f1d5b1
--- /dev/null
+++ b/tools/updater/cmd_flash.c
@@ -0,0 +1,431 @@
+/*
+ * (C) Copyright 2000
+ * Wolfgang Denk, DENX Software Engineering, wd@denx.de.
+ *
+ * See file CREDITS for list of people who contributed to this
+ * project.
+ *
+ * This program is free software; you can redistribute it and/or
+ * modify it under the terms of the GNU General Public License as
+ * published by the Free Software Foundation; either version 2 of
+ * the License, or (at your option) any later version.
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with this program; if not, write to the Free Software
+ * Foundation, Inc., 59 Temple Place, Suite 330, Boston,
+ * MA 02111-1307 USA
+ */
+
+/*
+ * FLASH support
+ */
+#include <common.h>
+#include <command.h>
+#include <cmd_boot.h>
+#include <flash.h>
+
+#if (CONFIG_COMMANDS & CFG_CMD_FLASH)
+
+extern flash_info_t flash_info[]; /* info for FLASH chips */
+
+/*
+ * The user interface starts numbering for Flash banks with 1
+ * for historical reasons.
+ */
+
+/*
+ * this routine looks for an abbreviated flash range specification.
+ * the syntax is B:SF[-SL], where B is the bank number, SF is the first
+ * sector to erase, and SL is the last sector to erase (defaults to SF).
+ * bank numbers start at 1 to be consistent with other specs, sector numbers
+ * start at zero.
+ *
+ * returns: 1 - correct spec; *pinfo, *psf and *psl are
+ * set appropriately
+ * 0 - doesn't look like an abbreviated spec
+ * -1 - looks like an abbreviated spec, but got
+ * a parsing error, a number out of range,
+ * or an invalid flash bank.
+ */
+static int
+abbrev_spec(char *str, flash_info_t **pinfo, int *psf, int *psl)
+{
+ flash_info_t *fp;
+ int bank, first, last;
+ char *p, *ep;
+
+ if ((p = strchr(str, ':')) == NULL)
+ return 0;
+ *p++ = '\0';
+
+ bank = simple_strtoul(str, &ep, 10);
+ if (ep == str || *ep != '\0' ||
+ bank < 1 || bank > CFG_MAX_FLASH_BANKS ||
+ (fp = &flash_info[bank - 1])->flash_id == FLASH_UNKNOWN)
+ return -1;
+
+ str = p;
+ if ((p = strchr(str, '-')) != NULL)
+ *p++ = '\0';
+
+ first = simple_strtoul(str, &ep, 10);
+ if (ep == str || *ep != '\0' || first >= fp->sector_count)
+ return -1;
+
+ if (p != NULL) {
+ last = simple_strtoul(p, &ep, 10);
+ if (ep == p || *ep != '\0' ||
+ last < first || last >= fp->sector_count)
+ return -1;
+ }
+ else
+ last = first;
+
+ *pinfo = fp;
+ *psf = first;
+ *psl = last;
+
+ return 1;
+}
+int do_flinfo (cmd_tbl_t *cmdtp, bd_t *bd, int flag, int argc, char *argv[])
+{
+ ulong bank;
+
+ if (argc == 1) { /* print info for all FLASH banks */
+ for (bank=0; bank <CFG_MAX_FLASH_BANKS; ++bank) {
+ mon_printf ("\nBank # %ld: ", bank+1);
+
+ flash_print_info (&flash_info[bank]);
+ }
+ return 0;
+ }
+
+ bank = simple_strtoul(argv[1], NULL, 16);
+ if ((bank < 1) || (bank > CFG_MAX_FLASH_BANKS)) {
+ mon_printf ("Only FLASH Banks # 1 ... # %d supported\n",
+ CFG_MAX_FLASH_BANKS);
+ return 1;
+ }
+ mon_printf ("\nBank # %ld: ", bank);
+ flash_print_info (&flash_info[bank-1]);
+ return 0;
+}
+int do_flerase(cmd_tbl_t *cmdtp, bd_t *bd, int flag, int argc, char *argv[])
+{
+ flash_info_t *info;
+ ulong bank, addr_first, addr_last;
+ int n, sect_first, sect_last;
+ int rcode = 0;
+
+ if (argc < 2) {
+ mon_printf ("Usage:\n%s\n", cmdtp->usage);
+ return 1;
+ }
+
+ if (strcmp(argv[1], "all") == 0) {
+ for (bank=1; bank<=CFG_MAX_FLASH_BANKS; ++bank) {
+ mon_printf ("Erase Flash Bank # %ld ", bank);
+ info = &flash_info[bank-1];
+ rcode = flash_erase (info, 0, info->sector_count-1);
+ }
+ return rcode;
+ }
+
+ if ((n = abbrev_spec(argv[1], &info, §_first, §_last)) != 0) {
+ if (n < 0) {
+ mon_printf("Bad sector specification\n");
+ return 1;
+ }
+ mon_printf ("Erase Flash Sectors %d-%d in Bank # %d ",
+ sect_first, sect_last, (info-flash_info)+1);
+ rcode = flash_erase(info, sect_first, sect_last);
+ return rcode;
+ }
+
+ if (argc != 3) {
+ mon_printf ("Usage:\n%s\n", cmdtp->usage);
+ return 1;
+ }
+
+ if (strcmp(argv[1], "bank") == 0) {
+ bank = simple_strtoul(argv[2], NULL, 16);
+ if ((bank < 1) || (bank > CFG_MAX_FLASH_BANKS)) {
+ mon_printf ("Only FLASH Banks # 1 ... # %d supported\n",
+ CFG_MAX_FLASH_BANKS);
+ return 1;
+ }
+ mon_printf ("Erase Flash Bank # %ld ", bank);
+ info = &flash_info[bank-1];
+ rcode = flash_erase (info, 0, info->sector_count-1);
+ return rcode;
+ }
+
+ addr_first = simple_strtoul(argv[1], NULL, 16);
+ addr_last = simple_strtoul(argv[2], NULL, 16);
+
+ if (addr_first >= addr_last) {
+ mon_printf ("Usage:\n%s\n", cmdtp->usage);
+ return 1;
+ }
+
+ mon_printf ("Erase Flash from 0x%08lx to 0x%08lx ", addr_first, addr_last);
+ rcode = flash_sect_erase(addr_first, addr_last);
+ return rcode;
+}
+
+int flash_sect_erase (ulong addr_first, ulong addr_last)
+{
+ flash_info_t *info;
+ ulong bank;
+ int s_first, s_last;
+ int erased;
+ int rcode = 0;
+
+ erased = 0;
+
+ for (bank=0,info=&flash_info[0]; bank < CFG_MAX_FLASH_BANKS; ++bank, ++info) {
+ ulong b_end;
+ int sect;
+
+ if (info->flash_id == FLASH_UNKNOWN) {
+ continue;
+ }
+
+ b_end = info->start[0] + info->size - 1; /* bank end addr */
+
+ s_first = -1; /* first sector to erase */
+ s_last = -1; /* last sector to erase */
+
+ for (sect=0; sect < info->sector_count; ++sect) {
+ ulong end; /* last address in current sect */
+ short s_end;
+
+ s_end = info->sector_count - 1;
+
+ end = (sect == s_end) ? b_end : info->start[sect + 1] - 1;
+
+ if (addr_first > end)
+ continue;
+ if (addr_last < info->start[sect])
+ continue;
+
+ if (addr_first == info->start[sect]) {
+ s_first = sect;
+ }
+ if (addr_last == end) {
+ s_last = sect;
+ }
+ }
+ if (s_first>=0 && s_first<=s_last) {
+ erased += s_last - s_first + 1;
+ rcode = flash_erase (info, s_first, s_last);
+ }
+ }
+ if (erased) {
+ // mon_printf ("Erased %d sectors\n", erased);
+ } else {
+ mon_printf ("Error: start and/or end address"
+ " not on sector boundary\n");
+ rcode = 1;
+ }
+ return rcode;
+}
+
+
+int do_protect(cmd_tbl_t *cmdtp, bd_t *bd, int flag, int argc, char *argv[])
+{
+ flash_info_t *info;
+ ulong bank, addr_first, addr_last;
+ int i, p, n, sect_first, sect_last;
+ int rcode = 0;
+
+ if (argc < 3) {
+ mon_printf ("Usage:\n%s\n", cmdtp->usage);
+ return 1;
+ }
+
+ if (strcmp(argv[1], "off") == 0)
+ p = 0;
+ else if (strcmp(argv[1], "on") == 0)
+ p = 1;
+ else {
+ mon_printf ("Usage:\n%s\n", cmdtp->usage);
+ return 1;
+ }
+
+ if (strcmp(argv[2], "all") == 0) {
+ for (bank=1; bank<=CFG_MAX_FLASH_BANKS; ++bank) {
+ info = &flash_info[bank-1];
+ if (info->flash_id == FLASH_UNKNOWN) {
+ continue;
+ }
+ //mon_printf ("%sProtect Flash Bank # %ld\n",
+ // p ? "" : "Un-", bank);
+
+ for (i=0; i<info->sector_count; ++i) {
+#if defined(CFG_FLASH_PROTECTION)
+ if (flash_real_protect(info, i, p))
+ rcode = 1;
+ putc ('.');
+#else
+ info->protect[i] = p;
+#endif /* CFG_FLASH_PROTECTION */
+ }
+ }
+
+#if defined(CFG_FLASH_PROTECTION)
+ if (!rcode) puts (" done\n");
+#endif /* CFG_FLASH_PROTECTION */
+
+ return rcode;
+ }
+
+ if ((n = abbrev_spec(argv[2], &info, §_first, §_last)) != 0) {
+ if (n < 0) {
+ mon_printf("Bad sector specification\n");
+ return 1;
+ }
+ //mon_printf("%sProtect Flash Sectors %d-%d in Bank # %d\n",
+ // p ? "" : "Un-", sect_first, sect_last,
+ // (info-flash_info)+1);
+ for (i = sect_first; i <= sect_last; i++) {
+#if defined(CFG_FLASH_PROTECTION)
+ if (flash_real_protect(info, i, p))
+ rcode = 1;
+ putc ('.');
+#else
+ info->protect[i] = p;
+#endif /* CFG_FLASH_PROTECTION */
+ }
+
+#if defined(CFG_FLASH_PROTECTION)
+ if (!rcode) puts (" done\n");
+#endif /* CFG_FLASH_PROTECTION */
+
+ return rcode;
+ }
+
+ if (argc != 4) {
+ mon_printf ("Usage:\n%s\n", cmdtp->usage);
+ return 1;
+ }
+
+ if (strcmp(argv[2], "bank") == 0) {
+ bank = simple_strtoul(argv[3], NULL, 16);
+ if ((bank < 1) || (bank > CFG_MAX_FLASH_BANKS)) {
+ mon_printf ("Only FLASH Banks # 1 ... # %d supported\n",
+ CFG_MAX_FLASH_BANKS);
+ return 1;
+ }
+ mon_printf ("%sProtect Flash Bank # %ld\n",
+ p ? "" : "Un-", bank);
+ info = &flash_info[bank-1];
+
+ if (info->flash_id == FLASH_UNKNOWN) {
+ mon_printf ("missing or unknown FLASH type\n");
+ return 1;
+ }
+ for (i=0; i<info->sector_count; ++i) {
+#if defined(CFG_FLASH_PROTECTION)
+ if (flash_real_protect(info, i, p))
+ rcode = 1;
+ putc ('.');
+#else
+ info->protect[i] = p;
+#endif /* CFG_FLASH_PROTECTION */
+ }
+
+#if defined(CFG_FLASH_PROTECTION)
+ if (!rcode) puts (" done\n");
+#endif /* CFG_FLASH_PROTECTION */
+
+ return rcode;
+ }
+
+ addr_first = simple_strtoul(argv[2], NULL, 16);
+ addr_last = simple_strtoul(argv[3], NULL, 16);
+
+ if (addr_first >= addr_last) {
+ mon_printf ("Usage:\n%s\n", cmdtp->usage);
+ return 1;
+ }
+ rcode = flash_sect_protect (p, addr_first, addr_last);
+ return rcode;
+}
+int flash_sect_protect (int p, ulong addr_first, ulong addr_last)
+{
+ flash_info_t *info;
+ ulong bank;
+ int s_first, s_last;
+ int protected, i;
+ int rcode = 0;
+
+ protected = 0;
+
+ for (bank=0,info=&flash_info[0]; bank < CFG_MAX_FLASH_BANKS; ++bank, ++info) {
+ ulong b_end;
+ int sect;
+
+ if (info->flash_id == FLASH_UNKNOWN) {
+ continue;
+ }
+
+ b_end = info->start[0] + info->size - 1; /* bank end addr */
+
+ s_first = -1; /* first sector to erase */
+ s_last = -1; /* last sector to erase */
+
+ for (sect=0; sect < info->sector_count; ++sect) {
+ ulong end; /* last address in current sect */
+ short s_end;
+
+ s_end = info->sector_count - 1;
+
+ end = (sect == s_end) ? b_end : info->start[sect + 1] - 1;
+
+ if (addr_first > end)
+ continue;
+ if (addr_last < info->start[sect])
+ continue;
+
+ if (addr_first == info->start[sect]) {
+ s_first = sect;
+ }
+ if (addr_last == end) {
+ s_last = sect;
+ }
+ }
+ if (s_first>=0 && s_first<=s_last) {
+ protected += s_last - s_first + 1;
+ for (i=s_first; i<=s_last; ++i) {
+#if defined(CFG_FLASH_PROTECTION)
+ if (flash_real_protect(info, i, p))
+ rcode = 1;
+ putc ('.');
+#else
+ info->protect[i] = p;
+#endif /* CFG_FLASH_PROTECTION */
+ }
+ }
+#if defined(CFG_FLASH_PROTECTION)
+ if (!rcode) putc ('\n');
+#endif /* CFG_FLASH_PROTECTION */
+
+ }
+ if (protected) {
+ // mon_printf ("%sProtected %d sectors\n",
+ // p ? "" : "Un-", protected);
+ } else {
+ mon_printf ("Error: start and/or end address"
+ " not on sector boundary\n");
+ rcode = 1;
+ }
+ return rcode;
+}
+
+#endif /* CFG_CMD_FLASH */
diff --git a/tools/updater/ctype.c b/tools/updater/ctype.c
new file mode 100644
index 00000000000..6ed0468a219
--- /dev/null
+++ b/tools/updater/ctype.c
@@ -0,0 +1,56 @@
+/*
+ * (C) Copyright 2000
+ * Wolfgang Denk, DENX Software Engineering, wd@denx.de.
+ *
+ * See file CREDITS for list of people who contributed to this
+ * project.
+ *
+ * This program is free software; you can redistribute it and/or
+ * modify it under the terms of the GNU General Public License as
+ * published by the Free Software Foundation; either version 2 of
+ * the License, or (at your option) any later version.
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with this program; if not, write to the Free Software
+ * Foundation, Inc., 59 Temple Place, Suite 330, Boston,
+ * MA 02111-1307 USA
+ */
+
+/*
+ * linux/lib/ctype.c
+ *
+ * Copyright (C) 1991, 1992 Linus Torvalds
+ */
+
+#include <linux/ctype.h>
+
+unsigned char _ctype[] = {
+_C,_C,_C,_C,_C,_C,_C,_C, /* 0-7 */
+_C,_C|_S,_C|_S,_C|_S,_C|_S,_C|_S,_C,_C, /* 8-15 */
+_C,_C,_C,_C,_C,_C,_C,_C, /* 16-23 */
+_C,_C,_C,_C,_C,_C,_C,_C, /* 24-31 */
+_S|_SP,_P,_P,_P,_P,_P,_P,_P, /* 32-39 */
+_P,_P,_P,_P,_P,_P,_P,_P, /* 40-47 */
+_D,_D,_D,_D,_D,_D,_D,_D, /* 48-55 */
+_D,_D,_P,_P,_P,_P,_P,_P, /* 56-63 */
+_P,_U|_X,_U|_X,_U|_X,_U|_X,_U|_X,_U|_X,_U, /* 64-71 */
+_U,_U,_U,_U,_U,_U,_U,_U, /* 72-79 */
+_U,_U,_U,_U,_U,_U,_U,_U, /* 80-87 */
+_U,_U,_U,_P,_P,_P,_P,_P, /* 88-95 */
+_P,_L|_X,_L|_X,_L|_X,_L|_X,_L|_X,_L|_X,_L, /* 96-103 */
+_L,_L,_L,_L,_L,_L,_L,_L, /* 104-111 */
+_L,_L,_L,_L,_L,_L,_L,_L, /* 112-119 */
+_L,_L,_L,_P,_P,_P,_P,_C, /* 120-127 */
+0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0, /* 128-143 */
+0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0, /* 144-159 */
+_S|_SP,_P,_P,_P,_P,_P,_P,_P,_P,_P,_P,_P,_P,_P,_P,_P, /* 160-175 */
+_P,_P,_P,_P,_P,_P,_P,_P,_P,_P,_P,_P,_P,_P,_P,_P, /* 176-191 */
+_U,_U,_U,_U,_U,_U,_U,_U,_U,_U,_U,_U,_U,_U,_U,_U, /* 192-207 */
+_U,_U,_U,_U,_U,_U,_U,_P,_U,_U,_U,_U,_U,_U,_U,_L, /* 208-223 */
+_L,_L,_L,_L,_L,_L,_L,_L,_L,_L,_L,_L,_L,_L,_L,_L, /* 224-239 */
+_L,_L,_L,_L,_L,_L,_L,_P,_L,_L,_L,_L,_L,_L,_L,_L}; /* 240-255 */
diff --git a/tools/updater/dummy.c b/tools/updater/dummy.c
new file mode 100644
index 00000000000..9fe5ac1b1e6
--- /dev/null
+++ b/tools/updater/dummy.c
@@ -0,0 +1 @@
+volatile int __dummy = 0xDEADBEEF;
diff --git a/tools/updater/flash.c b/tools/updater/flash.c
new file mode 100644
index 00000000000..d2e11d21248
--- /dev/null
+++ b/tools/updater/flash.c
@@ -0,0 +1,184 @@
+/*
+ * (C) Copyright 2000
+ * Wolfgang Denk, DENX Software Engineering, wd@denx.de.
+ *
+ * See file CREDITS for list of people who contributed to this
+ * project.
+ *
+ * This program is free software; you can redistribute it and/or
+ * modify it under the terms of the GNU General Public License as
+ * published by the Free Software Foundation; either version 2 of
+ * the License, or (at your option) any later version.
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with this program; if not, write to the Free Software
+ * Foundation, Inc., 59 Temple Place, Suite 330, Boston,
+ * MA 02111-1307 USA
+ */
+
+#include <common.h>
+#include <flash.h>
+
+extern flash_info_t flash_info[CFG_MAX_FLASH_BANKS]; /* info for FLASH chips */
+
+/*-----------------------------------------------------------------------
+ * Functions
+ */
+
+/*-----------------------------------------------------------------------
+ * Set protection status for monitor sectors
+ *
+ * The monitor is always located in the _first_ Flash bank.
+ * If necessary you have to map the second bank at lower addresses.
+ */
+void
+flash_protect (int flag, ulong from, ulong to, flash_info_t *info)
+{
+ ulong b_end = info->start[0] + info->size - 1; /* bank end address */
+ short s_end = info->sector_count - 1; /* index of last sector */
+ int i;
+
+ /* Do nothing if input data is bad. */
+ if (info->sector_count == 0 || info->size == 0 || to < from) {
+ return;
+ }
+
+ /* There is nothing to do if we have no data about the flash
+ * or the protect range and flash range don't overlap.
+ */
+ if (info->flash_id == FLASH_UNKNOWN ||
+ to < info->start[0] || from > b_end) {
+ return;
+ }
+
+ for (i=0; i<info->sector_count; ++i) {
+ ulong end; /* last address in current sect */
+
+ end = (i == s_end) ? b_end : info->start[i + 1] - 1;
+
+ /* Update protection if any part of the sector
+ * is in the specified range.
+ */
+ if (from <= end && to >= info->start[i]) {
+ if (flag & FLAG_PROTECT_CLEAR) {
+#if defined(CFG_FLASH_PROTECTION)
+ flash_real_protect(info, i, 0);
+#else
+ info->protect[i] = 0;
+#endif /* CFG_FLASH_PROTECTION */
+ }
+ else if (flag & FLAG_PROTECT_SET) {
+#if defined(CFG_FLASH_PROTECTION)
+ flash_real_protect(info, i, 1);
+#else
+ info->protect[i] = 1;
+#endif /* CFG_FLASH_PROTECTION */
+ }
+ }
+ }
+}
+
+/*-----------------------------------------------------------------------
+ */
+
+flash_info_t *
+addr2info (ulong addr)
+{
+#ifndef CONFIG_SPD823TS
+ flash_info_t *info;
+ int i;
+
+ for (i=0, info=&flash_info[0]; i<CFG_MAX_FLASH_BANKS; ++i, ++info) {
+ if (info->flash_id != FLASH_UNKNOWN &&
+ addr >= info->start[0] &&
+ /* WARNING - The '- 1' is needed if the flash
+ * is at the end of the address space, since
+ * info->start[0] + info->size wraps back to 0.
+ * Please don't change this unless you understand this.
+ */
+ addr <= info->start[0] + info->size - 1) {
+ return (info);
+ }
+ }
+#endif /* CONFIG_SPD823TS */
+
+ return (NULL);
+}
+
+/*-----------------------------------------------------------------------
+ * Copy memory to flash.
+ * Make sure all target addresses are within Flash bounds,
+ * and no protected sectors are hit.
+ * Returns:
+ * ERR_OK 0 - OK
+ * ERR_TIMOUT 1 - write timeout
+ * ERR_NOT_ERASED 2 - Flash not erased
+ * ERR_PROTECTED 4 - target range includes protected sectors
+ * ERR_INVAL 8 - target address not in Flash memory
+ * ERR_ALIGN 16 - target address not aligned on boundary
+ * (only some targets require alignment)
+ */
+int
+flash_write (uchar *src, ulong addr, ulong cnt)
+{
+#ifdef CONFIG_SPD823TS
+ return (ERR_TIMOUT); /* any other error codes are possible as well */
+#else
+ int i;
+ ulong end = addr + cnt - 1;
+ flash_info_t *info_first = addr2info (addr);
+ flash_info_t *info_last = addr2info (end );
+ flash_info_t *info;
+ int j;
+
+ if (cnt == 0) {
+ return (ERR_OK);
+ }
+
+ if (!info_first || !info_last) {
+ return (ERR_INVAL);
+ }
+
+ for (info = info_first; info <= info_last; ++info) {
+ ulong b_end = info->start[0] + info->size; /* bank end addr */
+ short s_end = info->sector_count - 1;
+ for (i=0; i<info->sector_count; ++i) {
+ ulong e_addr = (i == s_end) ? b_end : info->start[i + 1];
+
+ if ((end >= info->start[i]) && (addr < e_addr) &&
+ (info->protect[i] != 0) ) {
+ return (ERR_PROTECTED);
+ }
+ }
+ }
+
+ mon_printf("\rWriting ");
+ for (j=0; j<20; j++) mon_putc(177);
+ mon_printf("\rWriting ");
+
+ /* finally write data to flash */
+ for (info = info_first; info <= info_last && cnt>0; ++info) {
+ ulong len;
+
+ len = info->start[0] + info->size - addr;
+ if (len > cnt)
+ len = cnt;
+
+ if ((i = write_buff(info, src, addr, len)) != 0) {
+ return (i);
+ }
+ cnt -= len;
+ addr += len;
+ src += len;
+ }
+ return (ERR_OK);
+#endif /* CONFIG_SPD823TS */
+}
+
+/*-----------------------------------------------------------------------
+ */
diff --git a/tools/updater/flash_hw.c b/tools/updater/flash_hw.c
new file mode 100644
index 00000000000..ec11589c779
--- /dev/null
+++ b/tools/updater/flash_hw.c
@@ -0,0 +1,660 @@
+/*
+ * (C) Copyright 2001
+ * Josh Huber <huber@mclx.com>, Mission Critical Linux, Inc.
+ *
+ * (C) Copyright 2002
+ * Wolfgang Denk, DENX Software Engineering, wd@denx.de.
+ *
+ * See file CREDITS for list of people who contributed to this
+ * project.
+ *
+ * This program is free software; you can redistribute it and/or
+ * modify it under the terms of the GNU General Public License as
+ * published by the Free Software Foundation; either version 2 of
+ * the License, or (at your option) any later version.
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with this program; if not, write to the Free Software
+ * Foundation, Inc., 59 Temple Place, Suite 330, Boston,
+ * MA 02111-1307 USA
+ */
+
+#include <common.h>
+#include <flash.h>
+#include <asm/io.h>
+#include <memio.h>
+
+/*---------------------------------------------------------------------*/
+#undef DEBUG_FLASH
+//#define DEBUG_FLASH
+
+#ifdef DEBUG_FLASH
+#define DEBUGF(fmt,args...) mon_printf(fmt ,##args)
+#else
+#define DEBUGF(fmt,args...)
+#endif
+/*---------------------------------------------------------------------*/
+
+flash_info_t flash_info[CFG_MAX_FLASH_BANKS];
+
+static ulong flash_get_size (ulong addr, flash_info_t *info);
+static int flash_get_offsets (ulong base, flash_info_t *info);
+static int write_word (flash_info_t *info, ulong dest, ulong data);
+static void flash_reset (ulong addr);
+
+int flash_xd_nest;
+
+static void flash_to_xd(void)
+{
+ unsigned char x;
+
+ flash_xd_nest ++;
+
+ if (flash_xd_nest == 1)
+ {
+ DEBUGF("Flash on XD\n");
+ x = pci_read_cfg_byte(0, 0, 0x74);
+ pci_write_cfg_byte(0, 0, 0x74, x|1);
+ }
+}
+
+static void flash_to_mem(void)
+{
+ unsigned char x;
+
+ flash_xd_nest --;
+
+ if (flash_xd_nest == 0)
+ {
+ DEBUGF("Flash on memory bus\n");
+ x = pci_read_cfg_byte(0, 0, 0x74);
+ pci_write_cfg_byte(0, 0, 0x74, x&0xFE);
+ }
+}
+
+unsigned long flash_init_old(void)
+{
+ int i;
+
+ for (i = 0; i < CFG_MAX_FLASH_BANKS; i++)
+ {
+ flash_info[i].flash_id = FLASH_UNKNOWN;
+ flash_info[i].sector_count = 0;
+ flash_info[i].size = 0;
+ }
+
+
+ return 1;
+}
+
+unsigned long flash_init (void)
+{
+ unsigned int i;
+ unsigned long flash_size = 0;
+
+ flash_xd_nest = 0;
+
+ flash_to_xd();
+
+ /* Init: no FLASHes known */
+ for (i=0; i<CFG_MAX_FLASH_BANKS; ++i) {
+ flash_info[i].flash_id = FLASH_UNKNOWN;
+ flash_info[i].sector_count = 0;
+ flash_info[i].size = 0;
+ }
+
+ DEBUGF("\n## Get flash size @ 0x%08x\n", CFG_FLASH_BASE);
+
+ flash_size = flash_get_size (CFG_FLASH_BASE, flash_info);
+
+ DEBUGF("## Flash bank size: %08lx\n", flash_size);
+
+ if (flash_size) {
+#if CFG_MONITOR_BASE >= CFG_FLASH_BASE && \
+ CFG_MONITOR_BASE < CFG_FLASH_BASE + CFG_FLASH_MAX_SIZE
+ /* monitor protection ON by default */
+ flash_protect(FLAG_PROTECT_SET,
+ CFG_MONITOR_BASE,
+ CFG_MONITOR_BASE + CFG_MONITOR_LEN - 1,
+ &flash_info[0]);
+#endif
+
+#ifdef CFG_ENV_IS_IN_FLASH
+ /* ENV protection ON by default */
+ flash_protect(FLAG_PROTECT_SET,
+ CFG_ENV_ADDR,
+ CFG_ENV_ADDR + CFG_ENV_SECT_SIZE - 1,
+ &flash_info[0]);
+#endif
+
+ } else {
+ mon_printf ("Warning: the BOOT Flash is not initialised !");
+ }
+
+ flash_to_mem();
+
+ return flash_size;
+}
+
+/*
+ * The following code cannot be run from FLASH!
+ */
+static ulong flash_get_size (ulong addr, flash_info_t *info)
+{
+ short i;
+ uchar value;
+ uchar *x = (uchar *)addr;
+
+ flash_to_xd();
+
+ /* Write auto select command: read Manufacturer ID */
+ x[0x0555] = 0xAA;
+ __asm volatile ("sync\n eieio");
+ x[0x02AA] = 0x55;
+ __asm volatile ("sync\n eieio");
+ x[0x0555] = 0x90;
+ __asm volatile ("sync\n eieio");
+
+ value = x[0];
+ __asm volatile ("sync\n eieio");
+
+ DEBUGF("Manuf. ID @ 0x%08lx: 0x%08x\n", (ulong)addr, value);
+
+ switch (value | (value << 16)) {
+ case AMD_MANUFACT:
+ info->flash_id = FLASH_MAN_AMD;
+ break;
+
+ case FUJ_MANUFACT:
+ info->flash_id = FLASH_MAN_FUJ;
+ break;
+
+ case STM_MANUFACT:
+ info->flash_id = FLASH_MAN_STM;
+ break;
+
+ default:
+ info->flash_id = FLASH_UNKNOWN;
+ info->sector_count = 0;
+ info->size = 0;
+ flash_reset (addr);
+ return 0;
+ }
+
+ value = x[1];
+ __asm volatile ("sync\n eieio");
+
+ DEBUGF("Device ID @ 0x%08lx: 0x%08x\n", addr+1, value);
+
+ switch (value) {
+ case AMD_ID_F040B:
+ DEBUGF("Am29F040B\n");
+ info->flash_id += FLASH_AM040;
+ info->sector_count = 8;
+ info->size = 0x00080000;
+ break; /* => 512 kB */
+
+ case AMD_ID_LV040B:
+ DEBUGF("Am29LV040B\n");
+ info->flash_id += FLASH_AM040;
+ info->sector_count = 8;
+ info->size = 0x00080000;
+ break; /* => 512 kB */
+
+ case AMD_ID_LV400T:
+ DEBUGF("Am29LV400T\n");
+ info->flash_id += FLASH_AM400T;
+ info->sector_count = 11;
+ info->size = 0x00100000;
+ break; /* => 1 MB */
+
+ case AMD_ID_LV400B:
+ DEBUGF("Am29LV400B\n");
+ info->flash_id += FLASH_AM400B;
+ info->sector_count = 11;
+ info->size = 0x00100000;
+ break; /* => 1 MB */
+
+ case AMD_ID_LV800T:
+ DEBUGF("Am29LV800T\n");
+ info->flash_id += FLASH_AM800T;
+ info->sector_count = 19;
+ info->size = 0x00200000;
+ break; /* => 2 MB */
+
+ case AMD_ID_LV800B:
+ DEBUGF("Am29LV400B\n");
+ info->flash_id += FLASH_AM800B;
+ info->sector_count = 19;
+ info->size = 0x00200000;
+ break; /* => 2 MB */
+
+ case AMD_ID_LV160T:
+ DEBUGF("Am29LV160T\n");
+ info->flash_id += FLASH_AM160T;
+ info->sector_count = 35;
+ info->size = 0x00400000;
+ break; /* => 4 MB */
+
+ case AMD_ID_LV160B:
+ DEBUGF("Am29LV160B\n");
+ info->flash_id += FLASH_AM160B;
+ info->sector_count = 35;
+ info->size = 0x00400000;
+ break; /* => 4 MB */
+
+ case AMD_ID_LV320T:
+ DEBUGF("Am29LV320T\n");
+ info->flash_id += FLASH_AM320T;
+ info->sector_count = 67;
+ info->size = 0x00800000;
+ break; /* => 8 MB */
+
+#if 0
+ /* Has the same ID as AMD_ID_LV320T, to be fixed */
+ case AMD_ID_LV320B:
+ DEBUGF("Am29LV320B\n");
+ info->flash_id += FLASH_AM320B;
+ info->sector_count = 67;
+ info->size = 0x00800000;
+ break; /* => 8 MB */
+#endif
+
+ case AMD_ID_LV033C:
+ DEBUGF("Am29LV033C\n");
+ info->flash_id += FLASH_AM033C;
+ info->sector_count = 64;
+ info->size = 0x01000000;
+ break; /* => 16Mb */
+
+ case STM_ID_F040B:
+ DEBUGF("M29F040B\n");
+ info->flash_id += FLASH_AM040;
+ info->sector_count = 8;
+ info->size = 0x00080000;
+ break; /* => 512 kB */
+
+ default:
+ info->flash_id = FLASH_UNKNOWN;
+ flash_reset (addr);
+ flash_to_mem();
+ return (0); /* => no or unknown flash */
+
+ }
+
+ if (info->sector_count > CFG_MAX_FLASH_SECT) {
+ mon_printf ("** ERROR: sector count %d > max (%d) **\n",
+ info->sector_count, CFG_MAX_FLASH_SECT);
+ info->sector_count = CFG_MAX_FLASH_SECT;
+ }
+
+ if (! flash_get_offsets (addr, info)) {
+ flash_reset (addr);
+ flash_to_mem();
+ return 0;
+ }
+
+ /* check for protected sectors */
+ for (i = 0; i < info->sector_count; i++) {
+ /* read sector protection at sector address, (A7 .. A0) = 0x02 */
+ /* D0 = 1 if protected */
+ value = in8(info->start[i] + 2);
+ iobarrier_rw();
+ info->protect[i] = (value & 1) != 0;
+ }
+
+ /*
+ * Reset bank to read mode
+ */
+ flash_reset (addr);
+
+ flash_to_mem();
+
+ return (info->size);
+}
+
+static int flash_get_offsets (ulong base, flash_info_t *info)
+{
+ unsigned int i;
+
+ switch (info->flash_id & FLASH_TYPEMASK) {
+ case FLASH_AM040:
+ /* set sector offsets for uniform sector type */
+ for (i = 0; i < info->sector_count; i++) {
+ info->start[i] = base + i * info->size /
+ info->sector_count;
+ }
+ break;
+ default:
+ return 0;
+ }
+
+ return 1;
+}
+
+int flash_erase (flash_info_t *info, int s_first, int s_last)
+{
+ volatile ulong addr = info->start[0];
+ int flag, prot, sect, l_sect;
+ ulong start, now, last;
+
+ flash_to_xd();
+
+ if (s_first < 0 || s_first > s_last) {
+ if (info->flash_id == FLASH_UNKNOWN) {
+ mon_printf ("- missing\n");
+ } else {
+ mon_printf ("- no sectors to erase\n");
+ }
+ flash_to_mem();
+ return 1;
+ }
+
+ if (info->flash_id == FLASH_UNKNOWN) {
+ mon_printf ("Can't erase unknown flash type %08lx - aborted\n",
+ info->flash_id);
+ flash_to_mem();
+ return 1;
+ }
+
+ prot = 0;
+ for (sect=s_first; sect<=s_last; ++sect) {
+ if (info->protect[sect]) {
+ prot++;
+ }
+ }
+
+ if (prot) {
+ mon_printf ("- Warning: %d protected sectors will not be erased!\n",
+ prot);
+ } else {
+ mon_printf ("");
+ }
+
+ l_sect = -1;
+
+ /* Disable interrupts which might cause a timeout here */
+ flag = disable_interrupts();
+
+ out8(addr + 0x555, 0xAA);
+ iobarrier_rw();
+ out8(addr + 0x2AA, 0x55);
+ iobarrier_rw();
+ out8(addr + 0x555, 0x80);
+ iobarrier_rw();
+ out8(addr + 0x555, 0xAA);
+ iobarrier_rw();
+ out8(addr + 0x2AA, 0x55);
+ iobarrier_rw();
+
+ /* Start erase on unprotected sectors */
+ for (sect = s_first; sect<=s_last; sect++) {
+ if (info->protect[sect] == 0) { /* not protected */
+ addr = info->start[sect];
+ out8(addr, 0x30);
+ iobarrier_rw();
+ l_sect = sect;
+ }
+ }
+
+ /* re-enable interrupts if necessary */
+ if (flag)
+ enable_interrupts();
+
+ /* wait at least 80us - let's wait 1 ms */
+ mon_udelay (1000);
+
+ /*
+ * We wait for the last triggered sector
+ */
+ if (l_sect < 0)
+ goto DONE;
+
+ start = mon_get_timer (0);
+ last = start;
+ addr = info->start[l_sect];
+
+ DEBUGF ("Start erase timeout: %d\n", CFG_FLASH_ERASE_TOUT);
+
+ while ((in8(addr) & 0x80) != 0x80) {
+ if ((now = mon_get_timer(start)) > CFG_FLASH_ERASE_TOUT) {
+ mon_printf ("Timeout\n");
+ flash_reset (info->start[0]);
+ flash_to_mem();
+ return 1;
+ }
+ /* show that we're waiting */
+ if ((now - last) > 1000) { /* every second */
+ mon_putc ('.');
+ last = now;
+ }
+ iobarrier_rw();
+ }
+
+DONE:
+ /* reset to read mode */
+ flash_reset (info->start[0]);
+ flash_to_mem();
+
+ mon_printf (" done\n");
+ return 0;
+}
+
+/*
+ * Copy memory to flash, returns:
+ * 0 - OK
+ * 1 - write timeout
+ * 2 - Flash not erased
+ */
+int write_buff (flash_info_t *info, uchar *src, ulong addr, ulong cnt)
+{
+ ulong cp, wp, data;
+ int i, l, rc;
+ ulong out_cnt = 0;
+
+ flash_to_xd();
+
+ wp = (addr & ~3); /* get lower word aligned address */
+
+ /*
+ * handle unaligned start bytes
+ */
+ if ((l = addr - wp) != 0) {
+ data = 0;
+ for (i=0, cp=wp; i<l; ++i, ++cp) {
+ data = (data << 8) | (*(uchar *)cp);
+ }
+ for (; i<4 && cnt>0; ++i) {
+ data = (data << 8) | *src++;
+ --cnt;
+ ++cp;
+ }
+ for (; cnt==0 && i<4; ++i, ++cp) {
+ data = (data << 8) | (*(uchar *)cp);
+ }
+
+ if ((rc = write_word(info, wp, data)) != 0) {
+ flash_to_mem();
+ return (rc);
+ }
+ wp += 4;
+ }
+
+ mon_putc(219);
+
+ /*
+ * handle word aligned part
+ */
+ while (cnt >= 4) {
+ if (out_cnt>26214)
+ {
+ mon_putc(219);
+ out_cnt = 0;
+ }
+ data = 0;
+ for (i=0; i<4; ++i) {
+ data = (data << 8) | *src++;
+ }
+ if ((rc = write_word(info, wp, data)) != 0) {
+ flash_to_mem();
+ return (rc);
+ }
+ wp += 4;
+ cnt -= 4;
+ out_cnt += 4;
+ }
+
+ if (cnt == 0) {
+ flash_to_mem();
+ return (0);
+ }
+
+ /*
+ * handle unaligned tail bytes
+ */
+ data = 0;
+ for (i=0, cp=wp; i<4 && cnt>0; ++i, ++cp) {
+ data = (data << 8) | *src++;
+ --cnt;
+ }
+ for (; i<4; ++i, ++cp) {
+ data = (data << 8) | (*(uchar *)cp);
+ }
+
+ flash_to_mem();
+ return (write_word(info, wp, data));
+}
+
+/*
+ * Write a word to Flash, returns:
+ * 0 - OK
+ * 1 - write timeout
+ * 2 - Flash not erased
+ */
+static int write_word (flash_info_t *info, ulong dest, ulong data)
+{
+ volatile ulong addr = info->start[0];
+ ulong start;
+ int i;
+
+ flash_to_xd();
+
+ /* Check if Flash is (sufficiently) erased */
+ if ((in32(dest) & data) != data) {
+ flash_to_mem();
+ return (2);
+ }
+
+ /* write each byte out */
+ for (i = 0; i < 4; i++) {
+ char *data_ch = (char *)&data;
+ int flag = disable_interrupts();
+
+ out8(addr + 0x555, 0xAA);
+ iobarrier_rw();
+ out8(addr + 0x2AA, 0x55);
+ iobarrier_rw();
+ out8(addr + 0x555, 0xA0);
+ iobarrier_rw();
+ out8(dest+i, data_ch[i]);
+ iobarrier_rw();
+
+ /* re-enable interrupts if necessary */
+ if (flag)
+ enable_interrupts();
+
+ /* data polling for D7 */
+ start = mon_get_timer (0);
+ while ((in8(dest+i) & 0x80) != (data_ch[i] & 0x80)) {
+ if (mon_get_timer(start) > CFG_FLASH_WRITE_TOUT) {
+ flash_reset (addr);
+ flash_to_mem();
+ return (1);
+ }
+ iobarrier_rw();
+ }
+ }
+
+ flash_reset (addr);
+ flash_to_mem();
+ return (0);
+}
+
+/*
+ * Reset bank to read mode
+ */
+static void flash_reset (ulong addr)
+{
+ flash_to_xd();
+ out8(addr, 0xF0); /* reset bank */
+ iobarrier_rw();
+ flash_to_mem();
+}
+
+void flash_print_info (flash_info_t *info)
+{
+ int i;
+
+ if (info->flash_id == FLASH_UNKNOWN) {
+ mon_printf ("missing or unknown FLASH type\n");
+ return;
+ }
+
+ switch (info->flash_id & FLASH_VENDMASK) {
+ case FLASH_MAN_AMD: mon_printf ("AMD "); break;
+ case FLASH_MAN_FUJ: mon_printf ("FUJITSU "); break;
+ case FLASH_MAN_BM: mon_printf ("BRIGHT MICRO "); break;
+ case FLASH_MAN_STM: mon_printf ("SGS THOMSON "); break;
+ default: mon_printf ("Unknown Vendor "); break;
+ }
+
+ switch (info->flash_id & FLASH_TYPEMASK) {
+ case FLASH_AM040: mon_printf ("29F040 or 29LV040 (4 Mbit, uniform sectors)\n");
+ break;
+ case FLASH_AM400B: mon_printf ("AM29LV400B (4 Mbit, bottom boot sect)\n");
+ break;
+ case FLASH_AM400T: mon_printf ("AM29LV400T (4 Mbit, top boot sector)\n");
+ break;
+ case FLASH_AM800B: mon_printf ("AM29LV800B (8 Mbit, bottom boot sect)\n");
+ break;
+ case FLASH_AM800T: mon_printf ("AM29LV800T (8 Mbit, top boot sector)\n");
+ break;
+ case FLASH_AM160B: mon_printf ("AM29LV160B (16 Mbit, bottom boot sect)\n");
+ break;
+ case FLASH_AM160T: mon_printf ("AM29LV160T (16 Mbit, top boot sector)\n");
+ break;
+ case FLASH_AM320B: mon_printf ("AM29LV320B (32 Mbit, bottom boot sect)\n");
+ break;
+ case FLASH_AM320T: mon_printf ("AM29LV320T (32 Mbit, top boot sector)\n");
+ break;
+ default: mon_printf ("Unknown Chip Type\n");
+ break;
+ }
+
+ if (info->size % 0x100000 == 0) {
+ mon_printf (" Size: %ld MB in %d Sectors\n",
+ info->size / 0x100000, info->sector_count);
+ } else if (info->size % 0x400 == 0) {
+ mon_printf (" Size: %ld KB in %d Sectors\n",
+ info->size / 0x400, info->sector_count);
+ } else {
+ mon_printf (" Size: %ld B in %d Sectors\n",
+ info->size, info->sector_count);
+ }
+
+ mon_printf (" Sector Start Addresses:");
+ for (i=0; i<info->sector_count; ++i) {
+ if ((i % 5) == 0)
+ mon_printf ("\n ");
+ mon_printf (" %08lX%s",
+ info->start[i],
+ info->protect[i] ? " (RO)" : " "
+ );
+ }
+ mon_printf ("\n");
+}
diff --git a/tools/updater/junk b/tools/updater/junk
new file mode 100644
index 00000000000..f73285a8324
--- /dev/null
+++ b/tools/updater/junk
@@ -0,0 +1 @@
+................................................................................................................................................................................................................................................................
\ No newline at end of file
diff --git a/tools/updater/ppcstring.S b/tools/updater/ppcstring.S
new file mode 100644
index 00000000000..97023a0555a
--- /dev/null
+++ b/tools/updater/ppcstring.S
@@ -0,0 +1,216 @@
+/*
+ * String handling functions for PowerPC.
+ *
+ * Copyright (C) 1996 Paul Mackerras.
+ *
+ * This program is free software; you can redistribute it and/or
+ * modify it under the terms of the GNU General Public License
+ * as published by the Free Software Foundation; either version
+ * 2 of the License, or (at your option) any later version.
+ */
+#include <ppc_asm.tmpl>
+#include <asm/errno.h>
+
+ .globl strcpy
+strcpy:
+ addi r5,r3,-1
+ addi r4,r4,-1
+1: lbzu r0,1(r4)
+ cmpwi 0,r0,0
+ stbu r0,1(r5)
+ bne 1b
+ blr
+
+ .globl strncpy
+strncpy:
+ cmpwi 0,r5,0
+ beqlr
+ mtctr r5
+ addi r6,r3,-1
+ addi r4,r4,-1
+1: lbzu r0,1(r4)
+ cmpwi 0,r0,0
+ stbu r0,1(r6)
+ bdnzf 2,1b /* dec ctr, branch if ctr != 0 && !cr0.eq */
+ blr
+
+ .globl strcat
+strcat:
+ addi r5,r3,-1
+ addi r4,r4,-1
+1: lbzu r0,1(r5)
+ cmpwi 0,r0,0
+ bne 1b
+ addi r5,r5,-1
+1: lbzu r0,1(r4)
+ cmpwi 0,r0,0
+ stbu r0,1(r5)
+ bne 1b
+ blr
+
+ .globl strcmp
+strcmp:
+ addi r5,r3,-1
+ addi r4,r4,-1
+1: lbzu r3,1(r5)
+ cmpwi 1,r3,0
+ lbzu r0,1(r4)
+ subf. r3,r0,r3
+ beqlr 1
+ beq 1b
+ blr
+
+ .globl strlen
+strlen:
+ addi r4,r3,-1
+1: lbzu r0,1(r4)
+ cmpwi 0,r0,0
+ bne 1b
+ subf r3,r3,r4
+ blr
+
+ .globl memset
+memset:
+ rlwimi r4,r4,8,16,23
+ rlwimi r4,r4,16,0,15
+ addi r6,r3,-4
+ cmplwi 0,r5,4
+ blt 7f
+ stwu r4,4(r6)
+ beqlr
+ andi. r0,r6,3
+ add r5,r0,r5
+ subf r6,r0,r6
+ rlwinm r0,r5,32-2,2,31
+ mtctr r0
+ bdz 6f
+1: stwu r4,4(r6)
+ bdnz 1b
+6: andi. r5,r5,3
+7: cmpwi 0,r5,0
+ beqlr
+ mtctr r5
+ addi r6,r6,3
+8: stbu r4,1(r6)
+ bdnz 8b
+ blr
+
+ .globl bcopy
+bcopy:
+ mr r6,r3
+ mr r3,r4
+ mr r4,r6
+ b memcpy
+
+ .globl memmove
+memmove:
+ cmplw 0,r3,r4
+ bgt backwards_memcpy
+ /* fall through */
+
+ .globl memcpy
+memcpy:
+ rlwinm. r7,r5,32-3,3,31 /* r0 = r5 >> 3 */
+ addi r6,r3,-4
+ addi r4,r4,-4
+ beq 2f /* if less than 8 bytes to do */
+ andi. r0,r6,3 /* get dest word aligned */
+ mtctr r7
+ bne 5f
+1: lwz r7,4(r4)
+ lwzu r8,8(r4)
+ stw r7,4(r6)
+ stwu r8,8(r6)
+ bdnz 1b
+ andi. r5,r5,7
+2: cmplwi 0,r5,4
+ blt 3f
+ lwzu r0,4(r4)
+ addi r5,r5,-4
+ stwu r0,4(r6)
+3: cmpwi 0,r5,0
+ beqlr
+ mtctr r5
+ addi r4,r4,3
+ addi r6,r6,3
+4: lbzu r0,1(r4)
+ stbu r0,1(r6)
+ bdnz 4b
+ blr
+5: subfic r0,r0,4
+ mtctr r0
+6: lbz r7,4(r4)
+ addi r4,r4,1
+ stb r7,4(r6)
+ addi r6,r6,1
+ bdnz 6b
+ subf r5,r0,r5
+ rlwinm. r7,r5,32-3,3,31
+ beq 2b
+ mtctr r7
+ b 1b
+
+ .globl backwards_memcpy
+backwards_memcpy:
+ rlwinm. r7,r5,32-3,3,31 /* r0 = r5 >> 3 */
+ add r6,r3,r5
+ add r4,r4,r5
+ beq 2f
+ andi. r0,r6,3
+ mtctr r7
+ bne 5f
+1: lwz r7,-4(r4)
+ lwzu r8,-8(r4)
+ stw r7,-4(r6)
+ stwu r8,-8(r6)
+ bdnz 1b
+ andi. r5,r5,7
+2: cmplwi 0,r5,4
+ blt 3f
+ lwzu r0,-4(r4)
+ subi r5,r5,4
+ stwu r0,-4(r6)
+3: cmpwi 0,r5,0
+ beqlr
+ mtctr r5
+4: lbzu r0,-1(r4)
+ stbu r0,-1(r6)
+ bdnz 4b
+ blr
+5: mtctr r0
+6: lbzu r7,-1(r4)
+ stbu r7,-1(r6)
+ bdnz 6b
+ subf r5,r0,r5
+ rlwinm. r7,r5,32-3,3,31
+ beq 2b
+ mtctr r7
+ b 1b
+
+ .globl memcmp
+memcmp:
+ cmpwi 0,r5,0
+ ble- 2f
+ mtctr r5
+ addi r6,r3,-1
+ addi r4,r4,-1
+1: lbzu r3,1(r6)
+ lbzu r0,1(r4)
+ subf. r3,r0,r3
+ bdnzt 2,1b
+ blr
+2: li r3,0
+ blr
+
+ .global memchr
+memchr:
+ cmpwi 0,r5,0
+ ble- 2f
+ mtctr r5
+ addi r3,r3,-1
+1: lbzu r0,1(r3)
+ cmpw 0,r0,r4
+ bdnzf 2,1b
+ beqlr
+2: li r3,0
+ blr
diff --git a/tools/updater/string.c b/tools/updater/string.c
new file mode 100644
index 00000000000..50537a65540
--- /dev/null
+++ b/tools/updater/string.c
@@ -0,0 +1,340 @@
+/*
+ * linux/lib/string.c
+ *
+ * Copyright (C) 1991, 1992 Linus Torvalds
+ */
+
+/*
+ * stupid library routines.. The optimized versions should generally be found
+ * as inline code in <asm-xx/string.h>
+ *
+ * These are buggy as well..
+ */
+
+#include <linux/types.h>
+#include <linux/string.h>
+#include <malloc.h>
+
+#define __HAVE_ARCH_BCOPY
+#define __HAVE_ARCH_MEMCMP
+#define __HAVE_ARCH_MEMCPY
+#define __HAVE_ARCH_MEMMOVE
+#define __HAVE_ARCH_MEMSET
+#define __HAVE_ARCH_STRCAT
+#define __HAVE_ARCH_STRCMP
+#define __HAVE_ARCH_STRCPY
+#define __HAVE_ARCH_STRLEN
+#define __HAVE_ARCH_STRNCPY
+
+char * ___strtok = NULL;
+
+#ifndef __HAVE_ARCH_STRCPY
+char * strcpy(char * dest,const char *src)
+{
+ char *tmp = dest;
+
+ while ((*dest++ = *src++) != '\0')
+ /* nothing */;
+ return tmp;
+}
+#endif
+
+#ifndef __HAVE_ARCH_STRNCPY
+char * strncpy(char * dest,const char *src,size_t count)
+{
+ char *tmp = dest;
+
+ while (count-- && (*dest++ = *src++) != '\0')
+ /* nothing */;
+
+ return tmp;
+}
+#endif
+
+#ifndef __HAVE_ARCH_STRCAT
+char * strcat(char * dest, const char * src)
+{
+ char *tmp = dest;
+
+ while (*dest)
+ dest++;
+ while ((*dest++ = *src++) != '\0')
+ ;
+
+ return tmp;
+}
+#endif
+
+#ifndef __HAVE_ARCH_STRNCAT
+char * strncat(char *dest, const char *src, size_t count)
+{
+ char *tmp = dest;
+
+ if (count) {
+ while (*dest)
+ dest++;
+ while ((*dest++ = *src++)) {
+ if (--count == 0) {
+ *dest = '\0';
+ break;
+ }
+ }
+ }
+
+ return tmp;
+}
+#endif
+
+#ifndef __HAVE_ARCH_STRCMP
+int strcmp(const char * cs,const char * ct)
+{
+ register signed char __res;
+
+ while (1) {
+ if ((__res = *cs - *ct++) != 0 || !*cs++)
+ break;
+ }
+
+ return __res;
+}
+#endif
+
+#ifndef __HAVE_ARCH_STRNCMP
+int strncmp(const char * cs,const char * ct,size_t count)
+{
+ register signed char __res = 0;
+
+ while (count) {
+ if ((__res = *cs - *ct++) != 0 || !*cs++)
+ break;
+ count--;
+ }
+
+ return __res;
+}
+#endif
+
+#ifndef __HAVE_ARCH_STRCHR
+char * strchr(const char * s, int c)
+{
+ for(; *s != (char) c; ++s)
+ if (*s == '\0')
+ return NULL;
+ return (char *) s;
+}
+#endif
+
+#ifndef __HAVE_ARCH_STRRCHR
+char * strrchr(const char * s, int c)
+{
+ const char *p = s + strlen(s);
+ do {
+ if (*p == (char)c)
+ return (char *)p;
+ } while (--p >= s);
+ return NULL;
+}
+#endif
+
+#ifndef __HAVE_ARCH_STRLEN
+size_t strlen(const char * s)
+{
+ const char *sc;
+
+ for (sc = s; *sc != '\0'; ++sc)
+ /* nothing */;
+ return sc - s;
+}
+#endif
+
+#ifndef __HAVE_ARCH_STRNLEN
+size_t strnlen(const char * s, size_t count)
+{
+ const char *sc;
+
+ for (sc = s; count-- && *sc != '\0'; ++sc)
+ /* nothing */;
+ return sc - s;
+}
+#endif
+
+#ifndef __HAVE_ARCH_STRDUP
+char * strdup(const char *s)
+{
+ char *new;
+
+ if ((s == NULL) ||
+ ((new = mon_malloc (strlen(s) + 1)) == NULL) ) {
+ return NULL;
+ }
+
+ strcpy (new, s);
+ return new;
+}
+#endif
+
+#ifndef __HAVE_ARCH_STRSPN
+size_t strspn(const char *s, const char *accept)
+{
+ const char *p;
+ const char *a;
+ size_t count = 0;
+
+ for (p = s; *p != '\0'; ++p) {
+ for (a = accept; *a != '\0'; ++a) {
+ if (*p == *a)
+ break;
+ }
+ if (*a == '\0')
+ return count;
+ ++count;
+ }
+
+ return count;
+}
+#endif
+
+#ifndef __HAVE_ARCH_STRPBRK
+char * strpbrk(const char * cs,const char * ct)
+{
+ const char *sc1,*sc2;
+
+ for( sc1 = cs; *sc1 != '\0'; ++sc1) {
+ for( sc2 = ct; *sc2 != '\0'; ++sc2) {
+ if (*sc1 == *sc2)
+ return (char *) sc1;
+ }
+ }
+ return NULL;
+}
+#endif
+
+#ifndef __HAVE_ARCH_STRTOK
+char * strtok(char * s,const char * ct)
+{
+ char *sbegin, *send;
+
+ sbegin = s ? s : ___strtok;
+ if (!sbegin) {
+ return NULL;
+ }
+ sbegin += strspn(sbegin,ct);
+ if (*sbegin == '\0') {
+ ___strtok = NULL;
+ return( NULL );
+ }
+ send = strpbrk( sbegin, ct);
+ if (send && *send != '\0')
+ *send++ = '\0';
+ ___strtok = send;
+ return (sbegin);
+}
+#endif
+
+#ifndef __HAVE_ARCH_MEMSET
+void * memset(void * s,char c,size_t count)
+{
+ char *xs = (char *) s;
+
+ while (count--)
+ *xs++ = c;
+
+ return s;
+}
+#endif
+
+#ifndef __HAVE_ARCH_BCOPY
+char * bcopy(const char * src, char * dest, int count)
+{
+ char *tmp = dest;
+
+ while (count--)
+ *tmp++ = *src++;
+
+ return dest;
+}
+#endif
+
+#ifndef __HAVE_ARCH_MEMCPY
+void * memcpy(void * dest,const void *src,size_t count)
+{
+ char *tmp = (char *) dest, *s = (char *) src;
+
+ while (count--)
+ *tmp++ = *s++;
+
+ return dest;
+}
+#endif
+
+#ifndef __HAVE_ARCH_MEMMOVE
+void * memmove(void * dest,const void *src,size_t count)
+{
+ char *tmp, *s;
+
+ if (dest <= src) {
+ tmp = (char *) dest;
+ s = (char *) src;
+ while (count--)
+ *tmp++ = *s++;
+ }
+ else {
+ tmp = (char *) dest + count;
+ s = (char *) src + count;
+ while (count--)
+ *--tmp = *--s;
+ }
+
+ return dest;
+}
+#endif
+
+#ifndef __HAVE_ARCH_MEMCMP
+int memcmp(const void * cs,const void * ct,size_t count)
+{
+ const unsigned char *su1, *su2;
+ signed char res = 0;
+
+ for( su1 = cs, su2 = ct; 0 < count; ++su1, ++su2, count--)
+ if ((res = *su1 - *su2) != 0)
+ break;
+ return res;
+}
+#endif
+
+/*
+ * find the first occurrence of byte 'c', or 1 past the area if none
+ */
+#ifndef __HAVE_ARCH_MEMSCAN
+void * memscan(void * addr, int c, size_t size)
+{
+ unsigned char * p = (unsigned char *) addr;
+
+ while (size) {
+ if (*p == c)
+ return (void *) p;
+ p++;
+ size--;
+ }
+ return (void *) p;
+}
+#endif
+
+#ifndef __HAVE_ARCH_STRSTR
+char * strstr(const char * s1,const char * s2)
+{
+ int l1, l2;
+
+ l2 = strlen(s2);
+ if (!l2)
+ return (char *) s1;
+ l1 = strlen(s1);
+ while (l1 >= l2) {
+ l1--;
+ if (!memcmp(s1,s2,l2))
+ return (char *) s1;
+ s1++;
+ }
+ return NULL;
+}
+#endif
diff --git a/tools/updater/update.c b/tools/updater/update.c
new file mode 100644
index 00000000000..66c6dfc30dc
--- /dev/null
+++ b/tools/updater/update.c
@@ -0,0 +1,67 @@
+#include <common.h>
+#include <syscall.h>
+
+extern unsigned long __dummy;
+void do_reset (void);
+void do_updater(void);
+
+void _main(void)
+{
+ int i;
+ mon_printf("U-Boot Firmware Updater\n\n\n");
+ mon_printf("****************************************************\n"
+ "* ATTENTION!! PLEASE READ THIS NOTICE CAREFULLY! *\n"
+ "****************************************************\n\n"
+ "This program will update your computer's firmware.\n"
+ "Do NOT remove the disk, reset the machine, or do\n"
+ "anything that might disrupt functionality. If this\n");
+ mon_printf("Program fails, your computer might be unusable, and\n"
+ "you will need to return your board for reflashing.\n"
+ "If you find this too risky, remove the diskette and\n"
+ "switch off your machine now. Otherwise press the \n"
+ "SPACE key now to start the process\n\n");
+ do
+ {
+ char x;
+ while (!mon_tstc());
+ x = mon_getc();
+ if (x == ' ') break;
+ } while (1);
+
+ do_updater();
+
+ i = 5;
+
+ mon_printf("\nUpdate done. Please remove diskette.\n");
+ mon_printf("The machine will automatically reset in %d seconds\n", i);
+ mon_printf("You can switch off/reset now when the floppy is removed\n\n");
+
+ while (i)
+ {
+ mon_printf("Resetting in %d\r", i);
+ mon_udelay(1000000);
+ i--;
+ }
+ do_reset();
+ while (1);
+}
+
+int flash_sect_protect (int p, ulong addr_first, ulong addr_last);
+int flash_sect_erase (ulong addr_first, ulong addr_last);
+int flash_write (uchar *src, ulong addr, ulong cnt);
+
+void do_updater(void)
+{
+ unsigned long *addr = &__dummy + 65;
+ unsigned long flash_size = flash_init();
+ int rc;
+
+ flash_sect_protect(0, 0xFFF00000, 0xFFF7FFFF);
+ mon_printf("Erasing ");
+ flash_sect_erase(0xFFF00000, 0xFFF7FFFF);
+ mon_printf("Writing ");
+ rc = flash_write((uchar *)addr, 0xFFF00000, 0x7FFFF);
+ if (rc != 0) mon_printf("\nFlashing failed due to error %d\n", rc);
+ else mon_printf("\ndone\n");
+ flash_sect_protect(1, 0xFFF00000, 0xFFF7FFFF);
+}
diff --git a/tools/updater/utils.c b/tools/updater/utils.c
new file mode 100644
index 00000000000..e230e19f928
--- /dev/null
+++ b/tools/updater/utils.c
@@ -0,0 +1,148 @@
+#include <common.h>
+#include <asm/processor.h>
+#include <memio.h>
+#include <linux/ctype.h>
+
+static __inline__ unsigned long
+get_msr(void)
+{
+ unsigned long msr;
+
+ asm volatile("mfmsr %0" : "=r" (msr) :);
+ return msr;
+}
+
+static __inline__ void
+set_msr(unsigned long msr)
+{
+ asm volatile("mtmsr %0" : : "r" (msr));
+}
+
+static __inline__ unsigned long
+get_dec(void)
+{
+ unsigned long val;
+
+ asm volatile("mfdec %0" : "=r" (val) :);
+ return val;
+}
+
+
+static __inline__ void
+set_dec(unsigned long val)
+{
+ asm volatile("mtdec %0" : : "r" (val));
+}
+
+
+void
+enable_interrupts(void)
+{
+ set_msr (get_msr() | MSR_EE);
+}
+
+/* returns flag if MSR_EE was set before */
+int
+disable_interrupts(void)
+{
+ ulong msr;
+
+ msr = get_msr();
+ set_msr (msr & ~MSR_EE);
+ return ((msr & MSR_EE) != 0);
+}
+
+u8 in8(u32 port)
+{
+ return in_byte(port);
+}
+
+void out8(u32 port, u8 val)
+{
+ out_byte(port, val);
+}
+
+unsigned long in32(u32 port)
+{
+ return in_long(port);
+}
+
+unsigned long simple_strtoul(const char *cp,char **endp,unsigned int base)
+{
+ unsigned long result = 0,value;
+
+ if (*cp == '0') {
+ cp++;
+ if ((*cp == 'x') && isxdigit(cp[1])) {
+ base = 16;
+ cp++;
+ }
+ if (!base) {
+ base = 8;
+ }
+ }
+ if (!base) {
+ base = 10;
+ }
+ while (isxdigit(*cp) && (value = isdigit(*cp) ? *cp-'0' : (islower(*cp)
+ ? toupper(*cp) : *cp)-'A'+10) < base) {
+ result = result*base + value;
+ cp++;
+ }
+ if (endp)
+ *endp = (char *)cp;
+ return result;
+}
+
+long simple_strtol(const char *cp,char **endp,unsigned int base)
+{
+ if(*cp=='-')
+ return -simple_strtoul(cp+1,endp,base);
+ return simple_strtoul(cp,endp,base);
+}
+
+static inline void
+soft_restart(unsigned long addr)
+{
+ /* SRR0 has system reset vector, SRR1 has default MSR value */
+ /* rfi restores MSR from SRR1 and sets the PC to the SRR0 value */
+
+ __asm__ __volatile__ ("mtspr 26, %0" :: "r" (addr));
+ __asm__ __volatile__ ("li 4, (1 << 6)" ::: "r4");
+ __asm__ __volatile__ ("mtspr 27, 4");
+ __asm__ __volatile__ ("rfi");
+
+ while(1); /* not reached */
+}
+
+void
+do_reset (void)
+{
+ ulong addr;
+ /* flush and disable I/D cache */
+ __asm__ __volatile__ ("mfspr 3, 1008" ::: "r3");
+ __asm__ __volatile__ ("ori 5, 5, 0xcc00" ::: "r5");
+ __asm__ __volatile__ ("ori 4, 3, 0xc00" ::: "r4");
+ __asm__ __volatile__ ("andc 5, 3, 5" ::: "r5");
+ __asm__ __volatile__ ("sync");
+ __asm__ __volatile__ ("mtspr 1008, 4");
+ __asm__ __volatile__ ("isync");
+ __asm__ __volatile__ ("sync");
+ __asm__ __volatile__ ("mtspr 1008, 5");
+ __asm__ __volatile__ ("isync");
+ __asm__ __volatile__ ("sync");
+
+#ifdef CFG_RESET_ADDRESS
+ addr = CFG_RESET_ADDRESS;
+#else
+ /*
+ * note: when CFG_MONITOR_BASE points to a RAM address,
+ * CFG_MONITOR_BASE - sizeof (ulong) is usually a valid
+ * address. Better pick an address known to be invalid on your
+ * system and assign it to CFG_RESET_ADDRESS.
+ */
+ addr = CFG_MONITOR_BASE - sizeof (ulong);
+#endif
+ soft_restart(addr);
+ while(1); /* not reached */
+}
--
GitLab